\hypertarget{namespacemodule__radiation__gases}{}\doxysubsection{module\+\_\+radiation\+\_\+gases Module Reference}
\label{namespacemodule__radiation__gases}\index{module\_radiation\_gases@{module\_radiation\_gases}}


This module sets up ozone climatological profiles and other constant gas profiles, such as co2, ch4, n2o, o2, and those of cfc gases.  


\doxysubsubsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
subroutine, public \mbox{\hyperlink{group__module__radiation__gases__mod_gadc23924e8a972ebd5253140c32cde429_gadc23924e8a972ebd5253140c32cde429}{gas\+\_\+init}} (me, co2usr\+\_\+file, co2cyc\+\_\+file, ico2flg, ictmflg, ioznflg, con\+\_\+pi, errflg, errmsg)
\begin{DoxyCompactList}\small\item\em This subroutine sets up ozone, co2, etc. parameters. If climatology ozone then read in monthly ozone data. \end{DoxyCompactList}\item 
subroutine, public \mbox{\hyperlink{group__module__radiation__gases__mod_ga4089d585ed3c725811bde12831d526f6_ga4089d585ed3c725811bde12831d526f6}{gas\+\_\+update}} (iyear, imon, iday, ihour, loz1st, ldoco2, me, co2dat\+\_\+file, co2gbl\+\_\+file, ictmflg, ico2flg, ioznflg, errflg, errmsg)
\begin{DoxyCompactList}\small\item\em This subroutine reads in 2-\/d monthly co2 data set for a specified year. Data are in a 15 degree lat/lon horizontal resolution. \end{DoxyCompactList}\item 
subroutine, public \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases}} (plvl, xlon, xlat, IMAX, LMAX, ico2flg, top\+\_\+at\+\_\+1, con\+\_\+pi, gasdat)
\begin{DoxyCompactList}\small\item\em This subroutine sets up global distribution of radiation absorbing gases in volume mixing ratio. Currently only co2 has the options from observed values, all other gases are asigned to the climatological values. \end{DoxyCompactList}\item 
subroutine, public \mbox{\hyperlink{group__module__radiation__gases__mod_ga37a447339c78ec00dbc64246e719851e_ga37a447339c78ec00dbc64246e719851e}{getozn}} (prslk, xlat, IMAX, LM, top\+\_\+at\+\_\+1, o3mmr)
\begin{DoxyCompactList}\small\item\em This subroutine sets up climatological ozone profile for radiation calculation. This code is originally written by Shrinivas Moorthi. \end{DoxyCompactList}\end{DoxyCompactItemize}
\doxysubsubsection*{Variables}
\begin{DoxyCompactItemize}
\item 
character(40), parameter \mbox{\hyperlink{namespacemodule__radiation__gases_a8a79a6d3d931da021cd19290c58bdfaa_a8a79a6d3d931da021cd19290c58bdfaa}{vtaggas}} =\textquotesingle{}NCEP-\/Radiation\+\_\+gases v5.\+1 Nov 2012 \textquotesingle{}
\item 
integer, parameter, public \mbox{\hyperlink{group__module__radiation__gases__mod_gaffc350828412da77ff3cf3e617ddc66c_gaffc350828412da77ff3cf3e617ddc66c}{nf\+\_\+vgas}} = 10
\item 
integer, parameter \mbox{\hyperlink{group__module__radiation__gases__mod_ga46eb4079ff9932819b3ab133bf6a43d9_ga46eb4079ff9932819b3ab133bf6a43d9}{imxco2}} = 24
\item 
integer, parameter \mbox{\hyperlink{group__module__radiation__gases__mod_gaa56e209872093bfcbdaeb452f5e5e332_gaa56e209872093bfcbdaeb452f5e5e332}{jmxco2}} = 12
\item 
integer, parameter \mbox{\hyperlink{group__module__radiation__gases__mod_ga3b26af64187b57999cadeced419b0f1b_ga3b26af64187b57999cadeced419b0f1b}{minyear}} = 1957
\item 
real(kind=kind\+\_\+phys), parameter \mbox{\hyperlink{group__module__radiation__gases__mod_gafda5c1d1129d865b9772e0f58dea7598_gafda5c1d1129d865b9772e0f58dea7598}{resco2}} =15.\+0
\item 
real(kind=kind\+\_\+phys), parameter \mbox{\hyperlink{group__module__radiation__gases__mod_gab09dc05b8a02e9a0b56991508b599708_gab09dc05b8a02e9a0b56991508b599708}{prsco2}} =788.\+0
\item 
real(kind=kind\+\_\+phys) \mbox{\hyperlink{group__module__radiation__gases__mod_ga1dbb351e2cad4b011a0c756dc29ea26e_ga1dbb351e2cad4b011a0c756dc29ea26e}{raddeg}}
\item 
real(kind=kind\+\_\+phys) \mbox{\hyperlink{group__module__radiation__gases__mod_ga7071fcac4551a8360872b8680fa53256_ga7071fcac4551a8360872b8680fa53256}{hfpi}}
\item 
real(kind=kind\+\_\+phys), parameter \mbox{\hyperlink{group__module__radiation__gases__mod_ga4fb5ca2e3bfaed7848d7602a22499e76_ga4fb5ca2e3bfaed7848d7602a22499e76}{co2vmr\+\_\+def}} = 350.\+0e-\/6
\item 
real(kind=kind\+\_\+phys), parameter \mbox{\hyperlink{group__module__radiation__gases__mod_ga858ad802efe755f8b4b5bde85996b6ae_ga858ad802efe755f8b4b5bde85996b6ae}{n2ovmr\+\_\+def}} = 0.\+31e-\/6
\item 
real(kind=kind\+\_\+phys), parameter \mbox{\hyperlink{group__module__radiation__gases__mod_gaad928d9e0064905a0b6e1eb8bb59bd23_gaad928d9e0064905a0b6e1eb8bb59bd23}{ch4vmr\+\_\+def}} = 1.\+50e-\/6
\item 
real(kind=kind\+\_\+phys), parameter \mbox{\hyperlink{group__module__radiation__gases__mod_ga910898e96b8afe92ebc82ce62ba682d8_ga910898e96b8afe92ebc82ce62ba682d8}{o2vmr\+\_\+def}} = 0.\+209
\item 
real(kind=kind\+\_\+phys), parameter \mbox{\hyperlink{group__module__radiation__gases__mod_ga3554bdf03f8222d425bb6c946244cbb5_ga3554bdf03f8222d425bb6c946244cbb5}{covmr\+\_\+def}} = 1.\+50e-\/8
\item 
real(kind=kind\+\_\+phys), parameter \mbox{\hyperlink{group__module__radiation__gases__mod_ga23ae6bb6860bfefef0c281b7106f521e_ga23ae6bb6860bfefef0c281b7106f521e}{f11vmr\+\_\+def}} = 3.\+520e-\/10
\item 
real(kind=kind\+\_\+phys), parameter \mbox{\hyperlink{group__module__radiation__gases__mod_ga96d4f78070f30010626e0824b3421250_ga96d4f78070f30010626e0824b3421250}{f12vmr\+\_\+def}} = 6.\+358e-\/10
\item 
real(kind=kind\+\_\+phys), parameter \mbox{\hyperlink{group__module__radiation__gases__mod_gafd0018e96811ac64ef2abd8cab821eb5_gafd0018e96811ac64ef2abd8cab821eb5}{f22vmr\+\_\+def}} = 1.\+500e-\/10
\item 
real(kind=kind\+\_\+phys), parameter \mbox{\hyperlink{group__module__radiation__gases__mod_ga013f8faaee6df0c7c032e1786770c110_ga013f8faaee6df0c7c032e1786770c110}{cl4vmr\+\_\+def}} = 1.\+397e-\/10
\item 
real(kind=kind\+\_\+phys), parameter \mbox{\hyperlink{group__module__radiation__gases__mod_ga76ec88dc6284c48cfaae6cd05428b6dd_ga76ec88dc6284c48cfaae6cd05428b6dd}{f113vmr\+\_\+def}} = 8.\+2000e-\/11
\item 
real(kind=kind\+\_\+phys), dimension(\+:), allocatable \mbox{\hyperlink{group__module__radiation__gases__mod_gac7466def3963591ebfc48298806b1f6a_gac7466def3963591ebfc48298806b1f6a}{pkstr}}
\item 
real(kind=kind\+\_\+phys), dimension(\+:,\+:,\+:), allocatable \mbox{\hyperlink{group__module__radiation__gases__mod_gad18392d991a9ef4b6ff0e8e822176a18_gad18392d991a9ef4b6ff0e8e822176a18}{o3r}}
\item 
integer \mbox{\hyperlink{group__module__radiation__gases__mod_ga0a14666484f230d3506a9b4740e2eeda_ga0a14666484f230d3506a9b4740e2eeda}{k1oz}} = 0
\item 
integer \mbox{\hyperlink{group__module__radiation__gases__mod_ga0c3727c9e2a0bec46e84622c4591cd8b_ga0c3727c9e2a0bec46e84622c4591cd8b}{k2oz}} = 0
\item 
real(kind=kind\+\_\+phys) \mbox{\hyperlink{group__module__radiation__gases__mod_gac7c9fd8ece69872fdef473020ea03d6b_gac7c9fd8ece69872fdef473020ea03d6b}{facoz}} = 0.\+0
\item 
real(kind=kind\+\_\+phys), dimension(\+:,\+:,\+:), allocatable \mbox{\hyperlink{group__module__radiation__gases__mod_ga4f35e5db780a64963dc65b8449def39d_ga4f35e5db780a64963dc65b8449def39d}{co2vmr\+\_\+sav}}
\item 
real(kind=kind\+\_\+phys), dimension(\+:,\+:,\+:), allocatable \mbox{\hyperlink{group__module__radiation__gases__mod_ga3985e306e5555089909fd42a4cc93afb_ga3985e306e5555089909fd42a4cc93afb}{co2cyc\+\_\+sav}}
\item 
real(kind=kind\+\_\+phys) \mbox{\hyperlink{group__module__radiation__gases__mod_ga0398d6837c9e8c41359e76a754147002_ga0398d6837c9e8c41359e76a754147002}{co2\+\_\+glb}} = \mbox{\hyperlink{group__module__radiation__gases__mod_ga4fb5ca2e3bfaed7848d7602a22499e76_ga4fb5ca2e3bfaed7848d7602a22499e76}{co2vmr\+\_\+def}}
\item 
real(kind=kind\+\_\+phys), dimension(12) \mbox{\hyperlink{group__module__radiation__gases__mod_gac2a03ad96c9aa598f9751fd689cb615f_gac2a03ad96c9aa598f9751fd689cb615f}{gco2cyc}}
\item 
integer \mbox{\hyperlink{group__module__radiation__gases__mod_ga6b4372e633bef3fb367e6ff3cf200bb8_ga6b4372e633bef3fb367e6ff3cf200bb8}{kyrsav}} = 0
\item 
integer \mbox{\hyperlink{group__module__radiation__gases__mod_gab1cf1b63398a3e7ec0334a7c97258b4d_gab1cf1b63398a3e7ec0334a7c97258b4d}{kmonsav}} = 1
\end{DoxyCompactItemize}


