real(kind=kind_phys), parameter physcons::con_cv =7.1760e+2_kind_phys