Module Gaussian_Module
Use Numeric_Kinds_Module
Implicit None
Save

REAL(dp) :: k0, sigma, s0

End Module Gaussian_Module