\doxysubsubsection{Function/\+Subroutine Documentation}
\mbox{\Hypertarget{group__module__radiation__gases__mod_gadc23924e8a972ebd5253140c32cde429_gadc23924e8a972ebd5253140c32cde429}\label{group__module__radiation__gases__mod_gadc23924e8a972ebd5253140c32cde429_gadc23924e8a972ebd5253140c32cde429}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!gas\_init@{gas\_init}}
\index{gas\_init@{gas\_init}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{gas\_init()}{gas\_init()}}
{\footnotesize\ttfamily subroutine, public module\+\_\+radiation\+\_\+gases\+::gas\+\_\+init (\begin{DoxyParamCaption}\item[{integer, intent(in)}]{me,  }\item[{character(len=26), intent(in)}]{co2usr\+\_\+file,  }\item[{character(len=26), intent(in)}]{co2cyc\+\_\+file,  }\item[{integer, intent(in)}]{ico2flg,  }\item[{integer, intent(in)}]{ictmflg,  }\item[{integer, intent(in)}]{ioznflg,  }\item[{real(kind=kind\+\_\+phys), intent(in)}]{con\+\_\+pi,  }\item[{integer, intent(out)}]{errflg,  }\item[{character(len=$\ast$), intent(out)}]{errmsg }\end{DoxyParamCaption})}


\begin{DoxyParams}{Parameters}
{\em me} & print message control flag \\
\hline
{\em co2usr\+\_\+file} & co2 user defined data table \\
\hline
{\em co2cyc\+\_\+file} & co2 climotology monthly cycle data table \\
\hline
{\em ictmflg} & data ic time/date control flag \\
\hline
{\em ico2flg} & co2 data source control flag \\
\hline
{\em ioznflg} & ozone data control flag \\
\hline
{\em con\+\_\+pi} & physical constant Pi \\
\hline
{\em errflg} & error flag \\
\hline
{\em errmsg} & error message \\
\hline
\end{DoxyParams}
\hypertarget{group__module__radiation__gases__mod_gadc23924e8a972ebd5253140c32cde429_gas_init_gen}{}\doxysubsubsection{gas\+\_\+init General Algorithm}\label{group__module__radiation__gases__mod_gadc23924e8a972ebd5253140c32cde429_gas_init_gen}


