| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/OBCS.h |
300 |
NO PROCEDURE |
& OBWuFile,OBWvFile,OBWtFile,OBWsFile,OBWaFile,OBWhFile, |
|
./pkg/obcs/OBCS.h |
311 |
NO PROCEDURE |
& OBWuFile,OBWvFile,OBWtFile,OBWsFile,OBWaFile,OBWhFile, |
|
./pkg/obcs/obcs_external_fields_load.F |
164 |
OBCS_EXTERNAL_FIELDS_LOAD |
IF ( OBWvFile .NE. ' ' ) THEN |
|
./pkg/obcs/obcs_external_fields_load.F |
165 |
OBCS_EXTERNAL_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBWvFile, fp,Nr,OBWv0,iRec0,myIter,myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
166 |
OBCS_EXTERNAL_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBWvFile, fp,Nr,OBWv1,iRec1,myIter,myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
357 |
OBCS_EXTERNAL_FIELDS_LOAD |
IF ( OBWvFile .NE. ' ' ) THEN |
|
./pkg/obcs/obcs_external_fields_load.F |
358 |
OBCS_EXTERNAL_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBWvFile,fp,Nr,OBWv0,iRec0,myIter,myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
506 |
OBCS_EXTERNAL_FIELDS_LOAD |
IF ( OBWvFile .NE. ' ' ) CALL OBCS_EXTERNAL_FIELDS_INTERP_YZ( |
|
./pkg/obcs/obcs_readparms.F |
143 |
OBCS_READPARMS |
OBWvFile = ' ' |
|
./pkg/obcs/obcs_readparms.F |
50 |
OBCS_READPARMS |
& OBWuFile,OBWvFile,OBWtFile,OBWsFile,OBWaFile,OBWhFile, |
|
./pkg/ecco/cost_obcsw.F |
228 |
COST_OBCSW |
call MDSREADFIELDYZ( OBWvFile, readBinaryPrec, 'RS', |