\hypertarget{namespacemodule__radlw__kgb01}{}\doxysubsection{module\+\_\+radlw\+\_\+kgb01 Module Reference}
\label{namespacemodule__radlw__kgb01}\index{module\_radlw\_kgb01@{module\_radlw\_kgb01}}


This module sets up absorption coefficients for band 01\+: 10-\/350 cm-\/1 (low -\/ h2o; high -\/ h2o)  


\doxysubsubsection*{Variables}
\begin{DoxyCompactItemize}
\item 
integer, public \mbox{\hyperlink{namespacemodule__radlw__kgb01_a60db2a67b7f03a52fa88acd2c7874dfc_a60db2a67b7f03a52fa88acd2c7874dfc}{msa01}}
\begin{DoxyCompactList}\small\item\em msa01=65 \end{DoxyCompactList}\item 
integer, public \mbox{\hyperlink{namespacemodule__radlw__kgb01_ae34d953adc793ad27a294864e3e0e354_ae34d953adc793ad27a294864e3e0e354}{msb01}}
\begin{DoxyCompactList}\small\item\em msb01=235 \end{DoxyCompactList}\item 
integer, public \mbox{\hyperlink{namespacemodule__radlw__kgb01_a321c2e84e14d28142d08bb5fbe485a67_a321c2e84e14d28142d08bb5fbe485a67}{msf01}}
\begin{DoxyCompactList}\small\item\em msf01=10 \end{DoxyCompactList}\item 
integer, public \mbox{\hyperlink{namespacemodule__radlw__kgb01_a4bd2e710d96291436f9ee36e99816a19_a4bd2e710d96291436f9ee36e99816a19}{mfr01}}
\begin{DoxyCompactList}\small\item\em mfr01=4 \end{DoxyCompactList}\item 
integer, public \mbox{\hyperlink{namespacemodule__radlw__kgb01_a218c6844f9043f362571f091a4f80522_a218c6844f9043f362571f091a4f80522}{mmn01}}
\begin{DoxyCompactList}\small\item\em mmn01=19 \end{DoxyCompactList}\item 
real(kind=kind\+\_\+phys), dimension(ng01, \mbox{\hyperlink{namespacemodule__radlw__kgb01_a60db2a67b7f03a52fa88acd2c7874dfc_a60db2a67b7f03a52fa88acd2c7874dfc}{msa01}}), public \mbox{\hyperlink{namespacemodule__radlw__kgb01_acdbe767d50d503c4a89d4042dd0dee8e_acdbe767d50d503c4a89d4042dd0dee8e}{absa}}
\begin{DoxyCompactList}\small\item\em the array absa(\+NG01,65) = ka(\+NG01,5,13) contains absorption coefs at the NG01=10 chosen g-\/values for a range of pressure levels\texorpdfstring{$>$}{>}$\sim$100mb and temperatures. the first index in the array, jt, which runs from 1 to 5, corresponds to different temperatures. more specifically, jt = 1-\/5 means that the data are for the corresponding temperature of tref-\/30, tref-\/15, tref, tref+15, and tref+30, respectively. the second index, jp, runs from 1 to 13 and refers to the corresponding pressure level in pref (e.\+g. jp = 1 is for a pressure of 1053.\+63 mb). the third index, ig, goes from 1 to NG01=10, and tells us which g-\/interval the absorption coefficients are for. \end{DoxyCompactList}\item 
real(kind=kind\+\_\+phys), dimension(ng01, \mbox{\hyperlink{namespacemodule__radlw__kgb01_ae34d953adc793ad27a294864e3e0e354_ae34d953adc793ad27a294864e3e0e354}{msb01}}), public \mbox{\hyperlink{namespacemodule__radlw__kgb01_abdaefe1c38d8bfcac5ef9b878fac77cb_abdaefe1c38d8bfcac5ef9b878fac77cb}{absb}}
\begin{DoxyCompactList}\small\item\em the array absb(\+NG01,235) = kb(\+NG01,5,13\+:59) contains absorption coefs at the NG01=10 chosen g-\/values for a range of pressure levels \texorpdfstring{$<$}{<} $\sim$100mb and temperatures. the first index in the array, jt, which runs from 1 to 5, corresponds to different temperatures. more specifically, jt = 1-\/5 means that the data are for the corresponding temperature of tref-\/30, tref-\/15, tref, tref+15, and tref+30, respectively. the second index, jp, runs from 13 to 59 and refers to the jpth reference pressure level (see taumol.\+f for the value of these pressure levels in mb). the third index, ig, goes from 1 to NG01=10, and tells us which g-\/interval the absorption coefficients are for. \end{DoxyCompactList}\item 
real(kind=kind\+\_\+phys), dimension(ng01, \mbox{\hyperlink{namespacemodule__radlw__kgb01_a321c2e84e14d28142d08bb5fbe485a67_a321c2e84e14d28142d08bb5fbe485a67}{msf01}}), public \mbox{\hyperlink{namespacemodule__radlw__kgb01_a14c7cc68b26c0ab1fdfda6faa2d485d5_a14c7cc68b26c0ab1fdfda6faa2d485d5}{selfref}}
\begin{DoxyCompactList}\small\item\em the array selfref contains the coefficient of the water vapor self-\/continuum (including the energy term). the first index refers to temperature in 7.\+2 degree increments. for instance, jt = 1 refers to a temperature of 245.\+6, jt = 2 refers to 252.\+8, etc. the second index runs over the g-\/channel (1 to NG01=10). \end{DoxyCompactList}\item 
real(kind=kind\+\_\+phys), dimension(ng01, \mbox{\hyperlink{namespacemodule__radlw__kgb01_a4bd2e710d96291436f9ee36e99816a19_a4bd2e710d96291436f9ee36e99816a19}{mfr01}}), public \mbox{\hyperlink{namespacemodule__radlw__kgb01_acd70a32f88808dc40c39edee5b76adbe_acd70a32f88808dc40c39edee5b76adbe}{forref}}
\begin{DoxyCompactList}\small\item\em the array forref contains the coefficient of the water vapor foreign-\/continuum (including the energy term). the first index refers to reference temperature (296,260,224,260) and pressure (970,475,219,3 mbar) levels. The second index runs over the g-\/channel (1 to NG01=10). \end{DoxyCompactList}\item 
real(kind=kind\+\_\+phys), dimension(ng01), public \mbox{\hyperlink{namespacemodule__radlw__kgb01_a0bca660247ac37483cd55c6936056631_a0bca660247ac37483cd55c6936056631}{fracrefa}}
\begin{DoxyCompactList}\small\item\em planck fraction mapping level\+: p = 212.\+7250 mbar, t = 223.\+06 k \end{DoxyCompactList}\item 
real(kind=kind\+\_\+phys), dimension(ng01), public \mbox{\hyperlink{namespacemodule__radlw__kgb01_a19b6a3893965817e82c77bee1de536cd_a19b6a3893965817e82c77bee1de536cd}{fracrefb}}
\begin{DoxyCompactList}\small\item\em planck fraction mapping level\+: p = 212.\+7250 mbar, t = 223.\+06 k these planck fractions were calculated using lower atmosphere parameters. \end{DoxyCompactList}\item 
real(kind=kind\+\_\+phys), dimension(ng01, \mbox{\hyperlink{namespacemodule__radlw__kgb01_a218c6844f9043f362571f091a4f80522_a218c6844f9043f362571f091a4f80522}{mmn01}}), public \mbox{\hyperlink{namespacemodule__radlw__kgb01_a0a4f08c625f2f25f132200811af42331_a0a4f08c625f2f25f132200811af42331}{ka\+\_\+mn2}}
\item 
real(kind=kind\+\_\+phys), dimension(ng01, \mbox{\hyperlink{namespacemodule__radlw__kgb01_a218c6844f9043f362571f091a4f80522_a218c6844f9043f362571f091a4f80522}{mmn01}}), public \mbox{\hyperlink{namespacemodule__radlw__kgb01_ac357df5f66a7e384e22db58203ac294a_ac357df5f66a7e384e22db58203ac294a}{kb\+\_\+mn2}}
\end{DoxyCompactItemize}