References \mbox{\hyperlink{group__module__radiation__gases__mod_ga0398d6837c9e8c41359e76a754147002_ga0398d6837c9e8c41359e76a754147002}{co2\+\_\+glb}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga3985e306e5555089909fd42a4cc93afb_ga3985e306e5555089909fd42a4cc93afb}{co2cyc\+\_\+sav}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga4fb5ca2e3bfaed7848d7602a22499e76_ga4fb5ca2e3bfaed7848d7602a22499e76}{co2vmr\+\_\+def}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga4f35e5db780a64963dc65b8449def39d_ga4f35e5db780a64963dc65b8449def39d}{co2vmr\+\_\+sav}}, \mbox{\hyperlink{group__module__radiation__gases__mod_gac2a03ad96c9aa598f9751fd689cb615f_gac2a03ad96c9aa598f9751fd689cb615f}{gco2cyc}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga7071fcac4551a8360872b8680fa53256_ga7071fcac4551a8360872b8680fa53256}{hfpi}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga46eb4079ff9932819b3ab133bf6a43d9_ga46eb4079ff9932819b3ab133bf6a43d9}{imxco2}}, \mbox{\hyperlink{group__module__radiation__gases__mod_gaa56e209872093bfcbdaeb452f5e5e332_gaa56e209872093bfcbdaeb452f5e5e332}{jmxco2}}, \mbox{\hyperlink{group__module__radiation__gases__mod_gab1cf1b63398a3e7ec0334a7c97258b4d_gab1cf1b63398a3e7ec0334a7c97258b4d}{kmonsav}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga6b4372e633bef3fb367e6ff3cf200bb8_ga6b4372e633bef3fb367e6ff3cf200bb8}{kyrsav}}, \mbox{\hyperlink{group__module__radiation__gases__mod_gad18392d991a9ef4b6ff0e8e822176a18_gad18392d991a9ef4b6ff0e8e822176a18}{o3r}}, \mbox{\hyperlink{group__module__radiation__gases__mod_gac7466def3963591ebfc48298806b1f6a_gac7466def3963591ebfc48298806b1f6a}{pkstr}}, and \mbox{\hyperlink{group__module__radiation__gases__mod_ga1dbb351e2cad4b011a0c756dc29ea26e_ga1dbb351e2cad4b011a0c756dc29ea26e}{raddeg}}.



Referenced by \mbox{\hyperlink{group___g_f_s__rrtmg__setup__mod_ga57c188f5ede1fbeaa1c48b8f7ac8b459_ga57c188f5ede1fbeaa1c48b8f7ac8b459}{gfs\+\_\+rrtmg\+\_\+setup\+::gfs\+\_\+rrtmg\+\_\+setup\+\_\+init()}}.

Here is the caller graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=348pt]{group__module__radiation__gases__mod_gadc23924e8a972ebd5253140c32cde429_gadc23924e8a972ebd5253140c32cde429_icgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{group__module__radiation__gases__mod_ga4089d585ed3c725811bde12831d526f6_ga4089d585ed3c725811bde12831d526f6}\label{group__module__radiation__gases__mod_ga4089d585ed3c725811bde12831d526f6_ga4089d585ed3c725811bde12831d526f6}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!gas\_update@{gas\_update}}
\index{gas\_update@{gas\_update}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{gas\_update()}{gas\_update()}}
{\footnotesize\ttfamily subroutine, public module\+\_\+radiation\+\_\+gases\+::gas\+\_\+update (\begin{DoxyParamCaption}\item[{integer, intent(in)}]{iyear,  }\item[{integer, intent(in)}]{imon,  }\item[{integer, intent(in)}]{iday,  }\item[{integer, intent(in)}]{ihour,  }\item[{logical, intent(in)}]{loz1st,  }\item[{logical, intent(in)}]{ldoco2,  }\item[{integer, intent(in)}]{me,  }\item[{character(len=26), intent(in)}]{co2dat\+\_\+file,  }\item[{character(len=26), intent(in)}]{co2gbl\+\_\+file,  }\item[{integer, intent(in)}]{ictmflg,  }\item[{integer, intent(in)}]{ico2flg,  }\item[{integer, intent(in)}]{ioznflg,  }\item[{integer, intent(out)}]{errflg,  }\item[{character(len=$\ast$), intent(out)}]{errmsg }\end{DoxyParamCaption})}


\begin{DoxyParams}{Parameters}
{\em iyear} & year of the requested data for fcst \\
\hline
{\em imon} & month of the year \\
\hline
{\em iday} & day of the month \\
\hline
{\em ihour} & hour of the day \\
\hline
{\em loz1st} & clim ozone 1st time update control flag \\
\hline
{\em ldoco2} & co2 update control flag \\
\hline
{\em me} & print message control flag \\
\hline
{\em co2dat\+\_\+file} & co2 2d monthly obsv data table \\
\hline
{\em co2gbl\+\_\+file} & co2 global annual mean data table \\
\hline
{\em ictmflg} & data ic time/date control flag \\
\hline
{\em ico2flg} & co2 data source control flag \\
\hline
{\em ioznflg} & ozone data control flag \\
\hline
{\em errflg} & error flag \\
\hline
{\em errmsg} & error message \\
\hline
\end{DoxyParams}
\hypertarget{group__module__radiation__gases__mod_ga4089d585ed3c725811bde12831d526f6_gen_gas_update}{}\doxysubsubsection{gas\+\_\+update General Algorithm}\label{group__module__radiation__gases__mod_ga4089d585ed3c725811bde12831d526f6_gen_gas_update}

\begin{DoxyItemize}
\item Ozone data section
\item co2 data section
\end{DoxyItemize}

References \mbox{\hyperlink{group__module__radiation__gases__mod_ga0398d6837c9e8c41359e76a754147002_ga0398d6837c9e8c41359e76a754147002}{co2\+\_\+glb}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga3985e306e5555089909fd42a4cc93afb_ga3985e306e5555089909fd42a4cc93afb}{co2cyc\+\_\+sav}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga4f35e5db780a64963dc65b8449def39d_ga4f35e5db780a64963dc65b8449def39d}{co2vmr\+\_\+sav}}, \mbox{\hyperlink{group__module__radiation__gases__mod_gac7c9fd8ece69872fdef473020ea03d6b_gac7c9fd8ece69872fdef473020ea03d6b}{facoz}}, \mbox{\hyperlink{group__module__radiation__gases__mod_gac2a03ad96c9aa598f9751fd689cb615f_gac2a03ad96c9aa598f9751fd689cb615f}{gco2cyc}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga46eb4079ff9932819b3ab133bf6a43d9_ga46eb4079ff9932819b3ab133bf6a43d9}{imxco2}}, \mbox{\hyperlink{group__module__radiation__gases__mod_gaa56e209872093bfcbdaeb452f5e5e332_gaa56e209872093bfcbdaeb452f5e5e332}{jmxco2}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga0a14666484f230d3506a9b4740e2eeda_ga0a14666484f230d3506a9b4740e2eeda}{k1oz}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga0c3727c9e2a0bec46e84622c4591cd8b_ga0c3727c9e2a0bec46e84622c4591cd8b}{k2oz}}, \mbox{\hyperlink{group__module__radiation__gases__mod_gab1cf1b63398a3e7ec0334a7c97258b4d_gab1cf1b63398a3e7ec0334a7c97258b4d}{kmonsav}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga6b4372e633bef3fb367e6ff3cf200bb8_ga6b4372e633bef3fb367e6ff3cf200bb8}{kyrsav}}, and \mbox{\hyperlink{group__module__radiation__gases__mod_ga3b26af64187b57999cadeced419b0f1b_ga3b26af64187b57999cadeced419b0f1b}{minyear}}.



