! $Id$
module cr_constants_module

integer, parameter:: REAL4 = selected_real_kind(6,37)


end module cr_constants_module