Ignore:
Timestamp:
Oct 15, 2018 2:21:08 PM (3 years ago)
Author:
suehring
Message:

Offline nesting revised and separated from large_scale_forcing_mod; Time-dependent synthetic turbulence generator; bugfixes in USM/LSM radiation model and init_pegrid

File:
1 edited

Legend:

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

    r3313 r3347  
    2525! -----------------
    2626! $Id$
     27! - offline nesting separated from large-scale forcing module
     28! - top boundary condition for pressure in offline nesting changed
     29!
     30! 3343 2018-10-15 10:38:52Z suehring
    2731! Introduced reading of date_init to inipar.(Russo)
    2832! Add extra profiles for chemistry (basit)
     
    477481        ONLY:  mas_parin
    478482
     483    USE nesting_offl_mod,                                                      &
     484        ONLY:  nesting_offl_parin
     485       
    479486    USE netcdf_interface,                                                      &
    480487        ONLY:  netcdf_data_format, netcdf_deflate, netcdf_precision
     
    570577             loop_optimization, lsf_exception, masking_method, mg_cycles,      &
    571578             mg_switch_to_pe0_level, mixing_length_1d, momentum_advec,         &
    572              most_method, nesting_offline,                  &
     579             most_method,                                                      &
    573580             netcdf_precision, neutral, ngsrb,                                 &
    574581             nsor, nsor_ini, nudging, nx, ny, nz, ocean_mode, omega,           &
     
    643650             loop_optimization, lsf_exception, masking_method, mg_cycles,      &
    644651             mg_switch_to_pe0_level, mixing_length_1d, momentum_advec,         &
    645              most_method, nesting_offline,                                     &
     652             most_method,                                                      &
    646653             netcdf_precision, neutral, ngsrb,                                 &
    647654             nsor, nsor_ini, nudging, nx, ny, nz, ocean_mode, omega,           &
     
    878885          CALL gust_parin
    879886          CALL mas_parin
     887          CALL nesting_offl_parin
    880888          CALL ocean_parin
    881889          CALL pcm_parin
     
    979987           !  bc_s_t   = 'nesting_offline'  ! scalar boundary condition is not clear
    980988           !  bc_cs_t  = 'nesting_offline'  ! same for chemical species
    981              bc_p_t   = 'neumann'
     989!
     990!--          For the pressure set Dirichlet conditions, in contrast to the
     991!--          self nesting. This gives less oscilations within the
     992!--          free atmosphere since the pressure solver has more degrees of
     993!--          freedom. In constrast to the self nesting, this might be
     994!--          justified since the top boundary is far away from the domain
     995!--          of interest.
     996             bc_p_t   = 'dirichlet' !'neumann'
    982997          ENDIF
    983998
Note: See TracChangeset for help on using the changeset viewer.