\hypertarget{group__module__radiation__astronomy}{}\doxysubsection{Radiation Astronomy Module}
\label{group__module__radiation__astronomy}\index{Radiation Astronomy Module@{Radiation Astronomy Module}}


This module sets up astronomical quantities for solar radiation calculations.  


\doxysubsubsection*{Modules}
\begin{DoxyCompactItemize}
\item 
module \mbox{\hyperlink{namespacemodule__radiation__astronomy}{module\+\_\+radiation\+\_\+astronomy}}
\begin{DoxyCompactList}\small\item\em This module sets up astronomy quantities for solar radiation calculations. \end{DoxyCompactList}\end{DoxyCompactItemize}
\doxysubsubsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
subroutine, public \mbox{\hyperlink{group__module__radiation__astronomy_ga2e19266fd497ae93b41298f2bea1e791_ga2e19266fd497ae93b41298f2bea1e791}{module\+\_\+radiation\+\_\+astronomy\+::sol\+\_\+init}} (me, isolar, solar\+\_\+file, con\+\_\+solr, con\+\_\+solr\+\_\+old, con\+\_\+pi)
\begin{DoxyCompactList}\small\item\em This subroutine initializes astronomy process, and set up module constants. \end{DoxyCompactList}\item 
subroutine, public \mbox{\hyperlink{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05}{module\+\_\+radiation\+\_\+astronomy\+::sol\+\_\+update}} (jdate, kyear, deltsw, deltim, lsol\+\_\+chg, me, slag, sdec, cdec, solcon, con\+\_\+pi, errmsg, errflg)
\begin{DoxyCompactList}\small\item\em This subroutine computes solar parameters at forecast time. \end{DoxyCompactList}\item 
subroutine \mbox{\hyperlink{group__module__radiation__astronomy_gabea86aabd5183af686bf728817b5ebe3_gabea86aabd5183af686bf728817b5ebe3}{module\+\_\+radiation\+\_\+astronomy\+::solar}} (jd, fjd, con\+\_\+pi, r1, dlt, alp)
\begin{DoxyCompactList}\small\item\em This subroutine computes radius vector, declination and right ascension of sun, and equation of time. \end{DoxyCompactList}\item 
subroutine, public \mbox{\hyperlink{group__module__radiation__astronomy_ga804e1504ae720d0f33b507e7c42b6506_ga804e1504ae720d0f33b507e7c42b6506}{module\+\_\+radiation\+\_\+astronomy\+::coszmn}} (xlon, sinlat, coslat, solhr, IM, me, coszen, coszdg)
\begin{DoxyCompactList}\small\item\em This subroutine computes mean cos solar zenith angle over SW calling interval. \end{DoxyCompactList}\item 
subroutine \mbox{\hyperlink{group__module__radiation__astronomy_gaee29441c2e62c44728b10915a148cccf_gaee29441c2e62c44728b10915a148cccf}{module\+\_\+radiation\+\_\+astronomy\+::prtime}} (jd, fjd, dlt, alp, r1, solc)
\begin{DoxyCompactList}\small\item\em This subroutine prints out forecast date, time, and astronomy quantities. \end{DoxyCompactList}\end{DoxyCompactItemize}
\doxysubsubsection*{Variables}
\begin{DoxyCompactItemize}
\item 
real(kind=kind\+\_\+phys) \mbox{\hyperlink{group__module__radiation__astronomy_ga64c3bb8e74fa73f05c533cd3cd422a70_ga64c3bb8e74fa73f05c533cd3cd422a70}{module\+\_\+radiation\+\_\+astronomy\+::degrad}}
\item 
real(kind=kind\+\_\+phys) \mbox{\hyperlink{group__module__radiation__astronomy_gab1efeaaa1f838575fb4115f62b86ce2e_gab1efeaaa1f838575fb4115f62b86ce2e}{module\+\_\+radiation\+\_\+astronomy\+::tpi}}
\item 
real(kind=kind\+\_\+phys) \mbox{\hyperlink{group__module__radiation__astronomy_gad39490429dcd597f15291859e4bb94b9_gad39490429dcd597f15291859e4bb94b9}{module\+\_\+radiation\+\_\+astronomy\+::hpi}}
\item 
real(kind=kind\+\_\+phys) \mbox{\hyperlink{group__module__radiation__astronomy_ga86627168cad0e3a800cb4b2cbe7b0234_ga86627168cad0e3a800cb4b2cbe7b0234}{module\+\_\+radiation\+\_\+astronomy\+::pid12}}
\item 
real(kind=kind\+\_\+phys), parameter \mbox{\hyperlink{group__module__radiation__astronomy_gad59856e8f877eb05a6b22610f14a391d_gad59856e8f877eb05a6b22610f14a391d}{module\+\_\+radiation\+\_\+astronomy\+::f12}} = 12.\+0
\item 
real(kind=kind\+\_\+phys), parameter \mbox{\hyperlink{group__module__radiation__astronomy_ga37b491dde50d06e339effb4a31d9f245_ga37b491dde50d06e339effb4a31d9f245}{module\+\_\+radiation\+\_\+astronomy\+::f3600}} = 3600.\+0
\item 
real(kind=kind\+\_\+phys), parameter \mbox{\hyperlink{group__module__radiation__astronomy_gafeb2fccbe8137de6099a09035762ff5e_gafeb2fccbe8137de6099a09035762ff5e}{module\+\_\+radiation\+\_\+astronomy\+::czlimt}} = 0.\+0001
\item 
real(kind=kind\+\_\+phys), public \mbox{\hyperlink{group__module__radiation__astronomy_ga37e08872f67023b11f839ac15151af09_ga37e08872f67023b11f839ac15151af09}{module\+\_\+radiation\+\_\+astronomy\+::solc0}}
\item 
integer \mbox{\hyperlink{group__module__radiation__astronomy_ga7ea431b6d4f4d6ee1f6545d6baeee44f_ga7ea431b6d4f4d6ee1f6545d6baeee44f}{module\+\_\+radiation\+\_\+astronomy\+::isolflg}} = 10
\item 
character(26) \mbox{\hyperlink{group__module__radiation__astronomy_ga05ee7e378d38b90242738b9bf6c40c00_ga05ee7e378d38b90242738b9bf6c40c00}{module\+\_\+radiation\+\_\+astronomy\+::solar\+\_\+fname}} = \textquotesingle{} \textquotesingle{}
\item 
real(kind=kind\+\_\+phys) \mbox{\hyperlink{group__module__radiation__astronomy_ga264a011aa71fb670339ac555dc24e486_ga264a011aa71fb670339ac555dc24e486}{module\+\_\+radiation\+\_\+astronomy\+::sollag}} =0.\+0
\item 
real(kind=kind\+\_\+phys) \mbox{\hyperlink{group__module__radiation__astronomy_gae195d9c834e2789170f89c988d28b01e_gae195d9c834e2789170f89c988d28b01e}{module\+\_\+radiation\+\_\+astronomy\+::sindec}} =0.\+0
\item 
real(kind=kind\+\_\+phys) \mbox{\hyperlink{group__module__radiation__astronomy_ga07386e90045639b8023abd826e0e2768_ga07386e90045639b8023abd826e0e2768}{module\+\_\+radiation\+\_\+astronomy\+::cosdec}} =0.\+0
\item 
real(kind=kind\+\_\+phys) \mbox{\hyperlink{group__module__radiation__astronomy_ga723159a44491e4ae974128123a1e8dcd_ga723159a44491e4ae974128123a1e8dcd}{module\+\_\+radiation\+\_\+astronomy\+::anginc}} =0.\+0
\item 
real(kind=kind\+\_\+phys), dimension(12) \mbox{\hyperlink{group__module__radiation__astronomy_gab68b4488022a4c6340cb60dca3feff6a_gab68b4488022a4c6340cb60dca3feff6a}{module\+\_\+radiation\+\_\+astronomy\+::smon\+\_\+sav}}
\item 
integer \mbox{\hyperlink{group__module__radiation__astronomy_ga83370fbee96388e545a89eb25ed6df90_ga83370fbee96388e545a89eb25ed6df90}{module\+\_\+radiation\+\_\+astronomy\+::iyr\+\_\+sav}} =0
\item 
integer \mbox{\hyperlink{group__module__radiation__astronomy_gab93fe36440da3cc1f1d64cae2ec4c25b_gab93fe36440da3cc1f1d64cae2ec4c25b}{module\+\_\+radiation\+\_\+astronomy\+::nstp}} =6
\end{DoxyCompactItemize}


