\hypertarget{namespacegfs__rrtmg__setup}{}\doxysubsection{gfs\+\_\+rrtmg\+\_\+setup Module Reference}
\label{namespacegfs__rrtmg__setup}\index{gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}}
\doxysubsubsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
subroutine, public \mbox{\hyperlink{group___g_f_s__rrtmg__setup__mod_ga57c188f5ede1fbeaa1c48b8f7ac8b459_ga57c188f5ede1fbeaa1c48b8f7ac8b459}{gfs\+\_\+rrtmg\+\_\+setup\+\_\+init}} (si, levr, ictm, isol, solar\+\_\+file, ico2, iaer, ntcw, num\+\_\+p3d, npdf3d, ntoz, iovr, iovr\+\_\+rand, iovr\+\_\+maxrand, iovr\+\_\+max, iovr\+\_\+dcorr, iovr\+\_\+exp, iovr\+\_\+exprand, icliq\+\_\+sw, lcrick, lcnorm, imp\+\_\+physics, lnoprec, idate, iflip, do\+\_\+\+RRTMGP, me, lalw1bd, iaermdl, iaerflg, aeros\+\_\+file, con\+\_\+pi, con\+\_\+t0c, con\+\_\+c, con\+\_\+boltz, con\+\_\+plnk, con\+\_\+solr\+\_\+2008, con\+\_\+solr\+\_\+2002, con\+\_\+g, con\+\_\+rd, co2usr\+\_\+file, co2cyc\+\_\+file, rad\+\_\+hr\+\_\+units, inc\+\_\+minor\+\_\+gas, icliq\+\_\+lw, isubcsw, isubclw, iswmode, ipsd0, ltp, lextop, errmsg, errflg)
\item 
subroutine, public \mbox{\hyperlink{namespacegfs__rrtmg__setup_a841a479d8bb66b43550dbbac5a673529_a841a479d8bb66b43550dbbac5a673529}{gfs\+\_\+rrtmg\+\_\+setup\+\_\+timestep\+\_\+init}} (idate, jdate, deltsw, deltim, lsswr, me, iaermdl, iaerflg, isol, aeros\+\_\+file, slag, sdec, cdec, solcon, con\+\_\+pi, co2dat\+\_\+file, co2gbl\+\_\+file, ictm, ico2, ntoz, errmsg, errflg)
\item 
subroutine, public \mbox{\hyperlink{group___g_f_s__rrtmg__setup__mod_gabb04c977a77a5666f180074b548a1531_gabb04c977a77a5666f180074b548a1531}{gfs\+\_\+rrtmg\+\_\+setup\+\_\+finalize}} (errmsg, errflg)
\item 
subroutine \mbox{\hyperlink{group___g_f_s__rrtmg__setup__mod_ga84bc02f50f4b0d7a37f423d9117156d6_ga84bc02f50f4b0d7a37f423d9117156d6}{radupdate}} (idate, jdate, deltsw, deltim, lsswr, me, iaermdl, iaerflg, isol, aeros\+\_\+file, slag, sdec, cdec, solcon, con\+\_\+pi, co2dat\+\_\+file, co2gbl\+\_\+file, ictm, ico2, ntoz, errflg, errmsg)
\begin{DoxyCompactList}\small\item\em This subroutine checks and updates time sensitive data used by radiation computations. This subroutine needs to be placed inside the time advancement loop but outside of the horizontal grid loop. It is invoked at radiation calling frequncy but before any actual radiative transfer computations. \end{DoxyCompactList}\end{DoxyCompactItemize}
\doxysubsubsection*{Variables}
\begin{DoxyCompactItemize}
\item 
logical \mbox{\hyperlink{namespacegfs__rrtmg__setup_a6477f8620c1f8e77abd04536f0806dfc_a6477f8620c1f8e77abd04536f0806dfc}{is\+\_\+initialized}} = .false.
\item 
character(40), parameter \mbox{\hyperlink{group___g_f_s__rrtmg__setup__mod_ga25892b49bdbacc9a3205756553570fdd_ga25892b49bdbacc9a3205756553570fdd}{vtagrad}} =\textquotesingle{}NCEP-\/Radiation\+\_\+driver v5.\+2 Jan 2013 \textquotesingle{}
\item 
integer \mbox{\hyperlink{group___g_f_s__rrtmg__setup__mod_ga163938b3119fc63681d8ff6d711afc31_ga163938b3119fc63681d8ff6d711afc31}{month0}} = 0
\begin{DoxyCompactList}\small\item\em new data input control variables (set/reset in subroutine radupdate)\+: \end{DoxyCompactList}\item 
integer \mbox{\hyperlink{group___g_f_s__rrtmg__setup__mod_ga3d34dbc273841fedd2d00476c523a25b_ga3d34dbc273841fedd2d00476c523a25b}{iyear0}} = 0
\item 
integer \mbox{\hyperlink{group___g_f_s__rrtmg__setup__mod_ga9ba0a1dc5eb29f5f4123488f2c9b8942_ga9ba0a1dc5eb29f5f4123488f2c9b8942}{monthd}} = 0
\item 
logical \mbox{\hyperlink{group___g_f_s__rrtmg__setup__mod_gac067659884ee7b17d6f3e56c67370b5e_gac067659884ee7b17d6f3e56c67370b5e}{loz1st}} = .true.
\begin{DoxyCompactList}\small\item\em control flag for the first time of reading climatological ozone data (set/reset in subroutines radinit/radupdate, it is used only if the control parameter ntoz=0) \end{DoxyCompactList}\end{DoxyCompactItemize}


