Changeset 1978


Ignore:
Timestamp:
Jul 29, 2016 12:08:31 PM (5 years ago)
Author:
maronga
Message:

bugfix in land surface model

File:
1 edited

Legend:

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

    r1977 r1978  
    1919! Current revisions:
    2020! -----------------
    21 !
     21! Bugfix: initial values of pave_surface and water_surface were not set.
    2222!
    2323! Former revisions:
     
    19971997       ALLOCATE ( veg_type_2d(nysg:nyng,nxlg:nxrg) )
    19981998       ALLOCATE ( water_surface(nysg:nyng,nxlg:nxrg) )
     1999
     2000       water_surface = .FALSE.
     2001       pave_surface  = .FALSE.
    19992002
    20002003#if ! defined( __nopointer )
Note: See TracChangeset for help on using the changeset viewer.