\doxysubsubsection{Detailed Description}
Operational GFS selection for Solar constant value (namelist control parameter -\/ {\bfseries{ISOL}} = 2) ~\newline
 ISOL=0\+: presribed value = 1366 $W m^{-2}$ (old) ~\newline
 ISOL=10\+: prescibed value = 1361 $W m^{-2}$ (new) ~\newline
 ISOL=1\+: NOAA old yearly solar constant table with 11-\/year cycle (range\+: 1944-\/2006) ~\newline
 ISOL=2\+: NOAA new yearly solar constant table with 11-\/year cycle (range\+: 1850-\/2019) ~\newline
 ISOL=3\+: CMIP5 yearly solar constant table with 11-\/year cycle (range\+: 1610-\/2008) ~\newline
 ISOL=4\+: CMIP5 monthly solar constant table with 11-\/year cycle (range\+: 1882-\/2008) \begin{DoxyVersion}{Version}
NCEP-\/\+Radiation\+\_\+astronomy v5.\+2 Jan 2013 
\end{DoxyVersion}


\doxysubsubsection{Function/\+Subroutine Documentation}
\mbox{\Hypertarget{group__module__radiation__astronomy_ga2e19266fd497ae93b41298f2bea1e791_ga2e19266fd497ae93b41298f2bea1e791}\label{group__module__radiation__astronomy_ga2e19266fd497ae93b41298f2bea1e791_ga2e19266fd497ae93b41298f2bea1e791}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!sol\_init@{sol\_init}}
\index{sol\_init@{sol\_init}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{sol\_init()}{sol\_init()}}
{\footnotesize\ttfamily subroutine, public module\+\_\+radiation\+\_\+astronomy\+::sol\+\_\+init (\begin{DoxyParamCaption}\item[{integer, intent(in)}]{me,  }\item[{integer, intent(in)}]{isolar,  }\item[{character(len=26), intent(in)}]{solar\+\_\+file,  }\item[{real(kind=kind\+\_\+phys), intent(in)}]{con\+\_\+solr,  }\item[{real(kind=kind\+\_\+phys), intent(in)}]{con\+\_\+solr\+\_\+old,  }\item[{real(kind=kind\+\_\+phys), intent(in)}]{con\+\_\+pi }\end{DoxyParamCaption})}


