File |
Line number |
Procedure |
Code |
./pkg/obcs/OBCS.h |
109 |
NO PROCEDURE |
& OBNwFile, OBSwFile, OBEwFile, OBWwFile, |
./pkg/obcs/OBCS.h |
98 |
NO PROCEDURE |
& OBNwFile, OBSwFile, OBEwFile, OBWwFile, |
./pkg/obcs/obcs_check.F |
312 |
OBCS_CHECK |
& OBEwFile.NE.' ' .OR. OBWwFile.NE.' ' ) |
./pkg/obcs/obcs_external_fields_load.F |
154 |
OBCS_EXTERNAL_FIELDS_LOAD |
IF ( OBEwFile .NE. ' ' ) THEN |
./pkg/obcs/obcs_external_fields_load.F |
155 |
OBCS_EXTERNAL_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEwFile, fp,Nr,OBEw0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_external_fields_load.F |
156 |
OBCS_EXTERNAL_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEwFile, fp,Nr,OBEw1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_external_fields_load.F |
349 |
OBCS_EXTERNAL_FIELDS_LOAD |
IF ( OBEwFile .NE. ' ' ) THEN |
./pkg/obcs/obcs_external_fields_load.F |
350 |
OBCS_EXTERNAL_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEwFile,fp,Nr,OBEw0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_external_fields_load.F |
495 |
OBCS_EXTERNAL_FIELDS_LOAD |
IF ( OBEwFile .NE. ' ' ) CALL OBCS_EXTERNAL_FIELDS_INTERP_YZ( |
./pkg/obcs/obcs_readparms.F |
136 |
OBCS_READPARMS |
& OBNwFile, OBSwFile, OBEwFile, OBWwFile, |
./pkg/obcs/obcs_readparms.F |
246 |
OBCS_READPARMS |
OBEwFile = ' ' |