!*==intfaces.f90  created by SPAG 6.70Rc at 15:34 on 10 Dec 2012
MODULE S_ASD2M
   INTERFACE
      subroutine asd2m(mnot,minf,gmd,gsd,nlay,mf)
      use i_p1werm
      use i_asd
      implicit none
      integer :: nlay
      real,dimension(mnsz) :: gmd,gsd,minf,mnot
      real,dimension(msieve+1,mnsz) :: mf
      intent (in) gmd,gsd,minf,mnot,nlay
      intent (inout) mf
      END SUBROUTINE ASD2M
   END INTERFACE
END MODULE S_ASD2M
!*==intfaces.f90  created by SPAG 6.70Rc at 15:34 on 10 Dec 2012
MODULE S_ASDINI
   INTERFACE
      subroutine asdini()
      use i_asd
      implicit none
      END SUBROUTINE ASDINI
   END INTERFACE
END MODULE S_ASDINI
!*==intfaces.f90  created by SPAG 6.70Rc at 15:34 on 10 Dec 2012
MODULE S_M2ASD
   INTERFACE
      subroutine m2asd(mf,nlay,mnot,minf,gmd,gsd)
      use i_p1werm
      use i_asd
      implicit none
      integer :: nlay
      real,dimension(mnsz) :: gmd,gsd,minf,mnot
      real,dimension(msieve+1,mnsz) :: mf
      intent (in) mf,minf,mnot,nlay
      intent (out) gmd,gsd
      END SUBROUTINE M2ASD
   END INTERFACE
END MODULE S_M2ASD