Symbol Description Uses
kRec 10



File Line number Procedure Code
./pkg/debug/write_fullarray_rl.F 132 WRITE_FULLARRAY_RL
           kRec = k + (iRec-1)*kSize
./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 51 WRITE_FULLARRAY_RL
      INTEGER s1Lo,s1Hi, dUnit, filePrec, length_of_rec, kRec
./pkg/debug/write_fullarray_rl.F 98 WRITE_FULLARRAY_RL
           kRec = k + (iRec-1)*kSize
./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 132 WRITE_FULLARRAY_RS
           kRec = k + (iRec-1)*kSize
./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 51 WRITE_FULLARRAY_RS
      INTEGER s1Lo,s1Hi, dUnit, filePrec, length_of_rec, kRec
./pkg/debug/write_fullarray_rs.F 98 WRITE_FULLARRAY_RS
           kRec = k + (iRec-1)*kSize
./pkg/debug/write_fullarray_rs.F 99 WRITE_FULLARRAY_RS
           WRITE(dUnit,rec=kRec) (( fld(i,j,k,bi,bj),