verttransform_nest Subroutine

public subroutine verttransform_nest(n, uuhn, vvhn, wwhn, pvhn)


                                                                        *
 This subroutine transforms temperature, dew point temperature and      *
 wind components from eta to meter coordinates.                         *
 The vertical wind component is transformed from Pa/s to m/s using      *
 the conversion factor pinmconv.                                        *
 In addition, this routine calculates vertical density gradients        *
 needed for the parameterization of the turbulent velocities.           *
 It is similar to verttransform, but makes the transformations for      *
 the nested grids.                                                      *
                                                                        *
 Author: A. Stohl, G. Wotawa                                            *
                                                                        *
 12 August 1996                                                         *
 Update: 16 January 1998                                                *
                                                                        *

CHANGES * Major update: 17 February 1999 * by G. Wotawa * * - Vertical levels for u, v and w are put together * - Slope correction for vertical velocity: Modification of calculation * procedure * * Bernd C. Krueger, Feb. 2001: * Variables tthn and qvhn (on eta coordinates) from common block * * Sabine Eckhardt, March 2007: * added the variable cloud for use with scavenging - descr. in com_mod * PS/AT 2018/-21: variable "cloud" is replaced by quickfix, see below * * ESO, 2016 * -note that divide-by-zero occurs when nxmaxn,nymaxn etc. are larger than * the actual field dimensions * * Don Morton, 2017-05-30: * modification of a bug in ew. Don Morton (CTBTO project) * * undocumented modifications by NILU for v10 * * Petra Seibert, 2018-06-13: * - put back SAVE attribute for INIT, just to be safe * - minor changes, most of them just cosmetics * for details see changelog.txt in branch unive * * Petra Seibert, Anne Philipp, 2019-05-02: implement wetdepo quickfix * Petra Seibert, Anne Tipka, 2020-11-19: reimplement in latest version * *



                                                                        *

Variables: * Note PS, AT 2021-01-29: all these fields are 0:nxmaxn-1,0:nymaxn-1 !! * nxn,nyn,nuvz,nwz field dimensions in x,y and z direction * icloudbot cloud bottom field for wet deposition * icloudtop cloud thickness for wet deposition * uun wind components in x-direction [m/s] * vvn wind components in y-direction [m/s] * wwn wind components in z-direction [deltaeta/s]* ttn temperature [K] * pvn potential vorticity (pvu) * psn surface pressure [Pa] * *



Arguments

Type IntentOptional Attributes Name
integer :: n
real, intent(in), dimension(0:nxmaxn-1,0:nymaxn-1,nuvzmax,numbnests) :: uuhn
real, intent(in), dimension(0:nxmaxn-1,0:nymaxn-1,nuvzmax,numbnests) :: vvhn
real, intent(in), dimension(0:nxmaxn-1,0:nymaxn-1,nwzmax,numbnests) :: wwhn
real, intent(in), dimension(0:nxmaxn-1,0:nymaxn-1,nuvzmax,numbnests) :: pvhn