!*==./Restructure/Modules/I_b1glob.f90  created by SPAG 6.70Rc at 15:33 on 10 Dec 2012
      module i_b1glob
      implicit none
!
! COMMON /B1GLOB/
!
      real,dimension(mnsub) :: abdstm,abevapredu,abfcancov,abffcv,      &
                             & abfscv,abftcv,abm,abmbg,abmf,abmrt,abmst,&
                             & abrcd,abrlai,abrsai,abzht,abzmht
      real,dimension(mnsz,mnsub) :: abmbgz,abmrtz
      real,dimension(mncz,mnsub) :: abrlaz,abrsaz
      end module i_b1glob