--- trunk/libf/phylmd/suphec.f90 2011/07/19 12:54:20 48 +++ trunk/libf/phylmd/suphec.f90 2011/08/24 11:43:14 49 @@ -29,6 +29,7 @@ real, parameter:: RD = 1000. * R / RMD ! specific ideal gas constant for dry air, in J K-1 kg-1 + ! (factor 1000: conversion from g to kg) real, parameter:: RMO3 = 47.9942 real, parameter:: RMV = 18.0153