Referenced by \mbox{\hyperlink{group___g_f_s__rrtmg__setup__mod_ga84bc02f50f4b0d7a37f423d9117156d6_ga84bc02f50f4b0d7a37f423d9117156d6}{gfs\+\_\+rrtmg\+\_\+setup\+::radupdate()}}.

Here is the caller graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{group__module__radiation__gases__mod_ga4089d585ed3c725811bde12831d526f6_ga4089d585ed3c725811bde12831d526f6_icgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}\label{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!getgases@{getgases}}
\index{getgases@{getgases}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{getgases()}{getgases()}}
{\footnotesize\ttfamily subroutine, public module\+\_\+radiation\+\_\+gases\+::getgases (\begin{DoxyParamCaption}\item[{real (kind=kind\+\_\+phys), dimension(\+:,\+:), intent(in)}]{plvl,  }\item[{real (kind=kind\+\_\+phys), dimension(\+:), intent(in)}]{xlon,  }\item[{real (kind=kind\+\_\+phys), dimension(\+:), intent(in)}]{xlat,  }\item[{integer, intent(in)}]{IMAX,  }\item[{integer, intent(in)}]{LMAX,  }\item[{integer, intent(in)}]{ico2flg,  }\item[{logical, intent(in)}]{top\+\_\+at\+\_\+1,  }\item[{real(kind=kind\+\_\+phys), intent(in)}]{con\+\_\+pi,  }\item[{real (kind=kind\+\_\+phys), dimension(\+:,\+:,\+:), intent(out)}]{gasdat }\end{DoxyParamCaption})}


\begin{DoxyParams}{Parameters}
{\em plvl} & (IMAX,LMAX+1), pressure at model layer interfaces (mb) \\
\hline
{\em xlon} & (IMAX), grid longitude in radians, ok both 0-\/\texorpdfstring{$>$}{>}2pi or -\/pi -\/\texorpdfstring{$>$}{>} +pi arrangements \\
\hline
{\em xlat} & (IMAX), grid latitude in radians, default range to pi/2 -\/\texorpdfstring{$>$}{>} -\/pi/2, otherwise see in-\/line comment \\
\hline
{\em IMAX} & horizontal dimension for output data \\
\hline
{\em LMAX} & vertical dimension for output data \\
\hline
{\em ico2flg} & (1), co2 data source control flag \\
\hline
{\em top\+\_\+at\+\_\+1} & (1), vertical ordering flag \\
\hline
{\em con\+\_\+pi} & (1), physical constant Pi \\
\hline
{\em gasdat} & (IMAX,LMAX,NF\+\_\+\+VGAS) -\/ gases volume mixing ratioes ~\newline
 (\+:,\+:,1) -\/ co2 ~\newline
 (\+:,\+:,2) -\/ n2o ~\newline
 (\+:,\+:,3) -\/ ch4 ~\newline
 (\+:,\+:,4) -\/ o2 ~\newline
 (\+:,\+:,5) -\/ co ~\newline
 (\+:,\+:,6) -\/ cfc11 ~\newline
 (\+:,\+:,7) -\/ cfc12 ~\newline
 (\+:,\+:,8) -\/ cfc22 ~\newline
 (\+:,\+:,9) -\/ ccl4 ~\newline
 (\+:,\+:,10) -\/ cfc113 ~\newline

\begin{DoxyItemize}
\item Internal module variables \+: ~\newline
 co2vmr\+\_\+sav -\/ saved monthly co2 concentration from sub gas\+\_\+update ~\newline
 co2\+\_\+glb -\/ saved global annual mean co2 value from gas\+\_\+update ~\newline
 gco2cyc -\/ saved global seasonal variation of co2 climatology in 12-\/month form 
\end{DoxyItemize}\\
\hline
\end{DoxyParams}
\hypertarget{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_gen_getgases}{}\doxysubsubsection{getgases General Algorithm}\label{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_gen_getgases}


References \mbox{\hyperlink{group__module__radiation__gases__mod_gaad928d9e0064905a0b6e1eb8bb59bd23_gaad928d9e0064905a0b6e1eb8bb59bd23}{ch4vmr\+\_\+def}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga013f8faaee6df0c7c032e1786770c110_ga013f8faaee6df0c7c032e1786770c110}{cl4vmr\+\_\+def}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga0398d6837c9e8c41359e76a754147002_ga0398d6837c9e8c41359e76a754147002}{co2\+\_\+glb}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga4fb5ca2e3bfaed7848d7602a22499e76_ga4fb5ca2e3bfaed7848d7602a22499e76}{co2vmr\+\_\+def}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga4f35e5db780a64963dc65b8449def39d_ga4f35e5db780a64963dc65b8449def39d}{co2vmr\+\_\+sav}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga3554bdf03f8222d425bb6c946244cbb5_ga3554bdf03f8222d425bb6c946244cbb5}{covmr\+\_\+def}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga76ec88dc6284c48cfaae6cd05428b6dd_ga76ec88dc6284c48cfaae6cd05428b6dd}{f113vmr\+\_\+def}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga23ae6bb6860bfefef0c281b7106f521e_ga23ae6bb6860bfefef0c281b7106f521e}{f11vmr\+\_\+def}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga96d4f78070f30010626e0824b3421250_ga96d4f78070f30010626e0824b3421250}{f12vmr\+\_\+def}}, \mbox{\hyperlink{group__module__radiation__gases__mod_gafd0018e96811ac64ef2abd8cab821eb5_gafd0018e96811ac64ef2abd8cab821eb5}{f22vmr\+\_\+def}}, \mbox{\hyperlink{group__module__radiation__gases__mod_gac2a03ad96c9aa598f9751fd689cb615f_gac2a03ad96c9aa598f9751fd689cb615f}{gco2cyc}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga7071fcac4551a8360872b8680fa53256_ga7071fcac4551a8360872b8680fa53256}{hfpi}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga46eb4079ff9932819b3ab133bf6a43d9_ga46eb4079ff9932819b3ab133bf6a43d9}{imxco2}}, \mbox{\hyperlink{group__module__radiation__gases__mod_gaa56e209872093bfcbdaeb452f5e5e332_gaa56e209872093bfcbdaeb452f5e5e332}{jmxco2}}, \mbox{\hyperlink{group__module__radiation__gases__mod_gab1cf1b63398a3e7ec0334a7c97258b4d_gab1cf1b63398a3e7ec0334a7c97258b4d}{kmonsav}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga858ad802efe755f8b4b5bde85996b6ae_ga858ad802efe755f8b4b5bde85996b6ae}{n2ovmr\+\_\+def}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga910898e96b8afe92ebc82ce62ba682d8_ga910898e96b8afe92ebc82ce62ba682d8}{o2vmr\+\_\+def}}, \mbox{\hyperlink{group__module__radiation__gases__mod_gab09dc05b8a02e9a0b56991508b599708_gab09dc05b8a02e9a0b56991508b599708}{prsco2}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga1dbb351e2cad4b011a0c756dc29ea26e_ga1dbb351e2cad4b011a0c756dc29ea26e}{raddeg}}, and \mbox{\hyperlink{group__module__radiation__gases__mod_gafda5c1d1129d865b9772e0f58dea7598_gafda5c1d1129d865b9772e0f58dea7598}{resco2}}.



