Ignore:
Timestamp:
Mar 26, 2012 2:18:34 PM (9 years ago)
Author:
suehring
Message:

WS5 is available in combination with topography. Version number changed from 3.8 to 3.8a. Modification in init_pt_anomaly.

File:
1 edited

Legend:

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

    r668 r861  
    44! Current revisions:
    55! -----------------
     6!
     7! Modification of the amplitude to obtain a visible temperature perturbation.
    68!
    79! Former revisions:
     
    6264             radius = SQRT( x**2 + y**2 + z**2 )
    6365             IF ( radius <= rc )  THEN
    64                 betrag = 5.0 * EXP( -( radius / 2.0 )**2 )
     66                betrag = 5.0 * EXP( -( radius * 0.001 / 2.0 )**2 )
    6567             ELSE
    6668                betrag = 0.0
Note: See TracChangeset for help on using the changeset viewer.