--- trunk/libf/phylmd/suphec.f90 2011/07/01 15:00:48 47 +++ 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