\doxysubsubsection{Function/\+Subroutine Documentation}
\mbox{\Hypertarget{group___g_f_s__rrtmg__setup__mod_ga57c188f5ede1fbeaa1c48b8f7ac8b459_ga57c188f5ede1fbeaa1c48b8f7ac8b459}\label{group___g_f_s__rrtmg__setup__mod_ga57c188f5ede1fbeaa1c48b8f7ac8b459_ga57c188f5ede1fbeaa1c48b8f7ac8b459}} 
\index{gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}!gfs\_rrtmg\_setup\_init@{gfs\_rrtmg\_setup\_init}}
\index{gfs\_rrtmg\_setup\_init@{gfs\_rrtmg\_setup\_init}!gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}}
\doxyparagraph{\texorpdfstring{gfs\_rrtmg\_setup\_init()}{gfs\_rrtmg\_setup\_init()}}
{\footnotesize\ttfamily subroutine, public gfs\+\_\+rrtmg\+\_\+setup\+::gfs\+\_\+rrtmg\+\_\+setup\+\_\+init (\begin{DoxyParamCaption}\item[{real (kind=kind\+\_\+phys), dimension(\+:), intent(in)}]{si,  }\item[{integer, intent(in)}]{levr,  }\item[{integer, intent(in)}]{ictm,  }\item[{integer, intent(in)}]{isol,  }\item[{character(len=26), intent(in)}]{solar\+\_\+file,  }\item[{integer, intent(in)}]{ico2,  }\item[{integer, intent(in)}]{iaer,  }\item[{integer, intent(in)}]{ntcw,  }\item[{integer, intent(in)}]{num\+\_\+p3d,  }\item[{integer, intent(in)}]{npdf3d,  }\item[{integer, intent(in)}]{ntoz,  }\item[{integer, intent(in)}]{iovr,  }\item[{integer, intent(in)}]{iovr\+\_\+rand,  }\item[{integer, intent(in)}]{iovr\+\_\+maxrand,  }\item[{integer, intent(in)}]{iovr\+\_\+max,  }\item[{integer, intent(in)}]{iovr\+\_\+dcorr,  }\item[{integer, intent(in)}]{iovr\+\_\+exp,  }\item[{integer, intent(in)}]{iovr\+\_\+exprand,  }\item[{integer, intent(in)}]{icliq\+\_\+sw,  }\item[{logical, intent(in)}]{lcrick,  }\item[{logical, intent(in)}]{lcnorm,  }\item[{integer, intent(in)}]{imp\+\_\+physics,  }\item[{logical, intent(in)}]{lnoprec,  }\item[{integer, dimension(\+:), intent(in)}]{idate,  }\item[{integer, intent(in)}]{iflip,  }\item[{logical, intent(in)}]{do\+\_\+\+RRTMGP,  }\item[{integer, intent(in)}]{me,  }\item[{logical, intent(in)}]{lalw1bd,  }\item[{integer, intent(out)}]{iaermdl,  }\item[{integer, intent(out)}]{iaerflg,  }\item[{character(len=26), intent(in)}]{aeros\+\_\+file,  }\item[{real(kind\+\_\+phys), intent(in)}]{con\+\_\+pi,  }\item[{real(kind\+\_\+phys), intent(in)}]{con\+\_\+t0c,  }\item[{real(kind\+\_\+phys), intent(in)}]{con\+\_\+c,  }\item[{real(kind\+\_\+phys), intent(in)}]{con\+\_\+boltz,  }\item[{real(kind\+\_\+phys), intent(in)}]{con\+\_\+plnk,  }\item[{real(kind\+\_\+phys), intent(in)}]{con\+\_\+solr\+\_\+2008,  }\item[{real(kind\+\_\+phys), intent(in)}]{con\+\_\+solr\+\_\+2002,  }\item[{real(kind\+\_\+phys), intent(in)}]{con\+\_\+g,  }\item[{real(kind\+\_\+phys), intent(in)}]{con\+\_\+rd,  }\item[{character(len=26), intent(in)}]{co2usr\+\_\+file,  }\item[{character(len=26), intent(in)}]{co2cyc\+\_\+file,  }\item[{integer, intent(in)}]{rad\+\_\+hr\+\_\+units,  }\item[{logical, intent(in)}]{inc\+\_\+minor\+\_\+gas,  }\item[{integer, intent(in)}]{icliq\+\_\+lw,  }\item[{integer, intent(in)}]{isubcsw,  }\item[{integer, intent(in)}]{isubclw,  }\item[{integer, intent(in)}]{iswmode,  }\item[{integer, intent(inout)}]{ipsd0,  }\item[{integer, intent(in)}]{ltp,  }\item[{logical, intent(in)}]{lextop,  }\item[{character(len=$\ast$), intent(out)}]{errmsg,  }\item[{integer, intent(out)}]{errflg }\end{DoxyParamCaption})}

