| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/OBCS.h |
110 |
NO PROCEDURE |
& OBNuFile,OBNvFile,OBNtFile,OBNsFile,OBNaFile,OBNhFile, |
|
./pkg/obcs/OBCS.h |
99 |
NO PROCEDURE |
& OBNuFile,OBNvFile,OBNtFile,OBNsFile,OBNaFile,OBNhFile, |
|
./pkg/obcs/obcs_external_fields_load.F |
199 |
OBCS_EXTERNAL_FIELDS_LOAD |
IF ( OBNuFile .NE. ' ' ) THEN |
|
./pkg/obcs/obcs_external_fields_load.F |
200 |
OBCS_EXTERNAL_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBNuFile, fp,Nr,OBNu0,iRec0,myIter,myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
201 |
OBCS_EXTERNAL_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBNuFile, fp,Nr,OBNu1,iRec1,myIter,myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
388 |
OBCS_EXTERNAL_FIELDS_LOAD |
IF ( OBNuFile .NE. ' ' ) THEN |
|
./pkg/obcs/obcs_external_fields_load.F |
389 |
OBCS_EXTERNAL_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBNuFile,fp,Nr,OBNu0,iRec0,myIter,myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
538 |
OBCS_EXTERNAL_FIELDS_LOAD |
IF ( OBNuFile .NE. ' ' ) CALL OBCS_EXTERNAL_FIELDS_INTERP_XZ( |
|
./pkg/obcs/obcs_readparms.F |
127 |
OBCS_READPARMS |
& OBNuFile,OBNvFile,OBNtFile,OBNsFile,OBNaFile,OBNhFile, |
|
./pkg/obcs/obcs_readparms.F |
200 |
OBCS_READPARMS |
OBNuFile = ' ' |
|
./pkg/ecco/cost_obcsn.F |
192 |
COST_OBCSN |
call MDSREADFIELDXZ( OBNuFile, readBinaryPrec, 'RS', |