\hypertarget{legsym_8f90}{ \section{/\-Users/home/\-W\-C/puma/src/legsym.f90 \-File \-Reference} \label{legsym_8f90}\index{/\-Users/home/\-W\-C/puma/src/legsym.\-f90@{/\-Users/home/\-W\-C/puma/src/legsym.\-f90}} } \subsection*{\-Data \-Types} \begin{DoxyCompactItemize} \item module \hyperlink{classlegsym}{legsym} \end{DoxyCompactItemize} \subsection*{\-Functions/\-Subroutines} \begin{DoxyCompactItemize} \item subroutine \hyperlink{legsym_8f90_a86bc436e65d6c4ddde72bb3cce7dc8c8}{legini} (klat, klpp, kesp, klev, vorpla, sid, gwd) \item subroutine \hyperlink{legsym_8f90_a04d46a94caf6c743547ac25cfa3058d4}{fc2sp} (fc, sp) \item subroutine \hyperlink{legsym_8f90_aec404fc15930c6e4584c088a399ea099}{sp2fc} (sp, fc) \item subroutine \hyperlink{legsym_8f90_ac25a3c42ee19118b299203d2747cb59e}{sp2fcdmu} (sp, fc) \item subroutine \hyperlink{legsym_8f90_a581747beee32c3386dfc0b9b1cfa4e0f}{dv2uv\-\_\-alt} (pd, pz, pu, pv) \item subroutine \hyperlink{legsym_8f90_af9cbedf7e87d9d5b2360c204237cc698}{dv2uv} (pd, pz, pu, pv) \item subroutine \hyperlink{legsym_8f90_ab97cf272bad63e9bdd87a01317bb71c9}{mktend} (d, t, z, tn, fu, fv, ke, ut, vt) \item subroutine \hyperlink{legsym_8f90_a4a468562c0549b4ca3ec6ea34f87545a}{reg2alt} (pr, klev) \item subroutine \hyperlink{legsym_8f90_a308819246e409c8dbe1e778d304ef415}{alt2reg} (pa, klev) \item subroutine \hyperlink{legsym_8f90_a6ba5b0b99819bcbad73f2e2eb49c62bb}{altcs} (pcs) \item subroutine \hyperlink{legsym_8f90_ae810767bcafdac840ab48c420efcb49a}{altlat} (pr, klat) \end{DoxyCompactItemize} \subsection{\-Function/\-Subroutine \-Documentation} \hypertarget{legsym_8f90_a308819246e409c8dbe1e778d304ef415}{ \index{legsym.\-f90@{legsym.\-f90}!alt2reg@{alt2reg}} \index{alt2reg@{alt2reg}!legsym.f90@{legsym.\-f90}} \subsubsection[{alt2reg}]{\setlength{\rightskip}{0pt plus 5cm}subroutine alt2reg ( \begin{DoxyParamCaption} \item[{real, dimension(nlon,nlat,klev)}]{pa, } \item[{integer}]{klev} \end{DoxyParamCaption} )}} \label{legsym_8f90_a308819246e409c8dbe1e778d304ef415} \-Definition at line 509 of file legsym.\-f90. \hypertarget{legsym_8f90_a6ba5b0b99819bcbad73f2e2eb49c62bb}{ \index{legsym.\-f90@{legsym.\-f90}!altcs@{altcs}} \index{altcs@{altcs}!legsym.f90@{legsym.\-f90}} \subsubsection[{altcs}]{\setlength{\rightskip}{0pt plus 5cm}subroutine altcs ( \begin{DoxyParamCaption} \item[{real, dimension(nlat,nlev)}]{pcs} \end{DoxyParamCaption} )}} \label{legsym_8f90_a6ba5b0b99819bcbad73f2e2eb49c62bb} \-Definition at line 534 of file legsym.\-f90. \hypertarget{legsym_8f90_ae810767bcafdac840ab48c420efcb49a}{ \index{legsym.\-f90@{legsym.\-f90}!altlat@{altlat}} \index{altlat@{altlat}!legsym.f90@{legsym.\-f90}} \subsubsection[{altlat}]{\setlength{\rightskip}{0pt plus 5cm}subroutine altlat ( \begin{DoxyParamCaption} \item[{real, dimension(klat)}]{pr, } \item[{integer}]{klat} \end{DoxyParamCaption} )}} \label{legsym_8f90_ae810767bcafdac840ab48c420efcb49a} \-Definition at line 556 of file legsym.\-f90. \hypertarget{legsym_8f90_af9cbedf7e87d9d5b2360c204237cc698}{ \index{legsym.\-f90@{legsym.\-f90}!dv2uv@{dv2uv}} \index{dv2uv@{dv2uv}!legsym.f90@{legsym.\-f90}} \subsubsection[{dv2uv}]{\setlength{\rightskip}{0pt plus 5cm}subroutine dv2uv ( \begin{DoxyParamCaption} \item[{real, dimension(2,nesp/2)}]{pd, } \item[{real, dimension(2,nesp/2)}]{pz, } \item[{real, dimension(2,nlon,nhpp)}]{pu, } \item[{real, dimension(2,nlon,nhpp)}]{pv} \end{DoxyParamCaption} )}} \label{legsym_8f90_af9cbedf7e87d9d5b2360c204237cc698} \-Definition at line 318 of file legsym.\-f90. \hypertarget{legsym_8f90_a581747beee32c3386dfc0b9b1cfa4e0f}{ \index{legsym.\-f90@{legsym.\-f90}!dv2uv\-\_\-alt@{dv2uv\-\_\-alt}} \index{dv2uv\-\_\-alt@{dv2uv\-\_\-alt}!legsym.f90@{legsym.\-f90}} \subsubsection[{dv2uv\-\_\-alt}]{\setlength{\rightskip}{0pt plus 5cm}subroutine dv2uv\-\_\-alt ( \begin{DoxyParamCaption} \item[{complex, dimension(nesp/2)}]{pd, } \item[{complex, dimension(nesp/2)}]{pz, } \item[{complex, dimension(nlon,nhpp)}]{pu, } \item[{complex, dimension(nlon,nhpp)}]{pv} \end{DoxyParamCaption} )}} \label{legsym_8f90_a581747beee32c3386dfc0b9b1cfa4e0f} \-Definition at line 269 of file legsym.\-f90. \hypertarget{legsym_8f90_a04d46a94caf6c743547ac25cfa3058d4}{ \index{legsym.\-f90@{legsym.\-f90}!fc2sp@{fc2sp}} \index{fc2sp@{fc2sp}!legsym.f90@{legsym.\-f90}} \subsubsection[{fc2sp}]{\setlength{\rightskip}{0pt plus 5cm}subroutine fc2sp ( \begin{DoxyParamCaption} \item[{complex, dimension(nlon,nhpp), intent(in)}]{fc, } \item[{complex, dimension(nesp/2), intent(out)}]{sp} \end{DoxyParamCaption} )}} \label{legsym_8f90_a04d46a94caf6c743547ac25cfa3058d4} \-Definition at line 164 of file legsym.\-f90. \hypertarget{legsym_8f90_a86bc436e65d6c4ddde72bb3cce7dc8c8}{ \index{legsym.\-f90@{legsym.\-f90}!legini@{legini}} \index{legini@{legini}!legsym.f90@{legsym.\-f90}} \subsubsection[{legini}]{\setlength{\rightskip}{0pt plus 5cm}subroutine legini ( \begin{DoxyParamCaption} \item[{integer}]{klat, } \item[{integer}]{klpp, } \item[{integer}]{kesp, } \item[{integer}]{klev, } \item[{real}]{vorpla, } \item[{real (kind=8), dimension($\ast$)}]{sid, } \item[{real (kind=8), dimension($\ast$)}]{gwd} \end{DoxyParamCaption} )}} \label{legsym_8f90_a86bc436e65d6c4ddde72bb3cce7dc8c8} \-Definition at line 37 of file legsym.\-f90. \hypertarget{legsym_8f90_ab97cf272bad63e9bdd87a01317bb71c9}{ \index{legsym.\-f90@{legsym.\-f90}!mktend@{mktend}} \index{mktend@{mktend}!legsym.f90@{legsym.\-f90}} \subsubsection[{mktend}]{\setlength{\rightskip}{0pt plus 5cm}subroutine mktend ( \begin{DoxyParamCaption} \item[{complex, dimension(nesp/2), intent(out)}]{d, } \item[{complex, dimension(nesp/2), intent(out)}]{t, } \item[{complex, dimension(nesp/2), intent(out)}]{z, } \item[{complex, dimension(nlon,nhpp), intent(in)}]{tn, } \item[{complex, dimension(nlon,nhpp), intent(in)}]{fu, } \item[{complex, dimension(nlon,nhpp), intent(in)}]{fv, } \item[{complex, dimension(nlon,nhpp), intent(in)}]{ke, } \item[{complex, dimension(nlon,nhpp), intent(in)}]{ut, } \item[{complex, dimension(nlon,nhpp), intent(in)}]{vt} \end{DoxyParamCaption} )}} \label{legsym_8f90_ab97cf272bad63e9bdd87a01317bb71c9} \-Definition at line 430 of file legsym.\-f90. \hypertarget{legsym_8f90_a4a468562c0549b4ca3ec6ea34f87545a}{ \index{legsym.\-f90@{legsym.\-f90}!reg2alt@{reg2alt}} \index{reg2alt@{reg2alt}!legsym.f90@{legsym.\-f90}} \subsubsection[{reg2alt}]{\setlength{\rightskip}{0pt plus 5cm}subroutine reg2alt ( \begin{DoxyParamCaption} \item[{real, dimension(nlon,nlat,klev)}]{pr, } \item[{integer}]{klev} \end{DoxyParamCaption} )}} \label{legsym_8f90_a4a468562c0549b4ca3ec6ea34f87545a} \-Definition at line 484 of file legsym.\-f90. \hypertarget{legsym_8f90_aec404fc15930c6e4584c088a399ea099}{ \index{legsym.\-f90@{legsym.\-f90}!sp2fc@{sp2fc}} \index{sp2fc@{sp2fc}!legsym.f90@{legsym.\-f90}} \subsubsection[{sp2fc}]{\setlength{\rightskip}{0pt plus 5cm}subroutine sp2fc ( \begin{DoxyParamCaption} \item[{complex, dimension(ncsp)}]{sp, } \item[{complex, dimension(nlon,nhpp)}]{fc} \end{DoxyParamCaption} )}} \label{legsym_8f90_aec404fc15930c6e4584c088a399ea099} \-Definition at line 194 of file legsym.\-f90. \hypertarget{legsym_8f90_ac25a3c42ee19118b299203d2747cb59e}{ \index{legsym.\-f90@{legsym.\-f90}!sp2fcdmu@{sp2fcdmu}} \index{sp2fcdmu@{sp2fcdmu}!legsym.f90@{legsym.\-f90}} \subsubsection[{sp2fcdmu}]{\setlength{\rightskip}{0pt plus 5cm}subroutine sp2fcdmu ( \begin{DoxyParamCaption} \item[{complex, dimension(ncsp)}]{sp, } \item[{complex, dimension(nlon,nhpp)}]{fc} \end{DoxyParamCaption} )}} \label{legsym_8f90_ac25a3c42ee19118b299203d2747cb59e} \-Definition at line 229 of file legsym.\-f90.