File |
Line number |
Procedure |
Code |
./pkg/exf/exf_interp_read.F |
140 |
EXF_INTERP_READ |
READ(ioUnit,rec=irecord) buffer_r4 |
./pkg/exf/exf_interp_read.F |
142 |
EXF_INTERP_READ |
READ(ioUnit,rec=irecord) (buffer_r4(i),i=1,nx_in*ny_in) |
./pkg/exf/exf_interp_read.F |
149 |
EXF_INTERP_READ |
READ(ioUnit,rec=irecord) buffer_r8 |
./pkg/exf/exf_interp_read.F |
151 |
EXF_INTERP_READ |
READ(ioUnit,rec=irecord) (buffer_r8(i),i=1,nx_in*ny_in) |
./pkg/fizhi/fizhi_init_chem.F |
172 |
READ_OZ |
read(ku,rec=nrec) o3 |
./pkg/fizhi/fizhi_init_vegsurftiles.F |
74 |
FIZHI_INIT_VEGSURFTILES |
read(iunit,rec=1) globalarr |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
136 |
FIZHI_WRITE_VEGTILES |
write(iunit,rec=1) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
144 |
FIZHI_WRITE_VEGTILES |
write(iunit,rec=2) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
152 |
FIZHI_WRITE_VEGTILES |
write(iunit,rec=3) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
160 |
FIZHI_WRITE_VEGTILES |
write(iunit,rec=4) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
171 |
FIZHI_WRITE_VEGTILES |
write(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
182 |
FIZHI_WRITE_VEGTILES |
write(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
193 |
FIZHI_WRITE_VEGTILES |
write(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
204 |
FIZHI_WRITE_VEGTILES |
write(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
213 |
FIZHI_WRITE_VEGTILES |
write(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
222 |
FIZHI_WRITE_VEGTILES |
write(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
231 |
FIZHI_WRITE_VEGTILES |
write(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
240 |
FIZHI_WRITE_VEGTILES |
write(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
249 |
FIZHI_WRITE_VEGTILES |
write(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
258 |
FIZHI_WRITE_VEGTILES |
write(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
267 |
FIZHI_WRITE_VEGTILES |
write(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
387 |
FIZHI_READ_VEGTILES |
read(iunit,rec=1) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
395 |
FIZHI_READ_VEGTILES |
read(iunit,rec=2) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
403 |
FIZHI_READ_VEGTILES |
read(iunit,rec=3) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
411 |
FIZHI_READ_VEGTILES |
read(iunit,rec=4) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
422 |
FIZHI_READ_VEGTILES |
read(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
433 |
FIZHI_READ_VEGTILES |
read(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
444 |
FIZHI_READ_VEGTILES |
read(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
455 |
FIZHI_READ_VEGTILES |
read(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
464 |
FIZHI_READ_VEGTILES |
read(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
473 |
FIZHI_READ_VEGTILES |
read(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
482 |
FIZHI_READ_VEGTILES |
read(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
491 |
FIZHI_READ_VEGTILES |
read(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
500 |
FIZHI_READ_VEGTILES |
read(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
509 |
FIZHI_READ_VEGTILES |
read(iunit,rec=irec) r8seg |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
518 |
FIZHI_READ_VEGTILES |
read(iunit,rec=irec) r8seg |
./pkg/fizhi/update_ocean_exports.F |
656 |
BCDATA |
read(iunit,rec=nrec1) f1 |
./pkg/fizhi/update_ocean_exports.F |
657 |
BCDATA |
read(iunit,rec=nrec2) f2 |
./pkg/fizhi/update_ocean_exports.F |
717 |
BCHEADER |
read(iunit,rec=nrec,err=500) cname, cdscrip, |
./pkg/fizhi/update_ocean_exports.F |
730 |
BCHEADER |
read(iunit,rec=nrec,err=500) dummy112, |
./pkg/mdsio/mdsio_facef_read.F |
122 |
MDS_FACEF_READ_RS |
READ(dUnit, rec=irec) ioBuf4 |
./pkg/mdsio/mdsio_facef_read.F |
132 |
MDS_FACEF_READ_RS |
READ(dUnit, rec=irec) ioBuf8 |
./pkg/mdsio/mdsio_facef_read.F |
87 |
MDS_FACEF_READ_RS |
READ(dUnit,rec=jj+jBase) (ioBuf4(i),i=1,dNx+1) |
./pkg/mdsio/mdsio_facef_read.F |
98 |
MDS_FACEF_READ_RS |
READ(dUnit,rec=jj+jBase) (ioBuf8(i),i=1,dNx+1) |
./pkg/mdsio/mdsio_gl.F |
1066 |
MDSREADFIELD_2D_GL |
read(dUnit,rec=irec) r4seg |
./pkg/mdsio/mdsio_gl.F |
1083 |
MDSREADFIELD_2D_GL |
read(dUnit,rec=irec) r8seg |
./pkg/mdsio/mdsio_gl.F |
1146 |
MDSREADFIELD_2D_GL |
read(dUnit,rec=irec) xy_buffer_r4 |
./pkg/mdsio/mdsio_gl.F |
1156 |
MDSREADFIELD_2D_GL |
read(dUnit,rec=irec) xy_buffer_r8 |
./pkg/mdsio/mdsio_gl.F |
1404 |
MDSWRITEFIELD_2D_GL |
write(dUnit,rec=irec) xy_buffer_r4 |
./pkg/mdsio/mdsio_gl.F |
1414 |
MDSWRITEFIELD_2D_GL |
write(dUnit,rec=irec) xy_buffer_r8 |
./pkg/mdsio/mdsio_gl.F |
1504 |
MDSWRITEFIELD_2D_GL |
write(dUnit,rec=irec) r4seg |
./pkg/mdsio/mdsio_gl.F |
1521 |
MDSWRITEFIELD_2D_GL |
write(dUnit,rec=irec) r8seg |
./pkg/mdsio/mdsio_gl.F |
279 |
MDSREADFIELD_3D_GL |
read(dUnit,rec=irec) r4seg |
./pkg/mdsio/mdsio_gl.F |
296 |
MDSREADFIELD_3D_GL |
read(dUnit,rec=irec) r8seg |
./pkg/mdsio/mdsio_gl.F |
359 |
MDSREADFIELD_3D_GL |
read(dUnit,rec=irec) xy_buffer_r4 |
./pkg/mdsio/mdsio_gl.F |
369 |
MDSREADFIELD_3D_GL |
read(dUnit,rec=irec) xy_buffer_r8 |
./pkg/mdsio/mdsio_gl.F |
615 |
MDSWRITEFIELD_3D_GL |
write(dUnit,rec=irec) xy_buffer_r4 |
./pkg/mdsio/mdsio_gl.F |
625 |
MDSWRITEFIELD_3D_GL |
write(dUnit,rec=irec) xy_buffer_r8 |
./pkg/mdsio/mdsio_gl.F |
715 |
MDSWRITEFIELD_3D_GL |
write(dUnit,rec=irec) r4seg |
./pkg/mdsio/mdsio_gl.F |
732 |
MDSWRITEFIELD_3D_GL |
write(dUnit,rec=irec) r8seg |
./pkg/mdsio/mdsio_gl_slice.F |
182 |
MDSREADFIELD_XZ_GL |
read(dUnit,rec=irec) r4seg |
./pkg/mdsio/mdsio_gl_slice.F |
199 |
MDSREADFIELD_XZ_GL |
read(dUnit,rec=irec) r8seg |
./pkg/mdsio/mdsio_gl_slice.F |
422 |
MDSREADFIELD_YZ_GL |
read(dUnit,rec=irec) r4seg |
./pkg/mdsio/mdsio_gl_slice.F |
439 |
MDSREADFIELD_YZ_GL |
read(dUnit,rec=irec) r8seg |
./pkg/mdsio/mdsio_gl_slice.F |
660 |
MDSWRITEFIELD_XZ_GL |
write(dUnit,rec=irec) r4seg |
./pkg/mdsio/mdsio_gl_slice.F |
677 |
MDSWRITEFIELD_XZ_GL |
write(dUnit,rec=irec) r8seg |
./pkg/mdsio/mdsio_gl_slice.F |
901 |
MDSWRITEFIELD_YZ_GL |
write(dUnit,rec=irec) r4seg |
./pkg/mdsio/mdsio_gl_slice.F |
918 |
MDSWRITEFIELD_YZ_GL |
write(dUnit,rec=irec) r8seg |
./pkg/mdsio/mdsio_rd_rec_rl.F |
58 |
MDS_RD_REC_RL |
READ( dUnit, rec=iRec ) r4Buf |
./pkg/mdsio/mdsio_rd_rec_rl.F |
66 |
MDS_RD_REC_RL |
READ( dUnit, rec=iRec ) r8Buf |
./pkg/mdsio/mdsio_rd_rec_rs.F |
58 |
MDS_RD_REC_RS |
READ( dUnit, rec=iRec ) r4Buf |
./pkg/mdsio/mdsio_rd_rec_rs.F |
66 |
MDS_RD_REC_RS |
READ( dUnit, rec=iRec ) r8Buf |
./pkg/mdsio/mdsio_read_field.F |
297 |
MDS_READ_FIELD |
READ(dUnit,rec=irec) ( xy_buffer_r4(i),i=1,xSize*ySize ) |
./pkg/mdsio/mdsio_read_field.F |
302 |
MDS_READ_FIELD |
READ(dUnit,rec=irec) ( xy_buffer_r8(i),i=1,xSize*ySize ) |
./pkg/mdsio/mdsio_read_field.F |
438 |
MDS_READ_FIELD |
READ(dUnit,rec=irec) (shared3dBuf_r4(i),i=i1,i2) |
./pkg/mdsio/mdsio_read_field.F |
440 |
MDS_READ_FIELD |
READ(dUnit,rec=irec) (shared3dBuf_r8(i),i=i1,i2) |
./pkg/mdsio/mdsio_read_field.F |
490 |
MDS_READ_FIELD |
READ(dUnit,rec=irec) (shared3dBuf_r4(i),i=i1,i2) |
./pkg/mdsio/mdsio_read_field.F |
492 |
MDS_READ_FIELD |
READ(dUnit,rec=irec) (shared3dBuf_r8(i),i=i1,i2) |
./pkg/mdsio/mdsio_read_section.F |
226 |
MDS_READ_SEC_XZ |
READ(dUnit,rec=irec) r4seg |
./pkg/mdsio/mdsio_read_section.F |
243 |
MDS_READ_SEC_XZ |
READ(dUnit,rec=irec) r8seg |
./pkg/mdsio/mdsio_read_section.F |
504 |
MDS_READ_SEC_YZ |
READ(dUnit,rec=irec) r4seg |
./pkg/mdsio/mdsio_read_section.F |
521 |
MDS_READ_SEC_YZ |
READ(dUnit,rec=irec) r8seg |
./pkg/mdsio/mdsio_read_tape.F |
154 |
MDS_READ_TAPE |
READ(dUnit,rec=iRec) gl_buffer_r4 |
./pkg/mdsio/mdsio_read_tape.F |
159 |
MDS_READ_TAPE |
READ(dUnit,rec=iRec) gl_buffer_r8 |
./pkg/mdsio/mdsio_read_tape.F |
240 |
MDS_READ_TAPE |
READ(dUnit,rec=jRec) local_r4 |
./pkg/mdsio/mdsio_read_tape.F |
245 |
MDS_READ_TAPE |
READ(dUnit,rec=jRec) local_r8 |
./pkg/mdsio/mdsio_read_whalos.F |
175 |
MDS_READ_WHALOS |
READ(dUnit,rec=iWh) fld3d_procbuff_r4 |
./pkg/mdsio/mdsio_read_whalos.F |
177 |
MDS_READ_WHALOS |
READ(dUnit,rec=iWh) fld3d_procbuff_r8 |
./pkg/mdsio/mdsio_read_whalos.F |
182 |
MDS_READ_WHALOS |
READ(dUnit,rec=iWh) fld3d_globuff_r4 |
./pkg/mdsio/mdsio_read_whalos.F |
184 |
MDS_READ_WHALOS |
READ(dUnit,rec=iWh) fld3d_globuff_r8 |
./pkg/mdsio/mdsio_read_whalos.F |
216 |
MDS_READ_WHALOS |
READ(dUnit,rec=irec2d) fld2d_procbuff_r4 |
./pkg/mdsio/mdsio_read_whalos.F |
218 |
MDS_READ_WHALOS |
READ(dUnit,rec=irec2d) fld2d_procbuff_r8 |
./pkg/mdsio/mdsio_read_whalos.F |
223 |
MDS_READ_WHALOS |
READ(dUnit,rec=irec2d) fld2d_globuff_r4 |
./pkg/mdsio/mdsio_read_whalos.F |
225 |
MDS_READ_WHALOS |
READ(dUnit,rec=irec2d) fld2d_globuff_r8 |
./pkg/mdsio/mdsio_wr_rec_rl.F |
64 |
MDS_WR_REC_RL |
WRITE( dUnit, rec=iRec ) r4Buf |
./pkg/mdsio/mdsio_wr_rec_rl.F |
72 |
MDS_WR_REC_RL |
WRITE( dUnit, rec=iRec ) r8Buf |
./pkg/mdsio/mdsio_wr_rec_rs.F |
64 |
MDS_WR_REC_RS |
WRITE( dUnit, rec=iRec ) r4Buf |
./pkg/mdsio/mdsio_wr_rec_rs.F |
72 |
MDS_WR_REC_RS |
WRITE( dUnit, rec=iRec ) r8Buf |
./pkg/mdsio/mdsio_write_field.F |
350 |
MDS_WRITE_FIELD |
WRITE(dUnit,rec=irec) ( xy_buffer_r4(i),i=1,xSize*ySize ) |
./pkg/mdsio/mdsio_write_field.F |
355 |
MDS_WRITE_FIELD |
WRITE(dUnit,rec=irec) ( xy_buffer_r8(i),i=1,xSize*ySize ) |
./pkg/mdsio/mdsio_write_field.F |
485 |
MDS_WRITE_FIELD |
WRITE(dUnit,rec=irec) (shared3dBuf_r4(i),i=i1,i2) |
./pkg/mdsio/mdsio_write_field.F |
487 |
MDS_WRITE_FIELD |
WRITE(dUnit,rec=irec) (shared3dBuf_r8(i),i=i1,i2) |
./pkg/mdsio/mdsio_write_field.F |
515 |
MDS_WRITE_FIELD |
WRITE(dUnit,rec=irec) (shared3dBuf_r4(i),i=i1,i2) |
./pkg/mdsio/mdsio_write_field.F |
517 |
MDS_WRITE_FIELD |
WRITE(dUnit,rec=irec) (shared3dBuf_r8(i),i=i1,i2) |
./pkg/mdsio/mdsio_write_section.F |
212 |
MDS_WRITE_SEC_XZ |
WRITE(dUnit,rec=irec) r4seg |
./pkg/mdsio/mdsio_write_section.F |
229 |
MDS_WRITE_SEC_XZ |
WRITE(dUnit,rec=irec) r8seg |
./pkg/mdsio/mdsio_write_section.F |
465 |
MDS_WRITE_SEC_YZ |
WRITE(dUnit,rec=irec) r4seg |
./pkg/mdsio/mdsio_write_section.F |
482 |
MDS_WRITE_SEC_YZ |
WRITE(dUnit,rec=irec) r8seg |
./pkg/mdsio/mdsio_write_tape.F |
195 |
MDS_WRITE_TAPE |
WRITE(dUnit,rec=iRec) gl_buffer_r4 |
./pkg/mdsio/mdsio_write_tape.F |
200 |
MDS_WRITE_TAPE |
WRITE(dUnit,rec=iRec) gl_buffer_r8 |
./pkg/mdsio/mdsio_write_tape.F |
273 |
MDS_WRITE_TAPE |
WRITE(dUnit,rec=jRec) local_r4 |
./pkg/mdsio/mdsio_write_tape.F |
278 |
MDS_WRITE_TAPE |
WRITE(dUnit,rec=jRec) local_r8 |
./pkg/mdsio/mdsio_write_whalos.F |
201 |
MDS_WRITE_WHALOS |
WRITE(dUnit,rec=iWh) fld3d_procbuff_r4 |
./pkg/mdsio/mdsio_write_whalos.F |
203 |
MDS_WRITE_WHALOS |
WRITE(dUnit,rec=iWh) fld3d_procbuff_r8 |
./pkg/mdsio/mdsio_write_whalos.F |
208 |
MDS_WRITE_WHALOS |
WRITE(dUnit,rec=iWh) fld3d_globuff_r4 |
./pkg/mdsio/mdsio_write_whalos.F |
210 |
MDS_WRITE_WHALOS |
WRITE(dUnit,rec=iWh) fld3d_globuff_r8 |
./pkg/mdsio/mdsio_write_whalos.F |
223 |
MDS_WRITE_WHALOS |
WRITE(dUnit,rec=irec2d) fld2d_procbuff_r4 |
./pkg/mdsio/mdsio_write_whalos.F |
225 |
MDS_WRITE_WHALOS |
WRITE(dUnit,rec=irec2d) fld2d_procbuff_r8 |
./pkg/mdsio/mdsio_write_whalos.F |
230 |
MDS_WRITE_WHALOS |
WRITE(dUnit,rec=irec2d) fld2d_globuff_r4 |
./pkg/mdsio/mdsio_write_whalos.F |
232 |
MDS_WRITE_WHALOS |
WRITE(dUnit,rec=irec2d) fld2d_globuff_r8 |
./pkg/mdsio/mdsio_writelocal.F |
339 |
MDS_WRITELOCAL |
WRITE(dUnit,rec=irec) (shared3dBuf_r4(i),i=i1,i2) |
./pkg/mdsio/mdsio_writelocal.F |
341 |
MDS_WRITELOCAL |
WRITE(dUnit,rec=irec) (shared3dBuf_r8(i),i=i1,i2) |
./pkg/mdsio/mdsio_writelocal.F |
369 |
MDS_WRITELOCAL |
WRITE(dUnit,rec=irec) (shared3dBuf_r4(i),i=i1,i2) |
./pkg/mdsio/mdsio_writelocal.F |
371 |
MDS_WRITELOCAL |
WRITE(dUnit,rec=irec) (shared3dBuf_r8(i),i=i1,i2) |
./pkg/profiles/active_file_control_profiles.F |
101 |
ACTIVE_READ_PROFILE_RL |
read(fid,rec=( (irec-1)*prof_num_var_tot(active_num_file,bi,bj) |
./pkg/profiles/active_file_control_profiles.F |
160 |
ACTIVE_READ_PROFILE_RL |
read(fid,rec=( (irec-1)*prof_num_var_tot(active_num_file,bi,bj) |
./pkg/profiles/active_file_control_profiles.F |
182 |
ACTIVE_READ_PROFILE_RL |
write(fid,rec=( (irec-1)*prof_num_var_tot(active_num_file,bi,bj) |
./pkg/profiles/active_file_control_profiles.F |
219 |
ACTIVE_READ_PROFILE_RL |
read(fid,rec=( (irec-1)*prof_num_var_tot(active_num_file,bi,bj) |
./pkg/profiles/active_file_control_profiles.F |
337 |
ACTIVE_WRITE_PROFILE_RL |
write(fid,rec=( (irec-1)*prof_num_var_tot(active_num_file,bi,bj) |
./pkg/profiles/active_file_control_profiles.F |
347 |
ACTIVE_WRITE_PROFILE_RL |
write(fid,rec=( (irec-1)*prof_num_var_tot(active_num_file,bi,bj) |
./pkg/profiles/active_file_control_profiles.F |
396 |
ACTIVE_WRITE_PROFILE_RL |
read(fid,rec=( (irec-1)*prof_num_var_tot(active_num_file,bi,bj) |
./pkg/profiles/active_file_control_profiles.F |
419 |
ACTIVE_WRITE_PROFILE_RL |
write(fid,rec=( (irec-1)*prof_num_var_tot(active_num_file,bi,bj) |
./pkg/profiles/active_file_control_profiles.F |
460 |
ACTIVE_WRITE_PROFILE_RL |
write(fid,rec=( (irec-1)*prof_num_var_tot(active_num_file,bi,bj) |
./pkg/profiles/active_file_control_profiles.F |
92 |
ACTIVE_READ_PROFILE_RL |
read(fid,rec=( (irec-1)*prof_num_var_tot(active_num_file,bi,bj) |
./pkg/profiles/cost_profiles.F |
352 |
COST_PROFILES |
write(cunit,rec=ikzz) tmp99 |
./pkg/profiles/cost_profiles.F |
369 |
COST_PROFILES |
write(cunit,rec=ikzz) tmp99 |
./pkg/profiles/cost_profiles.F |
384 |
COST_PROFILES |
write(cunit,rec=ikzz) tmp99 |
./pkg/profiles/cost_profiles.F |
399 |
COST_PROFILES |
write(cunit,rec=ikzz) tmp99 |
./pkg/profiles/profiles_init_fixed.F |
895 |
PROFILES_INIT_FIXED |
write(fid,rec=1) xy_buffer_r8 |
./pkg/profiles/profiles_init_fixed.F |
915 |
PROFILES_INIT_FIXED |
write(fid,rec=1) xy_buffer_r8 |
./pkg/profiles/profiles_init_ncfile.F |
85 |
PROFILES_INIT_NCFILE |
write(fid2,rec=((irec-1)*prof_num_var_tot(num_file,bi,bj) |
./pkg/profiles/profiles_init_ncfile.F |
87 |
PROFILES_INIT_NCFILE |
write(fid2,rec=((irec-1)*prof_num_var_tot(num_file,bi,bj) |
./verification/flt_example/extra/cvprofiles.F |
160 |
NO PROCEDURE |
read(1,rec=1) tmp |
./verification/flt_example/extra/cvprofiles.F |
262 |
NO PROCEDURE |
read(1,rec=1) tmp |
./verification/flt_example/extra/cvprofiles.F |
270 |
NO PROCEDURE |
read(1,rec=irec) tmp |
./verification/flt_example/extra/cvprofiles.F |
550 |
NO PROCEDURE |
read(1,rec=1) tmp |
./verification/flt_example/extra/cvprofiles.F |
555 |
NO PROCEDURE |
read(1,rec=irec) tmp |
./verification/flt_example/extra/cvprofiles.F |
580 |
NO PROCEDURE |
read(1,rec=1) tmp |
./verification/flt_example/extra/cvprofiles.F |
585 |
NO PROCEDURE |
read(1,rec=irec) tmp |
./verification/flt_example/extra/cvprofiles.F |
610 |
NO PROCEDURE |
read(1,rec=1) tmp |
./verification/flt_example/extra/cvprofiles.F |
615 |
NO PROCEDURE |
read(1,rec=irec) tmp |
./verification/flt_example/extra/write_float.F |
117 |
NO PROCEDURE |
if (flag) write(1,rec=ip+1) npart,tstart,xpart,ypart, |
./verification/flt_example/extra/write_float.F |
144 |
NO PROCEDURE |
if (flag) write(1,rec=ip+1) npart,tstart,xpart,ypart, |
./verification/flt_example/extra/write_float.F |
170 |
NO PROCEDURE |
if (flag) write(1,rec=ip+1) npart,tstart,xpart,ypart, |
./verification/flt_example/extra/write_float.F |
192 |
NO PROCEDURE |
if (flag) write(1,rec=ip+1) npart,tstart,xpart,ypart, |
./verification/flt_example/extra/write_float.F |
215 |
NO PROCEDURE |
& write(1,rec=1) npart,tstart,xpart,ypart,kpart,kfloat,iup,itop,tend |
./verification/flt_example/extra/write_float.F |
36 |
NO PROCEDURE |
read(2,rec=1) depth |
./verification/flt_example/extra/write_float.F |
66 |
NO PROCEDURE |
if (flag) write(1,rec=1) npart,tstart,xpart,ypart, |
./verification/flt_example/extra/write_float.F |
95 |
NO PROCEDURE |
if (flag) write(1,rec=ip+1) npart,tstart,xpart,ypart, |
./verification/natl_box/results/comp_orig.F |
30 |
NO PROCEDURE |
read(1,rec=irec) ((fld1(i,j),i=1,nx),j=1,ny) |
./verification/natl_box/results/comp_orig.F |
31 |
NO PROCEDURE |
read(2,rec=irec) ((fld2(i,j),i=1,nx),j=1,ny) |
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
88 |
COST_WEIGHTS |
READ(iUnit,rec=1) tmpwti |
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F |
88 |
COST_WEIGHTS |
READ(iUnit,rec=1) tmpwti |
./pkg/atm_ocn_coupler/set_runoffmap.F |
79 |
SET_RUNOFFMAP |
READ(88,rec=iRec) r8seg |
./pkg/atm_ocn_coupler/set_runoffmap.F |
98 |
SET_RUNOFFMAP |
READ(88,rec=iRec) rAc |
./pkg/autodiff/autodiff_whtapeio_sync.F |
125 |
AUTODIFF_WHTAPEIO_SYNC |
WRITE(tapeFileUnit,rec=iWh) fld3d_procbuff_r4 |
./pkg/autodiff/autodiff_whtapeio_sync.F |
127 |
AUTODIFF_WHTAPEIO_SYNC |
WRITE(tapeFileUnit,rec=iWh) fld3d_procbuff_r8 |
./pkg/autodiff/autodiff_whtapeio_sync.F |
132 |
AUTODIFF_WHTAPEIO_SYNC |
WRITE(tapeFileUnit,rec=iWh) fld3d_globuff_r4 |
./pkg/autodiff/autodiff_whtapeio_sync.F |
134 |
AUTODIFF_WHTAPEIO_SYNC |
WRITE(tapeFileUnit,rec=iWh) fld3d_globuff_r8 |
./pkg/autodiff/autodiff_whtapeio_sync.F |
154 |
AUTODIFF_WHTAPEIO_SYNC |
WRITE(tapeFileUnit,rec=iWh) fld3d_procbuff_r4 |
./pkg/autodiff/autodiff_whtapeio_sync.F |
156 |
AUTODIFF_WHTAPEIO_SYNC |
WRITE(tapeFileUnit,rec=iWh) fld3d_procbuff_r8 |
./pkg/autodiff/autodiff_whtapeio_sync.F |
161 |
AUTODIFF_WHTAPEIO_SYNC |
WRITE(tapeFileUnit,rec=iWh) fld3d_globuff_r4 |
./pkg/autodiff/autodiff_whtapeio_sync.F |
163 |
AUTODIFF_WHTAPEIO_SYNC |
WRITE(tapeFileUnit,rec=iWh) fld3d_globuff_r8 |
./lsopt/dostore.F |
22 |
DOSTORE |
write( ntape, rec=j ) tmpx |
./lsopt/dostore.F |
24 |
DOSTORE |
read( ntape, rec=j ) tmpx |
./pkg/ctrl/ctrl_init.F |
412 |
CTRL_INIT |
read(dUnit,rec=j) ((modesv(k,i,j), k=1,Nr), i=1,Nr) |
./pkg/ctrl/ctrl_set_pack_xy.F |
261 |
CTRL_SET_PACK_XY |
write(cunit2,rec=irectrue) globfldtmp2 |
./pkg/ctrl/ctrl_set_pack_xy.F |
262 |
CTRL_SET_PACK_XY |
write(cunit3,rec=irectrue) globfldtmp3 |
./pkg/ctrl/ctrl_set_pack_xy.F |
355 |
CTRL_SET_PACK_XY |
write(cunit2,rec=irectrue) globfldtmp2 |
./pkg/ctrl/ctrl_set_pack_xy.F |
356 |
CTRL_SET_PACK_XY |
write(cunit3,rec=irectrue) globfldtmp3 |
./pkg/ctrl/ctrl_set_pack_xyz.F |
268 |
CTRL_SET_PACK_XYZ |
write(cunit2,rec=irectrue) globfldtmp2 |
./pkg/ctrl/ctrl_set_pack_xyz.F |
269 |
CTRL_SET_PACK_XYZ |
write(cunit3,rec=irectrue) globfldtmp3 |
./pkg/ctrl/ctrl_set_pack_xz.F |
248 |
CTRL_SET_PACK_XZ |
write(cunit2,rec=irectrue) globfldtmp2 |
./pkg/ctrl/ctrl_set_pack_xz.F |
249 |
CTRL_SET_PACK_XZ |
write(cunit3,rec=irectrue) globfldtmp3 |
./pkg/ctrl/ctrl_set_pack_xz.F |
321 |
CTRL_SET_PACK_XZ |
write(cunit2,rec=irectrue) globfldtmp2 |
./pkg/ctrl/ctrl_set_pack_xz.F |
322 |
CTRL_SET_PACK_XZ |
write(cunit3,rec=irectrue) globfldtmp3 |
./pkg/ctrl/ctrl_set_pack_yz.F |
252 |
CTRL_SET_PACK_YZ |
write(cunit2,rec=irectrue) globfldtmp2 |
./pkg/ctrl/ctrl_set_pack_yz.F |
253 |
CTRL_SET_PACK_YZ |
write(cunit3,rec=irectrue) globfldtmp3 |
./pkg/ctrl/ctrl_set_pack_yz.F |
325 |
CTRL_SET_PACK_YZ |
write(cunit2,rec=irectrue) globfldtmp2 |
./pkg/ctrl/ctrl_set_pack_yz.F |
326 |
CTRL_SET_PACK_YZ |
write(cunit3,rec=irectrue) globfldtmp3 |
./pkg/ctrl/ctrl_set_unpack_xy.F |
276 |
CTRL_SET_UNPACK_XY |
write(cunit2,rec=irectrue) globfldtmp2 |
./pkg/ctrl/ctrl_set_unpack_xy.F |
277 |
CTRL_SET_UNPACK_XY |
write(cunit3,rec=irectrue) globfldtmp3 |
./pkg/ctrl/ctrl_set_unpack_xy.F |
386 |
CTRL_SET_UNPACK_XY |
write(cunit2,rec=irectrue) globfldtmp2 |
./pkg/ctrl/ctrl_set_unpack_xy.F |
387 |
CTRL_SET_UNPACK_XY |
write(cunit3,rec=irectrue) globfldtmp3 |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
294 |
CTRL_SET_UNPACK_XYZ |
write(cunit2,rec=irectrue) globfldtmp2 |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
295 |
CTRL_SET_UNPACK_XYZ |
write(cunit3,rec=irectrue) globfldtmp3 |
./pkg/ctrl/ctrl_set_unpack_xz.F |
262 |
CTRL_SET_UNPACK_XZ |
write(cunit2,rec=irectrue) globfldtmp2 |
./pkg/ctrl/ctrl_set_unpack_xz.F |
263 |
CTRL_SET_UNPACK_XZ |
write(cunit3,rec=irectrue) globfldtmp3 |
./pkg/ctrl/ctrl_set_unpack_xz.F |
345 |
CTRL_SET_UNPACK_XZ |
write(cunit2,rec=irectrue) globfldtmp2 |
./pkg/ctrl/ctrl_set_unpack_xz.F |
346 |
CTRL_SET_UNPACK_XZ |
write(cunit3,rec=irectrue) globfldtmp3 |
./pkg/ctrl/ctrl_set_unpack_yz.F |
262 |
CTRL_SET_UNPACK_YZ |
write(cunit2,rec=irectrue) globfldtmp2 |
./pkg/ctrl/ctrl_set_unpack_yz.F |
263 |
CTRL_SET_UNPACK_YZ |
write(cunit3,rec=irectrue) globfldtmp3 |
./pkg/debug/write_fullarray_rl.F |
133 |
WRITE_FULLARRAY_RL |
WRITE(dUnit,rec=kRec) (( fld(i,j,k,1,1), |
./pkg/debug/write_fullarray_rl.F |
99 |
WRITE_FULLARRAY_RL |
WRITE(dUnit,rec=kRec) (( fld(i,j,k,bi,bj), |
./pkg/debug/write_fullarray_rs.F |
133 |
WRITE_FULLARRAY_RS |
WRITE(dUnit,rec=kRec) (( fld(i,j,k,1,1), |
./pkg/debug/write_fullarray_rs.F |
99 |
WRITE_FULLARRAY_RS |
WRITE(dUnit,rec=kRec) (( fld(i,j,k,bi,bj), |
./pkg/dic/dic_read_co2_pickup.F |
74 |
DIC_READ_CO2_PICKUP |
READ(ioUnit,rec=1) tmpFld |