TECLIM
/
PlaSim


			
							123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871
							<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
<title>PUMA: /Users/home/WC/puma/src/ppp.f90 File Reference</title>

<link href="tabs.css" rel="stylesheet" type="text/css"/>
<link href="doxygen.css" rel="stylesheet" type="text/css" />
<link href="navtree.css" rel="stylesheet" type="text/css"/>
<script type="text/javascript" src="jquery.js"></script>
<script type="text/javascript" src="resize.js"></script>
<script type="text/javascript" src="navtree.js"></script>
<script type="text/javascript">
  $(document).ready(initResizable);
</script>
<link href="search/search.css" rel="stylesheet" type="text/css"/>
<script type="text/javascript" src="search/search.js"></script>
<script type="text/javascript">
  $(document).ready(function() { searchBox.OnSelectItem(0); });
</script>

</head>
<body>
<div id="top"><!-- do not remove this div! -->


<div id="titlearea">
<table cellspacing="0" cellpadding="0">
 <tbody>
 <tr style="height: 56px;">
  
  <td id="projectlogo"><img alt="Logo" src="puma103.jpg"/></td>
  
  
  <td style="padding-left: 0.5em;">
   <div id="projectname">PUMA
   &#160;<span id="projectnumber">219</span>
   </div>
   <div id="projectbrief">Portable University Model of the Atmosphere</div>
  </td>
  
  
 </tr>
 </tbody>
</table>
</div>

<!-- Generated by Doxygen 1.7.5.1 -->
<script type="text/javascript">
var searchBox = new SearchBox("searchBox", "search",false,'Search');
</script>
  <div id="navrow1" class="tabs">
    <ul class="tablist">
      <li><a href="index.html"><span>Main&#160;Page</span></a></li>
      <li><a href="annotated.html"><span>Data&#160;Types&#160;List</span></a></li>
      <li class="current"><a href="files.html"><span>Files</span></a></li>
      <li>
        <div id="MSearchBox" class="MSearchBoxInactive">
        <span class="left">
          <img id="MSearchSelect" src="search/mag_sel.png"
               onmouseover="return searchBox.OnSearchSelectShow()"
               onmouseout="return searchBox.OnSearchSelectHide()"
               alt=""/>
          <input type="text" id="MSearchField" value="Search" accesskey="S"
               onfocus="searchBox.OnSearchFieldFocus(true)" 
               onblur="searchBox.OnSearchFieldFocus(false)" 
               onkeyup="searchBox.OnSearchFieldChange(event)"/>
          </span><span class="right">
            <a id="MSearchClose" href="javascript:searchBox.CloseResultsWindow()"><img id="MSearchCloseImg" border="0" src="search/close.png" alt=""/></a>
          </span>
        </div>
      </li>
    </ul>
  </div>
  <div id="navrow2" class="tabs2">
    <ul class="tablist">
      <li><a href="files.html"><span>File&#160;List</span></a></li>
      <li><a href="globals.html"><span>File&#160;Members</span></a></li>
    </ul>
  </div>
</div>
<div id="side-nav" class="ui-resizable side-nav-resizable">
  <div id="nav-tree">
    <div id="nav-tree-contents">
    </div>
  </div>
  <div id="splitbar" style="-moz-user-select:none;" 
       class="ui-resizable-handle">
  </div>
</div>
<script type="text/javascript">
  initNavTree('ppp_8f90.html','');
</script>
<div id="doc-content">
<div class="header">
  <div class="summary">
<a href="#nested-classes">Data Types</a> &#124;
<a href="#func-members">Functions/Subroutines</a>  </div>
  <div class="headertitle">
<div class="title">/Users/home/WC/puma/src/ppp.f90 File Reference</div>  </div>
</div>
<div class="contents">