\hypertarget{group___g_f_s__rrtmg__setup__mod_ga57c188f5ede1fbeaa1c48b8f7ac8b459_arg_table_GFS_rrtmg_setup_init}{}\doxysubsubsection{Argument Table}\label{group___g_f_s__rrtmg__setup__mod_ga57c188f5ede1fbeaa1c48b8f7ac8b459_arg_table_GFS_rrtmg_setup_init}
 

References \mbox{\hyperlink{group__module__radiation__clouds_ga16c3cbe199c761595559022cc09e1c59_ga16c3cbe199c761595559022cc09e1c59}{module\+\_\+radiation\+\_\+clouds\+::cld\+\_\+init()}}, \mbox{\hyperlink{group__module__radiation__gases__mod_gadc23924e8a972ebd5253140c32cde429_gadc23924e8a972ebd5253140c32cde429}{module\+\_\+radiation\+\_\+gases\+::gas\+\_\+init()}}, \mbox{\hyperlink{group__module__radlw__main_ga379498533128ca884f9d029ef02e1f25_ga379498533128ca884f9d029ef02e1f25}{rrtmg\+\_\+lw\+::rlwinit()}}, \mbox{\hyperlink{group__module__radsw__main_gacd1a47cfea461f06d4573bbd5841b6eb_gacd1a47cfea461f06d4573bbd5841b6eb}{rrtmg\+\_\+sw\+::rswinit()}}, and \mbox{\hyperlink{group__module__radiation__astronomy_ga2e19266fd497ae93b41298f2bea1e791_ga2e19266fd497ae93b41298f2bea1e791}{module\+\_\+radiation\+\_\+astronomy\+::sol\+\_\+init()}}.

