module graydata_par
  use const_and_precisions, only : wp_
  implicit none
  
  real(wp_), save :: rwmax,rwallm
  real(wp_), save :: psipol0,chipol0
  real(wp_), save :: factb,factt,factn
  real(wp_), save :: sgnbphi,sgniphi

end module graydata_par