<p><a href="ppp_8f90_source.html">Go to the source code of this file.</a></p>
<table class="memberdecls">
<tr><td colspan="2"><h2><a name="nested-classes"></a>
Data Types</h2></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">module &#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="classpumamod.html">pumamod</a></td></tr>
<tr><td colspan="2"><h2><a name="func-members"></a>
Functions/Subroutines</h2></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">program&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a4d3d5ecbb97268b3c90454dee07327fe">ppp</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a486bae2289e6e28e652b41555030d3e6">allocate_arrays</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a4b65f4d96e40adbdb96584789e31c413">modify_orography</a> (por)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a7c8f4c3a7e4437cad6804ae0ce847552">modify_ground_temperature</a> (ptgr)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#af163501e7aad4a154d2317e8adbf8414">mkoro</a> (por)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#af9ce54d8de253b6c88bc6b01b3a247a5">mkorog</a> (por)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#afde378004f20ed8741a7e9bcd82cbfe4">prolog</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a51f5938296dd343ce807dbb6d1a16e49">initfd</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a7f841b10d9e4f470513770f91f92c0bc">anomaly_factors</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#ab9365bc6b428500db06eb0a96278de88">read_gan_grid</a> (kread)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a0160f7188865bdf68c170ebafa9e63ba">read_oro_grid</a> (kread)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a874acd25b1eb736cf7273817e3dcbdf8">write_oro</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a9ffa8d77da63780dde165c7f4651592a">write_ps</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#ae20643bdbfabfc228f286eec7a42e944">write_gtc</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a89cf301d11495b03846a06a6b3cb095f">write_gtv</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a2d0d1495a01c220ffb26fc235bcbfc8d">write_vargp2D</a> (zgp, kcode)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a5a952435a8bde10e925935c211aa9c4f">write_vargp3D</a> (zgp, kcode, klev)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#aefdbfd36b330ce29d344d428431119c9">gridpoint</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a6e5d7b2cf5629dbed1ee32fc656595dc">heldsuarez</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a0952e51b37b6196b4f5d85a5cb93c75b">resolution</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a8a75958ca9ba25aeec49db140b483871">readnl</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a00e3481744c3185f0f91d35c101f28e4">set_vertical_grid</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a5087a1dafe7b39d03c6547fde711b55a">initpm</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a57e32ca0b91b99739b892a459ec40953">printparameter</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a2da275fb5e4fcd6df1126d74539963cb">gprofile</a> (ptgr, prgrad, pgpm)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a109d8c58aa308107712782398903ea71">tprofile</a> (ptgr, prof, pgpm)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#adbcdb3579718dc6067a1b2ec4d26e476">ppp_write_i</a> (yvarname, nvals, ivals)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a74276344215789d1e8fdce713dd9cd25">ppp_write_r</a> (yvarname, nvals, pvals)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a76e236098c9f27c53d3a8827d11554cf">yoden</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#aa92d6879772b364173e13521d835895e">printprofile</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a03d027a1b5f735efb9bce2396d5fc2b6">legpri</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#a7780f6c3a813605c014f7da964ff83d2">inilat</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="ppp_8f90.html#aa036704b2d766c3d7b7b48756b972d05">setzt2</a></td></tr>
</table>
<hr/><h2>Function/Subroutine Documentation</h2>
<a class="anchor" id="a486bae2289e6e28e652b41555030d3e6"></a><!-- doxytag: member="ppp.f90::allocate_arrays" ref="a486bae2289e6e28e652b41555030d3e6" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine allocate_arrays </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l00462">462</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a7f841b10d9e4f470513770f91f92c0bc"></a><!-- doxytag: member="ppp.f90::anomaly_factors" ref="a7f841b10d9e4f470513770f91f92c0bc" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine anomaly_factors </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l00744">744</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a2da275fb5e4fcd6df1126d74539963cb"></a><!-- doxytag: member="ppp.f90::gprofile" ref="a2da275fb5e4fcd6df1126d74539963cb" args="(ptgr, prgrad, pgpm)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine gprofile </td>
          <td>(</td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>ptgr</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">, dimension(nlev)&#160;</td>
          <td class="paramname"><em>prgrad</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>pgpm</em>&#160;</td>
        </tr>
        <tr>
          <td></td>
          <td>)</td>
          <td></td><td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l01614">1614</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="aefdbfd36b330ce29d344d428431119c9"></a><!-- doxytag: member="ppp.f90::gridpoint" ref="aefdbfd36b330ce29d344d428431119c9" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine gridpoint </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l01146">1146</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a6e5d7b2cf5629dbed1ee32fc656595dc"></a><!-- doxytag: member="ppp.f90::heldsuarez" ref="a6e5d7b2cf5629dbed1ee32fc656595dc" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine heldsuarez </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l01257">1257</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a7780f6c3a813605c014f7da964ff83d2"></a><!-- doxytag: member="ppp.f90::inilat" ref="a7780f6c3a813605c014f7da964ff83d2" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine inilat </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l01813">1813</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a51f5938296dd343ce807dbb6d1a16e49"></a><!-- doxytag: member="ppp.f90::initfd" ref="a51f5938296dd343ce807dbb6d1a16e49" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine initfd </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l00710">710</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a5087a1dafe7b39d03c6547fde711b55a"></a><!-- doxytag: member="ppp.f90::initpm" ref="a5087a1dafe7b39d03c6547fde711b55a" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine initpm </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l01527">1527</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a03d027a1b5f735efb9bce2396d5fc2b6"></a><!-- doxytag: member="ppp.f90::legpri" ref="a03d027a1b5f735efb9bce2396d5fc2b6" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine legpri </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l01788">1788</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="af163501e7aad4a154d2317e8adbf8414"></a><!-- doxytag: member="ppp.f90::mkoro" ref="af163501e7aad4a154d2317e8adbf8414" args="(por)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mkoro </td>
          <td>(</td>
          <td class="paramtype">real, dimension(nlon,nlat)&#160;</td>
          <td class="paramname"><em>por</em></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l00598">598</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="af9ce54d8de253b6c88bc6b01b3a247a5"></a><!-- doxytag: member="ppp.f90::mkorog" ref="af9ce54d8de253b6c88bc6b01b3a247a5" args="(por)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mkorog </td>
          <td>(</td>
          <td class="paramtype">real, dimension(nlon,nlat)&#160;</td>
          <td class="paramname"><em>por</em></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l00634">634</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a7c8f4c3a7e4437cad6804ae0ce847552"></a><!-- doxytag: member="ppp.f90::modify_ground_temperature" ref="a7c8f4c3a7e4437cad6804ae0ce847552" args="(ptgr)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine modify_ground_temperature </td>
          <td>(</td>
          <td class="paramtype">real, dimension(nlon,nlat)&#160;</td>
          <td class="paramname"><em>ptgr</em></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l00566">566</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a4b65f4d96e40adbdb96584789e31c413"></a><!-- doxytag: member="ppp.f90::modify_orography" ref="a4b65f4d96e40adbdb96584789e31c413" args="(por)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine modify_orography </td>
          <td>(</td>
          <td class="paramtype">real, dimension(nlon,nlat)&#160;</td>
          <td class="paramname"><em>por</em></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l00509">509</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a4d3d5ecbb97268b3c90454dee07327fe"></a><!-- doxytag: member="ppp.f90::ppp" ref="a4d3d5ecbb97268b3c90454dee07327fe" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">program ppp </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l00439">439</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="adbcdb3579718dc6067a1b2ec4d26e476"></a><!-- doxytag: member="ppp.f90::ppp_write_i" ref="adbcdb3579718dc6067a1b2ec4d26e476" args="(yvarname, nvals, ivals)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine ppp_write_i </td>
          <td>(</td>
          <td class="paramtype">character(*)&#160;</td>
          <td class="paramname"><em>yvarname</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">integer&#160;</td>
          <td class="paramname"><em>nvals</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">integer, dimension(nvals)&#160;</td>
          <td class="paramname"><em>ivals</em>&#160;</td>
        </tr>
        <tr>
          <td></td>
          <td>)</td>
          <td></td><td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l01686">1686</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a74276344215789d1e8fdce713dd9cd25"></a><!-- doxytag: member="ppp.f90::ppp_write_r" ref="a74276344215789d1e8fdce713dd9cd25" args="(yvarname, nvals, pvals)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine ppp_write_r </td>
          <td>(</td>
          <td class="paramtype">character(*)&#160;</td>
          <td class="paramname"><em>yvarname</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">integer&#160;</td>
          <td class="paramname"><em>nvals</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">real, dimension(nvals)&#160;</td>
          <td class="paramname"><em>pvals</em>&#160;</td>
        </tr>
        <tr>
          <td></td>
          <td>)</td>
          <td></td><td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l01705">1705</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a57e32ca0b91b99739b892a459ec40953"></a><!-- doxytag: member="ppp.f90::printparameter" ref="a57e32ca0b91b99739b892a459ec40953" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine printparameter </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l01588">1588</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="aa92d6879772b364173e13521d835895e"></a><!-- doxytag: member="ppp.f90::printprofile" ref="aa92d6879772b364173e13521d835895e" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine printprofile </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l01751">1751</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="afde378004f20ed8741a7e9bcd82cbfe4"></a><!-- doxytag: member="ppp.f90::prolog" ref="afde378004f20ed8741a7e9bcd82cbfe4" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine prolog </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l00679">679</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="ab9365bc6b428500db06eb0a96278de88"></a><!-- doxytag: member="ppp.f90::read_gan_grid" ref="ab9365bc6b428500db06eb0a96278de88" args="(kread)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine read_gan_grid </td>
          <td>(</td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>kread</em></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l00783">783</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a0160f7188865bdf68c170ebafa9e63ba"></a><!-- doxytag: member="ppp.f90::read_oro_grid" ref="a0160f7188865bdf68c170ebafa9e63ba" args="(kread)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine read_oro_grid </td>
          <td>(</td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>kread</em></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l00822">822</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a8a75958ca9ba25aeec49db140b483871"></a><!-- doxytag: member="ppp.f90::readnl" ref="a8a75958ca9ba25aeec49db140b483871" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine readnl </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l01367">1367</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a0952e51b37b6196b4f5d85a5cb93c75b"></a><!-- doxytag: member="ppp.f90::resolution" ref="a0952e51b37b6196b4f5d85a5cb93c75b" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine resolution </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l01322">1322</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a00e3481744c3185f0f91d35c101f28e4"></a><!-- doxytag: member="ppp.f90::set_vertical_grid" ref="a00e3481744c3185f0f91d35c101f28e4" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine set_vertical_grid </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l01452">1452</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="aa036704b2d766c3d7b7b48756b972d05"></a><!-- doxytag: member="ppp.f90::setzt2" ref="aa036704b2d766c3d7b7b48756b972d05" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine setzt2 </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l01834">1834</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a109d8c58aa308107712782398903ea71"></a><!-- doxytag: member="ppp.f90::tprofile" ref="a109d8c58aa308107712782398903ea71" args="(ptgr, prof, pgpm)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine tprofile </td>
          <td>(</td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>ptgr</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">, dimension(nlev)&#160;</td>
          <td class="paramname"><em>prof</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>pgpm</em>&#160;</td>
        </tr>
        <tr>
          <td></td>
          <td>)</td>
          <td></td><td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l01643">1643</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="ae20643bdbfabfc228f286eec7a42e944"></a><!-- doxytag: member="ppp.f90::write_gtc" ref="ae20643bdbfabfc228f286eec7a42e944" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine write_gtc </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l00953">953</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a89cf301d11495b03846a06a6b3cb095f"></a><!-- doxytag: member="ppp.f90::write_gtv" ref="a89cf301d11495b03846a06a6b3cb095f" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine write_gtv </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l01001">1001</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a874acd25b1eb736cf7273817e3dcbdf8"></a><!-- doxytag: member="ppp.f90::write_oro" ref="a874acd25b1eb736cf7273817e3dcbdf8" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine write_oro </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l00862">862</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a9ffa8d77da63780dde165c7f4651592a"></a><!-- doxytag: member="ppp.f90::write_ps" ref="a9ffa8d77da63780dde165c7f4651592a" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine write_ps </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l00906">906</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a2d0d1495a01c220ffb26fc235bcbfc8d"></a><!-- doxytag: member="ppp.f90::write_vargp2D" ref="a2d0d1495a01c220ffb26fc235bcbfc8d" args="(zgp, kcode)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine write_vargp2D </td>
          <td>(</td>
          <td class="paramtype">real, dimension(nlon,nlat)&#160;</td>
          <td class="paramname"><em>zgp</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>kcode</em>&#160;</td>
        </tr>
        <tr>
          <td></td>
          <td>)</td>
          <td></td><td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l01047">1047</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a5a952435a8bde10e925935c211aa9c4f"></a><!-- doxytag: member="ppp.f90::write_vargp3D" ref="a5a952435a8bde10e925935c211aa9c4f" args="(zgp, kcode, klev)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine write_vargp3D </td>
          <td>(</td>
          <td class="paramtype">real, dimension(nlon,nlat,klev)&#160;</td>
          <td class="paramname"><em>zgp</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>kcode</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>klev</em>&#160;</td>
        </tr>
        <tr>
          <td></td>
          <td>)</td>
          <td></td><td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l01095">1095</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a76e236098c9f27c53d3a8827d11554cf"></a><!-- doxytag: member="ppp.f90::yoden" ref="a76e236098c9f27c53d3a8827d11554cf" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine yoden </td>
          <td>(</td>
          <td class="paramname"></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="ppp_8f90_source.html#l01724">1724</a> of file <a class="el" href="ppp_8f90_source.html">ppp.f90</a>.</p>

</div>
</div>
</div>
</div>
  <div id="nav-path" class="navpath">
    <ul>
      <li class="navelem"><a class="el" href="ppp_8f90.html">ppp.f90</a>      </li>
<!-- window showing the filter options -->
<div id="MSearchSelectWindow"
     onmouseover="return searchBox.OnSearchSelectShow()"
     onmouseout="return searchBox.OnSearchSelectHide()"
     onkeydown="return searchBox.OnSearchSelectKey(event)">
<a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(0)"><span class="SelectionMark">&#160;</span>All</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(1)"><span class="SelectionMark">&#160;</span>Classes</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(2)"><span class="SelectionMark">&#160;</span>Files</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(3)"><span class="SelectionMark">&#160;</span>Functions</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(4)"><span class="SelectionMark">&#160;</span>Variables</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(5)"><span class="SelectionMark">&#160;</span>Defines</a></div>

<!-- iframe showing the search results (closed by default) -->
<div id="MSearchResultsWindow">
<iframe src="javascript:void(0)" frameborder="0" 
        name="MSearchResults" id="MSearchResults">
</iframe>
</div>


    <li class="footer">Generated on Wed Sep 21 2011 12:35:46 for PUMA by
    <a href="http://www.doxygen.org/index.html">
    <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.7.5.1 </li>
   </ul>
 </div>


</body>
</html>