!*==./Restructure/Modules/I_p1strlen.f90  created by SPAG 6.70Rc at 21:09 on  9 Dec 2012
      module i_p1strlen
      use i_p1strlen
      implicit none
!
! PARAMETER definitions
!
      integer,parameter :: mfname = 30,mwsta = 30,mloc = 10,mdate = 10
      end module i_p1strlen