Symbol Description Uses
ival_curr 15



File Line number Procedure Code
./pkg/mnc/mnc_cw_citer.F 106 MNC_CW_SET_CITER
      integer igroup, iflag, ival_curr, ival_next, myThid
./pkg/mnc/mnc_cw_citer.F 144 MNC_CW_SET_CITER
     &     iflag, ival_curr, ival_next, myThid )
./pkg/mnc/mnc_cw_citer.F 14 MNC_CW_CITER_SETG
     I     iflag, ival_curr, ival_next,
./pkg/mnc/mnc_cw_citer.F 158 MNC_CW_GET_CITER
     O     iflag, ival_curr, ival_next,
./pkg/mnc/mnc_cw_citer.F 170 MNC_CW_GET_CITER
      integer igroup, iflag, ival_curr, ival_next, myThid
./pkg/mnc/mnc_cw_citer.F 198 MNC_CW_GET_CITER
        ival_curr = -1
./pkg/mnc/mnc_cw_citer.F 202 MNC_CW_GET_CITER
     &       iflag, ival_curr, ival_next, myThid )
./pkg/mnc/mnc_cw_citer.F 25 MNC_CW_CITER_SETG
      integer igroup, iflag, ival_curr, ival_next, myThid
./pkg/mnc/mnc_cw_citer.F 32 MNC_CW_CITER_SETG
      IF ( ival_curr .GT. 0 ) THEN
./pkg/mnc/mnc_cw_citer.F 34 MNC_CW_CITER_SETG
        IF ( mnc_cw_cit(2,igroup) .NE. ival_curr ) THEN
./pkg/mnc/mnc_cw_citer.F 44 MNC_CW_CITER_SETG
          mnc_cw_cit(2,igroup) = ival_curr
./pkg/mnc/mnc_cw_citer.F 64 MNC_CW_CITER_GETG
     O     iflag, ival_curr, ival_next,
./pkg/mnc/mnc_cw_citer.F 75 MNC_CW_CITER_GETG
      integer igroup, iflag, ival_curr, ival_next, myThid
./pkg/mnc/mnc_cw_citer.F 79 MNC_CW_CITER_GETG
      ival_curr = mnc_cw_cit(2,igroup)
./pkg/mnc/mnc_cw_citer.F 94 MNC_CW_SET_CITER
     I     iflag, ival_curr, ival_next,