Changeset 759 for palm/trunk/SOURCE/prandtl_fluxes.f90

Timestamp:

Sep 15, 2011 1:58:31 PM (13 years ago)

Author:

raasch

Message:

New:
---

The number of parallel I/O operations can be limited with new mrun-option -w.
(advec_particles, data_output_2d, data_output_3d, header, init_grid, init_pegrid, init_3d_model, modules, palm, parin, write_3d_binary)

Changed:

---

mrun option -T is obligatory

Errors:

---

Bugfix: No zero assignments to volume_flow_initial and volume_flow_area in
case of normal restart runs. (init_3d_model)

initialization of u_0, v_0. This is just to avoid access of uninitialized
memory in exchange_horiz_2d, which causes respective error messages
when the Intel thread checker (inspector) is used. (production_e)

Bugfix for ts limitation (prandtl_fluxes)

File:

• palm/trunk/SOURCE/prandtl_fluxes.f90 (modified) (2 diffs)

palm/trunk/SOURCE/prandtl_fluxes.f90

@@ -4 +4 @@
 ! Current revisions:
 ! -----------------
-! 
+! Bugfix for ts limitation
 !
 ! Former revisions:
@@ -74 +74 @@
 !--          ts must be limited, because otherwise overflow may occur in case of
 !--          us=0 when computing rif further below
-             IF ( ts(j,i) < -1.05E5 )  ts = -1.0E5
-             IF ( ts(j,i) >   1.0E5 )  ts =  1.0E5
+             IF ( ts(j,i) < -1.05E5 )  ts(j,i) = -1.0E5
+             IF ( ts(j,i) >   1.0E5 )  ts(j,i) =  1.0E5
           ENDDO
        ENDDO