!*==./Restructure/Modules/C_S1SGEO.f90  created by SPAG 6.70Rc at 21:09 on  9 Dec 2012
      module c_s1sgeo
      implicit none
      real,dimension(mnsub) :: as0rrk,asargo,aslrr,aslrrc,aslrro,asxdkh,&
                             & asxdks,asxrgs,asxrgw,aszrgh,aszrho
      end module c_s1sgeo