module globals

integer, parameter :: wp = selected_real_kind(p=14)
integer, parameter :: rand_pl_wp = wp
integer, parameter :: rand_pl_mf = 123

end module globals