Symbol Description Uses
fldR4 array to read if arrType= R4 , fldR4(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 271 MDS_READ_TAPE 
              fldR4(j) = local_r4(j)
./pkg/mdsio/mdsio_read_tape.F 275 MDS_READ_TAPE 
              fldR4(j) = local_r8(j)
./pkg/mdsio/mdsio_read_tape.F 48 MDS_READ_TAPE 
      _R4     fldR4(*)
./pkg/mdsio/mdsio_write_tape.F 103 MDS_WRITE_TAPE 
              local_r8(j) = fldR4(j)
./pkg/mdsio/mdsio_write_tape.F 15 MDS_WRITE_TAPE 
     I   fldR8, fldR4,
./pkg/mdsio/mdsio_write_tape.F 54 MDS_WRITE_TAPE 
      _R4     fldR4(*)
./pkg/mdsio/mdsio_write_tape.F 99 MDS_WRITE_TAPE 
              local_r4(j) = fldR4(j)