Ignore:
Timestamp:
Oct 24, 2017 9:57:58 AM (4 years ago)
Author:
maronga
Message:

bugfix in radiation model and improvements in land surface scheme

File:
1 edited

Legend:

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

    r2550 r2575  
    17641764!
    17651765!-- Geostrophic parameters
    1766     WRITE ( io, 410 )  phi, omega, f, fs
     1766    WRITE ( io, 410 )  latitude, longitude, omega, f, fs
    17671767
    17681768 !
     
    22002200400 FORMAT (//' Physical quantities:'/ &
    22012201              ' -------------------'/)
    2202 410 FORMAT ('    Geograph. latitude  :   phi    = ',F4.1,' degr'/   &
     2202410 FORMAT ('    Geograph. latitude  :   latitude  = ',F4.1,' degr'/   &
     2203            '    Geograph. longitude :   longitude = ',F4.1,' degr'/   &
    22032204            '    Angular velocity    :   omega  =',E10.3,' rad/s'/  &
    22042205            '    Coriolis parameter  :   f      = ',F9.6,' 1/s'/    &
     
    22152216            '    Specific heat cap. :   c_p   = ',F6.1,' J/(kg K)'/ &
    22162217            '    Vapourization heat :   L_v   =',E9.2,' J/kg')
    2217 417 FORMAT ('    Geograph. longitude :   lambda = ',F4.1,' degr')
    22182218418 FORMAT (/'    Day of the year at model start :   day_init      =     ',I3 &
    22192219            /'    UTC time at model start        :   time_utc_init = ',F7.1' s')
Note: See TracChangeset for help on using the changeset viewer.