Ignore:
Timestamp:
May 30, 2017 5:47:52 PM (7 years ago)
Author:
suehring
Message:

Adjustments according new topography and surface-modelling concept implemented

File:
1 edited

Legend:

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

    r2101 r2232  
    2020! Current revisions:
    2121! -----------------
    22 !
     22! Replace wall_qflux, wall_sflux by wall_humidityflux and wall_scalarflux; add
     23! wall_salinityflux
     24! +tunnel_height, tunnel_lenth, tunnel_width_x, tunnel_width_y,
     25! tunnel_wall_depth
    2326!
    2427! Former revisions:
     
    614617    WRITE ( 14 )  'tsc                           '
    615618    WRITE ( 14 )  tsc
     619    WRITE ( 14 )  'tunnel_height                 '
     620    WRITE ( 14 )  tunnel_height
     621    WRITE ( 14 )  'tunnel_length                 '
     622    WRITE ( 14 )  tunnel_length
     623    WRITE ( 14 )  'tunnel_width_x                '
     624    WRITE ( 14 )  tunnel_width_x
     625    WRITE ( 14 )  'tunnel_width_y                '
     626    WRITE ( 14 )  tunnel_width_y
     627    WRITE ( 14 )  'tunnel_wall_depth             '
     628    WRITE ( 14 )  tunnel_wall_depth
    616629    WRITE ( 14 )  'collision_turbulence          '
    617630    WRITE ( 14 )  collision_turbulence
     
    680693    WRITE ( 14 )  'wall_heatflux                 '
    681694    WRITE ( 14 )  wall_heatflux
    682     WRITE ( 14 )  'wall_qflux                    '
    683     WRITE ( 14 )  wall_qflux
    684     WRITE ( 14 )  'wall_sflux                    '
    685     WRITE ( 14 )  wall_sflux
     695    WRITE ( 14 )  'wall_humidityflux             '
     696    WRITE ( 14 )  wall_humidityflux
     697    WRITE ( 14 )  'wall_scalarflux               '
     698    WRITE ( 14 )  wall_scalarflux
     699    WRITE ( 14 )  'wall_salinityflux             '
     700    WRITE ( 14 )  wall_salinityflux
    686701    WRITE ( 14 )  'w_max                         '
    687702    WRITE ( 14 )  w_max
     
    694709    WRITE ( 14 )  'z0h_factor                    '
    695710    WRITE ( 14 )  z0h_factor 
     711
    696712!
    697713!-- Set the end-of-file mark
Note: See TracChangeset for help on using the changeset viewer.