| Symbol | Description | Uses |
| GGL90TKEFile | 8 |
| File | Line number | Procedure | Code |
| ./pkg/ggl90/GGL90.h | 66 | NO PROCEDURE |
CHARACTER*(MAX_LEN_FNAM) GGL90TKEFile |
| ./pkg/ggl90/GGL90.h | 67 | NO PROCEDURE |
COMMON /GGL90_PARMS_C/ GGL90TKEFile |
| ./pkg/ggl90/ggl90_init_varia.F | 142 | GGL90_INIT_VARIA |
IF ( GGL90TKEFile .NE. ' ' ) THEN |
| ./pkg/ggl90/ggl90_init_varia.F | 143 | GGL90_INIT_VARIA |
CALL READ_FLD_XYZ_RL( GGL90TKEFile, ' ', GGL90TKE, 0, myThid ) |
| ./pkg/ggl90/ggl90_readparms.F | 113 | GGL90_READPARMS |
GGL90TKEFile = ' ' |
| ./pkg/ggl90/ggl90_readparms.F | 315 | GGL90_READPARMS |
iL = MIN( iL, MAX(ILNBLNK(GGL90TKEFile),1) ) |
| ./pkg/ggl90/ggl90_readparms.F | 316 | GGL90_READPARMS |
WRITE(msgBuf,'(A,A)')'GGL90: GGL90TKEFile = ',GGL90TKEFile(1:iL) |
| ./pkg/ggl90/ggl90_readparms.F | 55 | GGL90_READPARMS |
& GGL90viscMax, GGL90diffMax, GGL90TKEFile, |