\begin{DoxyParams}{Parameters}
{\em me} & print message control flag \\
\hline
\end{DoxyParams}
\hypertarget{group__module__radiation__astronomy_ga2e19266fd497ae93b41298f2bea1e791_sol_init_gen}{}\doxysubsubsection{sol\+\_\+init General Algorithm}\label{group__module__radiation__astronomy_ga2e19266fd497ae93b41298f2bea1e791_sol_init_gen}


References \mbox{\hyperlink{group__module__radiation__astronomy_ga64c3bb8e74fa73f05c533cd3cd422a70_ga64c3bb8e74fa73f05c533cd3cd422a70}{degrad}}, \mbox{\hyperlink{group__module__radiation__astronomy_gad59856e8f877eb05a6b22610f14a391d_gad59856e8f877eb05a6b22610f14a391d}{f12}}, \mbox{\hyperlink{group__module__radiation__astronomy_gad39490429dcd597f15291859e4bb94b9_gad39490429dcd597f15291859e4bb94b9}{hpi}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga7ea431b6d4f4d6ee1f6545d6baeee44f_ga7ea431b6d4f4d6ee1f6545d6baeee44f}{isolflg}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga83370fbee96388e545a89eb25ed6df90_ga83370fbee96388e545a89eb25ed6df90}{iyr\+\_\+sav}}, \mbox{\hyperlink{group__module__radiation__astronomy_gab93fe36440da3cc1f1d64cae2ec4c25b_gab93fe36440da3cc1f1d64cae2ec4c25b}{nstp}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga86627168cad0e3a800cb4b2cbe7b0234_ga86627168cad0e3a800cb4b2cbe7b0234}{pid12}}, \mbox{\hyperlink{group__module__radiation__astronomy_gab68b4488022a4c6340cb60dca3feff6a_gab68b4488022a4c6340cb60dca3feff6a}{smon\+\_\+sav}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga05ee7e378d38b90242738b9bf6c40c00_ga05ee7e378d38b90242738b9bf6c40c00}{solar\+\_\+fname}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga37e08872f67023b11f839ac15151af09_ga37e08872f67023b11f839ac15151af09}{solc0}}, and \mbox{\hyperlink{group__module__radiation__astronomy_gab1efeaaa1f838575fb4115f62b86ce2e_gab1efeaaa1f838575fb4115f62b86ce2e}{tpi}}.



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=350pt]{group__module__radiation__astronomy_ga2e19266fd497ae93b41298f2bea1e791_ga2e19266fd497ae93b41298f2bea1e791_icgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05}\label{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!sol\_update@{sol\_update}}
\index{sol\_update@{sol\_update}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{sol\_update()}{sol\_update()}}
{\footnotesize\ttfamily subroutine, public module\+\_\+radiation\+\_\+astronomy\+::sol\+\_\+update (\begin{DoxyParamCaption}\item[{integer, dimension(\+:), intent(in)}]{jdate,  }\item[{integer, intent(in)}]{kyear,  }\item[{real (kind=kind\+\_\+phys), intent(in)}]{deltsw,  }\item[{real (kind=kind\+\_\+phys), intent(in)}]{deltim,  }\item[{logical, intent(in)}]{lsol\+\_\+chg,  }\item[{integer, intent(in)}]{me,  }\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=$\ast$), intent(out)}]{errmsg,  }\item[{integer, intent(out)}]{errflg }\end{DoxyParamCaption})}


\begin{DoxyParams}{Parameters}
{\em jdate} & ncep absolute date and time at fcst time (yr, mon, day, t-\/zone, hr, min, sec, mil-\/sec) \\
\hline
{\em kyear} & usually kyear=jdate(1). if not, it is for hindcast mode, and it is usually the init cond time and serves as the upper limit of data can be used. \\
\hline
{\em deltsw} & time duration in seconds per sw calculation \\
\hline
{\em deltim} & timestep in seconds \\
\hline
{\em lsol\+\_\+chg} & logical flags for change solar constant \\
\hline
{\em me} & print message control flag \\
\hline
{\em slag} & equation of time in radians \\
\hline
{\em sdec,cdec} & sin and cos of the solar declination angle \\
\hline
{\em solcon} & sun-\/earth distance adjusted solar constant $(w/m^2)$ \\
\hline
\end{DoxyParams}
\hypertarget{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_gen_sol_update}{}\doxysubsubsection{sol\+\_\+update General Algorithm}\label{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_gen_sol_update}

\begin{DoxyEnumerate}
\item Call \mbox{\hyperlink{group__module__radiation__astronomy_gabea86aabd5183af686bf728817b5ebe3_gabea86aabd5183af686bf728817b5ebe3}{solar()}}
\item Call \mbox{\hyperlink{group__module__radiation__astronomy_gaee29441c2e62c44728b10915a148cccf_gaee29441c2e62c44728b10915a148cccf}{prtime()}}
\end{DoxyEnumerate}

