Changeset 1159 for palm/trunk/SOURCE/header.f90
- Timestamp:
- May 21, 2013 11:58:22 AM (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/header.f90
r1116 r1159 20 20 ! Current revisions: 21 21 ! ----------------- 22 ! +use_cmax 22 23 ! 23 24 ! … … 742 743 WRITE ( io, 317 ) bc_lr, bc_ns 743 744 IF ( .NOT. bc_lr_cyc .OR. .NOT. bc_ns_cyc ) THEN 744 WRITE ( io, 318 ) pt_damping_width, pt_damping_factor745 WRITE ( io, 318 ) use_cmax, pt_damping_width, pt_damping_factor 745 746 IF ( turbulent_inflow ) THEN 746 747 WRITE ( io, 319 ) recycling_width, recycling_plane, & … … 1781 1782 ' left/right: ',A/ & 1782 1783 ' north/south: ',A) 1783 318 FORMAT (/' pt damping layer width = ',F7.2,' m, pt ', & 1784 318 FORMAT (/' use_cmax: ',L1 / & 1785 ' pt damping layer width = ',F8.2,' m, pt ', & 1784 1786 'damping factor = ',F6.4) 1785 1787 319 FORMAT (' turbulence recycling at inflow switched on'/ &
Note: See TracChangeset
for help on using the changeset viewer.