!*==./Restructure/Modules/C_D1GEN.f90  created by SPAG 6.70Rc at 21:09 on  9 Dec 2012
      module c_d1gen
      implicit none
      real,dimension(mnbpls,mnsub) :: ad0ck,ad0sla,adxstm
      character(80),dimension(mnbpls,mnsub) :: ad0nam
      integer,dimension(mnbpls,mnsub) :: adrbc
      end module c_d1gen