The TELEMAC-MASCARET system  trunk
user_forcing_gaia.f File Reference

Go to the source code of this file.


subroutine user_forcing_gaia

Function/Subroutine Documentation

◆ user_forcing_gaia()

subroutine user_forcing_gaia ( )
Makes it possible to enforce wave conditions in order to avoid coupling with TOMAWAC
     Impose values of :
     -  wave height:                     HW
     -  wave period:                     TW
     -  wave direction (wrt to Oy axis): THETAW 
User subroutine; does nothing by default
example with no waves:
amplitude = 0
CALL os('X=0 ',x=hw)
period = 1 s
CALL os('X=C ',x=tw,c=1.d0)
angle = 0
CALL os('X=0 ',x=thetaw)
user_forcing_gaia is called at each time step in order to impose a variable forcing (tidal current, for example)

Definition at line 4 of file user_forcing_gaia.f.

+ Here is the call graph for this function:
+ Here is the caller graph for this function: