real, parameter module_bl_mynn::tv1 =(1.+p608)*tref