File |
Line number |
Procedure |
Code |
./pkg/rbcs/RBCS_PARAMS.h |
44 |
NO PROCEDURE |
CHARACTER*(MAX_LEN_FNAM) relaxUFile |
./pkg/rbcs/RBCS_PARAMS.h |
71 |
NO PROCEDURE |
& relaxUFile, |
./pkg/rbcs/rbcs_fields_load.F |
129 |
RBCS_FIELDS_LOAD |
IF ( useRBCuVel .AND. relaxUFile.NE.' ' ) THEN |
./pkg/rbcs/rbcs_fields_load.F |
131 |
RBCS_FIELDS_LOAD |
IL=ILNBLNK( relaxUFile ) |
./pkg/rbcs/rbcs_fields_load.F |
132 |
RBCS_FIELDS_LOAD |
WRITE(fullName,'(2A,I10.10)') relaxUFile(1:IL),'.',initer0 |
./pkg/rbcs/rbcs_fields_load.F |
134 |
RBCS_FIELDS_LOAD |
WRITE(fullName,'(2A,I10.10)') relaxUFile(1:IL),'.',initer1 |
./pkg/rbcs/rbcs_fields_load.F |
137 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(relaxUFile,rbcu0,intime0,myIter,myThid) |
./pkg/rbcs/rbcs_fields_load.F |
138 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(relaxUFile,rbcu1,intime1,myIter,myThid) |
./pkg/rbcs/rbcs_fields_load.F |
153 |
RBCS_FIELDS_LOAD |
IF ( (useRBCuVel .AND. relaxUFile.NE.' ') .OR. |
./pkg/rbcs/rbcs_readparms.F |
117 |
RBCS_READPARMS |
relaxUFile = ' ' |
./pkg/rbcs/rbcs_readparms.F |
65 |
RBCS_READPARMS |
& relaxUFile, |