Ignore:
Timestamp:
Nov 21, 2019 10:37:50 AM (22 months ago)
Author:
oliver.maas
Message:

In case of turbulent inflow: Adjusted recycling_yshift, so that y-shift can be given as multiples of PE (as in y_shift for cyclic BCs).

File:
1 edited

Legend:

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

    r4227 r4297  
    2525! -----------------
    2626! $Id$
     27! adjusted message to the changed parameter recycling_yshift
     28!
     29! 4227 2019-09-10 18:04:34Z gronemeier
    2730! implement new palm_date_time_mod
    2831!
     
    920923       WRITE ( io, 318 )  use_cmax, pt_damping_width, pt_damping_factor       
    921924       IF ( turbulent_inflow )  THEN
    922           IF ( .NOT. recycling_yshift ) THEN
     925          IF ( recycling_yshift == 0 ) THEN
    923926             WRITE ( io, 319 )  recycling_width, recycling_plane, &
    924927                                inflow_damping_height, inflow_damping_width
    925928          ELSE
    926              WRITE ( io, 322 )  recycling_width, recycling_plane, &
     929             WRITE ( io, 322 )  recycling_yshift, recycling_width, recycling_plane, &
    927930                                inflow_damping_height, inflow_damping_width
    928931          END IF
     
    17371740              ' ----------------')
    17381741322 FORMAT ('       turbulence recycling at inflow switched on'/ &
    1739             '       y shift of the recycled inflow turbulence switched on'/ &
     1742            '       y shift of the recycled inflow turbulence is',I3,' PE'/ &
    17401743            '       width of recycling domain: ',F7.1,' m   grid index: ',I4/ &
    17411744            '       inflow damping height: ',F6.1,' m   width: ',F6.1,' m'/)
Note: See TracChangeset for help on using the changeset viewer.