| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/OBCS.h |
108 |
NO PROCEDURE |
& OBNetaFile,OBSetaFile,OBEetaFile,OBWetaFile, |
|
./pkg/obcs/OBCS.h |
97 |
NO PROCEDURE |
& OBNetaFile,OBSetaFile,OBEetaFile,OBWetaFile, |
|
./pkg/obcs/obcs_check.F |
321 |
OBCS_CHECK |
& OBEetaFile.NE.' ' .OR. OBWetaFile.NE.' ' ) |
|
./pkg/obcs/obcs_external_fields_load.F |
160 |
OBCS_EXTERNAL_FIELDS_LOAD |
IF ( OBEetaFile .NE. ' ' ) THEN |
|
./pkg/obcs/obcs_external_fields_load.F |
161 |
OBCS_EXTERNAL_FIELDS_LOAD |
CALL READ_REC_YZ_RL(OBEetaFile,fp,1,OBEeta0,iRec0,myIter,myThid) |
|
./pkg/obcs/obcs_external_fields_load.F |
162 |
OBCS_EXTERNAL_FIELDS_LOAD |
CALL READ_REC_YZ_RL(OBEetaFile,fp,1,OBEeta1,iRec1,myIter,myThid) |
|
./pkg/obcs/obcs_external_fields_load.F |
354 |
OBCS_EXTERNAL_FIELDS_LOAD |
IF ( OBEetaFile .NE. ' ' ) THEN |
|
./pkg/obcs/obcs_external_fields_load.F |
355 |
OBCS_EXTERNAL_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEetaFile, fp, 1, OBEeta0, iRec0, |
|
./pkg/obcs/obcs_external_fields_load.F |
499 |
OBCS_EXTERNAL_FIELDS_LOAD |
IF ( OBEetaFile .NE. ' ' ) THEN |
|
./pkg/obcs/obcs_readparms.F |
135 |
OBCS_READPARMS |
& OBNetaFile, OBSetaFile, OBEetaFile, OBWetaFile, |
|
./pkg/obcs/obcs_readparms.F |
242 |
OBCS_READPARMS |
OBEetaFile = ' ' |