Ignore:
Timestamp:
Nov 30, 2018 3:09:51 PM (6 years ago)
Author:
suehring
Message:

Remove erroneous UTF encoding; last commit documented

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/radiation_model_mod.f90

    r3572 r3589  
    2828! -----------------
    2929! $Id$
     30! Remove erroneous UTF encoding
     31!
     32! 3572 2018-11-28 11:40:28Z suehring
    3033! Add filling the short- and longwave radiation flux arrays (e.g. diffuse,
    3134! direct, reflected, resedual) for all surfaces. This is required to surface
     
    697700    REAL(wp), DIMENSION(:,:), ALLOCATABLE ::  rad_sw_out_xy_av !< average of outgoing shortwave radiation at surface
    698701!
    699 !-- Land surface albedos for solar zenith angle of 60° after Briegleb (1992)     
     702!-- Land surface albedos for solar zenith angle of 60degree after Briegleb (1992)     
    700703!-- (shortwave, longwave, broadband):   sw,      lw,      bb,
    701704    REAL(wp), DIMENSION(0:2,1:33), PARAMETER :: albedo_pars = RESHAPE( (/&
Note: See TracChangeset for help on using the changeset viewer.