Referenced by \mbox{\hyperlink{group___g_f_s__rrtmg__pre__mod_ga6d9841bd404b47f27921b221f427e716_ga6d9841bd404b47f27921b221f427e716}{gfs\+\_\+rrtmg\+\_\+pre\+::gfs\+\_\+rrtmg\+\_\+pre\+\_\+run()}}.

Here is the caller graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=338pt]{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8_icgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{group__module__radiation__gases__mod_ga37a447339c78ec00dbc64246e719851e_ga37a447339c78ec00dbc64246e719851e}\label{group__module__radiation__gases__mod_ga37a447339c78ec00dbc64246e719851e_ga37a447339c78ec00dbc64246e719851e}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!getozn@{getozn}}
\index{getozn@{getozn}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{getozn()}{getozn()}}
{\footnotesize\ttfamily subroutine, public module\+\_\+radiation\+\_\+gases\+::getozn (\begin{DoxyParamCaption}\item[{real (kind=kind\+\_\+phys), dimension(\+:,\+:), intent(in)}]{prslk,  }\item[{real (kind=kind\+\_\+phys), dimension(\+:), intent(in)}]{xlat,  }\item[{integer, intent(in)}]{IMAX,  }\item[{integer, intent(in)}]{LM,  }\item[{logical, intent(in)}]{top\+\_\+at\+\_\+1,  }\item[{real (kind=kind\+\_\+phys), dimension(\+:,\+:), intent(out)}]{o3mmr }\end{DoxyParamCaption})}


\begin{DoxyParams}{Parameters}
{\em prslk} & (IMAX,LM), exner function = $(p/p0)^{rocp}$ \\
\hline
{\em xlat} & (IMAX), latitude in radians, default to pi/2 -\/\texorpdfstring{$>$}{>} -\/pi/2 range, otherwise see in-\/line comment \\
\hline
{\em IMAX,LM} & (1), horizontal and vertical dimensions \\
\hline
{\em top\+\_\+at\+\_\+1} & (1), vertical profile indexing flag \\
\hline
{\em o3mmr} & (IMAX,LM), output ozone profile in mass mixing ratio (g/g) \\
\hline
\end{DoxyParams}
\hypertarget{group__module__radiation__gases__mod_ga37a447339c78ec00dbc64246e719851e_getozn_gen}{}\doxysubsubsection{getozn General Algorithm}\label{group__module__radiation__gases__mod_ga37a447339c78ec00dbc64246e719851e_getozn_gen}


References \mbox{\hyperlink{group__module__radiation__gases__mod_gac7c9fd8ece69872fdef473020ea03d6b_gac7c9fd8ece69872fdef473020ea03d6b}{facoz}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga0a14666484f230d3506a9b4740e2eeda_ga0a14666484f230d3506a9b4740e2eeda}{k1oz}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga0c3727c9e2a0bec46e84622c4591cd8b_ga0c3727c9e2a0bec46e84622c4591cd8b}{k2oz}}, \mbox{\hyperlink{group__module__radiation__gases__mod_gad18392d991a9ef4b6ff0e8e822176a18_gad18392d991a9ef4b6ff0e8e822176a18}{o3r}}, \mbox{\hyperlink{group__module__radiation__gases__mod_gac7466def3963591ebfc48298806b1f6a_gac7466def3963591ebfc48298806b1f6a}{pkstr}}, and \mbox{\hyperlink{group__module__radiation__gases__mod_ga1dbb351e2cad4b011a0c756dc29ea26e_ga1dbb351e2cad4b011a0c756dc29ea26e}{raddeg}}.



Referenced by \mbox{\hyperlink{group___g_f_s__rrtmg__pre__mod_ga6d9841bd404b47f27921b221f427e716_ga6d9841bd404b47f27921b221f427e716}{gfs\+\_\+rrtmg\+\_\+pre\+::gfs\+\_\+rrtmg\+\_\+pre\+\_\+run()}}.

Here is the caller graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=338pt]{group__module__radiation__gases__mod_ga37a447339c78ec00dbc64246e719851e_ga37a447339c78ec00dbc64246e719851e_icgraph}
\end{center}
\end{figure}


\doxysubsubsection{Variable Documentation}
\mbox{\Hypertarget{namespacemodule__radiation__gases_a8a79a6d3d931da021cd19290c58bdfaa_a8a79a6d3d931da021cd19290c58bdfaa}\label{namespacemodule__radiation__gases_a8a79a6d3d931da021cd19290c58bdfaa_a8a79a6d3d931da021cd19290c58bdfaa}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!vtaggas@{vtaggas}}
\index{vtaggas@{vtaggas}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{vtaggas}{vtaggas}}
{\footnotesize\ttfamily character(40), parameter module\+\_\+radiation\+\_\+gases\+::vtaggas =\textquotesingle{}NCEP-\/Radiation\+\_\+gases v5.\+1 Nov 2012 \textquotesingle{}\hspace{0.3cm}{\ttfamily [private]}}

\mbox{\Hypertarget{group__module__radiation__gases__mod_gaffc350828412da77ff3cf3e617ddc66c_gaffc350828412da77ff3cf3e617ddc66c}\label{group__module__radiation__gases__mod_gaffc350828412da77ff3cf3e617ddc66c_gaffc350828412da77ff3cf3e617ddc66c}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!nf\_vgas@{nf\_vgas}}
\index{nf\_vgas@{nf\_vgas}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{nf\_vgas}{nf\_vgas}}
{\footnotesize\ttfamily integer, parameter, public module\+\_\+radiation\+\_\+gases\+::nf\+\_\+vgas = 10}



