--- trunk/phylmd/yoethf.f	2018/04/19 17:54:55	266
+++ trunk/phylmd/yoethf.f	2018/07/25 14:15:44	291
@@ -10,11 +10,11 @@
   ! Constants used for computation of saturation mixing ratio over
   ! liquid water (r.les) or ice (r.ies):
   real, parameter:: R3LES = 17.269, R3IES = 21.875, R4LES = 35.86, R4IES = 7.66
-  real, parameter:: R5LES=R3LES*(RTT-R4LES)
-  real, parameter:: R5IES=R3IES*(RTT-R4IES)
+  real, parameter:: R5LES = R3LES * (RTT - R4LES)
+  real, parameter:: R5IES = R3IES * (RTT - R4IES)
 
-  real, parameter:: RVTMP2=RCPV/RCPD-1.
-  real, parameter:: RHOH2O=RATM/100. ! density of liquid water
+  real, parameter:: RVTMP2 = RCPV / RCPD - 1.
+  real, parameter:: RHOH2O = RATM / 100. ! density of liquid water
   real, parameter:: R2ES = RESTT * RD / RV
 
   private ratm, rcpd, rcpv, rd, restt, rtt, rv