Ignore:
Timestamp:
Jun 24, 2009 12:59:09 PM (12 years ago)
Author:
maronga
Message:

adjustments for lcxt4 and ibmy, allow user 2d xy cross section output at z=nzb+1

File:
1 edited

Legend:

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

    r305 r343  
    44! Current revisions:
    55! -----------------
     6! Added missing timeseries calculation of w"q"(0), moved timeseries q* to the
     7! end.
    68! Temperature gradient criterion for estimating the boundary layer height
    79! replaced by the gradient criterion of Sullivan et al. (1998).
     
    10251027       ts_value(19,sr) = hom(nzb+1,1,pr_palm,sr)    ! u'w'    at k=0
    10261028       ts_value(20,sr) = hom(nzb+2,1,pr_palm,sr)    ! v'w'    at k=0
    1027        ts_value(21,sr) = hom(nzb+12,1,pr_palm,sr)   ! q*
     1029       ts_value(21,sr) = hom(nzb,1,48,sr)           ! w"q"    at k=0
    10281030
    10291031       IF ( ts_value(5,sr) /= 0.0 )  THEN
     
    10341036       ENDIF
    10351037
     1038       ts_value(23,sr) = hom(nzb+12,1,pr_palm,sr)   ! q*
    10361039!
    10371040!--    Calculate additional statistics provided by the user interface
Note: See TracChangeset for help on using the changeset viewer.