\doxysubsubsection{Variable Documentation}
\mbox{\Hypertarget{namespacemodule__radlw__kgb01_a60db2a67b7f03a52fa88acd2c7874dfc_a60db2a67b7f03a52fa88acd2c7874dfc}\label{namespacemodule__radlw__kgb01_a60db2a67b7f03a52fa88acd2c7874dfc_a60db2a67b7f03a52fa88acd2c7874dfc}} 
\index{module\_radlw\_kgb01@{module\_radlw\_kgb01}!msa01@{msa01}}
\index{msa01@{msa01}!module\_radlw\_kgb01@{module\_radlw\_kgb01}}
\doxyparagraph{\texorpdfstring{msa01}{msa01}}
{\footnotesize\ttfamily integer, public module\+\_\+radlw\+\_\+kgb01\+::msa01}

\mbox{\Hypertarget{namespacemodule__radlw__kgb01_ae34d953adc793ad27a294864e3e0e354_ae34d953adc793ad27a294864e3e0e354}\label{namespacemodule__radlw__kgb01_ae34d953adc793ad27a294864e3e0e354_ae34d953adc793ad27a294864e3e0e354}} 
\index{module\_radlw\_kgb01@{module\_radlw\_kgb01}!msb01@{msb01}}
\index{msb01@{msb01}!module\_radlw\_kgb01@{module\_radlw\_kgb01}}
\doxyparagraph{\texorpdfstring{msb01}{msb01}}
{\footnotesize\ttfamily integer, public module\+\_\+radlw\+\_\+kgb01\+::msb01}

