File |
Line number |
Procedure |
Code |
./pkg/ggl90/GGL90.h |
133 |
NO PROCEDURE |
& IDEMIX_tidal_file, IDEMIX_wind_file |
./pkg/ggl90/GGL90.h |
136 |
NO PROCEDURE |
& IDEMIX_tidal_file, IDEMIX_wind_file, |
./pkg/ggl90/ggl90_init_varia.F |
118 |
GGL90_INIT_VARIA |
IF ( useIDEMIX .AND. IDEMIX_wind_file .NE. ' ' ) THEN |
./pkg/ggl90/ggl90_init_varia.F |
119 |
GGL90_INIT_VARIA |
CALL READ_REC_XY_RL( IDEMIX_wind_file ,IDEMIX_F_s,1,0,myThid ) |
./pkg/ggl90/ggl90_readparms.F |
135 |
GGL90_READPARMS |
IDEMIX_wind_file = ' ' |
./pkg/ggl90/ggl90_readparms.F |
356 |
GGL90_READPARMS |
CALL WRITE_0D_C( IDEMIX_wind_file, -1, INDEX_NONE, |
./pkg/ggl90/ggl90_readparms.F |
64 |
GGL90_READPARMS |
& IDEMIX_mu0,IDEMIX_tidal_file,IDEMIX_wind_file, |