PARAMETER (NSOIL=4,LM1=40)
      PARAMETER (NSTP=88,  NSTAT=1815)
      PARAMETER (INCR=1, LENGTH=87, NFCST=LENGTH/INCR+1)