\hypertarget{ppp_8f90}{
\section{/\-Users/home/\-W\-C/puma/src/ppp.f90 \-File \-Reference}
\label{ppp_8f90}\index{/\-Users/home/\-W\-C/puma/src/ppp.\-f90@{/\-Users/home/\-W\-C/puma/src/ppp.\-f90}}
}
\subsection*{\-Data \-Types}
\begin{DoxyCompactItemize}
\item 
module \hyperlink{classpumamod}{pumamod}
\end{DoxyCompactItemize}
\subsection*{\-Functions/\-Subroutines}
\begin{DoxyCompactItemize}
\item 
program \hyperlink{ppp_8f90_a4d3d5ecbb97268b3c90454dee07327fe}{ppp}
\item 
subroutine \hyperlink{ppp_8f90_a486bae2289e6e28e652b41555030d3e6}{allocate\-\_\-arrays}
\item 
subroutine \hyperlink{ppp_8f90_a4b65f4d96e40adbdb96584789e31c413}{modify\-\_\-orography} (por)
\item 
subroutine \hyperlink{ppp_8f90_a7c8f4c3a7e4437cad6804ae0ce847552}{modify\-\_\-ground\-\_\-temperature} (ptgr)
\item 
subroutine \hyperlink{ppp_8f90_af163501e7aad4a154d2317e8adbf8414}{mkoro} (por)
\item 
subroutine \hyperlink{ppp_8f90_af9ce54d8de253b6c88bc6b01b3a247a5}{mkorog} (por)
\item 
subroutine \hyperlink{ppp_8f90_afde378004f20ed8741a7e9bcd82cbfe4}{prolog}
\item 
subroutine \hyperlink{ppp_8f90_a51f5938296dd343ce807dbb6d1a16e49}{initfd}
\item 
subroutine \hyperlink{ppp_8f90_a7f841b10d9e4f470513770f91f92c0bc}{anomaly\-\_\-factors}
\item 
subroutine \hyperlink{ppp_8f90_ab9365bc6b428500db06eb0a96278de88}{read\-\_\-gan\-\_\-grid} (kread)
\item 
subroutine \hyperlink{ppp_8f90_a0160f7188865bdf68c170ebafa9e63ba}{read\-\_\-oro\-\_\-grid} (kread)
\item 
subroutine \hyperlink{ppp_8f90_a874acd25b1eb736cf7273817e3dcbdf8}{write\-\_\-oro}
\item 
subroutine \hyperlink{ppp_8f90_a9ffa8d77da63780dde165c7f4651592a}{write\-\_\-ps}
\item 
subroutine \hyperlink{ppp_8f90_ae20643bdbfabfc228f286eec7a42e944}{write\-\_\-gtc}
\item 
subroutine \hyperlink{ppp_8f90_a89cf301d11495b03846a06a6b3cb095f}{write\-\_\-gtv}
\item 
subroutine \hyperlink{ppp_8f90_a2d0d1495a01c220ffb26fc235bcbfc8d}{write\-\_\-vargp2\-D} (zgp, kcode)
\item 
subroutine \hyperlink{ppp_8f90_a5a952435a8bde10e925935c211aa9c4f}{write\-\_\-vargp3\-D} (zgp, kcode, klev)
\item 
subroutine \hyperlink{ppp_8f90_aefdbfd36b330ce29d344d428431119c9}{gridpoint}
\item 
subroutine \hyperlink{ppp_8f90_a6e5d7b2cf5629dbed1ee32fc656595dc}{heldsuarez}
\item 
subroutine \hyperlink{ppp_8f90_a0952e51b37b6196b4f5d85a5cb93c75b}{resolution}
\item 
subroutine \hyperlink{ppp_8f90_a8a75958ca9ba25aeec49db140b483871}{readnl}
\item 
subroutine \hyperlink{ppp_8f90_a00e3481744c3185f0f91d35c101f28e4}{set\-\_\-vertical\-\_\-grid}
\item 
subroutine \hyperlink{ppp_8f90_a5087a1dafe7b39d03c6547fde711b55a}{initpm}
\item 
subroutine \hyperlink{ppp_8f90_a57e32ca0b91b99739b892a459ec40953}{printparameter}
\item 
subroutine \hyperlink{ppp_8f90_a2da275fb5e4fcd6df1126d74539963cb}{gprofile} (ptgr, prgrad, pgpm)
\item 
subroutine \hyperlink{ppp_8f90_a109d8c58aa308107712782398903ea71}{tprofile} (ptgr, prof, pgpm)
\item 
subroutine \hyperlink{ppp_8f90_adbcdb3579718dc6067a1b2ec4d26e476}{ppp\-\_\-write\-\_\-i} (yvarname, nvals, ivals)
\item 
subroutine \hyperlink{ppp_8f90_a74276344215789d1e8fdce713dd9cd25}{ppp\-\_\-write\-\_\-r} (yvarname, nvals, pvals)
\item 
subroutine \hyperlink{ppp_8f90_a76e236098c9f27c53d3a8827d11554cf}{yoden}
\item 
subroutine \hyperlink{ppp_8f90_aa92d6879772b364173e13521d835895e}{printprofile}
\item 
subroutine \hyperlink{ppp_8f90_a03d027a1b5f735efb9bce2396d5fc2b6}{legpri}
\item 
subroutine \hyperlink{ppp_8f90_a7780f6c3a813605c014f7da964ff83d2}{inilat}
\item 
subroutine \hyperlink{ppp_8f90_aa036704b2d766c3d7b7b48756b972d05}{setzt2}
\end{DoxyCompactItemize}


