| File |
Line number |
Procedure |
Code |
|
./pkg/rbcs/rbcs_fields_load.F |
162 |
RBCS_FIELDS_LOAD |
WRITE(fullName,'(2a,i10.10)') relaxTFile(1:IL),'.',initer0 |
|
./pkg/rbcs/rbcs_fields_load.F |
163 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(fullName, rbct0, 1, myIter, myThid) |
|
./pkg/rbcs/rbcs_fields_load.F |
164 |
RBCS_FIELDS_LOAD |
WRITE(fullName,'(2a,i10.10)') relaxTFile(1:IL),'.',initer1 |
|
./pkg/rbcs/rbcs_fields_load.F |
165 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(fullName, rbct1, 1, myIter, myThid) |
|
./pkg/rbcs/rbcs_fields_load.F |
174 |
RBCS_FIELDS_LOAD |
WRITE(fullName,'(2a,i10.10)') relaxSFile(1:IL),'.',initer0 |
|
./pkg/rbcs/rbcs_fields_load.F |
175 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(fullName, rbcs0, 1, myIter, myThid) |
|
./pkg/rbcs/rbcs_fields_load.F |
176 |
RBCS_FIELDS_LOAD |
WRITE(fullName,'(2a,i10.10)') relaxSFile(1:IL),'.',initer1 |
|
./pkg/rbcs/rbcs_fields_load.F |
177 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(fullName, rbcs1, 1, myIter, myThid) |
|
./pkg/rbcs/rbcs_fields_load.F |
191 |
RBCS_FIELDS_LOAD |
WRITE(fullName,'(2a,i10.10)') relaxPtracerFile(iTracer)(1:IL) |
|
./pkg/rbcs/rbcs_fields_load.F |
193 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS( fullName, |
|
./pkg/rbcs/rbcs_fields_load.F |
196 |
RBCS_FIELDS_LOAD |
WRITE(fullName,'(2a,i10.10)') relaxPtracerFile(iTracer)(1:IL) |
|
./pkg/rbcs/rbcs_fields_load.F |
198 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS( fullName, |
|
./pkg/rbcs/rbcs_fields_load.F |
62 |
RBCS_FIELDS_LOAD |
CHARACTER*(MAX_LEN_FNAM) fullName |
|
./pkg/rw/read_fld_xy_rl.F |
28 |
READ_FLD_XY_RL |
CHARACTER*(MAX_LEN_FNAM) fullName |
|
./pkg/rw/read_fld_xy_rl.F |
36 |
READ_FLD_XY_RL |
WRITE( fullName, '(A)' ) pref(s1Lo:s1Hi) |
|
./pkg/rw/read_fld_xy_rl.F |
40 |
READ_FLD_XY_RL |
WRITE( fullName, '(A,A)' ) pref(s1Lo:s1Hi),suff(s2Lo:s2Hi) |
|
./pkg/rw/read_fld_xy_rl.F |
49 |
READ_FLD_XY_RL |
I fullName, readBinaryPrec, useCurrentDir, |
|
./pkg/rw/read_fld_xy_rs.F |
28 |
READ_FLD_XY_RS |
CHARACTER*(MAX_LEN_FNAM) fullName |
|
./pkg/rw/read_fld_xy_rs.F |
36 |
READ_FLD_XY_RS |
WRITE( fullName, '(A)' ) pref(s1Lo:s1Hi) |
|
./pkg/rw/read_fld_xy_rs.F |
40 |
READ_FLD_XY_RS |
WRITE( fullName, '(A,A)' ) pref(s1Lo:s1Hi),suff(s2Lo:s2Hi) |
|
./pkg/rw/read_fld_xy_rs.F |
49 |
READ_FLD_XY_RS |
I fullName, readBinaryPrec, useCurrentDir, |
|
./pkg/rw/read_fld_xyz_rl.F |
28 |
READ_FLD_XYZ_RL |
CHARACTER*(MAX_LEN_FNAM) fullName |
|
./pkg/rw/read_fld_xyz_rl.F |
36 |
READ_FLD_XYZ_RL |
WRITE( fullName, '(A)' ) pref(s1Lo:s1Hi) |
|
./pkg/rw/read_fld_xyz_rl.F |
40 |
READ_FLD_XYZ_RL |
WRITE( fullName, '(A,A)' ) pref(s1Lo:s1Hi),suff(s2Lo:s2Hi) |
|
./pkg/rw/read_fld_xyz_rl.F |
49 |
READ_FLD_XYZ_RL |
I fullName, readBinaryPrec, useCurrentDir, |
|
./pkg/rw/read_fld_xyz_rs.F |
28 |
READ_FLD_XYZ_RS |
CHARACTER*(MAX_LEN_FNAM) fullName |
|
./pkg/rw/read_fld_xyz_rs.F |
36 |
READ_FLD_XYZ_RS |
WRITE( fullName, '(A)' ) pref(s1Lo:s1Hi) |
|
./pkg/rw/read_fld_xyz_rs.F |
40 |
READ_FLD_XYZ_RS |
WRITE( fullName, '(A,A)' ) pref(s1Lo:s1Hi),suff(s2Lo:s2Hi) |
|
./pkg/rw/read_fld_xyz_rs.F |
49 |
READ_FLD_XYZ_RS |
I fullName, readBinaryPrec, useCurrentDir, |
|
./pkg/rw/read_glvec_rl.F |
43 |
READ_GLVEC_RL |
CHARACTER*(MAX_LEN_FNAM) fullName |
|
./pkg/rw/read_glvec_rl.F |
52 |
READ_GLVEC_RL |
WRITE( fullName, '(A)' ) pref(s1Lo:s1Hi) |
|
./pkg/rw/read_glvec_rl.F |
56 |
READ_GLVEC_RL |
WRITE( fullName, '(A,A)' ) pref(s1Lo:s1Hi),suff(s2Lo:s2Hi) |
|
./pkg/rw/read_glvec_rl.F |
65 |
READ_GLVEC_RL |
& fullName, readBinaryPrec, ioUnit, |
|
./pkg/rw/read_glvec_rs.F |
43 |
READ_GLVEC_RS |
CHARACTER*(MAX_LEN_FNAM) fullName |
|
./pkg/rw/read_glvec_rs.F |
52 |
READ_GLVEC_RS |
WRITE( fullName, '(A)' ) pref(s1Lo:s1Hi) |
|
./pkg/rw/read_glvec_rs.F |
56 |
READ_GLVEC_RS |
WRITE( fullName, '(A,A)' ) pref(s1Lo:s1Hi),suff(s2Lo:s2Hi) |
|
./pkg/rw/read_glvec_rs.F |
65 |
READ_GLVEC_RS |
& fullName, readBinaryPrec, ioUnit, |
|
./pkg/rw/write_fld_3d_rl.F |
32 |
WRITE_FLD_3D_RL |
CHARACTER*(MAX_LEN_FNAM) fullName |
|
./pkg/rw/write_fld_3d_rl.F |
40 |
WRITE_FLD_3D_RL |
WRITE( fullName, '(A)' ) pref(s1Lo:s1Hi) |
|
./pkg/rw/write_fld_3d_rl.F |
42 |
WRITE_FLD_3D_RL |
WRITE( fullName, '(A,A,I10.10)' ) pref(s1Lo:s1Hi),'.',myIter |
|
./pkg/rw/write_fld_3d_rl.F |
46 |
WRITE_FLD_3D_RL |
WRITE( fullName, '(A,A)' ) pref(s1Lo:s1Hi),suff(s2Lo:s2Hi) |
|
./pkg/rw/write_fld_3d_rl.F |
54 |
WRITE_FLD_3D_RL |
I fullName, writeBinaryPrec, |
|
./pkg/rw/write_fld_3d_rs.F |
32 |
WRITE_FLD_3D_RS |
CHARACTER*(MAX_LEN_FNAM) fullName |
|
./pkg/rw/write_fld_3d_rs.F |
40 |
WRITE_FLD_3D_RS |
WRITE( fullName, '(A)' ) pref(s1Lo:s1Hi) |
|
./pkg/rw/write_fld_3d_rs.F |
42 |
WRITE_FLD_3D_RS |
WRITE( fullName, '(A,A,I10.10)' ) pref(s1Lo:s1Hi),'.',myIter |
|
./pkg/rw/write_fld_3d_rs.F |
46 |
WRITE_FLD_3D_RS |
WRITE( fullName, '(A,A)' ) pref(s1Lo:s1Hi),suff(s2Lo:s2Hi) |
|
./pkg/rw/write_fld_3d_rs.F |
54 |
WRITE_FLD_3D_RS |
I fullName, writeBinaryPrec, |
|
./pkg/rw/write_fld_xy_rl.F |
31 |
WRITE_FLD_XY_RL |
CHARACTER*(MAX_LEN_FNAM) fullName |
|
./pkg/rw/write_fld_xy_rl.F |
39 |
WRITE_FLD_XY_RL |
WRITE( fullName, '(A)' ) pref(s1Lo:s1Hi) |
|
./pkg/rw/write_fld_xy_rl.F |
43 |
WRITE_FLD_XY_RL |
WRITE( fullName, '(A,A)' ) pref(s1Lo:s1Hi),suff(s2Lo:s2Hi) |
|
./pkg/rw/write_fld_xy_rl.F |
52 |
WRITE_FLD_XY_RL |
I fullName, writeBinaryPrec, |
|
./pkg/rw/write_fld_xy_rs.F |
31 |
WRITE_FLD_XY_RS |
CHARACTER*(MAX_LEN_FNAM) fullName |
|
./pkg/rw/write_fld_xy_rs.F |
39 |
WRITE_FLD_XY_RS |
WRITE( fullName, '(A)' ) pref(s1Lo:s1Hi) |
|
./pkg/rw/write_fld_xy_rs.F |
43 |
WRITE_FLD_XY_RS |
WRITE( fullName, '(A,A)' ) pref(s1Lo:s1Hi),suff(s2Lo:s2Hi) |
|
./pkg/rw/write_fld_xy_rs.F |
52 |
WRITE_FLD_XY_RS |
I fullName, writeBinaryPrec, |
|
./pkg/rw/write_fld_xyz_rl.F |
31 |
WRITE_FLD_XYZ_RL |
CHARACTER*(MAX_LEN_FNAM) fullName |
|
./pkg/rw/write_fld_xyz_rl.F |
39 |
WRITE_FLD_XYZ_RL |
WRITE( fullName, '(A)' ) pref(s1Lo:s1Hi) |
|
./pkg/rw/write_fld_xyz_rl.F |
43 |
WRITE_FLD_XYZ_RL |
WRITE( fullName, '(A,A)' ) pref(s1Lo:s1Hi),suff(s2Lo:s2Hi) |
|
./pkg/rw/write_fld_xyz_rl.F |
52 |
WRITE_FLD_XYZ_RL |
I fullName, writeBinaryPrec, |
|
./pkg/rw/write_fld_xyz_rs.F |
31 |
WRITE_FLD_XYZ_RS |
CHARACTER*(MAX_LEN_FNAM) fullName |
|
./pkg/rw/write_fld_xyz_rs.F |
39 |
WRITE_FLD_XYZ_RS |
WRITE( fullName, '(A)' ) pref(s1Lo:s1Hi) |
|
./pkg/rw/write_fld_xyz_rs.F |
43 |
WRITE_FLD_XYZ_RS |
WRITE( fullName, '(A,A)' ) pref(s1Lo:s1Hi),suff(s2Lo:s2Hi) |
|
./pkg/rw/write_fld_xyz_rs.F |
52 |
WRITE_FLD_XYZ_RS |
I fullName, writeBinaryPrec, |
|
./pkg/rw/write_glvec_rl.F |
41 |
WRITE_GLVEC_RL |
CHARACTER*(MAX_LEN_FNAM) fullName |
|
./pkg/rw/write_glvec_rl.F |
50 |
WRITE_GLVEC_RL |
WRITE( fullName, '(A)' ) pref(s1Lo:s1Hi) |
|
./pkg/rw/write_glvec_rl.F |
54 |
WRITE_GLVEC_RL |
WRITE( fullName, '(A,A)' ) pref(s1Lo:s1Hi),suff(s2Lo:s2Hi) |
|
./pkg/rw/write_glvec_rl.F |
64 |
WRITE_GLVEC_RL |
I fullName, writeBinaryPrec, ioUnit, |
|
./pkg/rw/write_glvec_rs.F |
41 |
WRITE_GLVEC_RS |
CHARACTER*(MAX_LEN_FNAM) fullName |
|
./pkg/rw/write_glvec_rs.F |
50 |
WRITE_GLVEC_RS |
WRITE( fullName, '(A)' ) pref(s1Lo:s1Hi) |
|
./pkg/rw/write_glvec_rs.F |
54 |
WRITE_GLVEC_RS |
WRITE( fullName, '(A,A)' ) pref(s1Lo:s1Hi),suff(s2Lo:s2Hi) |
|
./pkg/rw/write_glvec_rs.F |
64 |
WRITE_GLVEC_RS |
I fullName, writeBinaryPrec, ioUnit, |
|
./pkg/rw/write_local_rl.F |
54 |
WRITE_LOCAL_RL |
CHARACTER*(MAX_LEN_FNAM) fullName |
|
./pkg/rw/write_local_rl.F |
64 |
WRITE_LOCAL_RL |
WRITE( fullName, '(A)' ) pref(s1Lo:s1Hi) |
|
./pkg/rw/write_local_rl.F |
66 |
WRITE_LOCAL_RL |
WRITE( fullName, '(A,A,I10.10)' ) pref(s1Lo:s1Hi),'.',myIter |
|
./pkg/rw/write_local_rl.F |
70 |
WRITE_LOCAL_RL |
WRITE( fullName, '(A,A)' ) pref(s1Lo:s1Hi),suff(s2Lo:s2Hi) |
|
./pkg/rw/write_local_rl.F |
83 |
WRITE_LOCAL_RL |
I fullName, writeBinaryPrec, |
|
./pkg/rw/write_local_rl.F |
89 |
WRITE_LOCAL_RL |
I fullName, writeBinaryPrec, globalFile, |
|
./pkg/rw/write_local_rs.F |
54 |
WRITE_LOCAL_RS |
CHARACTER*(MAX_LEN_FNAM) fullName |
|
./pkg/rw/write_local_rs.F |
64 |
WRITE_LOCAL_RS |
WRITE( fullName, '(A)' ) pref(s1Lo:s1Hi) |
|
./pkg/rw/write_local_rs.F |
66 |
WRITE_LOCAL_RS |
WRITE( fullName, '(A,A,I10.10)' ) pref(s1Lo:s1Hi),'.',myIter |
|
./pkg/rw/write_local_rs.F |
70 |
WRITE_LOCAL_RS |
WRITE( fullName, '(A,A)' ) pref(s1Lo:s1Hi),suff(s2Lo:s2Hi) |
|
./pkg/rw/write_local_rs.F |
83 |
WRITE_LOCAL_RS |
I fullName, writeBinaryPrec, |
|
./pkg/rw/write_local_rs.F |
89 |
WRITE_LOCAL_RS |
I fullName, writeBinaryPrec, globalFile, |
|
./pkg/debug/write_fullarray_rl.F |
106 |
WRITE_FULLARRAY_RL |
WRITE( fullName, '(2A,I10.10,2(A,I3.3),A)' ) |
|
./pkg/debug/write_fullarray_rl.F |
117 |
WRITE_FULLARRAY_RL |
OPEN( dUnit, file=fullName, status='unknown', |
|
./pkg/debug/write_fullarray_rl.F |
53 |
WRITE_FULLARRAY_RL |
CHARACTER*(MAX_LEN_FNAM) fullName |
|
./pkg/debug/write_fullarray_rl.F |
77 |
WRITE_FULLARRAY_RL |
WRITE( fullName, '(2A,I10.10,2(A,I3.3),A)' ) |
|
./pkg/debug/write_fullarray_rl.F |
88 |
WRITE_FULLARRAY_RL |
OPEN( dUnit, file=fullName, status='unknown', |