Symbol Description Uses
fldR8 array to read if arrType= R8 , fldR8(nSize) 8


File Line number Procedure Code
./pkg/mdsio/mdsio_read_tape.F 14 MDS_READ_TAPE 
     O   fldR8, fldR4,
./pkg/mdsio/mdsio_read_tape.F 281 MDS_READ_TAPE 
              fldR8(j) = local_r4(j)
./pkg/mdsio/mdsio_read_tape.F 285 MDS_READ_TAPE 
              fldR8(j) = local_r8(j)
./pkg/mdsio/mdsio_read_tape.F 47 MDS_READ_TAPE 
      _R8     fldR8(*)
./pkg/mdsio/mdsio_write_tape.F 109 MDS_WRITE_TAPE 
              local_r4(j) = fldR8(j)
./pkg/mdsio/mdsio_write_tape.F 113 MDS_WRITE_TAPE 
              local_r8(j) = fldR8(j)
./pkg/mdsio/mdsio_write_tape.F 15 MDS_WRITE_TAPE 
     I   fldR8, fldR4,
./pkg/mdsio/mdsio_write_tape.F 53 MDS_WRITE_TAPE 
      _R8     fldR8(*)