!*==./Restructure/Modules/I_p1unconv.f90  created by SPAG 6.70Rc at 21:09 on  9 Dec 2012
      module i_p1unconv             ! milligram to kilogram
      use i_p1unconv
      implicit none
!
! PARAMETER definitions
!
      real,parameter :: mtomm = 1000.0,mmtom = 0.001
      integer,parameter :: hrday = 24
      real,parameter :: hrtosec = 3600.0,daytosec = 86400.0,            &
                      & degtorad = 0.017453293,radtodeg = 57.2957795,   &
                      & hatom2 = 10000.0,mgtokg = 0.000001,             &
                      & fractopercent = 100.0,percenttofrac = 0.01
      end module i_p1unconv