ideal_swan_obc_driver_example

 Example Driver to Generate idealized SWAN boundary forcing using ideal_swan_obc

 Author(s):  
    Geoff Cowles (University of Massachusetts Dartmouth)

 Revision history
   
==============================================================================

0001 function ideal_swan_obc_driver();
0002     
0003 % Example Driver to Generate idealized SWAN boundary forcing using ideal_swan_obc
0004 %
0005 % Author(s):
0006 %    Geoff Cowles (University of Massachusetts Dartmouth)
0007 %
0008 % Revision history
0009 %
0010 %==============================================================================
0011 
0012 t1 = greg2mjulian(2007,1,1,0,0,0);
0013 t2 = greg2mjulian(2007,2,1,0,0,0);
0014 time = t1:(6./24):t2;
0015 hs = 2.*sin((time-time(1))*2*pi/15);
0016 tp = 15. + 5.*sin((time-time(1))*2*pi/15);
0017 dir = 180*ones(prod(size(time)),1);
0018 spread = 10.;
0019 nodefile = 'tst.node';
0020 inc = 5;
0021 ideal_swan_obc(nodefile,time,hs,tp,dir,inc,spread);  
0022