Here is the call graph for this function\+:\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{group___g_f_s__rrtmg__setup__mod_ga57c188f5ede1fbeaa1c48b8f7ac8b459_ga57c188f5ede1fbeaa1c48b8f7ac8b459_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacegfs__rrtmg__setup_a841a479d8bb66b43550dbbac5a673529_a841a479d8bb66b43550dbbac5a673529}\label{namespacegfs__rrtmg__setup_a841a479d8bb66b43550dbbac5a673529_a841a479d8bb66b43550dbbac5a673529}} 
\index{gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}!gfs\_rrtmg\_setup\_timestep\_init@{gfs\_rrtmg\_setup\_timestep\_init}}
\index{gfs\_rrtmg\_setup\_timestep\_init@{gfs\_rrtmg\_setup\_timestep\_init}!gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}}
\doxyparagraph{\texorpdfstring{gfs\_rrtmg\_setup\_timestep\_init()}{gfs\_rrtmg\_setup\_timestep\_init()}}
{\footnotesize\ttfamily subroutine, public gfs\+\_\+rrtmg\+\_\+setup\+::gfs\+\_\+rrtmg\+\_\+setup\+\_\+timestep\+\_\+init (\begin{DoxyParamCaption}\item[{integer, dimension(\+:), intent(in)}]{idate,  }\item[{integer, dimension(\+:), intent(in)}]{jdate,  }\item[{real(kind=kind\+\_\+phys), intent(in)}]{deltsw,  }\item[{real(kind=kind\+\_\+phys), intent(in)}]{deltim,  }\item[{logical, intent(in)}]{lsswr,  }\item[{integer, intent(in)}]{me,  }\item[{integer, intent(in)}]{iaermdl,  }\item[{integer, intent(in)}]{iaerflg,  }\item[{integer, intent(in)}]{isol,  }\item[{character(len=26), intent(in)}]{aeros\+\_\+file,  }\item[{real(kind=kind\+\_\+phys), intent(out)}]{slag,  }\item[{real(kind=kind\+\_\+phys), intent(out)}]{sdec,  }\item[{real(kind=kind\+\_\+phys), intent(out)}]{cdec,  }\item[{real(kind=kind\+\_\+phys), intent(out)}]{solcon,  }\item[{real(kind=kind\+\_\+phys), intent(in)}]{con\+\_\+pi,  }\item[{character(len=26), intent(in)}]{co2dat\+\_\+file,  }\item[{character(len=26), intent(in)}]{co2gbl\+\_\+file,  }\item[{integer, intent(in)}]{ictm,  }\item[{integer, intent(in)}]{ico2,  }\item[{integer, intent(in)}]{ntoz,  }\item[{character(len=$\ast$), intent(out)}]{errmsg,  }\item[{integer, intent(out)}]{errflg }\end{DoxyParamCaption})}

\hypertarget{namespacegfs__rrtmg__setup_a841a479d8bb66b43550dbbac5a673529_arg_table_GFS_rrtmg_setup_timestep_init}{}\doxysubsubsection{Argument Table}\label{namespacegfs__rrtmg__setup_a841a479d8bb66b43550dbbac5a673529_arg_table_GFS_rrtmg_setup_timestep_init}
 

References \mbox{\hyperlink{group___g_f_s__rrtmg__setup__mod_ga84bc02f50f4b0d7a37f423d9117156d6_ga84bc02f50f4b0d7a37f423d9117156d6}{radupdate()}}.