\subsection{\-Function/\-Subroutine \-Documentation}
\hypertarget{ppp_8f90_a486bae2289e6e28e652b41555030d3e6}{
\index{ppp.\-f90@{ppp.\-f90}!allocate\-\_\-arrays@{allocate\-\_\-arrays}}
\index{allocate\-\_\-arrays@{allocate\-\_\-arrays}!ppp.f90@{ppp.\-f90}}
\subsubsection[{allocate\-\_\-arrays}]{\setlength{\rightskip}{0pt plus 5cm}subroutine allocate\-\_\-arrays (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a486bae2289e6e28e652b41555030d3e6}


\-Definition at line 462 of file ppp.\-f90.

\hypertarget{ppp_8f90_a7f841b10d9e4f470513770f91f92c0bc}{
\index{ppp.\-f90@{ppp.\-f90}!anomaly\-\_\-factors@{anomaly\-\_\-factors}}
\index{anomaly\-\_\-factors@{anomaly\-\_\-factors}!ppp.f90@{ppp.\-f90}}
\subsubsection[{anomaly\-\_\-factors}]{\setlength{\rightskip}{0pt plus 5cm}subroutine anomaly\-\_\-factors (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a7f841b10d9e4f470513770f91f92c0bc}


\-Definition at line 744 of file ppp.\-f90.

\hypertarget{ppp_8f90_a2da275fb5e4fcd6df1126d74539963cb}{
\index{ppp.\-f90@{ppp.\-f90}!gprofile@{gprofile}}
\index{gprofile@{gprofile}!ppp.f90@{ppp.\-f90}}
\subsubsection[{gprofile}]{\setlength{\rightskip}{0pt plus 5cm}subroutine gprofile (
\begin{DoxyParamCaption}
\item[{}]{ptgr, }
\item[{, dimension(nlev)}]{prgrad, }
\item[{}]{pgpm}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a2da275fb5e4fcd6df1126d74539963cb}


\-Definition at line 1614 of file ppp.\-f90.

\hypertarget{ppp_8f90_aefdbfd36b330ce29d344d428431119c9}{
\index{ppp.\-f90@{ppp.\-f90}!gridpoint@{gridpoint}}
\index{gridpoint@{gridpoint}!ppp.f90@{ppp.\-f90}}
\subsubsection[{gridpoint}]{\setlength{\rightskip}{0pt plus 5cm}subroutine gridpoint (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_aefdbfd36b330ce29d344d428431119c9}


\-Definition at line 1146 of file ppp.\-f90.

\hypertarget{ppp_8f90_a6e5d7b2cf5629dbed1ee32fc656595dc}{
\index{ppp.\-f90@{ppp.\-f90}!heldsuarez@{heldsuarez}}
\index{heldsuarez@{heldsuarez}!ppp.f90@{ppp.\-f90}}
\subsubsection[{heldsuarez}]{\setlength{\rightskip}{0pt plus 5cm}subroutine heldsuarez (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a6e5d7b2cf5629dbed1ee32fc656595dc}


\-Definition at line 1257 of file ppp.\-f90.

\hypertarget{ppp_8f90_a7780f6c3a813605c014f7da964ff83d2}{
\index{ppp.\-f90@{ppp.\-f90}!inilat@{inilat}}
\index{inilat@{inilat}!ppp.f90@{ppp.\-f90}}
\subsubsection[{inilat}]{\setlength{\rightskip}{0pt plus 5cm}subroutine inilat (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a7780f6c3a813605c014f7da964ff83d2}


\-Definition at line 1813 of file ppp.\-f90.

\hypertarget{ppp_8f90_a51f5938296dd343ce807dbb6d1a16e49}{
\index{ppp.\-f90@{ppp.\-f90}!initfd@{initfd}}
\index{initfd@{initfd}!ppp.f90@{ppp.\-f90}}
\subsubsection[{initfd}]{\setlength{\rightskip}{0pt plus 5cm}subroutine initfd (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a51f5938296dd343ce807dbb6d1a16e49}


\-Definition at line 710 of file ppp.\-f90.

\hypertarget{ppp_8f90_a5087a1dafe7b39d03c6547fde711b55a}{
\index{ppp.\-f90@{ppp.\-f90}!initpm@{initpm}}
\index{initpm@{initpm}!ppp.f90@{ppp.\-f90}}
\subsubsection[{initpm}]{\setlength{\rightskip}{0pt plus 5cm}subroutine initpm (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a5087a1dafe7b39d03c6547fde711b55a}


\-Definition at line 1527 of file ppp.\-f90.

\hypertarget{ppp_8f90_a03d027a1b5f735efb9bce2396d5fc2b6}{
\index{ppp.\-f90@{ppp.\-f90}!legpri@{legpri}}
\index{legpri@{legpri}!ppp.f90@{ppp.\-f90}}
\subsubsection[{legpri}]{\setlength{\rightskip}{0pt plus 5cm}subroutine legpri (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a03d027a1b5f735efb9bce2396d5fc2b6}


\-Definition at line 1788 of file ppp.\-f90.

\hypertarget{ppp_8f90_af163501e7aad4a154d2317e8adbf8414}{
\index{ppp.\-f90@{ppp.\-f90}!mkoro@{mkoro}}
\index{mkoro@{mkoro}!ppp.f90@{ppp.\-f90}}
\subsubsection[{mkoro}]{\setlength{\rightskip}{0pt plus 5cm}subroutine mkoro (
\begin{DoxyParamCaption}
\item[{real, dimension(nlon,nlat)}]{por}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_af163501e7aad4a154d2317e8adbf8414}


\-Definition at line 598 of file ppp.\-f90.

\hypertarget{ppp_8f90_af9ce54d8de253b6c88bc6b01b3a247a5}{
\index{ppp.\-f90@{ppp.\-f90}!mkorog@{mkorog}}
\index{mkorog@{mkorog}!ppp.f90@{ppp.\-f90}}
\subsubsection[{mkorog}]{\setlength{\rightskip}{0pt plus 5cm}subroutine mkorog (
\begin{DoxyParamCaption}
\item[{real, dimension(nlon,nlat)}]{por}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_af9ce54d8de253b6c88bc6b01b3a247a5}


\-Definition at line 634 of file ppp.\-f90.

\hypertarget{ppp_8f90_a7c8f4c3a7e4437cad6804ae0ce847552}{
\index{ppp.\-f90@{ppp.\-f90}!modify\-\_\-ground\-\_\-temperature@{modify\-\_\-ground\-\_\-temperature}}
\index{modify\-\_\-ground\-\_\-temperature@{modify\-\_\-ground\-\_\-temperature}!ppp.f90@{ppp.\-f90}}
\subsubsection[{modify\-\_\-ground\-\_\-temperature}]{\setlength{\rightskip}{0pt plus 5cm}subroutine modify\-\_\-ground\-\_\-temperature (
\begin{DoxyParamCaption}
\item[{real, dimension(nlon,nlat)}]{ptgr}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a7c8f4c3a7e4437cad6804ae0ce847552}


\-Definition at line 566 of file ppp.\-f90.

\hypertarget{ppp_8f90_a4b65f4d96e40adbdb96584789e31c413}{
\index{ppp.\-f90@{ppp.\-f90}!modify\-\_\-orography@{modify\-\_\-orography}}
\index{modify\-\_\-orography@{modify\-\_\-orography}!ppp.f90@{ppp.\-f90}}
\subsubsection[{modify\-\_\-orography}]{\setlength{\rightskip}{0pt plus 5cm}subroutine modify\-\_\-orography (
\begin{DoxyParamCaption}
\item[{real, dimension(nlon,nlat)}]{por}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a4b65f4d96e40adbdb96584789e31c413}


\-Definition at line 509 of file ppp.\-f90.

\hypertarget{ppp_8f90_a4d3d5ecbb97268b3c90454dee07327fe}{
\index{ppp.\-f90@{ppp.\-f90}!ppp@{ppp}}
\index{ppp@{ppp}!ppp.f90@{ppp.\-f90}}
\subsubsection[{ppp}]{\setlength{\rightskip}{0pt plus 5cm}program ppp (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a4d3d5ecbb97268b3c90454dee07327fe}


\-Definition at line 439 of file ppp.\-f90.

\hypertarget{ppp_8f90_adbcdb3579718dc6067a1b2ec4d26e476}{
\index{ppp.\-f90@{ppp.\-f90}!ppp\-\_\-write\-\_\-i@{ppp\-\_\-write\-\_\-i}}
\index{ppp\-\_\-write\-\_\-i@{ppp\-\_\-write\-\_\-i}!ppp.f90@{ppp.\-f90}}
\subsubsection[{ppp\-\_\-write\-\_\-i}]{\setlength{\rightskip}{0pt plus 5cm}subroutine ppp\-\_\-write\-\_\-i (
\begin{DoxyParamCaption}
\item[{character($\ast$)}]{yvarname, }
\item[{integer}]{nvals, }
\item[{integer, dimension(nvals)}]{ivals}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_adbcdb3579718dc6067a1b2ec4d26e476}


\-Definition at line 1686 of file ppp.\-f90.

\hypertarget{ppp_8f90_a74276344215789d1e8fdce713dd9cd25}{
\index{ppp.\-f90@{ppp.\-f90}!ppp\-\_\-write\-\_\-r@{ppp\-\_\-write\-\_\-r}}
\index{ppp\-\_\-write\-\_\-r@{ppp\-\_\-write\-\_\-r}!ppp.f90@{ppp.\-f90}}
\subsubsection[{ppp\-\_\-write\-\_\-r}]{\setlength{\rightskip}{0pt plus 5cm}subroutine ppp\-\_\-write\-\_\-r (
\begin{DoxyParamCaption}
\item[{character($\ast$)}]{yvarname, }
\item[{integer}]{nvals, }
\item[{real, dimension(nvals)}]{pvals}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a74276344215789d1e8fdce713dd9cd25}


\-Definition at line 1705 of file ppp.\-f90.

\hypertarget{ppp_8f90_a57e32ca0b91b99739b892a459ec40953}{
\index{ppp.\-f90@{ppp.\-f90}!printparameter@{printparameter}}
\index{printparameter@{printparameter}!ppp.f90@{ppp.\-f90}}
\subsubsection[{printparameter}]{\setlength{\rightskip}{0pt plus 5cm}subroutine printparameter (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a57e32ca0b91b99739b892a459ec40953}


\-Definition at line 1588 of file ppp.\-f90.

\hypertarget{ppp_8f90_aa92d6879772b364173e13521d835895e}{
\index{ppp.\-f90@{ppp.\-f90}!printprofile@{printprofile}}
\index{printprofile@{printprofile}!ppp.f90@{ppp.\-f90}}
\subsubsection[{printprofile}]{\setlength{\rightskip}{0pt plus 5cm}subroutine printprofile (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_aa92d6879772b364173e13521d835895e}


\-Definition at line 1751 of file ppp.\-f90.

\hypertarget{ppp_8f90_afde378004f20ed8741a7e9bcd82cbfe4}{
\index{ppp.\-f90@{ppp.\-f90}!prolog@{prolog}}
\index{prolog@{prolog}!ppp.f90@{ppp.\-f90}}
\subsubsection[{prolog}]{\setlength{\rightskip}{0pt plus 5cm}subroutine prolog (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_afde378004f20ed8741a7e9bcd82cbfe4}


\-Definition at line 679 of file ppp.\-f90.

\hypertarget{ppp_8f90_ab9365bc6b428500db06eb0a96278de88}{
\index{ppp.\-f90@{ppp.\-f90}!read\-\_\-gan\-\_\-grid@{read\-\_\-gan\-\_\-grid}}
\index{read\-\_\-gan\-\_\-grid@{read\-\_\-gan\-\_\-grid}!ppp.f90@{ppp.\-f90}}
\subsubsection[{read\-\_\-gan\-\_\-grid}]{\setlength{\rightskip}{0pt plus 5cm}subroutine read\-\_\-gan\-\_\-grid (
\begin{DoxyParamCaption}
\item[{}]{kread}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_ab9365bc6b428500db06eb0a96278de88}


\-Definition at line 783 of file ppp.\-f90.

\hypertarget{ppp_8f90_a0160f7188865bdf68c170ebafa9e63ba}{
\index{ppp.\-f90@{ppp.\-f90}!read\-\_\-oro\-\_\-grid@{read\-\_\-oro\-\_\-grid}}
\index{read\-\_\-oro\-\_\-grid@{read\-\_\-oro\-\_\-grid}!ppp.f90@{ppp.\-f90}}
\subsubsection[{read\-\_\-oro\-\_\-grid}]{\setlength{\rightskip}{0pt plus 5cm}subroutine read\-\_\-oro\-\_\-grid (
\begin{DoxyParamCaption}
\item[{}]{kread}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a0160f7188865bdf68c170ebafa9e63ba}


\-Definition at line 822 of file ppp.\-f90.

\hypertarget{ppp_8f90_a8a75958ca9ba25aeec49db140b483871}{
\index{ppp.\-f90@{ppp.\-f90}!readnl@{readnl}}
\index{readnl@{readnl}!ppp.f90@{ppp.\-f90}}
\subsubsection[{readnl}]{\setlength{\rightskip}{0pt plus 5cm}subroutine readnl (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a8a75958ca9ba25aeec49db140b483871}


\-Definition at line 1367 of file ppp.\-f90.

\hypertarget{ppp_8f90_a0952e51b37b6196b4f5d85a5cb93c75b}{
\index{ppp.\-f90@{ppp.\-f90}!resolution@{resolution}}
\index{resolution@{resolution}!ppp.f90@{ppp.\-f90}}
\subsubsection[{resolution}]{\setlength{\rightskip}{0pt plus 5cm}subroutine resolution (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a0952e51b37b6196b4f5d85a5cb93c75b}


\-Definition at line 1322 of file ppp.\-f90.

\hypertarget{ppp_8f90_a00e3481744c3185f0f91d35c101f28e4}{
\index{ppp.\-f90@{ppp.\-f90}!set\-\_\-vertical\-\_\-grid@{set\-\_\-vertical\-\_\-grid}}
\index{set\-\_\-vertical\-\_\-grid@{set\-\_\-vertical\-\_\-grid}!ppp.f90@{ppp.\-f90}}
\subsubsection[{set\-\_\-vertical\-\_\-grid}]{\setlength{\rightskip}{0pt plus 5cm}subroutine set\-\_\-vertical\-\_\-grid (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a00e3481744c3185f0f91d35c101f28e4}


\-Definition at line 1452 of file ppp.\-f90.

\hypertarget{ppp_8f90_aa036704b2d766c3d7b7b48756b972d05}{
\index{ppp.\-f90@{ppp.\-f90}!setzt2@{setzt2}}
\index{setzt2@{setzt2}!ppp.f90@{ppp.\-f90}}
\subsubsection[{setzt2}]{\setlength{\rightskip}{0pt plus 5cm}subroutine setzt2 (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_aa036704b2d766c3d7b7b48756b972d05}


\-Definition at line 1834 of file ppp.\-f90.

\hypertarget{ppp_8f90_a109d8c58aa308107712782398903ea71}{
\index{ppp.\-f90@{ppp.\-f90}!tprofile@{tprofile}}
\index{tprofile@{tprofile}!ppp.f90@{ppp.\-f90}}
\subsubsection[{tprofile}]{\setlength{\rightskip}{0pt plus 5cm}subroutine tprofile (
\begin{DoxyParamCaption}
\item[{}]{ptgr, }
\item[{, dimension(nlev)}]{prof, }
\item[{}]{pgpm}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a109d8c58aa308107712782398903ea71}


\-Definition at line 1643 of file ppp.\-f90.

\hypertarget{ppp_8f90_ae20643bdbfabfc228f286eec7a42e944}{
\index{ppp.\-f90@{ppp.\-f90}!write\-\_\-gtc@{write\-\_\-gtc}}
\index{write\-\_\-gtc@{write\-\_\-gtc}!ppp.f90@{ppp.\-f90}}
\subsubsection[{write\-\_\-gtc}]{\setlength{\rightskip}{0pt plus 5cm}subroutine write\-\_\-gtc (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_ae20643bdbfabfc228f286eec7a42e944}


\-Definition at line 953 of file ppp.\-f90.

\hypertarget{ppp_8f90_a89cf301d11495b03846a06a6b3cb095f}{
\index{ppp.\-f90@{ppp.\-f90}!write\-\_\-gtv@{write\-\_\-gtv}}
\index{write\-\_\-gtv@{write\-\_\-gtv}!ppp.f90@{ppp.\-f90}}
\subsubsection[{write\-\_\-gtv}]{\setlength{\rightskip}{0pt plus 5cm}subroutine write\-\_\-gtv (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a89cf301d11495b03846a06a6b3cb095f}


\-Definition at line 1001 of file ppp.\-f90.

\hypertarget{ppp_8f90_a874acd25b1eb736cf7273817e3dcbdf8}{
\index{ppp.\-f90@{ppp.\-f90}!write\-\_\-oro@{write\-\_\-oro}}
\index{write\-\_\-oro@{write\-\_\-oro}!ppp.f90@{ppp.\-f90}}
\subsubsection[{write\-\_\-oro}]{\setlength{\rightskip}{0pt plus 5cm}subroutine write\-\_\-oro (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a874acd25b1eb736cf7273817e3dcbdf8}


\-Definition at line 862 of file ppp.\-f90.

\hypertarget{ppp_8f90_a9ffa8d77da63780dde165c7f4651592a}{
\index{ppp.\-f90@{ppp.\-f90}!write\-\_\-ps@{write\-\_\-ps}}
\index{write\-\_\-ps@{write\-\_\-ps}!ppp.f90@{ppp.\-f90}}
\subsubsection[{write\-\_\-ps}]{\setlength{\rightskip}{0pt plus 5cm}subroutine write\-\_\-ps (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a9ffa8d77da63780dde165c7f4651592a}


\-Definition at line 906 of file ppp.\-f90.

\hypertarget{ppp_8f90_a2d0d1495a01c220ffb26fc235bcbfc8d}{
\index{ppp.\-f90@{ppp.\-f90}!write\-\_\-vargp2\-D@{write\-\_\-vargp2\-D}}
\index{write\-\_\-vargp2\-D@{write\-\_\-vargp2\-D}!ppp.f90@{ppp.\-f90}}
\subsubsection[{write\-\_\-vargp2\-D}]{\setlength{\rightskip}{0pt plus 5cm}subroutine write\-\_\-vargp2\-D (
\begin{DoxyParamCaption}
\item[{real, dimension(nlon,nlat)}]{zgp, }
\item[{}]{kcode}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a2d0d1495a01c220ffb26fc235bcbfc8d}


\-Definition at line 1047 of file ppp.\-f90.

\hypertarget{ppp_8f90_a5a952435a8bde10e925935c211aa9c4f}{
\index{ppp.\-f90@{ppp.\-f90}!write\-\_\-vargp3\-D@{write\-\_\-vargp3\-D}}
\index{write\-\_\-vargp3\-D@{write\-\_\-vargp3\-D}!ppp.f90@{ppp.\-f90}}
\subsubsection[{write\-\_\-vargp3\-D}]{\setlength{\rightskip}{0pt plus 5cm}subroutine write\-\_\-vargp3\-D (
\begin{DoxyParamCaption}
\item[{real, dimension(nlon,nlat,klev)}]{zgp, }
\item[{}]{kcode, }
\item[{}]{klev}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a5a952435a8bde10e925935c211aa9c4f}


\-Definition at line 1095 of file ppp.\-f90.

\hypertarget{ppp_8f90_a76e236098c9f27c53d3a8827d11554cf}{
\index{ppp.\-f90@{ppp.\-f90}!yoden@{yoden}}
\index{yoden@{yoden}!ppp.f90@{ppp.\-f90}}
\subsubsection[{yoden}]{\setlength{\rightskip}{0pt plus 5cm}subroutine yoden (
\begin{DoxyParamCaption}
{}
\end{DoxyParamCaption}
)}}
\label{ppp_8f90_a76e236098c9f27c53d3a8827d11554cf}


\-Definition at line 1724 of file ppp.\-f90.