\mbox{\Hypertarget{namespacemodule__radlw__kgb01_a321c2e84e14d28142d08bb5fbe485a67_a321c2e84e14d28142d08bb5fbe485a67}\label{namespacemodule__radlw__kgb01_a321c2e84e14d28142d08bb5fbe485a67_a321c2e84e14d28142d08bb5fbe485a67}} 
\index{module\_radlw\_kgb01@{module\_radlw\_kgb01}!msf01@{msf01}}
\index{msf01@{msf01}!module\_radlw\_kgb01@{module\_radlw\_kgb01}}
\doxyparagraph{\texorpdfstring{msf01}{msf01}}
{\footnotesize\ttfamily integer, public module\+\_\+radlw\+\_\+kgb01\+::msf01}

\mbox{\Hypertarget{namespacemodule__radlw__kgb01_a4bd2e710d96291436f9ee36e99816a19_a4bd2e710d96291436f9ee36e99816a19}\label{namespacemodule__radlw__kgb01_a4bd2e710d96291436f9ee36e99816a19_a4bd2e710d96291436f9ee36e99816a19}} 
\index{module\_radlw\_kgb01@{module\_radlw\_kgb01}!mfr01@{mfr01}}
\index{mfr01@{mfr01}!module\_radlw\_kgb01@{module\_radlw\_kgb01}}
\doxyparagraph{\texorpdfstring{mfr01}{mfr01}}
{\footnotesize\ttfamily integer, public module\+\_\+radlw\+\_\+kgb01\+::mfr01}

\mbox{\Hypertarget{namespacemodule__radlw__kgb01_a218c6844f9043f362571f091a4f80522_a218c6844f9043f362571f091a4f80522}\label{namespacemodule__radlw__kgb01_a218c6844f9043f362571f091a4f80522_a218c6844f9043f362571f091a4f80522}} 
\index{module\_radlw\_kgb01@{module\_radlw\_kgb01}!mmn01@{mmn01}}
\index{mmn01@{mmn01}!module\_radlw\_kgb01@{module\_radlw\_kgb01}}
\doxyparagraph{\texorpdfstring{mmn01}{mmn01}}
{\footnotesize\ttfamily integer, public module\+\_\+radlw\+\_\+kgb01\+::mmn01}

\mbox{\Hypertarget{namespacemodule__radlw__kgb01_acdbe767d50d503c4a89d4042dd0dee8e_acdbe767d50d503c4a89d4042dd0dee8e}\label{namespacemodule__radlw__kgb01_acdbe767d50d503c4a89d4042dd0dee8e_acdbe767d50d503c4a89d4042dd0dee8e}} 
\index{module\_radlw\_kgb01@{module\_radlw\_kgb01}!absa@{absa}}
\index{absa@{absa}!module\_radlw\_kgb01@{module\_radlw\_kgb01}}
\doxyparagraph{\texorpdfstring{absa}{absa}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(ng01,\mbox{\hyperlink{namespacemodule__radlw__kgb01_a60db2a67b7f03a52fa88acd2c7874dfc_a60db2a67b7f03a52fa88acd2c7874dfc}{msa01}}), public module\+\_\+radlw\+\_\+kgb01\+::absa}

\mbox{\Hypertarget{namespacemodule__radlw__kgb01_abdaefe1c38d8bfcac5ef9b878fac77cb_abdaefe1c38d8bfcac5ef9b878fac77cb}\label{namespacemodule__radlw__kgb01_abdaefe1c38d8bfcac5ef9b878fac77cb_abdaefe1c38d8bfcac5ef9b878fac77cb}} 
\index{module\_radlw\_kgb01@{module\_radlw\_kgb01}!absb@{absb}}
\index{absb@{absb}!module\_radlw\_kgb01@{module\_radlw\_kgb01}}
\doxyparagraph{\texorpdfstring{absb}{absb}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(ng01,\mbox{\hyperlink{namespacemodule__radlw__kgb01_ae34d953adc793ad27a294864e3e0e354_ae34d953adc793ad27a294864e3e0e354}{msb01}}), public module\+\_\+radlw\+\_\+kgb01\+::absb}