Here is the call graph for this function\+:\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacegfs__rrtmg__setup_a841a479d8bb66b43550dbbac5a673529_a841a479d8bb66b43550dbbac5a673529_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{group___g_f_s__rrtmg__setup__mod_gabb04c977a77a5666f180074b548a1531_gabb04c977a77a5666f180074b548a1531}\label{group___g_f_s__rrtmg__setup__mod_gabb04c977a77a5666f180074b548a1531_gabb04c977a77a5666f180074b548a1531}} 
\index{gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}!gfs\_rrtmg\_setup\_finalize@{gfs\_rrtmg\_setup\_finalize}}
\index{gfs\_rrtmg\_setup\_finalize@{gfs\_rrtmg\_setup\_finalize}!gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}}
\doxyparagraph{\texorpdfstring{gfs\_rrtmg\_setup\_finalize()}{gfs\_rrtmg\_setup\_finalize()}}
{\footnotesize\ttfamily subroutine, public gfs\+\_\+rrtmg\+\_\+setup\+::gfs\+\_\+rrtmg\+\_\+setup\+\_\+finalize (\begin{DoxyParamCaption}\item[{character(len=$\ast$), intent(out)}]{errmsg,  }\item[{integer, intent(out)}]{errflg }\end{DoxyParamCaption})}

\hypertarget{group___g_f_s__rrtmg__setup__mod_gabb04c977a77a5666f180074b548a1531_arg_table_GFS_rrtmg_setup_finalize}{}\doxysubsubsection{Argument Table}\label{group___g_f_s__rrtmg__setup__mod_gabb04c977a77a5666f180074b548a1531_arg_table_GFS_rrtmg_setup_finalize}
 \mbox{\Hypertarget{group___g_f_s__rrtmg__setup__mod_ga84bc02f50f4b0d7a37f423d9117156d6_ga84bc02f50f4b0d7a37f423d9117156d6}\label{group___g_f_s__rrtmg__setup__mod_ga84bc02f50f4b0d7a37f423d9117156d6_ga84bc02f50f4b0d7a37f423d9117156d6}} 
\index{gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}!radupdate@{radupdate}}
\index{radupdate@{radupdate}!gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}}
\doxyparagraph{\texorpdfstring{radupdate()}{radupdate()}}
{\footnotesize\ttfamily subroutine gfs\+\_\+rrtmg\+\_\+setup\+::radupdate (\begin{DoxyParamCaption}\item[{integer, dimension(\+:), intent(in)}]{idate,  }\item[{integer, dimension(\+:), intent(in)}]{jdate,  }\item[{real (kind=kind\+\_\+phys), intent(in)}]{deltsw,  }\item[{real (kind=kind\+\_\+phys), intent(in)}]{deltim,  }\item[{logical, intent(in)}]{lsswr,  }\item[{integer, intent(in)}]{me,  }\item[{integer, intent(in)}]{iaermdl,  }\item[{integer, intent(in)}]{iaerflg,  }\item[{integer, intent(in)}]{isol,  }\item[{character(len=26), intent(in)}]{aeros\+\_\+file,  }\item[{real (kind=kind\+\_\+phys), intent(out)}]{slag,  }\item[{real (kind=kind\+\_\+phys), intent(out)}]{sdec,  }\item[{real (kind=kind\+\_\+phys), intent(out)}]{cdec,  }\item[{real (kind=kind\+\_\+phys), intent(out)}]{solcon,  }\item[{real (kind=kind\+\_\+phys), intent(in)}]{con\+\_\+pi,  }\item[{character(len=26), intent(in)}]{co2dat\+\_\+file,  }\item[{character(len=26), intent(in)}]{co2gbl\+\_\+file,  }\item[{integer, intent(in)}]{ictm,  }\item[{integer, intent(in)}]{ico2,  }\item[{integer, intent(in)}]{ntoz,  }\item[{integer, intent(out)}]{errflg,  }\item[{character(len=$\ast$), intent(out)}]{errmsg }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}}


\begin{DoxyParams}{Parameters}
{\em idate} & NCEP absolute date and time of intial condition (year,month,day,time-\/zone,hour,minute,second, mil-\/second) \\
\hline
{\em jdate} & NCEP absolute date and time at forecast time (year,month,day,time-\/zone,hour,minute,second, mil-\/second) \\
\hline
{\em deltsw} & SW radiation calling time interval in seconds \\
\hline
{\em deltim} & model advancing time-\/step duration in seconds \\
\hline
{\em lsswr} & logical control flag for SW radiation calculations \\
\hline
{\em me} & print control flag \\
\hline
{\em slag} & equation of time in radians \\
\hline
{\em sdec,cdec} & sine and cosine of the solar declination angle \\
\hline
{\em solcon} & solar constant adjusted by sun-\/earth distance $(W/m^2)$ \\
\hline
\end{DoxyParams}
\hypertarget{group___g_f_s__rrtmg__setup__mod_ga84bc02f50f4b0d7a37f423d9117156d6_gen_radupdate}{}\doxysubsubsection{General Algorithm}\label{group___g_f_s__rrtmg__setup__mod_ga84bc02f50f4b0d7a37f423d9117156d6_gen_radupdate}