References \mbox{\hyperlink{group__module__radiation__astronomy_ga723159a44491e4ae974128123a1e8dcd_ga723159a44491e4ae974128123a1e8dcd}{anginc}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga07386e90045639b8023abd826e0e2768_ga07386e90045639b8023abd826e0e2768}{cosdec}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga37b491dde50d06e339effb4a31d9f245_ga37b491dde50d06e339effb4a31d9f245}{f3600}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga7ea431b6d4f4d6ee1f6545d6baeee44f_ga7ea431b6d4f4d6ee1f6545d6baeee44f}{isolflg}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga83370fbee96388e545a89eb25ed6df90_ga83370fbee96388e545a89eb25ed6df90}{iyr\+\_\+sav}}, \mbox{\hyperlink{group__module__radiation__astronomy_gab93fe36440da3cc1f1d64cae2ec4c25b_gab93fe36440da3cc1f1d64cae2ec4c25b}{nstp}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga86627168cad0e3a800cb4b2cbe7b0234_ga86627168cad0e3a800cb4b2cbe7b0234}{pid12}}, \mbox{\hyperlink{group__module__radiation__astronomy_gaee29441c2e62c44728b10915a148cccf_gaee29441c2e62c44728b10915a148cccf}{prtime()}}, \mbox{\hyperlink{group__module__radiation__astronomy_gae195d9c834e2789170f89c988d28b01e_gae195d9c834e2789170f89c988d28b01e}{sindec}}, \mbox{\hyperlink{group__module__radiation__astronomy_gab68b4488022a4c6340cb60dca3feff6a_gab68b4488022a4c6340cb60dca3feff6a}{smon\+\_\+sav}}, \mbox{\hyperlink{group__module__radiation__astronomy_gabea86aabd5183af686bf728817b5ebe3_gabea86aabd5183af686bf728817b5ebe3}{solar()}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga05ee7e378d38b90242738b9bf6c40c00_ga05ee7e378d38b90242738b9bf6c40c00}{solar\+\_\+fname}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga37e08872f67023b11f839ac15151af09_ga37e08872f67023b11f839ac15151af09}{solc0}}, and \mbox{\hyperlink{group__module__radiation__astronomy_ga264a011aa71fb670339ac555dc24e486_ga264a011aa71fb670339ac555dc24e486}{sollag}}.



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

Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05_cgraph}
\end{center}
\end{figure}
Here is the caller graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05_icgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{group__module__radiation__astronomy_gabea86aabd5183af686bf728817b5ebe3_gabea86aabd5183af686bf728817b5ebe3}\label{group__module__radiation__astronomy_gabea86aabd5183af686bf728817b5ebe3_gabea86aabd5183af686bf728817b5ebe3}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!solar@{solar}}
\index{solar@{solar}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{solar()}{solar()}}
{\footnotesize\ttfamily subroutine module\+\_\+radiation\+\_\+astronomy\+::solar (\begin{DoxyParamCaption}\item[{integer, intent(in)}]{jd,  }\item[{real (kind=kind\+\_\+phys), intent(in)}]{fjd,  }\item[{real (kind=kind\+\_\+phys), intent(in)}]{con\+\_\+pi,  }\item[{real (kind=kind\+\_\+phys), intent(out)}]{r1,  }\item[{real (kind=kind\+\_\+phys), intent(out)}]{dlt,  }\item[{real (kind=kind\+\_\+phys), intent(out)}]{alp }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}}


\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em jd} & julian day \\
\hline
\mbox{\texttt{ in}}  & {\em fjd} & fraction of the julian day \\
\hline
\mbox{\texttt{ out}}  & {\em r1} & earth-\/sun radius vector \\
\hline
\mbox{\texttt{ out}}  & {\em dlt} & declination of sun in radians \\
\hline
\mbox{\texttt{ out}}  & {\em alp} & right ascension of sun in radians \\
\hline
\end{DoxyParams}
\hypertarget{group__module__radiation__astronomy_gabea86aabd5183af686bf728817b5ebe3_solar_gen}{}\doxysubsubsection{solar General Algorithm}\label{group__module__radiation__astronomy_gabea86aabd5183af686bf728817b5ebe3_solar_gen}


References \mbox{\hyperlink{group__module__radiation__astronomy_ga07386e90045639b8023abd826e0e2768_ga07386e90045639b8023abd826e0e2768}{cosdec}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga64c3bb8e74fa73f05c533cd3cd422a70_ga64c3bb8e74fa73f05c533cd3cd422a70}{degrad}}, \mbox{\hyperlink{group__module__radiation__astronomy_gae195d9c834e2789170f89c988d28b01e_gae195d9c834e2789170f89c988d28b01e}{sindec}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga264a011aa71fb670339ac555dc24e486_ga264a011aa71fb670339ac555dc24e486}{sollag}}, and \mbox{\hyperlink{group__module__radiation__astronomy_gab1efeaaa1f838575fb4115f62b86ce2e_gab1efeaaa1f838575fb4115f62b86ce2e}{tpi}}.



Referenced by \mbox{\hyperlink{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05}{sol\+\_\+update()}}.

