MODULE Save_Module
!-----------------------------------------------------------------------
!  xm
!  d
!  acute
!  r
!  chij
!  s
!  chi3
!  jacute
!-----------------------------------------------------------------------
   USE Numeric_Kinds_Module
   USE Parms_Module
   IMPLICIT NONE
   SAVE
   INTEGER jacute(narran)
   REAL(KIND=dp) xm(narran), d(narran), acute(narran),r(narran), chij(narran, narran), s(narran), chi3(narran)
END MODULE Save_Module