\hypertarget{namespacemodule__radlw__kgb07}{}\doxysubsection{module\+\_\+radlw\+\_\+kgb07 Module Reference}
\label{namespacemodule__radlw__kgb07}\index{module\_radlw\_kgb07@{module\_radlw\_kgb07}}


This module sets up absorption coefficients for band 07\+: 980-\/1080 cm-\/1 (low -\/ h2o, o3; high -\/ o3)  


\doxysubsubsection*{Variables}
\begin{DoxyCompactItemize}
\item 
integer, public \mbox{\hyperlink{namespacemodule__radlw__kgb07_a0acb84a6b261fc00f1765707844c32f2_a0acb84a6b261fc00f1765707844c32f2}{msa07}}
\begin{DoxyCompactList}\small\item\em msa07=585 \end{DoxyCompactList}\end{DoxyCompactItemize}
\begin{Indent}\textbf{ minor gas mapping level\+:}\par
\begin{DoxyCompactItemize}
\item 
integer, public \mbox{\hyperlink{namespacemodule__radlw__kgb07_abba2139dfc5d8551f844f3809c28ce3c_abba2139dfc5d8551f844f3809c28ce3c}{msb07}}
\begin{DoxyCompactList}\small\item\em msb07=235 \end{DoxyCompactList}\item 
integer, public \mbox{\hyperlink{namespacemodule__radlw__kgb07_a9310f33501467fbadcf092d71559358b_a9310f33501467fbadcf092d71559358b}{msf07}}
\begin{DoxyCompactList}\small\item\em msf07=10 \end{DoxyCompactList}\item 
integer, public \mbox{\hyperlink{namespacemodule__radlw__kgb07_a0bd5d550553238ae13cbf57423d102c8_a0bd5d550553238ae13cbf57423d102c8}{mfr07}}
\begin{DoxyCompactList}\small\item\em mfr07=4 \end{DoxyCompactList}\item 
integer, public \mbox{\hyperlink{namespacemodule__radlw__kgb07_a21ac454fe21fb07ee555b4106121b2ae_a21ac454fe21fb07ee555b4106121b2ae}{maf07}}
\begin{DoxyCompactList}\small\item\em maf07=9 \end{DoxyCompactList}\item 
integer, public \mbox{\hyperlink{namespacemodule__radlw__kgb07_a2d176bec938d9fdcc2369fda91308702_a2d176bec938d9fdcc2369fda91308702}{mmc07}}
\begin{DoxyCompactList}\small\item\em mmc07=19 \end{DoxyCompactList}\item 
real(kind=kind\+\_\+phys), dimension(ng07, \mbox{\hyperlink{namespacemodule__radlw__kgb07_a0bd5d550553238ae13cbf57423d102c8_a0bd5d550553238ae13cbf57423d102c8}{mfr07}}), public \mbox{\hyperlink{namespacemodule__radlw__kgb07_a43ceef4cb2707a2874c2d59e93ba9791_a43ceef4cb2707a2874c2d59e93ba9791}{forref}}
\begin{DoxyCompactList}\small\item\em lower -\/ co2, p = 706.\+2720 mb, t = 294.\+2 k upper -\/ cfc11, cfc12 original cfc11 is multiplied by 1.\+385 to account for the 1060-\/1107 $cm^{-1}$ band. \end{DoxyCompactList}\item 
real(kind=kind\+\_\+phys), dimension(ng07, \mbox{\hyperlink{namespacemodule__radlw__kgb07_a0acb84a6b261fc00f1765707844c32f2_a0acb84a6b261fc00f1765707844c32f2}{msa07}}), public \mbox{\hyperlink{namespacemodule__radlw__kgb07_af106cf054f7496a092ceb0c399753a36_af106cf054f7496a092ceb0c399753a36}{absa}}
\begin{DoxyCompactList}\small\item\em the array absa(\+NG07,585) = ka(\+NG07,9,5,13) contains absorption coefs at the NG07=12 g-\/intervals for a range of pressure levels \texorpdfstring{$>$}{>} $\sim$100mb, temperatures, and ratios of water vapor to co2. the first index in the array, js, runs from 1 to 9, and corresponds to different column amount ratios, as expressed through the binary species parameter eta, defined as eta = gas1/(gas1+(rat)$\ast$gas2), where rat is the ratio of the reference mls column amount value of gas1 to that of gas2. the 2nd 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 third index, jp, runs from 1 to 13 and refers to the reference pressure level (e.\+g. jp = 1 is for a pressure of 1053.\+63 mb). the fourth index, ig, goes from 1 to NG07=12, and tells us which g-\/interval the absorption coefficients are for. \end{DoxyCompactList}\item 
real(kind=kind\+\_\+phys), dimension(ng07, \mbox{\hyperlink{namespacemodule__radlw__kgb07_abba2139dfc5d8551f844f3809c28ce3c_abba2139dfc5d8551f844f3809c28ce3c}{msb07}}), public \mbox{\hyperlink{namespacemodule__radlw__kgb07_ab0478438e9bbe64401aa492510f8d4bb_ab0478438e9bbe64401aa492510f8d4bb}{absb}}
\begin{DoxyCompactList}\small\item\em the array absb(\+NG07,235) = kb(\+NG07,5,13\+:59) contains absorption coefs at the NG07=12 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 NG07=12, and tells us which g-\/interval the absorption coefficients are for. \end{DoxyCompactList}\item 
real(kind=kind\+\_\+phys), dimension(ng07, \mbox{\hyperlink{namespacemodule__radlw__kgb07_a9310f33501467fbadcf092d71559358b_a9310f33501467fbadcf092d71559358b}{msf07}}), public \mbox{\hyperlink{namespacemodule__radlw__kgb07_aaf6d41f390a0465af92756b9c3e6c558_aaf6d41f390a0465af92756b9c3e6c558}{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 NG07=12). \end{DoxyCompactList}\item 
real(kind=kind\+\_\+phys), dimension(ng07, \mbox{\hyperlink{namespacemodule__radlw__kgb07_a21ac454fe21fb07ee555b4106121b2ae_a21ac454fe21fb07ee555b4106121b2ae}{maf07}}), public \mbox{\hyperlink{namespacemodule__radlw__kgb07_a07f2a4a0f1152a65aed68623f14a9ae4_a07f2a4a0f1152a65aed68623f14a9ae4}{fracrefa}}
\begin{DoxyCompactList}\small\item\em planck fraction mapping level \+: p = 706.\+27 mb, t = 278.\+94 k \end{DoxyCompactList}\item 
real(kind=kind\+\_\+phys), dimension(ng07), public \mbox{\hyperlink{namespacemodule__radlw__kgb07_aa16eb60406e5a298e380b55af528791a_aa16eb60406e5a298e380b55af528791a}{fracrefb}}
\begin{DoxyCompactList}\small\item\em planck data fraction mapping level \+: p=95.\+58 mbar, t= 215.\+70 k \end{DoxyCompactList}\item 
real(kind=kind\+\_\+phys), dimension(ng07, \mbox{\hyperlink{namespacemodule__radlw__kgb07_a21ac454fe21fb07ee555b4106121b2ae_a21ac454fe21fb07ee555b4106121b2ae}{maf07}}, \mbox{\hyperlink{namespacemodule__radlw__kgb07_a2d176bec938d9fdcc2369fda91308702_a2d176bec938d9fdcc2369fda91308702}{mmc07}}), public \mbox{\hyperlink{namespacemodule__radlw__kgb07_a3fdad494f3d3fcf9306da6a81d97bd43_a3fdad494f3d3fcf9306da6a81d97bd43}{ka\+\_\+mco2}}
\begin{DoxyCompactList}\small\item\em the array ka\+\_\+mxxx contains the absorption coefficient for a minor species at the NG07=12 chosen g-\/values for a reference pressure level below 100$\sim$ mb. the first index in the array, js, runs from 1 to 9, and corresponds to different gas column amount ratios, as expressed through the binary species parameter eta, defined as eta = gas1/(gas1 + (rat) $\ast$ gas2), where rat is the ratio of the reference mls column amount value of gas1 to that of gas2. the second index refers to temperature in 7.\+2 degree increments. for instance, jt = 1 refers to a temperature of 188.\+0, jt = 2 refers to 195.\+2, etc. the third index runs over the g-\/channel (1 to NG07=12). \end{DoxyCompactList}\item 
real(kind=kind\+\_\+phys), dimension(ng07, \mbox{\hyperlink{namespacemodule__radlw__kgb07_a2d176bec938d9fdcc2369fda91308702_a2d176bec938d9fdcc2369fda91308702}{mmc07}}), public \mbox{\hyperlink{namespacemodule__radlw__kgb07_a2dcfbe76332d559cda48c7ba065ab349_a2dcfbe76332d559cda48c7ba065ab349}{kb\+\_\+mco2}}
\begin{DoxyCompactList}\small\item\em the array kb\+\_\+mxxx contains absorption coefficient for a minor species at the NG07=12 chosen g-\/values for a reference pressure level above 100$\sim$ mb. the first index refers to temperature in 7.\+2 degree increments. for instance, jt = 1 refers to a temperature of 188.\+0, jt = 2 refers to 195.\+2, etc. the second index runs over the g-\/channel (1 to NG07=12). \end{DoxyCompactList}\end{DoxyCompactItemize}
\end{Indent}


\doxysubsubsection{Variable Documentation}
\mbox{\Hypertarget{namespacemodule__radlw__kgb07_a0acb84a6b261fc00f1765707844c32f2_a0acb84a6b261fc00f1765707844c32f2}\label{namespacemodule__radlw__kgb07_a0acb84a6b261fc00f1765707844c32f2_a0acb84a6b261fc00f1765707844c32f2}} 
\index{module\_radlw\_kgb07@{module\_radlw\_kgb07}!msa07@{msa07}}
\index{msa07@{msa07}!module\_radlw\_kgb07@{module\_radlw\_kgb07}}
\doxyparagraph{\texorpdfstring{msa07}{msa07}}
{\footnotesize\ttfamily integer, public module\+\_\+radlw\+\_\+kgb07\+::msa07}

\mbox{\Hypertarget{namespacemodule__radlw__kgb07_abba2139dfc5d8551f844f3809c28ce3c_abba2139dfc5d8551f844f3809c28ce3c}\label{namespacemodule__radlw__kgb07_abba2139dfc5d8551f844f3809c28ce3c_abba2139dfc5d8551f844f3809c28ce3c}} 
\index{module\_radlw\_kgb07@{module\_radlw\_kgb07}!msb07@{msb07}}
\index{msb07@{msb07}!module\_radlw\_kgb07@{module\_radlw\_kgb07}}
\doxyparagraph{\texorpdfstring{msb07}{msb07}}
{\footnotesize\ttfamily integer, public module\+\_\+radlw\+\_\+kgb07\+::msb07}

\mbox{\Hypertarget{namespacemodule__radlw__kgb07_a9310f33501467fbadcf092d71559358b_a9310f33501467fbadcf092d71559358b}\label{namespacemodule__radlw__kgb07_a9310f33501467fbadcf092d71559358b_a9310f33501467fbadcf092d71559358b}} 
\index{module\_radlw\_kgb07@{module\_radlw\_kgb07}!msf07@{msf07}}
\index{msf07@{msf07}!module\_radlw\_kgb07@{module\_radlw\_kgb07}}
\doxyparagraph{\texorpdfstring{msf07}{msf07}}
{\footnotesize\ttfamily integer, public module\+\_\+radlw\+\_\+kgb07\+::msf07}

\mbox{\Hypertarget{namespacemodule__radlw__kgb07_a0bd5d550553238ae13cbf57423d102c8_a0bd5d550553238ae13cbf57423d102c8}\label{namespacemodule__radlw__kgb07_a0bd5d550553238ae13cbf57423d102c8_a0bd5d550553238ae13cbf57423d102c8}} 
\index{module\_radlw\_kgb07@{module\_radlw\_kgb07}!mfr07@{mfr07}}
\index{mfr07@{mfr07}!module\_radlw\_kgb07@{module\_radlw\_kgb07}}
\doxyparagraph{\texorpdfstring{mfr07}{mfr07}}
{\footnotesize\ttfamily integer, public module\+\_\+radlw\+\_\+kgb07\+::mfr07}

\mbox{\Hypertarget{namespacemodule__radlw__kgb07_a21ac454fe21fb07ee555b4106121b2ae_a21ac454fe21fb07ee555b4106121b2ae}\label{namespacemodule__radlw__kgb07_a21ac454fe21fb07ee555b4106121b2ae_a21ac454fe21fb07ee555b4106121b2ae}} 
\index{module\_radlw\_kgb07@{module\_radlw\_kgb07}!maf07@{maf07}}
\index{maf07@{maf07}!module\_radlw\_kgb07@{module\_radlw\_kgb07}}
\doxyparagraph{\texorpdfstring{maf07}{maf07}}
{\footnotesize\ttfamily integer, public module\+\_\+radlw\+\_\+kgb07\+::maf07}

\mbox{\Hypertarget{namespacemodule__radlw__kgb07_a2d176bec938d9fdcc2369fda91308702_a2d176bec938d9fdcc2369fda91308702}\label{namespacemodule__radlw__kgb07_a2d176bec938d9fdcc2369fda91308702_a2d176bec938d9fdcc2369fda91308702}} 
\index{module\_radlw\_kgb07@{module\_radlw\_kgb07}!mmc07@{mmc07}}
\index{mmc07@{mmc07}!module\_radlw\_kgb07@{module\_radlw\_kgb07}}
\doxyparagraph{\texorpdfstring{mmc07}{mmc07}}
{\footnotesize\ttfamily integer, public module\+\_\+radlw\+\_\+kgb07\+::mmc07}

\mbox{\Hypertarget{namespacemodule__radlw__kgb07_a43ceef4cb2707a2874c2d59e93ba9791_a43ceef4cb2707a2874c2d59e93ba9791}\label{namespacemodule__radlw__kgb07_a43ceef4cb2707a2874c2d59e93ba9791_a43ceef4cb2707a2874c2d59e93ba9791}} 
\index{module\_radlw\_kgb07@{module\_radlw\_kgb07}!forref@{forref}}
\index{forref@{forref}!module\_radlw\_kgb07@{module\_radlw\_kgb07}}
\doxyparagraph{\texorpdfstring{forref}{forref}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(ng07,\mbox{\hyperlink{namespacemodule__radlw__kgb07_a0bd5d550553238ae13cbf57423d102c8_a0bd5d550553238ae13cbf57423d102c8}{mfr07}}), public module\+\_\+radlw\+\_\+kgb07\+::forref}

\mbox{\Hypertarget{namespacemodule__radlw__kgb07_af106cf054f7496a092ceb0c399753a36_af106cf054f7496a092ceb0c399753a36}\label{namespacemodule__radlw__kgb07_af106cf054f7496a092ceb0c399753a36_af106cf054f7496a092ceb0c399753a36}} 
\index{module\_radlw\_kgb07@{module\_radlw\_kgb07}!absa@{absa}}
\index{absa@{absa}!module\_radlw\_kgb07@{module\_radlw\_kgb07}}
\doxyparagraph{\texorpdfstring{absa}{absa}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(ng07,\mbox{\hyperlink{namespacemodule__radlw__kgb07_a0acb84a6b261fc00f1765707844c32f2_a0acb84a6b261fc00f1765707844c32f2}{msa07}}), public module\+\_\+radlw\+\_\+kgb07\+::absa}

\mbox{\Hypertarget{namespacemodule__radlw__kgb07_ab0478438e9bbe64401aa492510f8d4bb_ab0478438e9bbe64401aa492510f8d4bb}\label{namespacemodule__radlw__kgb07_ab0478438e9bbe64401aa492510f8d4bb_ab0478438e9bbe64401aa492510f8d4bb}} 
\index{module\_radlw\_kgb07@{module\_radlw\_kgb07}!absb@{absb}}
\index{absb@{absb}!module\_radlw\_kgb07@{module\_radlw\_kgb07}}
\doxyparagraph{\texorpdfstring{absb}{absb}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(ng07,\mbox{\hyperlink{namespacemodule__radlw__kgb07_abba2139dfc5d8551f844f3809c28ce3c_abba2139dfc5d8551f844f3809c28ce3c}{msb07}}), public module\+\_\+radlw\+\_\+kgb07\+::absb}

\mbox{\Hypertarget{namespacemodule__radlw__kgb07_aaf6d41f390a0465af92756b9c3e6c558_aaf6d41f390a0465af92756b9c3e6c558}\label{namespacemodule__radlw__kgb07_aaf6d41f390a0465af92756b9c3e6c558_aaf6d41f390a0465af92756b9c3e6c558}} 
\index{module\_radlw\_kgb07@{module\_radlw\_kgb07}!selfref@{selfref}}
\index{selfref@{selfref}!module\_radlw\_kgb07@{module\_radlw\_kgb07}}
\doxyparagraph{\texorpdfstring{selfref}{selfref}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(ng07,\mbox{\hyperlink{namespacemodule__radlw__kgb07_a9310f33501467fbadcf092d71559358b_a9310f33501467fbadcf092d71559358b}{msf07}}), public module\+\_\+radlw\+\_\+kgb07\+::selfref}

\mbox{\Hypertarget{namespacemodule__radlw__kgb07_a07f2a4a0f1152a65aed68623f14a9ae4_a07f2a4a0f1152a65aed68623f14a9ae4}\label{namespacemodule__radlw__kgb07_a07f2a4a0f1152a65aed68623f14a9ae4_a07f2a4a0f1152a65aed68623f14a9ae4}} 
\index{module\_radlw\_kgb07@{module\_radlw\_kgb07}!fracrefa@{fracrefa}}
\index{fracrefa@{fracrefa}!module\_radlw\_kgb07@{module\_radlw\_kgb07}}
\doxyparagraph{\texorpdfstring{fracrefa}{fracrefa}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(ng07,\mbox{\hyperlink{namespacemodule__radlw__kgb07_a21ac454fe21fb07ee555b4106121b2ae_a21ac454fe21fb07ee555b4106121b2ae}{maf07}}), public module\+\_\+radlw\+\_\+kgb07\+::fracrefa}

\mbox{\Hypertarget{namespacemodule__radlw__kgb07_aa16eb60406e5a298e380b55af528791a_aa16eb60406e5a298e380b55af528791a}\label{namespacemodule__radlw__kgb07_aa16eb60406e5a298e380b55af528791a_aa16eb60406e5a298e380b55af528791a}} 
\index{module\_radlw\_kgb07@{module\_radlw\_kgb07}!fracrefb@{fracrefb}}
\index{fracrefb@{fracrefb}!module\_radlw\_kgb07@{module\_radlw\_kgb07}}
\doxyparagraph{\texorpdfstring{fracrefb}{fracrefb}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(ng07), public module\+\_\+radlw\+\_\+kgb07\+::fracrefb}

\mbox{\Hypertarget{namespacemodule__radlw__kgb07_a3fdad494f3d3fcf9306da6a81d97bd43_a3fdad494f3d3fcf9306da6a81d97bd43}\label{namespacemodule__radlw__kgb07_a3fdad494f3d3fcf9306da6a81d97bd43_a3fdad494f3d3fcf9306da6a81d97bd43}} 
\index{module\_radlw\_kgb07@{module\_radlw\_kgb07}!ka\_mco2@{ka\_mco2}}
\index{ka\_mco2@{ka\_mco2}!module\_radlw\_kgb07@{module\_radlw\_kgb07}}
\doxyparagraph{\texorpdfstring{ka\_mco2}{ka\_mco2}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(ng07,\mbox{\hyperlink{namespacemodule__radlw__kgb07_a21ac454fe21fb07ee555b4106121b2ae_a21ac454fe21fb07ee555b4106121b2ae}{maf07}},\mbox{\hyperlink{namespacemodule__radlw__kgb07_a2d176bec938d9fdcc2369fda91308702_a2d176bec938d9fdcc2369fda91308702}{mmc07}}), public module\+\_\+radlw\+\_\+kgb07\+::ka\+\_\+mco2}

\mbox{\Hypertarget{namespacemodule__radlw__kgb07_a2dcfbe76332d559cda48c7ba065ab349_a2dcfbe76332d559cda48c7ba065ab349}\label{namespacemodule__radlw__kgb07_a2dcfbe76332d559cda48c7ba065ab349_a2dcfbe76332d559cda48c7ba065ab349}} 
\index{module\_radlw\_kgb07@{module\_radlw\_kgb07}!kb\_mco2@{kb\_mco2}}
\index{kb\_mco2@{kb\_mco2}!module\_radlw\_kgb07@{module\_radlw\_kgb07}}
\doxyparagraph{\texorpdfstring{kb\_mco2}{kb\_mco2}}
{\footnotesize\ttfamily real (kind=kind\+\_\+phys), dimension(ng07,\mbox{\hyperlink{namespacemodule__radlw__kgb07_a2d176bec938d9fdcc2369fda91308702_a2d176bec938d9fdcc2369fda91308702}{mmc07}}), public module\+\_\+radlw\+\_\+kgb07\+::kb\+\_\+mco2}

