PARAMETER (NSOIL=4,LM1=35)
      PARAMETER (NSTP=88, LCL1SL1=58, NSTAT=1504)
      PARAMETER (INCR=1, LENGTH=87, NFCST=LENGTH/INCR+1)