Changeset 2601 for palm


Ignore:
Timestamp:
Nov 2, 2017 4:22:46 PM (7 years ago)
Author:
scharf
Message:

added emissivity to radiation namelist

File:
1 edited

Legend:

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

    r2575 r2601  
    2525! -----------------
    2626! $Id$
     27! added emissivity to namelist
     28!
     29! 2575 2017-10-24 09:57:58Z maronga
    2730! Bugfix: calculation of shortwave and longwave albedos for RRTMG swapped
    2831!
     
    316319    REAL(wp), DIMENSION(:,:), ALLOCATABLE :: &
    317320                alpha,                       & !< surface broadband albedo (used for clear-sky scheme)
    318                 emis,                        & !< surface broadband emissitivity
     321                emis,                        & !< surface broadband emissivity
    319322                rad_lw_out_change_0,         & !< change in LW out due to change in surface temperature
    320323                rad_net,                     & !< net radiation at the surface
     
    14021405       NAMELIST /radiation_par/   albedo, albedo_type, albedo_lw_dir,          &
    14031406                                  albedo_lw_dif, albedo_sw_dir, albedo_sw_dif, &
    1404                                   constant_albedo, dt_radiation,               &
     1407                                  constant_albedo, dt_radiation, emissivity,   &
    14051408                                  lw_radiation, net_radiation,                 &
    14061409                                  radiation_scheme, skip_time_do_radiation,    &
Note: See TracChangeset for help on using the changeset viewer.