Symbol Description Uses
fgl 15


File Line number Procedure Code
./pkg/mnc/mnc_cw_citer.F 111 MNC_CW_SET_CITER 
      integer fgf,fgl, indfg
./pkg/mnc/mnc_cw_citer.F 119 MNC_CW_SET_CITER 
      fgl = ILNBLNK(fgname)
./pkg/mnc/mnc_cw_citer.F 125 MNC_CW_SET_CITER 
     &       fgname(fgf:fgl), ''' does not exist'
./pkg/mnc/mnc_cw_citer.F 138 MNC_CW_SET_CITER 
     &       'file group name ''', fgname(fgf:fgl), ''''
./pkg/mnc/mnc_cw_citer.F 175 MNC_CW_GET_CITER 
      integer fgf,fgl, indfg
./pkg/mnc/mnc_cw_citer.F 183 MNC_CW_GET_CITER 
      fgl = ILNBLNK(fgname)
./pkg/mnc/mnc_cw_citer.F 189 MNC_CW_GET_CITER 
     &       fgname(fgf:fgl), ''' does not exist'
./pkg/mnc/mnc_cw_udim.F 107 MNC_CW_GET_UDIM 
      integer fgf,fgl, indfg
./pkg/mnc/mnc_cw_udim.F 114 MNC_CW_GET_UDIM 
      fgl = ILNBLNK(fgname)
./pkg/mnc/mnc_cw_udim.F 119 MNC_CW_GET_UDIM 
     &       fgname(fgf:fgl), ''' is not defined'
./pkg/mnc/mnc_cw_udim.F 41 MNC_CW_SET_UDIM 
      integer fgf,fgl, indfg
./pkg/mnc/mnc_cw_udim.F 49 MNC_CW_SET_UDIM 
      fgl = ILNBLNK(fgname)
./pkg/mnc/mnc_cw_udim.F 54 MNC_CW_SET_UDIM 
        mnc_cw_fgnm(indfg)(1:(fgl-fgf+1)) = fgname(fgf:fgl)
./pkg/mnc/mnc_cw_udim.F 74 MNC_CW_SET_UDIM 
     &     fgname(fgf:fgl), ''' the unlim dim ''', nudim,