concoutput_nest_netcdf Subroutine

public subroutine concoutput_nest_netcdf(itime, outnum)

Uses


                                                                        *
 Output of the concentration grid and the concentrations.               *
                                                                        *
 Author: A. Stohl                                                       *
                                                                        *
 24 May 1995                                                            *
                                                                        *
 13 April 1999, Major update: if output size is smaller, dump output in *
                sparse matrix format; additional output of uncertainty  *
                                                                        *
 05 April 2000, Major update: output of age classes; output for backward*
                runs is time spent in grid cell times total mass of     *
                species.                                                *
                                                                        *
 17 February 2002, Appropriate dimensions for backward and forward runs *
                are now specified in module par_mod                     *
                                                                        *
 June 2006, write grid in sparse matrix with a single write command     *
                in order to save disk space                             *
                                                                        *
 2008 new sparse matrix format                                          *
                                                                        *
 19 February 2010, Dominik Brunner, Empa: Adapted for COSMO             *
                                                                        *
 April 2013, Dominik Brunner, Empa                                      *
                Adapted for netcdf output                               *
                                                                        *

                                                                        *

Variables: * itime current simulation time * outnum number of samples * *




Compute air density: brd134: we now take into account whether we are in the mother or in a nested domain (before only from mother domain) Determine center altitude of output layer, and interpolate density data to that altitude


$OMP PARALLEL PRIVATE(halfheight,kzz,dz1,dz2,dz,xl,yl,ngrid,iix,jjy, & $OMP kz,ix,jy,l,ks,kp,nage,auxgrid) REDUCTION(+:gridtotal) $OMP DO


Determine the standard deviation of the mean concentration or mixing ratio (uncertainty of the output) and the dry and wet deposition



Generate output: may be in concentration (ng/m3) or in mixing ratio (ppt) or both Output the position and the values alternated multiplied by 1 or -1, first line is number of values, number of positions For backward simulations, the unit is seconds, stored in grid_time



$OMP SINGLE




Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: itime
real, intent(in) :: outnum