| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/OBCS.h |
299 |
NO PROCEDURE |
& OBEuFile,OBEvFile,OBEtFile,OBEsFile,OBEaFile,OBEhFile, |
|
./pkg/obcs/OBCS.h |
310 |
NO PROCEDURE |
& OBEuFile,OBEvFile,OBEtFile,OBEsFile,OBEaFile,OBEhFile, |
|
./pkg/obcs/obcs_external_fields_load.F |
137 |
OBCS_EXTERNAL_FIELDS_LOAD |
IF ( OBEtFile .NE. ' ' ) THEN |
|
./pkg/obcs/obcs_external_fields_load.F |
138 |
OBCS_EXTERNAL_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEtFile, fp,Nr,OBEt0,iRec0,myIter,myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
139 |
OBCS_EXTERNAL_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEtFile, fp,Nr,OBEt1,iRec1,myIter,myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
334 |
OBCS_EXTERNAL_FIELDS_LOAD |
IF ( OBEtFile .NE. ' ' ) THEN |
|
./pkg/obcs/obcs_external_fields_load.F |
335 |
OBCS_EXTERNAL_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEtFile,fp,Nr,OBEt0,iRec0,myIter,myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
482 |
OBCS_EXTERNAL_FIELDS_LOAD |
IF ( OBEtFile .NE. ' ' ) CALL OBCS_EXTERNAL_FIELDS_INTERP_YZ( |
|
./pkg/obcs/obcs_readparms.F |
134 |
OBCS_READPARMS |
OBEtFile = ' ' |
|
./pkg/obcs/obcs_readparms.F |
49 |
OBCS_READPARMS |
& OBEuFile,OBEvFile,OBEtFile,OBEsFile,OBEaFile,OBEhFile, |
|
./pkg/ecco/cost_obcse.F |
118 |
COST_OBCSE |
call MDSREADFIELDYZ( OBEtFile, ReadBinaryPrec, 'RS', |