Symbol Description Uses
interp_unit 10



File Line number Procedure Code
./pkg/exf/exf_interp.F 82 EXF_INTERP
      integer  i, j, k, l, js, bi, bj, sp, interp_unit
./pkg/exf/exf_interp_read.F 100 EXF_INTERP_READ
        call MDSFINDUNIT( interp_unit, mythid)
./pkg/exf/exf_interp_read.F 102 EXF_INTERP_READ
        open(interp_unit,file=infile,status='old',access='direct',
./pkg/exf/exf_interp_read.F 104 EXF_INTERP_READ
        read(interp_unit,rec=irecord)
./pkg/exf/exf_interp_read.F 106 EXF_INTERP_READ
        close(interp_unit)
./pkg/exf/exf_interp_read.F 64 EXF_INTERP_READ
      integer  i, j, k, l, js, bi, bj, sp, interp_unit
./pkg/exf/exf_interp_read.F 79 EXF_INTERP_READ
         call MDSFINDUNIT( interp_unit, mythid)
./pkg/exf/exf_interp_read.F 81 EXF_INTERP_READ
         open(interp_unit,file=infile,status='old',access='direct',
./pkg/exf/exf_interp_read.F 83 EXF_INTERP_READ
         read(interp_unit,rec=irecord)
./pkg/exf/exf_interp_read.F 85 EXF_INTERP_READ
         close(interp_unit)