\begin{DoxyEnumerate}
\item Set up time stamp at fcst time and that for green house gases (currently co2 only)
\item Call \mbox{\hyperlink{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05}{module\+\_\+radiation\+\_\+astronomy\+::sol\+\_\+update()}}, yearly update, no time interpolation.
\item Call \mbox{\hyperlink{namespacemodule__radiation__aerosols_a41da099b5b33860dbc64580343e570b8_a41da099b5b33860dbc64580343e570b8}{module\+\_\+radiation\+\_\+aerosols\+::aer\+\_\+update()}}, monthly update, no time interpolation
\item Call co2 and other gases update routine\+: \mbox{\hyperlink{group__module__radiation__gases__mod_ga4089d585ed3c725811bde12831d526f6_ga4089d585ed3c725811bde12831d526f6}{module\+\_\+radiation\+\_\+gases\+::gas\+\_\+update()}}
\item Call surface update routine (currently not needed)
\item Call clouds update routine (currently not needed)
\end{DoxyEnumerate}

References \mbox{\hyperlink{group__module__radiation__gases__mod_ga4089d585ed3c725811bde12831d526f6_ga4089d585ed3c725811bde12831d526f6}{module\+\_\+radiation\+\_\+gases\+::gas\+\_\+update()}}, \mbox{\hyperlink{group___g_f_s__rrtmg__setup__mod_ga3d34dbc273841fedd2d00476c523a25b_ga3d34dbc273841fedd2d00476c523a25b}{iyear0}}, \mbox{\hyperlink{group___g_f_s__rrtmg__setup__mod_gac067659884ee7b17d6f3e56c67370b5e_gac067659884ee7b17d6f3e56c67370b5e}{loz1st}}, \mbox{\hyperlink{group___g_f_s__rrtmg__setup__mod_ga163938b3119fc63681d8ff6d711afc31_ga163938b3119fc63681d8ff6d711afc31}{month0}}, \mbox{\hyperlink{group___g_f_s__rrtmg__setup__mod_ga9ba0a1dc5eb29f5f4123488f2c9b8942_ga9ba0a1dc5eb29f5f4123488f2c9b8942}{monthd}}, and \mbox{\hyperlink{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05}{module\+\_\+radiation\+\_\+astronomy\+::sol\+\_\+update()}}.



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

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


\doxysubsubsection{Variable Documentation}
\mbox{\Hypertarget{namespacegfs__rrtmg__setup_a6477f8620c1f8e77abd04536f0806dfc_a6477f8620c1f8e77abd04536f0806dfc}\label{namespacegfs__rrtmg__setup_a6477f8620c1f8e77abd04536f0806dfc_a6477f8620c1f8e77abd04536f0806dfc}} 
\index{gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}!is\_initialized@{is\_initialized}}
\index{is\_initialized@{is\_initialized}!gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}}
\doxyparagraph{\texorpdfstring{is\_initialized}{is\_initialized}}
{\footnotesize\ttfamily logical gfs\+\_\+rrtmg\+\_\+setup\+::is\+\_\+initialized = .false.\hspace{0.3cm}{\ttfamily [private]}}

