| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/OBCS.h |
100 |
NO PROCEDURE |
& OBSuFile,OBSvFile,OBStFile,OBSsFile,OBSaFile,OBShFile, |
|
./pkg/obcs/OBCS.h |
111 |
NO PROCEDURE |
& OBSuFile,OBSvFile,OBStFile,OBSsFile,OBSaFile,OBShFile, |
|
./pkg/obcs/obcs_external_fields_load.F |
242 |
OBCS_EXTERNAL_FIELDS_LOAD |
IF ( OBSsFile .NE. ' ' ) THEN |
|
./pkg/obcs/obcs_external_fields_load.F |
243 |
OBCS_EXTERNAL_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBSsFile, fp,Nr,OBSs0,iRec0,myIter,myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
244 |
OBCS_EXTERNAL_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBSsFile, fp,Nr,OBSs1,iRec1,myIter,myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
423 |
OBCS_EXTERNAL_FIELDS_LOAD |
IF ( OBSsFile .NE. ' ' ) THEN |
|
./pkg/obcs/obcs_external_fields_load.F |
424 |
OBCS_EXTERNAL_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBSsFile,fp,Nr,OBSs0,iRec0,myIter,myThid ) |
|
./pkg/obcs/obcs_external_fields_load.F |
570 |
OBCS_EXTERNAL_FIELDS_LOAD |
IF ( OBSsFile .NE. ' ' ) CALL OBCS_EXTERNAL_FIELDS_INTERP_XZ( |
|
./pkg/obcs/obcs_readparms.F |
128 |
OBCS_READPARMS |
& OBSuFile,OBSvFile,OBStFile,OBSsFile,OBSaFile,OBShFile, |
|
./pkg/obcs/obcs_readparms.F |
213 |
OBCS_READPARMS |
OBSsFile = ' ' |
|
./pkg/ecco/cost_obcss.F |
155 |
COST_OBCSS |
call MDSREADFIELDXZ( OBSsFile, readBinaryPrec, 'RS', |