Here is the caller graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{group__module__radiation__astronomy_gabea86aabd5183af686bf728817b5ebe3_gabea86aabd5183af686bf728817b5ebe3_icgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{group__module__radiation__astronomy_ga804e1504ae720d0f33b507e7c42b6506_ga804e1504ae720d0f33b507e7c42b6506}\label{group__module__radiation__astronomy_ga804e1504ae720d0f33b507e7c42b6506_ga804e1504ae720d0f33b507e7c42b6506}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!coszmn@{coszmn}}
\index{coszmn@{coszmn}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{coszmn()}{coszmn()}}
{\footnotesize\ttfamily subroutine, public module\+\_\+radiation\+\_\+astronomy\+::coszmn (\begin{DoxyParamCaption}\item[{real (kind=kind\+\_\+phys), dimension(\+:), intent(in)}]{xlon,  }\item[{real (kind=kind\+\_\+phys), dimension(\+:), intent(in)}]{sinlat,  }\item[{real (kind=kind\+\_\+phys), dimension(\+:), intent(in)}]{coslat,  }\item[{real (kind=kind\+\_\+phys), intent(in)}]{solhr,  }\item[{integer, intent(in)}]{IM,  }\item[{integer, intent(in)}]{me,  }\item[{real (kind=kind\+\_\+phys), dimension(\+:), intent(out)}]{coszen,  }\item[{real (kind=kind\+\_\+phys), dimension(\+:), intent(out)}]{coszdg }\end{DoxyParamCaption})}


\begin{DoxyParams}{Parameters}
{\em xlon} & grids\textquotesingle{} longitudes in radians, work both on zonal, 0-\/\texorpdfstring{$>$}{>}2pi and -\/pi-\/\texorpdfstring{$>$}{>}+pi arrangements \\
\hline
{\em sinlat} & sine of the corresponding latitudes \\
\hline
{\em coslat} & cosine of the corresponding latitudes \\
\hline
{\em solhr} & time after 00z in hours \\
\hline
{\em IM} & num of grids in horizontal dimension \\
\hline
{\em me} & print message control flag \\
\hline
{\em coszen} & average of cosz for daytime only in sw call interval \\
\hline
{\em coszdg} & average of cosz over entire sw call interval \\
\hline
\end{DoxyParams}
\hypertarget{group__module__radiation__astronomy_ga804e1504ae720d0f33b507e7c42b6506_coszmn_gen}{}\doxysubsubsection{coszmn General Algorithm}\label{group__module__radiation__astronomy_ga804e1504ae720d0f33b507e7c42b6506_coszmn_gen}


References \mbox{\hyperlink{group__module__radiation__astronomy_ga723159a44491e4ae974128123a1e8dcd_ga723159a44491e4ae974128123a1e8dcd}{anginc}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga07386e90045639b8023abd826e0e2768_ga07386e90045639b8023abd826e0e2768}{cosdec}}, \mbox{\hyperlink{group__module__radiation__astronomy_gafeb2fccbe8137de6099a09035762ff5e_gafeb2fccbe8137de6099a09035762ff5e}{czlimt}}, \mbox{\hyperlink{group__module__radiation__astronomy_gad59856e8f877eb05a6b22610f14a391d_gad59856e8f877eb05a6b22610f14a391d}{f12}}, \mbox{\hyperlink{group__module__radiation__astronomy_gab93fe36440da3cc1f1d64cae2ec4c25b_gab93fe36440da3cc1f1d64cae2ec4c25b}{nstp}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga86627168cad0e3a800cb4b2cbe7b0234_ga86627168cad0e3a800cb4b2cbe7b0234}{pid12}}, \mbox{\hyperlink{group__module__radiation__astronomy_gae195d9c834e2789170f89c988d28b01e_gae195d9c834e2789170f89c988d28b01e}{sindec}}, and \mbox{\hyperlink{group__module__radiation__astronomy_ga264a011aa71fb670339ac555dc24e486_ga264a011aa71fb670339ac555dc24e486}{sollag}}.



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=350pt]{group__module__radiation__astronomy_ga804e1504ae720d0f33b507e7c42b6506_ga804e1504ae720d0f33b507e7c42b6506_icgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{group__module__radiation__astronomy_gaee29441c2e62c44728b10915a148cccf_gaee29441c2e62c44728b10915a148cccf}\label{group__module__radiation__astronomy_gaee29441c2e62c44728b10915a148cccf_gaee29441c2e62c44728b10915a148cccf}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!prtime@{prtime}}
\index{prtime@{prtime}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{prtime()}{prtime()}}
{\footnotesize\ttfamily subroutine module\+\_\+radiation\+\_\+astronomy\+::prtime (\begin{DoxyParamCaption}\item[{integer, intent(in)}]{jd,  }\item[{real (kind=kind\+\_\+phys), intent(in)}]{fjd,  }\item[{real (kind=kind\+\_\+phys), intent(in)}]{dlt,  }\item[{real (kind=kind\+\_\+phys), intent(in)}]{alp,  }\item[{real (kind=kind\+\_\+phys), intent(in)}]{r1,  }\item[{real (kind=kind\+\_\+phys), intent(in)}]{solc }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}}


\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em jd} & forecast julian day \\
\hline
\mbox{\texttt{ in}}  & {\em fjd} & forecast fraction of julian day \\
\hline
\mbox{\texttt{ in}}  & {\em dlt} & declination angle of sun in radians \\
\hline
\mbox{\texttt{ in}}  & {\em alp} & right ascension of sun in radians \\
\hline
\mbox{\texttt{ in}}  & {\em r1} & earth-\/sun radius vector in meter \\
\hline
\mbox{\texttt{ in}}  & {\em solc} & solar constant in $w/m^2$ \\
\hline
\end{DoxyParams}
\hypertarget{group__module__radiation__astronomy_gaee29441c2e62c44728b10915a148cccf_prtime_gen}{}\doxysubsubsection{prtime General Algorithm}\label{group__module__radiation__astronomy_gaee29441c2e62c44728b10915a148cccf_prtime_gen}