\mbox{\Hypertarget{namespacemodule__radlw__kgb01_a14c7cc68b26c0ab1fdfda6faa2d485d5_a14c7cc68b26c0ab1fdfda6faa2d485d5}\label{namespacemodule__radlw__kgb01_a14c7cc68b26c0ab1fdfda6faa2d485d5_a14c7cc68b26c0ab1fdfda6faa2d485d5}} 
\index{module\_radlw\_kgb01@{module\_radlw\_kgb01}!selfref@{selfref}}
\index{selfref@{selfref}!module\_radlw\_kgb01@{module\_radlw\_kgb01}}
\doxyparagraph{\texorpdfstring{selfref}{selfref}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(ng01,\mbox{\hyperlink{namespacemodule__radlw__kgb01_a321c2e84e14d28142d08bb5fbe485a67_a321c2e84e14d28142d08bb5fbe485a67}{msf01}}), public module\+\_\+radlw\+\_\+kgb01\+::selfref}

\mbox{\Hypertarget{namespacemodule__radlw__kgb01_acd70a32f88808dc40c39edee5b76adbe_acd70a32f88808dc40c39edee5b76adbe}\label{namespacemodule__radlw__kgb01_acd70a32f88808dc40c39edee5b76adbe_acd70a32f88808dc40c39edee5b76adbe}} 
\index{module\_radlw\_kgb01@{module\_radlw\_kgb01}!forref@{forref}}
\index{forref@{forref}!module\_radlw\_kgb01@{module\_radlw\_kgb01}}
\doxyparagraph{\texorpdfstring{forref}{forref}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(ng01,\mbox{\hyperlink{namespacemodule__radlw__kgb01_a4bd2e710d96291436f9ee36e99816a19_a4bd2e710d96291436f9ee36e99816a19}{mfr01}}), public module\+\_\+radlw\+\_\+kgb01\+::forref}

\mbox{\Hypertarget{namespacemodule__radlw__kgb01_a0bca660247ac37483cd55c6936056631_a0bca660247ac37483cd55c6936056631}\label{namespacemodule__radlw__kgb01_a0bca660247ac37483cd55c6936056631_a0bca660247ac37483cd55c6936056631}} 
\index{module\_radlw\_kgb01@{module\_radlw\_kgb01}!fracrefa@{fracrefa}}
\index{fracrefa@{fracrefa}!module\_radlw\_kgb01@{module\_radlw\_kgb01}}
\doxyparagraph{\texorpdfstring{fracrefa}{fracrefa}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(ng01), public module\+\_\+radlw\+\_\+kgb01\+::fracrefa}

\mbox{\Hypertarget{namespacemodule__radlw__kgb01_a19b6a3893965817e82c77bee1de536cd_a19b6a3893965817e82c77bee1de536cd}\label{namespacemodule__radlw__kgb01_a19b6a3893965817e82c77bee1de536cd_a19b6a3893965817e82c77bee1de536cd}} 
\index{module\_radlw\_kgb01@{module\_radlw\_kgb01}!fracrefb@{fracrefb}}
\index{fracrefb@{fracrefb}!module\_radlw\_kgb01@{module\_radlw\_kgb01}}
\doxyparagraph{\texorpdfstring{fracrefb}{fracrefb}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(ng01), public module\+\_\+radlw\+\_\+kgb01\+::fracrefb}

\mbox{\Hypertarget{namespacemodule__radlw__kgb01_a0a4f08c625f2f25f132200811af42331_a0a4f08c625f2f25f132200811af42331}\label{namespacemodule__radlw__kgb01_a0a4f08c625f2f25f132200811af42331_a0a4f08c625f2f25f132200811af42331}} 
\index{module\_radlw\_kgb01@{module\_radlw\_kgb01}!ka\_mn2@{ka\_mn2}}
\index{ka\_mn2@{ka\_mn2}!module\_radlw\_kgb01@{module\_radlw\_kgb01}}
\doxyparagraph{\texorpdfstring{ka\_mn2}{ka\_mn2}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(ng01,\mbox{\hyperlink{namespacemodule__radlw__kgb01_a218c6844f9043f362571f091a4f80522_a218c6844f9043f362571f091a4f80522}{mmn01}}), public module\+\_\+radlw\+\_\+kgb01\+::ka\+\_\+mn2}

\mbox{\Hypertarget{namespacemodule__radlw__kgb01_ac357df5f66a7e384e22db58203ac294a_ac357df5f66a7e384e22db58203ac294a}\label{namespacemodule__radlw__kgb01_ac357df5f66a7e384e22db58203ac294a_ac357df5f66a7e384e22db58203ac294a}} 
\index{module\_radlw\_kgb01@{module\_radlw\_kgb01}!kb\_mn2@{kb\_mn2}}
\index{kb\_mn2@{kb\_mn2}!module\_radlw\_kgb01@{module\_radlw\_kgb01}}
\doxyparagraph{\texorpdfstring{kb\_mn2}{kb\_mn2}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(ng01,\mbox{\hyperlink{namespacemodule__radlw__kgb01_a218c6844f9043f362571f091a4f80522_a218c6844f9043f362571f091a4f80522}{mmn01}}), public module\+\_\+radlw\+\_\+kgb01\+::kb\+\_\+mn2}

