c     file: cfert.inc

c     This file contains the declaration of the common block of variables
c     related to plant N & P uptake.

c     + + + VARIABLE DECLARATIONS + + +

      real      ap(10), als(10), bk(10)
c     real      bn1, bn2, bn3, bn4, bp1, bp2, bp3, bp4
      real      fn, fp
      real      op(10)
      real      pmn(10)
      real      sn
      real      sp
      real      sunn
      real      sup
      real      un(10), un1, un2, uno3, up1, up2, upp, up(10)
      real      wno3(10)

      common /fert/ ap,
     &              als, bk,
c    &              bn1, bn2, bn3, bn4, bp1, bp2, bp3, bp4,
     &              fn, fp,
     &              op,
     &              pmn,
     &              sn, sp, sunn, sup,
     &              un, un1, un2, uno3,
     &              up1, up2, upp, up,
     &              wno3

c     + + + VARIABLE DEFINITIONS + + +
c     als - aluminum saturation of the soil (%)
c     ap - total available P in a layer from all sources (kg/ha)
c     bk - flow coefficient between active and stable P pools (1/d)
c     bn - N uptake parametres at different stages of growth(ratio)
c     bp - P uptake parametres at different stages of growth(ratio)
c     fn - amount of fertilizer N applied at planting (kg/ha)
c     fp - amount of fertilizer P applied at planting (kg/ha)
c     pmn - amount of active mineral P pool (kg/ha)
c     op - amount of stable mineral P pool (kg/ha)
c     sn - nitrogen stress factor
c     sp - phosphorous stress factor
c     sunn - sum of soil supplied N from all rooted layers (kg/ha/d)
c     sup - sum of soil supplied P from all rooted layers (kg/ha/d)
c     un - amount of N supplied by a rooted soil layer (kg/ha/d)
c     un1 - actual crop N concentration (kg/ha/d)
c     un2 - optimal crop N concentration (kg/ha/d)
c     uno3 - N demand rate by the crop (kg/ha/d)
c     up - amount of P supplied by a rooted soil layer (kg/ha/d)
c     up1 - actual crop P concentration (kg/ha/d)
c     up2 - optimal crop P concentration (kg/ha/d)
c     upp - N demand rate by the crop (kg/ha/d)
c     wno3 - total available N in a layer from all sources (kg/ha)