Changeset 3589 for palm/trunk/SOURCE/radiation_model_mod.f90

Timestamp:

Nov 30, 2018 3:09:51 PM (5 years ago)

Author:

suehring

Message:

Remove erroneous UTF encoding; last commit documented

File:

• palm/trunk/SOURCE/radiation_model_mod.f90 (modified) (2 diffs)

palm/trunk/SOURCE/radiation_model_mod.f90

@@ -28 +28 @@
 ! -----------------
 ! $Id$
+! Remove erroneous UTF encoding
+! 
+! 3572 2018-11-28 11:40:28Z suehring
 ! Add filling the short- and longwave radiation flux arrays (e.g. diffuse, 
 ! direct, reflected, resedual) for all surfaces. This is required to surface
@@ -697 +700 @@
     REAL(wp), DIMENSION(:,:), ALLOCATABLE ::  rad_sw_out_xy_av !< average of outgoing shortwave radiation at surface
 !
-!-- Land surface albedos for solar zenith angle of 60° after Briegleb (1992)     
+!-- Land surface albedos for solar zenith angle of 60degree after Briegleb (1992)     
 !-- (shortwave, longwave, broadband):   sw,      lw,      bb,
     REAL(wp), DIMENSION(0:2,1:33), PARAMETER :: albedo_pars = RESHAPE( (/&