if (_filetype = 1h)

    if (_plottype = indiv)

*     FOR PLOTTING EACH INDIVIDUAL 1-HOURLY PRECIP ACCUMULATION

      iftmod = math_fmod(ift,12)
      if (iftmod = 2)
*       This is the first time of a new 12-hour
*       accumulation block
        'define prcptemp = totprcp'
      else
        tnew = ift
        told = ift - 1
        say 'tnew= 'tnew'  told= 'told
        'define prcptemp = totprcp(t='tnew') - totprcp(t='told')'
      endif
      rc = drawprcp(prcptemp)

    else

*     FOR PLOTTING RUNNING TOTAL ACCUMULATION FOR 1-HOURLY FILES

      if (ift < 14)
        say 'A'
        'define prcptemp=totprcp(t='ift')'
        rc = drawprcp(prcptemp)
      else
        if (ift < 26)
          say 'B'
          'define p1tot = totprcp(t=13)'
          'define p2run = totprcp(t='ift')'
          'define prcptemp = p1tot + p2run'
          rc = drawprcp(prcptemp)
        else
          say 'C'
          'define p1tot = totprcp(t=13)'
          'define p2tot = totprcp(t=25)'
          'define p3run = totprcp(t='ift')'
          'define prcptemp = p1tot + p2tot + p3run'
          rc = drawprcp(prcptemp)
        endif
      endif

    endif

  endif