Referenced by \mbox{\hyperlink{group___g_f_s__rrtmg__pre__mod_ga6d9841bd404b47f27921b221f427e716_ga6d9841bd404b47f27921b221f427e716}{gfs\+\_\+rrtmg\+\_\+pre\+::gfs\+\_\+rrtmg\+\_\+pre\+\_\+run()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_ga46eb4079ff9932819b3ab133bf6a43d9_ga46eb4079ff9932819b3ab133bf6a43d9}\label{group__module__radiation__gases__mod_ga46eb4079ff9932819b3ab133bf6a43d9_ga46eb4079ff9932819b3ab133bf6a43d9}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!imxco2@{imxco2}}
\index{imxco2@{imxco2}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{imxco2}{imxco2}}
{\footnotesize\ttfamily integer, parameter module\+\_\+radiation\+\_\+gases\+::imxco2 = 24\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_gadc23924e8a972ebd5253140c32cde429_gadc23924e8a972ebd5253140c32cde429}{gas\+\_\+init()}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga4089d585ed3c725811bde12831d526f6_ga4089d585ed3c725811bde12831d526f6}{gas\+\_\+update()}}, and \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_gaa56e209872093bfcbdaeb452f5e5e332_gaa56e209872093bfcbdaeb452f5e5e332}\label{group__module__radiation__gases__mod_gaa56e209872093bfcbdaeb452f5e5e332_gaa56e209872093bfcbdaeb452f5e5e332}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!jmxco2@{jmxco2}}
\index{jmxco2@{jmxco2}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{jmxco2}{jmxco2}}
{\footnotesize\ttfamily integer, parameter module\+\_\+radiation\+\_\+gases\+::jmxco2 = 12\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_gadc23924e8a972ebd5253140c32cde429_gadc23924e8a972ebd5253140c32cde429}{gas\+\_\+init()}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga4089d585ed3c725811bde12831d526f6_ga4089d585ed3c725811bde12831d526f6}{gas\+\_\+update()}}, and \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_ga3b26af64187b57999cadeced419b0f1b_ga3b26af64187b57999cadeced419b0f1b}\label{group__module__radiation__gases__mod_ga3b26af64187b57999cadeced419b0f1b_ga3b26af64187b57999cadeced419b0f1b}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!minyear@{minyear}}
\index{minyear@{minyear}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{minyear}{minyear}}
{\footnotesize\ttfamily integer, parameter module\+\_\+radiation\+\_\+gases\+::minyear = 1957\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_ga4089d585ed3c725811bde12831d526f6_ga4089d585ed3c725811bde12831d526f6}{gas\+\_\+update()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_gafda5c1d1129d865b9772e0f58dea7598_gafda5c1d1129d865b9772e0f58dea7598}\label{group__module__radiation__gases__mod_gafda5c1d1129d865b9772e0f58dea7598_gafda5c1d1129d865b9772e0f58dea7598}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!resco2@{resco2}}
\index{resco2@{resco2}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{resco2}{resco2}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), parameter module\+\_\+radiation\+\_\+gases\+::resco2 =15.\+0\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_gab09dc05b8a02e9a0b56991508b599708_gab09dc05b8a02e9a0b56991508b599708}\label{group__module__radiation__gases__mod_gab09dc05b8a02e9a0b56991508b599708_gab09dc05b8a02e9a0b56991508b599708}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!prsco2@{prsco2}}
\index{prsco2@{prsco2}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{prsco2}{prsco2}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), parameter module\+\_\+radiation\+\_\+gases\+::prsco2 =788.\+0\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_ga1dbb351e2cad4b011a0c756dc29ea26e_ga1dbb351e2cad4b011a0c756dc29ea26e}\label{group__module__radiation__gases__mod_ga1dbb351e2cad4b011a0c756dc29ea26e_ga1dbb351e2cad4b011a0c756dc29ea26e}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!raddeg@{raddeg}}
\index{raddeg@{raddeg}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{raddeg}{raddeg}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys) module\+\_\+radiation\+\_\+gases\+::raddeg\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_gadc23924e8a972ebd5253140c32cde429_gadc23924e8a972ebd5253140c32cde429}{gas\+\_\+init()}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases()}}, and \mbox{\hyperlink{group__module__radiation__gases__mod_ga37a447339c78ec00dbc64246e719851e_ga37a447339c78ec00dbc64246e719851e}{getozn()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_ga7071fcac4551a8360872b8680fa53256_ga7071fcac4551a8360872b8680fa53256}\label{group__module__radiation__gases__mod_ga7071fcac4551a8360872b8680fa53256_ga7071fcac4551a8360872b8680fa53256}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!hfpi@{hfpi}}
\index{hfpi@{hfpi}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{hfpi}{hfpi}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys) module\+\_\+radiation\+\_\+gases\+::hfpi\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_gadc23924e8a972ebd5253140c32cde429_gadc23924e8a972ebd5253140c32cde429}{gas\+\_\+init()}}, and \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_ga4fb5ca2e3bfaed7848d7602a22499e76_ga4fb5ca2e3bfaed7848d7602a22499e76}\label{group__module__radiation__gases__mod_ga4fb5ca2e3bfaed7848d7602a22499e76_ga4fb5ca2e3bfaed7848d7602a22499e76}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!co2vmr\_def@{co2vmr\_def}}
\index{co2vmr\_def@{co2vmr\_def}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{co2vmr\_def}{co2vmr\_def}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), parameter module\+\_\+radiation\+\_\+gases\+::co2vmr\+\_\+def = 350.\+0e-\/6\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_gadc23924e8a972ebd5253140c32cde429_gadc23924e8a972ebd5253140c32cde429}{gas\+\_\+init()}}, and \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_ga858ad802efe755f8b4b5bde85996b6ae_ga858ad802efe755f8b4b5bde85996b6ae}\label{group__module__radiation__gases__mod_ga858ad802efe755f8b4b5bde85996b6ae_ga858ad802efe755f8b4b5bde85996b6ae}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!n2ovmr\_def@{n2ovmr\_def}}
\index{n2ovmr\_def@{n2ovmr\_def}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{n2ovmr\_def}{n2ovmr\_def}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), parameter module\+\_\+radiation\+\_\+gases\+::n2ovmr\+\_\+def = 0.\+31e-\/6\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_gaad928d9e0064905a0b6e1eb8bb59bd23_gaad928d9e0064905a0b6e1eb8bb59bd23}\label{group__module__radiation__gases__mod_gaad928d9e0064905a0b6e1eb8bb59bd23_gaad928d9e0064905a0b6e1eb8bb59bd23}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!ch4vmr\_def@{ch4vmr\_def}}
\index{ch4vmr\_def@{ch4vmr\_def}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{ch4vmr\_def}{ch4vmr\_def}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), parameter module\+\_\+radiation\+\_\+gases\+::ch4vmr\+\_\+def = 1.\+50e-\/6\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_ga910898e96b8afe92ebc82ce62ba682d8_ga910898e96b8afe92ebc82ce62ba682d8}\label{group__module__radiation__gases__mod_ga910898e96b8afe92ebc82ce62ba682d8_ga910898e96b8afe92ebc82ce62ba682d8}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!o2vmr\_def@{o2vmr\_def}}
\index{o2vmr\_def@{o2vmr\_def}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{o2vmr\_def}{o2vmr\_def}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), parameter module\+\_\+radiation\+\_\+gases\+::o2vmr\+\_\+def = 0.\+209\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_ga3554bdf03f8222d425bb6c946244cbb5_ga3554bdf03f8222d425bb6c946244cbb5}\label{group__module__radiation__gases__mod_ga3554bdf03f8222d425bb6c946244cbb5_ga3554bdf03f8222d425bb6c946244cbb5}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!covmr\_def@{covmr\_def}}
\index{covmr\_def@{covmr\_def}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{covmr\_def}{covmr\_def}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), parameter module\+\_\+radiation\+\_\+gases\+::covmr\+\_\+def = 1.\+50e-\/8\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_ga23ae6bb6860bfefef0c281b7106f521e_ga23ae6bb6860bfefef0c281b7106f521e}\label{group__module__radiation__gases__mod_ga23ae6bb6860bfefef0c281b7106f521e_ga23ae6bb6860bfefef0c281b7106f521e}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!f11vmr\_def@{f11vmr\_def}}
\index{f11vmr\_def@{f11vmr\_def}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{f11vmr\_def}{f11vmr\_def}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), parameter module\+\_\+radiation\+\_\+gases\+::f11vmr\+\_\+def = 3.\+520e-\/10\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_ga96d4f78070f30010626e0824b3421250_ga96d4f78070f30010626e0824b3421250}\label{group__module__radiation__gases__mod_ga96d4f78070f30010626e0824b3421250_ga96d4f78070f30010626e0824b3421250}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!f12vmr\_def@{f12vmr\_def}}
\index{f12vmr\_def@{f12vmr\_def}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{f12vmr\_def}{f12vmr\_def}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), parameter module\+\_\+radiation\+\_\+gases\+::f12vmr\+\_\+def = 6.\+358e-\/10\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_gafd0018e96811ac64ef2abd8cab821eb5_gafd0018e96811ac64ef2abd8cab821eb5}\label{group__module__radiation__gases__mod_gafd0018e96811ac64ef2abd8cab821eb5_gafd0018e96811ac64ef2abd8cab821eb5}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!f22vmr\_def@{f22vmr\_def}}
\index{f22vmr\_def@{f22vmr\_def}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{f22vmr\_def}{f22vmr\_def}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), parameter module\+\_\+radiation\+\_\+gases\+::f22vmr\+\_\+def = 1.\+500e-\/10\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_ga013f8faaee6df0c7c032e1786770c110_ga013f8faaee6df0c7c032e1786770c110}\label{group__module__radiation__gases__mod_ga013f8faaee6df0c7c032e1786770c110_ga013f8faaee6df0c7c032e1786770c110}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!cl4vmr\_def@{cl4vmr\_def}}
\index{cl4vmr\_def@{cl4vmr\_def}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{cl4vmr\_def}{cl4vmr\_def}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), parameter module\+\_\+radiation\+\_\+gases\+::cl4vmr\+\_\+def = 1.\+397e-\/10\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_ga76ec88dc6284c48cfaae6cd05428b6dd_ga76ec88dc6284c48cfaae6cd05428b6dd}\label{group__module__radiation__gases__mod_ga76ec88dc6284c48cfaae6cd05428b6dd_ga76ec88dc6284c48cfaae6cd05428b6dd}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!f113vmr\_def@{f113vmr\_def}}
\index{f113vmr\_def@{f113vmr\_def}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{f113vmr\_def}{f113vmr\_def}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), parameter module\+\_\+radiation\+\_\+gases\+::f113vmr\+\_\+def = 8.\+2000e-\/11\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_gac7466def3963591ebfc48298806b1f6a_gac7466def3963591ebfc48298806b1f6a}\label{group__module__radiation__gases__mod_gac7466def3963591ebfc48298806b1f6a_gac7466def3963591ebfc48298806b1f6a}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!pkstr@{pkstr}}
\index{pkstr@{pkstr}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{pkstr}{pkstr}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(\+:), allocatable module\+\_\+radiation\+\_\+gases\+::pkstr\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_gadc23924e8a972ebd5253140c32cde429_gadc23924e8a972ebd5253140c32cde429}{gas\+\_\+init()}}, and \mbox{\hyperlink{group__module__radiation__gases__mod_ga37a447339c78ec00dbc64246e719851e_ga37a447339c78ec00dbc64246e719851e}{getozn()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_gad18392d991a9ef4b6ff0e8e822176a18_gad18392d991a9ef4b6ff0e8e822176a18}\label{group__module__radiation__gases__mod_gad18392d991a9ef4b6ff0e8e822176a18_gad18392d991a9ef4b6ff0e8e822176a18}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!o3r@{o3r}}
\index{o3r@{o3r}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{o3r}{o3r}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(\+:,\+:,\+:), allocatable module\+\_\+radiation\+\_\+gases\+::o3r\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_gadc23924e8a972ebd5253140c32cde429_gadc23924e8a972ebd5253140c32cde429}{gas\+\_\+init()}}, and \mbox{\hyperlink{group__module__radiation__gases__mod_ga37a447339c78ec00dbc64246e719851e_ga37a447339c78ec00dbc64246e719851e}{getozn()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_ga0a14666484f230d3506a9b4740e2eeda_ga0a14666484f230d3506a9b4740e2eeda}\label{group__module__radiation__gases__mod_ga0a14666484f230d3506a9b4740e2eeda_ga0a14666484f230d3506a9b4740e2eeda}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!k1oz@{k1oz}}
\index{k1oz@{k1oz}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{k1oz}{k1oz}}
{\footnotesize\ttfamily integer module\+\_\+radiation\+\_\+gases\+::k1oz = 0\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_ga4089d585ed3c725811bde12831d526f6_ga4089d585ed3c725811bde12831d526f6}{gas\+\_\+update()}}, and \mbox{\hyperlink{group__module__radiation__gases__mod_ga37a447339c78ec00dbc64246e719851e_ga37a447339c78ec00dbc64246e719851e}{getozn()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_ga0c3727c9e2a0bec46e84622c4591cd8b_ga0c3727c9e2a0bec46e84622c4591cd8b}\label{group__module__radiation__gases__mod_ga0c3727c9e2a0bec46e84622c4591cd8b_ga0c3727c9e2a0bec46e84622c4591cd8b}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!k2oz@{k2oz}}
\index{k2oz@{k2oz}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{k2oz}{k2oz}}
{\footnotesize\ttfamily integer module\+\_\+radiation\+\_\+gases\+::k2oz = 0\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_ga4089d585ed3c725811bde12831d526f6_ga4089d585ed3c725811bde12831d526f6}{gas\+\_\+update()}}, and \mbox{\hyperlink{group__module__radiation__gases__mod_ga37a447339c78ec00dbc64246e719851e_ga37a447339c78ec00dbc64246e719851e}{getozn()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_gac7c9fd8ece69872fdef473020ea03d6b_gac7c9fd8ece69872fdef473020ea03d6b}\label{group__module__radiation__gases__mod_gac7c9fd8ece69872fdef473020ea03d6b_gac7c9fd8ece69872fdef473020ea03d6b}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!facoz@{facoz}}
\index{facoz@{facoz}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{facoz}{facoz}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys) module\+\_\+radiation\+\_\+gases\+::facoz = 0.\+0\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_ga4089d585ed3c725811bde12831d526f6_ga4089d585ed3c725811bde12831d526f6}{gas\+\_\+update()}}, and \mbox{\hyperlink{group__module__radiation__gases__mod_ga37a447339c78ec00dbc64246e719851e_ga37a447339c78ec00dbc64246e719851e}{getozn()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_ga4f35e5db780a64963dc65b8449def39d_ga4f35e5db780a64963dc65b8449def39d}\label{group__module__radiation__gases__mod_ga4f35e5db780a64963dc65b8449def39d_ga4f35e5db780a64963dc65b8449def39d}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!co2vmr\_sav@{co2vmr\_sav}}
\index{co2vmr\_sav@{co2vmr\_sav}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{co2vmr\_sav}{co2vmr\_sav}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(\+:,\+:,\+:), allocatable module\+\_\+radiation\+\_\+gases\+::co2vmr\+\_\+sav\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_gadc23924e8a972ebd5253140c32cde429_gadc23924e8a972ebd5253140c32cde429}{gas\+\_\+init()}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga4089d585ed3c725811bde12831d526f6_ga4089d585ed3c725811bde12831d526f6}{gas\+\_\+update()}}, and \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_ga3985e306e5555089909fd42a4cc93afb_ga3985e306e5555089909fd42a4cc93afb}\label{group__module__radiation__gases__mod_ga3985e306e5555089909fd42a4cc93afb_ga3985e306e5555089909fd42a4cc93afb}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!co2cyc\_sav@{co2cyc\_sav}}
\index{co2cyc\_sav@{co2cyc\_sav}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{co2cyc\_sav}{co2cyc\_sav}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(\+:,\+:,\+:), allocatable module\+\_\+radiation\+\_\+gases\+::co2cyc\+\_\+sav\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_gadc23924e8a972ebd5253140c32cde429_gadc23924e8a972ebd5253140c32cde429}{gas\+\_\+init()}}, and \mbox{\hyperlink{group__module__radiation__gases__mod_ga4089d585ed3c725811bde12831d526f6_ga4089d585ed3c725811bde12831d526f6}{gas\+\_\+update()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_ga0398d6837c9e8c41359e76a754147002_ga0398d6837c9e8c41359e76a754147002}\label{group__module__radiation__gases__mod_ga0398d6837c9e8c41359e76a754147002_ga0398d6837c9e8c41359e76a754147002}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!co2\_glb@{co2\_glb}}
\index{co2\_glb@{co2\_glb}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{co2\_glb}{co2\_glb}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys) module\+\_\+radiation\+\_\+gases\+::co2\+\_\+glb = \mbox{\hyperlink{group__module__radiation__gases__mod_ga4fb5ca2e3bfaed7848d7602a22499e76_ga4fb5ca2e3bfaed7848d7602a22499e76}{co2vmr\+\_\+def}}\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_gadc23924e8a972ebd5253140c32cde429_gadc23924e8a972ebd5253140c32cde429}{gas\+\_\+init()}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga4089d585ed3c725811bde12831d526f6_ga4089d585ed3c725811bde12831d526f6}{gas\+\_\+update()}}, and \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_gac2a03ad96c9aa598f9751fd689cb615f_gac2a03ad96c9aa598f9751fd689cb615f}\label{group__module__radiation__gases__mod_gac2a03ad96c9aa598f9751fd689cb615f_gac2a03ad96c9aa598f9751fd689cb615f}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!gco2cyc@{gco2cyc}}
\index{gco2cyc@{gco2cyc}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{gco2cyc}{gco2cyc}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(12) module\+\_\+radiation\+\_\+gases\+::gco2cyc\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_gadc23924e8a972ebd5253140c32cde429_gadc23924e8a972ebd5253140c32cde429}{gas\+\_\+init()}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga4089d585ed3c725811bde12831d526f6_ga4089d585ed3c725811bde12831d526f6}{gas\+\_\+update()}}, and \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_ga6b4372e633bef3fb367e6ff3cf200bb8_ga6b4372e633bef3fb367e6ff3cf200bb8}\label{group__module__radiation__gases__mod_ga6b4372e633bef3fb367e6ff3cf200bb8_ga6b4372e633bef3fb367e6ff3cf200bb8}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!kyrsav@{kyrsav}}
\index{kyrsav@{kyrsav}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{kyrsav}{kyrsav}}
{\footnotesize\ttfamily integer module\+\_\+radiation\+\_\+gases\+::kyrsav = 0\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_gadc23924e8a972ebd5253140c32cde429_gadc23924e8a972ebd5253140c32cde429}{gas\+\_\+init()}}, and \mbox{\hyperlink{group__module__radiation__gases__mod_ga4089d585ed3c725811bde12831d526f6_ga4089d585ed3c725811bde12831d526f6}{gas\+\_\+update()}}.

