Ignore:
Timestamp:
May 31, 2017 10:34:53 AM (4 years ago)
Author:
suehring
Message:

Bugfixes in Makefile and land_surface_model_mod

File:
1 edited

Legend:

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

    r2233 r2237  
    2525! -----------------
    2626! $Id$
     27! Bugfix in write restart data
     28!
     29! 2233 2017-05-30 18:08:54Z suehring
    2730!
    2831! 2232 2017-05-30 17:47:52Z suehring
     
    167170!> DALES and UCLA-LES models.
    168171!>
     172!> @todo Restart data for vertical natural land-surfaces
    169173!> @todo Extensive verification energy-balance solver for vertical surfaces,
    170174!>       e.g. parametrization of r_a
     
    37723776          WRITE ( 14 )  'lai_av              ';  WRITE ( 14 )  lai_av
    37733777       ENDIF
    3774        WRITE ( 14 )     'm_liq_eb            ';  WRITE ( 14 )  m_liq_eb_h
     3778       WRITE ( 14 )     'm_liq_eb            ';  WRITE ( 14 )  m_liq_eb_h%var_1d
    37753779       IF ( ALLOCATED( m_liq_eb_av ) )  THEN
    37763780          WRITE ( 14 )  'm_liq_eb_av         ';  WRITE ( 14 )  m_liq_eb_av
    37773781       ENDIF
    3778        WRITE ( 14 )     'm_soil              ';  WRITE ( 14 )  m_soil_h
     3782       WRITE ( 14 )     'm_soil              ';  WRITE ( 14 )  m_soil_h%var_2d
    37793783       IF ( ALLOCATED( m_soil_av ) )  THEN
    37803784          WRITE ( 14 )  'm_soil_av           ';  WRITE ( 14 )  m_soil_av
     
    37953799          WRITE ( 14 )  'shf_eb_av           ';  WRITE ( 14 )  shf_eb_av
    37963800       ENDIF
    3797        WRITE ( 14 )     't_soil              ';  WRITE ( 14 )  t_soil_h
     3801       WRITE ( 14 )     't_soil              ';  WRITE ( 14 )  t_soil_h%var_2d
    37983802       IF ( ALLOCATED( t_soil_av ) )  THEN
    37993803          WRITE ( 14 )  't_soil_av           ';  WRITE ( 14 )  t_soil_av
Note: See TracChangeset for help on using the changeset viewer.