| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/OBCS_PARAMS.h |
170 |
NO PROCEDURE |
& OBNetaFile,OBSetaFile,OBEetaFile,OBWetaFile, |
|
./pkg/obcs/OBCS_PARAMS.h |
182 |
NO PROCEDURE |
& OBNetaFile,OBSetaFile,OBEetaFile,OBWetaFile, |
|
./pkg/obcs/obcs_check.F |
404 |
OBCS_CHECK |
& OBEetaFile.NE.' ' .OR. OBWetaFile.NE.' ' ) |
|
./pkg/obcs/obcs_fields_load.F |
210 |
OBCS_FIELDS_LOAD |
IF ( OBWetaFile .NE. ' ' ) THEN |
|
./pkg/obcs/obcs_fields_load.F |
211 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL(OBWetaFile,fp,1,OBWeta0,iRec0,myIter,myThid) |
|
./pkg/obcs/obcs_fields_load.F |
212 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL(OBWetaFile,fp,1,OBWeta1,iRec1,myIter,myThid) |
|
./pkg/obcs/obcs_fields_load.F |
408 |
OBCS_FIELDS_LOAD |
IF ( OBWetaFile .NE. ' ' ) THEN |
|
./pkg/obcs/obcs_fields_load.F |
409 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBWetaFile, fp, 1, OBWeta0, iRec0, |
|
./pkg/obcs/obcs_fields_load.F |
553 |
OBCS_FIELDS_LOAD |
IF ( OBWetaFile .NE. ' ' ) THEN |
|
./pkg/obcs/obcs_readparms.F |
157 |
OBCS_READPARMS |
& OBNetaFile, OBSetaFile, OBEetaFile, OBWetaFile, |
|
./pkg/obcs/obcs_readparms.F |
329 |
OBCS_READPARMS |
OBWetaFile = ' ' |