\mbox{\Hypertarget{group__module__radiation__gases__mod_gab1cf1b63398a3e7ec0334a7c97258b4d_gab1cf1b63398a3e7ec0334a7c97258b4d}\label{group__module__radiation__gases__mod_gab1cf1b63398a3e7ec0334a7c97258b4d_gab1cf1b63398a3e7ec0334a7c97258b4d}} 
\index{module\_radiation\_gases@{module\_radiation\_gases}!kmonsav@{kmonsav}}
\index{kmonsav@{kmonsav}!module\_radiation\_gases@{module\_radiation\_gases}}
\doxyparagraph{\texorpdfstring{kmonsav}{kmonsav}}
{\footnotesize\ttfamily integer module\+\_\+radiation\+\_\+gases\+::kmonsav = 1\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__gases__mod_gadc23924e8a972ebd5253140c32cde429_gadc23924e8a972ebd5253140c32cde429}{gas\+\_\+init()}}, \mbox{\hyperlink{group__module__radiation__gases__mod_ga4089d585ed3c725811bde12831d526f6_ga4089d585ed3c725811bde12831d526f6}{gas\+\_\+update()}}, and \mbox{\hyperlink{group__module__radiation__gases__mod_ga07f4facfc48b0656b616090de9907ec8_ga07f4facfc48b0656b616090de9907ec8}{getgases()}}.

