close all
clear all

%Number of points for each element type
NumPts(1) = 4;  
NumPts(2) = 5; 
NumPts(3) = 8;  
NumPts(4) = 9; 


filenm = 'Plate1';
title = 'Plate1';
depth_offset = -100;

WaveNumbers = [1000.0];
RunConditions.depth = -1;  %Infinite Depth
RunConditions.WaveAmp = 1;  %Wave Amp
RunConditions.ISym = 2;  %Two Planes of Symmetry
RunConditions.IType = 1;  %Freely floating body
RunConditions.IPrint = 0;  %Don't print velocity potential

BaseEl{1}.Type = 1;  %Four Point Quadrilateral
BaseEl{1}.CoordSys = 1;  %Cartesian CS
BaseEl{1}.x = [0 1 1 0];
BaseEl{1}.y = [0 0 1 1];
BaseEl{1}.z = [0 0 0 0];


SE{1}.BaseElNum = 1;
SE{1}.Offset = [0 0 0.02];
SE{1}.Normal = 1;
SE{1}.DivX = 6;
SE{1}.DivY = 6;

SE{2}.BaseElNum = 1;
SE{2}.Offset = [0 0 -.02];
SE{2}.Normal = -1;
SE{2}.DivX = 6;
SE{2}.DivY = 6;


WriteMGEN(filenm,title,depth_offset,RunConditions,BaseEl,SE)