References \mbox{\hyperlink{group__module__radiation__astronomy_ga64c3bb8e74fa73f05c533cd3cd422a70_ga64c3bb8e74fa73f05c533cd3cd422a70}{degrad}}, \mbox{\hyperlink{group__module__radiation__astronomy_gad59856e8f877eb05a6b22610f14a391d_gad59856e8f877eb05a6b22610f14a391d}{f12}}, \mbox{\hyperlink{group__module__radiation__astronomy_gad39490429dcd597f15291859e4bb94b9_gad39490429dcd597f15291859e4bb94b9}{hpi}}, and \mbox{\hyperlink{group__module__radiation__astronomy_ga264a011aa71fb670339ac555dc24e486_ga264a011aa71fb670339ac555dc24e486}{sollag}}.



Referenced by \mbox{\hyperlink{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05}{sol\+\_\+update()}}.

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


\doxysubsubsection{Variable Documentation}
\mbox{\Hypertarget{group__module__radiation__astronomy_ga64c3bb8e74fa73f05c533cd3cd422a70_ga64c3bb8e74fa73f05c533cd3cd422a70}\label{group__module__radiation__astronomy_ga64c3bb8e74fa73f05c533cd3cd422a70_ga64c3bb8e74fa73f05c533cd3cd422a70}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!degrad@{degrad}}
\index{degrad@{degrad}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{degrad}{degrad}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys) module\+\_\+radiation\+\_\+astronomy\+::degrad\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__astronomy_gaee29441c2e62c44728b10915a148cccf_gaee29441c2e62c44728b10915a148cccf}{prtime()}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga2e19266fd497ae93b41298f2bea1e791_ga2e19266fd497ae93b41298f2bea1e791}{sol\+\_\+init()}}, and \mbox{\hyperlink{group__module__radiation__astronomy_gabea86aabd5183af686bf728817b5ebe3_gabea86aabd5183af686bf728817b5ebe3}{solar()}}.

\mbox{\Hypertarget{group__module__radiation__astronomy_gab1efeaaa1f838575fb4115f62b86ce2e_gab1efeaaa1f838575fb4115f62b86ce2e}\label{group__module__radiation__astronomy_gab1efeaaa1f838575fb4115f62b86ce2e_gab1efeaaa1f838575fb4115f62b86ce2e}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!tpi@{tpi}}
\index{tpi@{tpi}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{tpi}{tpi}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys) module\+\_\+radiation\+\_\+astronomy\+::tpi\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__astronomy_ga2e19266fd497ae93b41298f2bea1e791_ga2e19266fd497ae93b41298f2bea1e791}{sol\+\_\+init()}}, and \mbox{\hyperlink{group__module__radiation__astronomy_gabea86aabd5183af686bf728817b5ebe3_gabea86aabd5183af686bf728817b5ebe3}{solar()}}.

\mbox{\Hypertarget{group__module__radiation__astronomy_gad39490429dcd597f15291859e4bb94b9_gad39490429dcd597f15291859e4bb94b9}\label{group__module__radiation__astronomy_gad39490429dcd597f15291859e4bb94b9_gad39490429dcd597f15291859e4bb94b9}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!hpi@{hpi}}
\index{hpi@{hpi}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{hpi}{hpi}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys) module\+\_\+radiation\+\_\+astronomy\+::hpi\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__astronomy_gaee29441c2e62c44728b10915a148cccf_gaee29441c2e62c44728b10915a148cccf}{prtime()}}, and \mbox{\hyperlink{group__module__radiation__astronomy_ga2e19266fd497ae93b41298f2bea1e791_ga2e19266fd497ae93b41298f2bea1e791}{sol\+\_\+init()}}.

\mbox{\Hypertarget{group__module__radiation__astronomy_ga86627168cad0e3a800cb4b2cbe7b0234_ga86627168cad0e3a800cb4b2cbe7b0234}\label{group__module__radiation__astronomy_ga86627168cad0e3a800cb4b2cbe7b0234_ga86627168cad0e3a800cb4b2cbe7b0234}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!pid12@{pid12}}
\index{pid12@{pid12}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{pid12}{pid12}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys) module\+\_\+radiation\+\_\+astronomy\+::pid12\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__astronomy_ga804e1504ae720d0f33b507e7c42b6506_ga804e1504ae720d0f33b507e7c42b6506}{coszmn()}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga2e19266fd497ae93b41298f2bea1e791_ga2e19266fd497ae93b41298f2bea1e791}{sol\+\_\+init()}}, and \mbox{\hyperlink{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05}{sol\+\_\+update()}}.

\mbox{\Hypertarget{group__module__radiation__astronomy_gad59856e8f877eb05a6b22610f14a391d_gad59856e8f877eb05a6b22610f14a391d}\label{group__module__radiation__astronomy_gad59856e8f877eb05a6b22610f14a391d_gad59856e8f877eb05a6b22610f14a391d}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!f12@{f12}}
\index{f12@{f12}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{f12}{f12}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), parameter module\+\_\+radiation\+\_\+astronomy\+::f12 = 12.\+0\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__astronomy_ga804e1504ae720d0f33b507e7c42b6506_ga804e1504ae720d0f33b507e7c42b6506}{coszmn()}}, \mbox{\hyperlink{group__module__radiation__astronomy_gaee29441c2e62c44728b10915a148cccf_gaee29441c2e62c44728b10915a148cccf}{prtime()}}, and \mbox{\hyperlink{group__module__radiation__astronomy_ga2e19266fd497ae93b41298f2bea1e791_ga2e19266fd497ae93b41298f2bea1e791}{sol\+\_\+init()}}.

