Symbol Description Uses
rec 207



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