c1 convff cpd cvd degrad eps0 epsy gearth lvw mdry mwater omearth pi raddeg rcp rd rearth rgas rv t0c tetens_ai tetens_aw tetens_bi tetens_bw tetens_e0_hpa

c1 real, parameter c1 = 1.- mwater/mdry - ( mwater/mdry ) Definizione alla linea 53 del file phys_const.f90. REAL,PARAMETER :: c1 = 1.- mwater/mdry !< 1. - ( mwater/mdry )