File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_init_chem.F |
166 |
READ_OZ |
. recl=nlat*4) |
./pkg/fizhi/fizhi_init_vegsurftiles.F |
48 |
FIZHI_INIT_VEGSURFTILES |
integer recl |
./pkg/fizhi/fizhi_init_vegsurftiles.F |
68 |
FIZHI_INIT_VEGSURFTILES |
recl=MDS_RECLEN( fileprec, Nx*Ny*8, mythid ) |
./pkg/fizhi/fizhi_init_vegsurftiles.F |
73 |
FIZHI_INIT_VEGSURFTILES |
open(iUnit,file=fn,status='old',access='direct',recl=recl) |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
127 |
FIZHI_WRITE_VEGTILES |
& access='direct', recl=length_of_rec ) |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
383 |
FIZHI_READ_VEGTILES |
& access='direct', recl=length_of_rec ) |
./pkg/fizhi/update_ocean_exports.F |
237 |
GETSICE |
. recl=xsize*ysize*4) |
./pkg/fizhi/update_ocean_exports.F |
497 |
GETSST |
. recl=xsize*ysize*4) |
./pkg/mdsio/mdsio_facef_read.F |
120 |
MDS_FACEF_READ_RS |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_facef_read.F |
82 |
MDS_FACEF_READ_RS |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_gl.F |
1318 |
MDSWRITEFIELD_2D_GL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_gl.F |
1321 |
MDSWRITEFIELD_2D_GL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_gl.F |
1423 |
MDSWRITEFIELD_2D_GL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_gl.F |
1428 |
MDSWRITEFIELD_2D_GL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_gl.F |
155 |
MDSREADFIELD_3D_GL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_gl.F |
210 |
MDSREADFIELD_3D_GL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_gl.F |
238 |
MDSREADFIELD_3D_GL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_gl.F |
555 |
MDSWRITEFIELD_3D_GL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_gl.F |
558 |
MDSWRITEFIELD_3D_GL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_gl.F |
660 |
MDSWRITEFIELD_3D_GL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_gl.F |
665 |
MDSWRITEFIELD_3D_GL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_gl.F |
917 |
MDSREADFIELD_2D_GL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_gl.F |
971 |
MDSREADFIELD_2D_GL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_gl.F |
999 |
MDSREADFIELD_2D_GL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_gl_slice.F |
152 |
MDSREADFIELD_XZ_GL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_gl_slice.F |
379 |
MDSREADFIELD_YZ_GL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_gl_slice.F |
593 |
MDSWRITEFIELD_XZ_GL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_gl_slice.F |
598 |
MDSWRITEFIELD_XZ_GL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_gl_slice.F |
821 |
MDSWRITEFIELD_YZ_GL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_gl_slice.F |
826 |
MDSWRITEFIELD_YZ_GL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_read_field.F |
259 |
MDS_READ_FIELD |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_read_field.F |
371 |
MDS_READ_FIELD |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_read_field.F |
454 |
MDS_READ_FIELD |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_read_section.F |
160 |
MDS_READ_SEC_XZ |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_read_section.F |
185 |
MDS_READ_SEC_XZ |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_read_section.F |
438 |
MDS_READ_SEC_YZ |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_read_section.F |
463 |
MDS_READ_SEC_YZ |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_read_whalos.F |
127 |
MDS_READ_WHALOS |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_readvec_loc.F |
183 |
MDS_READVEC_LOC |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_readvector.F |
145 |
MDSREADVECTOR |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_readvector.F |
170 |
MDSREADVECTOR |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_readvector.F |
258 |
MDSREADVECTOR |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_write_field.F |
254 |
MDS_WRITE_FIELD |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_write_field.F |
257 |
MDS_WRITE_FIELD |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_write_field.F |
406 |
MDS_WRITE_FIELD |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_write_field.F |
409 |
MDS_WRITE_FIELD |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_write_field.F |
478 |
MDS_WRITE_FIELD |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_write_field.F |
481 |
MDS_WRITE_FIELD |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_write_section.F |
140 |
MDS_WRITE_SEC_XZ |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_write_section.F |
145 |
MDS_WRITE_SEC_XZ |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_write_section.F |
162 |
MDS_WRITE_SEC_XZ |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_write_section.F |
167 |
MDS_WRITE_SEC_XZ |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_write_section.F |
393 |
MDS_WRITE_SEC_YZ |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_write_section.F |
398 |
MDS_WRITE_SEC_YZ |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_write_section.F |
415 |
MDS_WRITE_SEC_YZ |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_write_section.F |
420 |
MDS_WRITE_SEC_YZ |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_write_whalos.F |
129 |
MDS_WRITE_WHALOS |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_writelocal.F |
273 |
MDS_WRITELOCAL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_writelocal.F |
276 |
MDS_WRITELOCAL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_writelocal.F |
354 |
MDS_WRITELOCAL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_writelocal.F |
357 |
MDS_WRITELOCAL |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_writevec_loc.F |
171 |
MDS_WRITEVEC_LOC |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_writevec_loc.F |
175 |
MDS_WRITEVEC_LOC |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_writevector.F |
144 |
MDSWRITEVECTOR |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_writevector.F |
147 |
MDSWRITEVECTOR |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_writevector.F |
245 |
MDSWRITEVECTOR |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_writevector.F |
250 |
MDSWRITEVECTOR |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_writevector.F |
267 |
MDSWRITEVECTOR |
& access='direct', recl=length_of_rec ) |
./pkg/mdsio/mdsio_writevector.F |
272 |
MDSWRITEVECTOR |
& access='direct', recl=length_of_rec ) |
./pkg/profiles/profiles_init_fixed.F |
534 |
PROFILES_INIT_FIXED |
& recl= (ProfDepthNo(num_file,bi,bj)+1)*WORDLENGTH*2 ) |
./pkg/profiles/profiles_init_fixed.F |
538 |
PROFILES_INIT_FIXED |
& recl= (ProfDepthNo(num_file,bi,bj)+1)*WORDLENGTH*2 ) |
./pkg/profiles/profiles_init_fixed.F |
595 |
PROFILES_INIT_FIXED |
& status='unknown',access='direct', recl= k) |
./pkg/profiles/profiles_init_fixed.F |
615 |
PROFILES_INIT_FIXED |
& status='unknown', access='direct', recl= k) |
./pkg/profiles/profiles_init_ncfile.F |
74 |
PROFILES_INIT_NCFILE |
& access='direct', recl= (Zlength + 1)*WORDLENGTH*2 ) |
./verification/flt_example/extra/cvprofiles.F |
158 |
NO PROCEDURE |
& ,access='direct',recl=ilen) |
./verification/flt_example/extra/cvprofiles.F |
260 |
NO PROCEDURE |
& ,access='direct',recl=ilen) |
./verification/flt_example/extra/cvprofiles.F |
548 |
NO PROCEDURE |
& ,access='direct',recl=ilen) |
./verification/flt_example/extra/cvprofiles.F |
578 |
NO PROCEDURE |
& ,access='direct',recl=ilen) |
./verification/flt_example/extra/cvprofiles.F |
608 |
NO PROCEDURE |
& ,access='direct',recl=ilen) |
./verification/flt_example/extra/write_float.F |
28 |
NO PROCEDURE |
& ,access='direct',recl=ilen2) |
./verification/flt_example/extra/write_float.F |
35 |
NO PROCEDURE |
&, access='direct',recl=ilen) |
./verification/natl_box/results/comp_orig.F |
23 |
NO PROCEDURE |
open(1,file=fni,access='direct',recl=lBuffer1) |
./verification/natl_box/results/comp_orig.F |
24 |
NO PROCEDURE |
open(2,file=fno,access='direct',recl=lBuffer2) |
./pkg/ctrl/ctrl_set_pack_xy.F |
139 |
CTRL_SET_PACK_XY |
& access='direct', recl=reclen ) |
./pkg/ctrl/ctrl_set_pack_xy.F |
142 |
CTRL_SET_PACK_XY |
& access='direct', recl=reclen ) |
./pkg/ctrl/ctrl_set_pack_xyz.F |
148 |
CTRL_SET_PACK_XYZ |
& access='direct', recl=reclen ) |
./pkg/ctrl/ctrl_set_pack_xyz.F |
151 |
CTRL_SET_PACK_XYZ |
& access='direct', recl=reclen ) |
./pkg/ctrl/ctrl_set_pack_xz.F |
162 |
CTRL_SET_PACK_XZ |
& access='direct', recl=reclen ) |
./pkg/ctrl/ctrl_set_pack_xz.F |
165 |
CTRL_SET_PACK_XZ |
& access='direct', recl=reclen ) |
./pkg/ctrl/ctrl_set_pack_yz.F |
160 |
CTRL_SET_PACK_YZ |
& access='direct', recl=reclen ) |
./pkg/ctrl/ctrl_set_pack_yz.F |
163 |
CTRL_SET_PACK_YZ |
& access='direct', recl=reclen ) |
./pkg/ctrl/ctrl_set_unpack_xy.F |
141 |
CTRL_SET_UNPACK_XY |
& access='direct', recl=reclen ) |
./pkg/ctrl/ctrl_set_unpack_xy.F |
144 |
CTRL_SET_UNPACK_XY |
& access='direct', recl=reclen ) |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
156 |
CTRL_SET_UNPACK_XYZ |
& access='direct', recl=reclen ) |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
159 |
CTRL_SET_UNPACK_XYZ |
& access='direct', recl=reclen ) |
./pkg/ctrl/ctrl_set_unpack_xz.F |
165 |
CTRL_SET_UNPACK_XZ |
& access='direct', recl=reclen ) |
./pkg/ctrl/ctrl_set_unpack_xz.F |
168 |
CTRL_SET_UNPACK_XZ |
& access='direct', recl=reclen ) |
./pkg/ctrl/ctrl_set_unpack_yz.F |
165 |
CTRL_SET_UNPACK_YZ |
& access='direct', recl=reclen ) |
./pkg/ctrl/ctrl_set_unpack_yz.F |
168 |
CTRL_SET_UNPACK_YZ |
& access='direct', recl=reclen ) |
./pkg/debug/write_fullarray_rl.F |
118 |
WRITE_FULLARRAY_RL |
& access='direct', recl=length_of_rec ) |
./pkg/debug/write_fullarray_rl.F |
89 |
WRITE_FULLARRAY_RL |
& access='direct', recl=length_of_rec ) |
./lsopt/instore.F |
56 |
INSTORE |
$ , recl = rectmp |
./pkg/dic/dic_read_co2_pickup.F |
68 |
DIC_READ_CO2_PICKUP |
& access='direct', recl=length_of_rec ) |
./pkg/ecco/cost_readgeoid.F |
100 |
COST_READGEOID |
& recl = reclength, |
./pkg/exf/exf_interp_read.F |
140 |
EXF_INTERP_READ |
& recl=length_of_rec ) |