- Timestamp:
- May 13, 2009 10:57:59 AM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/prandtl_fluxes.f90
r291 r315 6 6 ! Saturation condition at (sea) surface is not used in precursor runs (only 7 7 ! in the following coupled runs) 8 ! Bugfix: qsws was calculated in case of constant heatflux = .FALSE. 8 9 ! 9 10 ! Former revisions: … … 330 331 ! 331 332 !-- Compute the vertical water/scalar flux 332 IF ( .NOT. constant_ heatflux .AND. ( humidity .OR. passive_scalar ) ) THEN333 IF ( .NOT. constant_waterflux .AND. ( humidity .OR. passive_scalar ) ) THEN 333 334 !$OMP PARALLEL DO 334 335 DO i = nxl-1, nxr+1
Note: See TracChangeset
for help on using the changeset viewer.