\mbox{\Hypertarget{group__module__radiation__astronomy_ga37b491dde50d06e339effb4a31d9f245_ga37b491dde50d06e339effb4a31d9f245}\label{group__module__radiation__astronomy_ga37b491dde50d06e339effb4a31d9f245_ga37b491dde50d06e339effb4a31d9f245}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!f3600@{f3600}}
\index{f3600@{f3600}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{f3600}{f3600}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), parameter module\+\_\+radiation\+\_\+astronomy\+::f3600 = 3600.\+0\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05}{sol\+\_\+update()}}.

\mbox{\Hypertarget{group__module__radiation__astronomy_gafeb2fccbe8137de6099a09035762ff5e_gafeb2fccbe8137de6099a09035762ff5e}\label{group__module__radiation__astronomy_gafeb2fccbe8137de6099a09035762ff5e_gafeb2fccbe8137de6099a09035762ff5e}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!czlimt@{czlimt}}
\index{czlimt@{czlimt}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{czlimt}{czlimt}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), parameter module\+\_\+radiation\+\_\+astronomy\+::czlimt = 0.\+0001\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__astronomy_ga804e1504ae720d0f33b507e7c42b6506_ga804e1504ae720d0f33b507e7c42b6506}{coszmn()}}.

\mbox{\Hypertarget{group__module__radiation__astronomy_ga37e08872f67023b11f839ac15151af09_ga37e08872f67023b11f839ac15151af09}\label{group__module__radiation__astronomy_ga37e08872f67023b11f839ac15151af09_ga37e08872f67023b11f839ac15151af09}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!solc0@{solc0}}
\index{solc0@{solc0}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{solc0}{solc0}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), public module\+\_\+radiation\+\_\+astronomy\+::solc0}



Referenced by \mbox{\hyperlink{group__module__radiation__astronomy_ga2e19266fd497ae93b41298f2bea1e791_ga2e19266fd497ae93b41298f2bea1e791}{sol\+\_\+init()}}, and \mbox{\hyperlink{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05}{sol\+\_\+update()}}.

\mbox{\Hypertarget{group__module__radiation__astronomy_ga7ea431b6d4f4d6ee1f6545d6baeee44f_ga7ea431b6d4f4d6ee1f6545d6baeee44f}\label{group__module__radiation__astronomy_ga7ea431b6d4f4d6ee1f6545d6baeee44f_ga7ea431b6d4f4d6ee1f6545d6baeee44f}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!isolflg@{isolflg}}
\index{isolflg@{isolflg}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{isolflg}{isolflg}}
{\footnotesize\ttfamily integer module\+\_\+radiation\+\_\+astronomy\+::isolflg = 10\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__astronomy_ga2e19266fd497ae93b41298f2bea1e791_ga2e19266fd497ae93b41298f2bea1e791}{sol\+\_\+init()}}, and \mbox{\hyperlink{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05}{sol\+\_\+update()}}.

\mbox{\Hypertarget{group__module__radiation__astronomy_ga05ee7e378d38b90242738b9bf6c40c00_ga05ee7e378d38b90242738b9bf6c40c00}\label{group__module__radiation__astronomy_ga05ee7e378d38b90242738b9bf6c40c00_ga05ee7e378d38b90242738b9bf6c40c00}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!solar\_fname@{solar\_fname}}
\index{solar\_fname@{solar\_fname}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{solar\_fname}{solar\_fname}}
{\footnotesize\ttfamily character(26) module\+\_\+radiation\+\_\+astronomy\+::solar\+\_\+fname = \textquotesingle{} \textquotesingle{}\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__astronomy_ga2e19266fd497ae93b41298f2bea1e791_ga2e19266fd497ae93b41298f2bea1e791}{sol\+\_\+init()}}, and \mbox{\hyperlink{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05}{sol\+\_\+update()}}.

\mbox{\Hypertarget{group__module__radiation__astronomy_ga264a011aa71fb670339ac555dc24e486_ga264a011aa71fb670339ac555dc24e486}\label{group__module__radiation__astronomy_ga264a011aa71fb670339ac555dc24e486_ga264a011aa71fb670339ac555dc24e486}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!sollag@{sollag}}
\index{sollag@{sollag}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{sollag}{sollag}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys) module\+\_\+radiation\+\_\+astronomy\+::sollag =0.\+0\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__astronomy_ga804e1504ae720d0f33b507e7c42b6506_ga804e1504ae720d0f33b507e7c42b6506}{coszmn()}}, \mbox{\hyperlink{group__module__radiation__astronomy_gaee29441c2e62c44728b10915a148cccf_gaee29441c2e62c44728b10915a148cccf}{prtime()}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05}{sol\+\_\+update()}}, and \mbox{\hyperlink{group__module__radiation__astronomy_gabea86aabd5183af686bf728817b5ebe3_gabea86aabd5183af686bf728817b5ebe3}{solar()}}.