\mbox{\Hypertarget{group___g_f_s__rrtmg__setup__mod_ga25892b49bdbacc9a3205756553570fdd_ga25892b49bdbacc9a3205756553570fdd}\label{group___g_f_s__rrtmg__setup__mod_ga25892b49bdbacc9a3205756553570fdd_ga25892b49bdbacc9a3205756553570fdd}} 
\index{gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}!vtagrad@{vtagrad}}
\index{vtagrad@{vtagrad}!gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}}
\doxyparagraph{\texorpdfstring{vtagrad}{vtagrad}}
{\footnotesize\ttfamily character(40), parameter gfs\+\_\+rrtmg\+\_\+setup\+::vtagrad =\textquotesingle{}NCEP-\/Radiation\+\_\+driver v5.\+2 Jan 2013 \textquotesingle{}\hspace{0.3cm}{\ttfamily [private]}}

\mbox{\Hypertarget{group___g_f_s__rrtmg__setup__mod_ga163938b3119fc63681d8ff6d711afc31_ga163938b3119fc63681d8ff6d711afc31}\label{group___g_f_s__rrtmg__setup__mod_ga163938b3119fc63681d8ff6d711afc31_ga163938b3119fc63681d8ff6d711afc31}} 
\index{gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}!month0@{month0}}
\index{month0@{month0}!gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}}
\doxyparagraph{\texorpdfstring{month0}{month0}}
{\footnotesize\ttfamily integer gfs\+\_\+rrtmg\+\_\+setup\+::month0 = 0\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group___g_f_s__rrtmg__setup__mod_ga84bc02f50f4b0d7a37f423d9117156d6_ga84bc02f50f4b0d7a37f423d9117156d6}{radupdate()}}.

\mbox{\Hypertarget{group___g_f_s__rrtmg__setup__mod_ga3d34dbc273841fedd2d00476c523a25b_ga3d34dbc273841fedd2d00476c523a25b}\label{group___g_f_s__rrtmg__setup__mod_ga3d34dbc273841fedd2d00476c523a25b_ga3d34dbc273841fedd2d00476c523a25b}} 
\index{gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}!iyear0@{iyear0}}
\index{iyear0@{iyear0}!gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}}
\doxyparagraph{\texorpdfstring{iyear0}{iyear0}}
{\footnotesize\ttfamily integer gfs\+\_\+rrtmg\+\_\+setup\+::iyear0 = 0\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group___g_f_s__rrtmg__setup__mod_ga84bc02f50f4b0d7a37f423d9117156d6_ga84bc02f50f4b0d7a37f423d9117156d6}{radupdate()}}.

\mbox{\Hypertarget{group___g_f_s__rrtmg__setup__mod_ga9ba0a1dc5eb29f5f4123488f2c9b8942_ga9ba0a1dc5eb29f5f4123488f2c9b8942}\label{group___g_f_s__rrtmg__setup__mod_ga9ba0a1dc5eb29f5f4123488f2c9b8942_ga9ba0a1dc5eb29f5f4123488f2c9b8942}} 
\index{gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}!monthd@{monthd}}
\index{monthd@{monthd}!gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}}
\doxyparagraph{\texorpdfstring{monthd}{monthd}}
{\footnotesize\ttfamily integer gfs\+\_\+rrtmg\+\_\+setup\+::monthd = 0\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group___g_f_s__rrtmg__setup__mod_ga84bc02f50f4b0d7a37f423d9117156d6_ga84bc02f50f4b0d7a37f423d9117156d6}{radupdate()}}.

\mbox{\Hypertarget{group___g_f_s__rrtmg__setup__mod_gac067659884ee7b17d6f3e56c67370b5e_gac067659884ee7b17d6f3e56c67370b5e}\label{group___g_f_s__rrtmg__setup__mod_gac067659884ee7b17d6f3e56c67370b5e_gac067659884ee7b17d6f3e56c67370b5e}} 
\index{gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}!loz1st@{loz1st}}
\index{loz1st@{loz1st}!gfs\_rrtmg\_setup@{gfs\_rrtmg\_setup}}
\doxyparagraph{\texorpdfstring{loz1st}{loz1st}}
{\footnotesize\ttfamily logical gfs\+\_\+rrtmg\+\_\+setup\+::loz1st = .true.\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group___g_f_s__rrtmg__setup__mod_ga84bc02f50f4b0d7a37f423d9117156d6_ga84bc02f50f4b0d7a37f423d9117156d6}{radupdate()}}.

