| File |
Line number |
Procedure |
Code |
|
./pkg/shelfice/SHELFICE_COST.h |
31 |
NO PROCEDURE |
COMMON /SHELFICE_COST_C/ shifwflx_errfile |
|
./pkg/shelfice/SHELFICE_COST.h |
32 |
NO PROCEDURE |
CHARACTER*(MAX_LEN_FNAM) shifwflx_errfile |
|
./pkg/shelfice/shelfice_init_fixed.F |
120 |
SHELFICE_INIT_FIXED |
IF ( shifwflx_errfile .NE. ' ' ) THEN |
|
./pkg/shelfice/shelfice_init_fixed.F |
121 |
SHELFICE_INIT_FIXED |
CALL READ_REC_XY_RL( shifwflx_errfile, wshifwflx, 1, 0, myThid ) |
|
./pkg/shelfice/shelfice_readparms.F |
131 |
SHELFICE_READPARMS |
shifwflx_errfile = ' ' |
|
./pkg/shelfice/shelfice_readparms.F |
70 |
SHELFICE_READPARMS |
& , mult_shifwflx, wshifwflx0, shifwflx_errfile |