\mbox{\Hypertarget{group__module__radiation__astronomy_gae195d9c834e2789170f89c988d28b01e_gae195d9c834e2789170f89c988d28b01e}\label{group__module__radiation__astronomy_gae195d9c834e2789170f89c988d28b01e_gae195d9c834e2789170f89c988d28b01e}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!sindec@{sindec}}
\index{sindec@{sindec}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{sindec}{sindec}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys) module\+\_\+radiation\+\_\+astronomy\+::sindec =0.\+0\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__astronomy_ga804e1504ae720d0f33b507e7c42b6506_ga804e1504ae720d0f33b507e7c42b6506}{coszmn()}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05}{sol\+\_\+update()}}, and \mbox{\hyperlink{group__module__radiation__astronomy_gabea86aabd5183af686bf728817b5ebe3_gabea86aabd5183af686bf728817b5ebe3}{solar()}}.

\mbox{\Hypertarget{group__module__radiation__astronomy_ga07386e90045639b8023abd826e0e2768_ga07386e90045639b8023abd826e0e2768}\label{group__module__radiation__astronomy_ga07386e90045639b8023abd826e0e2768_ga07386e90045639b8023abd826e0e2768}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!cosdec@{cosdec}}
\index{cosdec@{cosdec}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{cosdec}{cosdec}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys) module\+\_\+radiation\+\_\+astronomy\+::cosdec =0.\+0\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__astronomy_ga804e1504ae720d0f33b507e7c42b6506_ga804e1504ae720d0f33b507e7c42b6506}{coszmn()}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05}{sol\+\_\+update()}}, and \mbox{\hyperlink{group__module__radiation__astronomy_gabea86aabd5183af686bf728817b5ebe3_gabea86aabd5183af686bf728817b5ebe3}{solar()}}.

\mbox{\Hypertarget{group__module__radiation__astronomy_ga723159a44491e4ae974128123a1e8dcd_ga723159a44491e4ae974128123a1e8dcd}\label{group__module__radiation__astronomy_ga723159a44491e4ae974128123a1e8dcd_ga723159a44491e4ae974128123a1e8dcd}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!anginc@{anginc}}
\index{anginc@{anginc}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{anginc}{anginc}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys) module\+\_\+radiation\+\_\+astronomy\+::anginc =0.\+0\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__astronomy_ga804e1504ae720d0f33b507e7c42b6506_ga804e1504ae720d0f33b507e7c42b6506}{coszmn()}}, and \mbox{\hyperlink{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05}{sol\+\_\+update()}}.

\mbox{\Hypertarget{group__module__radiation__astronomy_gab68b4488022a4c6340cb60dca3feff6a_gab68b4488022a4c6340cb60dca3feff6a}\label{group__module__radiation__astronomy_gab68b4488022a4c6340cb60dca3feff6a_gab68b4488022a4c6340cb60dca3feff6a}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!smon\_sav@{smon\_sav}}
\index{smon\_sav@{smon\_sav}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{smon\_sav}{smon\_sav}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(12) module\+\_\+radiation\+\_\+astronomy\+::smon\+\_\+sav\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__astronomy_ga2e19266fd497ae93b41298f2bea1e791_ga2e19266fd497ae93b41298f2bea1e791}{sol\+\_\+init()}}, and \mbox{\hyperlink{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05}{sol\+\_\+update()}}.

\mbox{\Hypertarget{group__module__radiation__astronomy_ga83370fbee96388e545a89eb25ed6df90_ga83370fbee96388e545a89eb25ed6df90}\label{group__module__radiation__astronomy_ga83370fbee96388e545a89eb25ed6df90_ga83370fbee96388e545a89eb25ed6df90}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!iyr\_sav@{iyr\_sav}}
\index{iyr\_sav@{iyr\_sav}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{iyr\_sav}{iyr\_sav}}
{\footnotesize\ttfamily integer module\+\_\+radiation\+\_\+astronomy\+::iyr\+\_\+sav =0\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__astronomy_ga2e19266fd497ae93b41298f2bea1e791_ga2e19266fd497ae93b41298f2bea1e791}{sol\+\_\+init()}}, and \mbox{\hyperlink{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05}{sol\+\_\+update()}}.

\mbox{\Hypertarget{group__module__radiation__astronomy_gab93fe36440da3cc1f1d64cae2ec4c25b_gab93fe36440da3cc1f1d64cae2ec4c25b}\label{group__module__radiation__astronomy_gab93fe36440da3cc1f1d64cae2ec4c25b_gab93fe36440da3cc1f1d64cae2ec4c25b}} 
\index{Radiation Astronomy Module@{Radiation Astronomy Module}!nstp@{nstp}}
\index{nstp@{nstp}!Radiation Astronomy Module@{Radiation Astronomy Module}}
\doxyparagraph{\texorpdfstring{nstp}{nstp}}
{\footnotesize\ttfamily integer module\+\_\+radiation\+\_\+astronomy\+::nstp =6\hspace{0.3cm}{\ttfamily [private]}}



Referenced by \mbox{\hyperlink{group__module__radiation__astronomy_ga804e1504ae720d0f33b507e7c42b6506_ga804e1504ae720d0f33b507e7c42b6506}{coszmn()}}, \mbox{\hyperlink{group__module__radiation__astronomy_ga2e19266fd497ae93b41298f2bea1e791_ga2e19266fd497ae93b41298f2bea1e791}{sol\+\_\+init()}}, and \mbox{\hyperlink{group__module__radiation__astronomy_ga3f56b5336e592549331e13991911ce05_ga3f56b5336e592549331e13991911ce05}{sol\+\_\+update()}}.

