TECLIM
/
PlaSim


			
							123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305
							<!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/mpimod_stub.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('mpimod__stub_8f90.html','');
</script>
<div id="doc-content">
<div class="header">
  <div class="summary">
<a href="#func-members">Functions/Subroutines</a>  </div>
  <div class="headertitle">
<div class="title">/Users/home/WC/puma/src/mpimod_stub.f90 File Reference</div>  </div>
</div>
<div class="contents">

<p><a href="mpimod__stub_8f90_source.html">Go to the source code of this file.</a></p>
<table class="memberdecls">
<tr><td colspan="2"><h2><a name="func-members"></a>
Functions/Subroutines</h2></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#acb4a2403b5f65a70e7e5ff01ea4577f7">mrdimensions</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#af3212261e3ce775f26d09859c337b760">mrdiff</a> (p, d, n)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#a5d2bb9cfe68e5feb6de6b359f04398e3">mrsum</a> (k)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#ab1311e17e35732047db4b93e1bb6c984">mrbci</a> (k)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#a89982355acc98319bfc191dab28da805">mpbci</a> (k)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#a85cfae5acde5c37604edf690e9c2f7cf">mpbcin</a> (k, n)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#aded092db7f8071a727e2e96887702ca7">mpbcr</a> (p)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#af2a0a009162180d4abb1daa1bad60cf2">mpbcrn</a> (p, n)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#a40b910e38273e7f3c9dc4ed36d3e67a0">mpbcl</a> (k)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#a8338d8609afcefbb1faa41f353c10ef9">mpscin</a> (k, n)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#a1504cf64a1ffc198a8a1fe54ba00d775">mpscrn</a> (p, n)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#a3d2a5d231fd9527bcbc1fde327326922">mpscdn</a> (p, n)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#a0c5adf4e8c7e39cf5a1038a1d34ebf30">mpscsp</a> (pf, pp, klev)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#ac66e76c6144dfeadbc03bc5817553250">mpscgp</a> (pf, pp, klev)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#ac053a575b1230f8e4a296164dba5ab27">mpgasp</a> (pf, pp, klev)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#aaa1210298789f4fd7b7702c276eb80a9">mpgagp</a> (pf, pp, klev)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#a5aef7e33503e0c46b1d8c0b984c398d1">mpgacs</a> (pcs)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#a54cf45feb57177de8eaab2e6b01a7aa2">mpgallsp</a> (pf, pp, klev)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#af894efd9525c935f22415e017dcbc482">mpsum</a> (psp, klev)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#a75a681a8d4b9ab5ba0d4fa97f909647b">mpsumsc</a> (psf, psp, klev)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#af2111ef6d5b772479a74e94d351440f0">mpsumr</a> (pr, kdim)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#ad703e6ecd123e9b8280322e402d57d20">mpsumbcr</a> (pr, kdim)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#a41bbd9334a3d0412c73399d699bbb237">mpstart</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#ac80e83b9bc0a4b459fed5f3b79cfafa0">mpstop</a></td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#a4aceba15459fefd864a0ed3313b0073d">mpreadsp</a> (ktape, p, kdim, klev)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#a463456bde27045e2cf286e6e6082b9aa">mpreadgp</a> (ktape, p, kdim, klev)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#aca5ad2279542f783c1d862333da96744">mpwritesp</a> (ktape, p, kdim, klev)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#a3e3ab4b6cd8d7863f7bfc0e74b370488">mpwritegp</a> (ktape, p, kdim, klev)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#a325e1b8f8412b422a06fb7558f212f7e">mpwritegph</a> (ktape, p, kdim, klev, ihead)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#acb4faf87d9aa8c0bfc86d75f261989c5">mpi_info</a> (nprocess, pid)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#acf82ae878fff75151cab59cdd0925ae0">mpgetsp</a> (yn, p, kdim, klev)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#a58d54c2e0590e63a7459417831afe5cf">mpgetgp</a> (yn, p, kdim, klev)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#a79c341b7b52bf44470898581072660b8">mpputsp</a> (yn, p, kdim, klev)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#a7e675330db7b46cf0bf0cc8edd2d413c">mpputgp</a> (yn, p, kdim, klev)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#a1b6ac2b98059a43359ac0edfeb9c2ad7">mpmaxval</a> (p, kdim, klev, pmax)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod__stub_8f90.html#ac1dfb34daad89cf72ff04b6a58919b2b">mpsumval</a> (p, kdim, klev, psum)</td></tr>
</table>
<hr/><h2>Function/Subroutine Documentation</h2>
<a class="anchor" id="a89982355acc98319bfc191dab28da805"></a><!-- doxytag: member="mpimod_stub.f90::mpbci" ref="a89982355acc98319bfc191dab28da805" args="(k)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpbci </td>
          <td>(</td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>k</em></td><td>)</td>
          <td></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>Definition at line <a class="el" href="mpimod__stub_8f90_source.html#l00028">28</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a85cfae5acde5c37604edf690e9c2f7cf"></a><!-- doxytag: member="mpimod_stub.f90::mpbcin" ref="a85cfae5acde5c37604edf690e9c2f7cf" args="(k, n)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpbcin </td>
          <td>(</td>
          <td class="paramtype">integer, dimension(n)&#160;</td>
          <td class="paramname"><em>k</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>n</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="mpimod__stub_8f90_source.html#l00032">32</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

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

<p>Definition at line <a class="el" href="mpimod__stub_8f90_source.html#l00046">46</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

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

<p>Definition at line <a class="el" href="mpimod__stub_8f90_source.html#l00037">37</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="af2a0a009162180d4abb1daa1bad60cf2"></a><!-- doxytag: member="mpimod_stub.f90::mpbcrn" ref="af2a0a009162180d4abb1daa1bad60cf2" args="(p, n)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpbcrn </td>
          <td>(</td>
          <td class="paramtype">real, dimension(n)&#160;</td>
          <td class="paramname"><em>p</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>n</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="mpimod__stub_8f90_source.html#l00041">41</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

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

<p>Definition at line <a class="el" href="mpimod__stub_8f90_source.html#l00098">98</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="aaa1210298789f4fd7b7702c276eb80a9"></a><!-- doxytag: member="mpimod_stub.f90::mpgagp" ref="aaa1210298789f4fd7b7702c276eb80a9" args="(pf, pp, klev)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpgagp </td>
          <td>(</td>
          <td class="paramtype">real, dimension(nhor,klev)&#160;</td>
          <td class="paramname"><em>pf</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">real, dimension(nhor,klev)&#160;</td>
          <td class="paramname"><em>pp</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="mpimod__stub_8f90_source.html#l00090">90</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a54cf45feb57177de8eaab2e6b01a7aa2"></a><!-- doxytag: member="mpimod_stub.f90::mpgallsp" ref="a54cf45feb57177de8eaab2e6b01a7aa2" args="(pf, pp, klev)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpgallsp </td>
          <td>(</td>
          <td class="paramtype">real, dimension(nesp,klev)&#160;</td>
          <td class="paramname"><em>pf</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">real, dimension(nspp,klev)&#160;</td>
          <td class="paramname"><em>pp</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="mpimod__stub_8f90_source.html#l00102">102</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="ac053a575b1230f8e4a296164dba5ab27"></a><!-- doxytag: member="mpimod_stub.f90::mpgasp" ref="ac053a575b1230f8e4a296164dba5ab27" args="(pf, pp, klev)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpgasp </td>
          <td>(</td>
          <td class="paramtype">real, dimension(nesp,klev)&#160;</td>
          <td class="paramname"><em>pf</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">real, dimension(nspp,klev)&#160;</td>
          <td class="paramname"><em>pp</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="mpimod__stub_8f90_source.html#l00082">82</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a58d54c2e0590e63a7459417831afe5cf"></a><!-- doxytag: member="mpimod_stub.f90::mpgetgp" ref="a58d54c2e0590e63a7459417831afe5cf" args="(yn, p, kdim, klev)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpgetgp </td>
          <td>(</td>
          <td class="paramtype">character (len=*)&#160;</td>
          <td class="paramname"><em>yn</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">real, dimension(kdim,klev)&#160;</td>
          <td class="paramname"><em>p</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>kdim</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="mpimod__stub_8f90_source.html#l00190">190</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="acf82ae878fff75151cab59cdd0925ae0"></a><!-- doxytag: member="mpimod_stub.f90::mpgetsp" ref="acf82ae878fff75151cab59cdd0925ae0" args="(yn, p, kdim, klev)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpgetsp </td>
          <td>(</td>
          <td class="paramtype">character (len=*)&#160;</td>
          <td class="paramname"><em>yn</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">real, dimension(kdim,klev)&#160;</td>
          <td class="paramname"><em>p</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>kdim</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="mpimod__stub_8f90_source.html#l00182">182</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="acb4faf87d9aa8c0bfc86d75f261989c5"></a><!-- doxytag: member="mpimod_stub.f90::mpi_info" ref="acb4faf87d9aa8c0bfc86d75f261989c5" args="(nprocess, pid)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpi_info </td>
          <td>(</td>
          <td class="paramtype">integer&#160;</td>
          <td class="paramname"><em>nprocess</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">integer&#160;</td>
          <td class="paramname"><em>pid</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="mpimod__stub_8f90_source.html#l00174">174</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a1b6ac2b98059a43359ac0edfeb9c2ad7"></a><!-- doxytag: member="mpimod_stub.f90::mpmaxval" ref="a1b6ac2b98059a43359ac0edfeb9c2ad7" args="(p, kdim, klev, pmax)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpmaxval </td>
          <td>(</td>
          <td class="paramtype">real, dimension(kdim,klev)&#160;</td>
          <td class="paramname"><em>p</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>kdim</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>klev</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>pmax</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="mpimod__stub_8f90_source.html#l00238">238</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a7e675330db7b46cf0bf0cc8edd2d413c"></a><!-- doxytag: member="mpimod_stub.f90::mpputgp" ref="a7e675330db7b46cf0bf0cc8edd2d413c" args="(yn, p, kdim, klev)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpputgp </td>
          <td>(</td>
          <td class="paramtype">character (len=*)&#160;</td>
          <td class="paramname"><em>yn</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">real, dimension(kdim,klev)&#160;</td>
          <td class="paramname"><em>p</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>kdim</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="mpimod__stub_8f90_source.html#l00206">206</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a79c341b7b52bf44470898581072660b8"></a><!-- doxytag: member="mpimod_stub.f90::mpputsp" ref="a79c341b7b52bf44470898581072660b8" args="(yn, p, kdim, klev)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpputsp </td>
          <td>(</td>
          <td class="paramtype">character (len=*)&#160;</td>
          <td class="paramname"><em>yn</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">real, dimension(kdim,klev)&#160;</td>
          <td class="paramname"><em>p</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>kdim</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="mpimod__stub_8f90_source.html#l00198">198</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a463456bde27045e2cf286e6e6082b9aa"></a><!-- doxytag: member="mpimod_stub.f90::mpreadgp" ref="a463456bde27045e2cf286e6e6082b9aa" args="(ktape, p, kdim, klev)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpreadgp </td>
          <td>(</td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>ktape</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">real, dimension(kdim,klev)&#160;</td>
          <td class="paramname"><em>p</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>kdim</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="mpimod__stub_8f90_source.html#l00146">146</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a4aceba15459fefd864a0ed3313b0073d"></a><!-- doxytag: member="mpimod_stub.f90::mpreadsp" ref="a4aceba15459fefd864a0ed3313b0073d" args="(ktape, p, kdim, klev)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpreadsp </td>
          <td>(</td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>ktape</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">real, dimension(kdim,klev)&#160;</td>
          <td class="paramname"><em>p</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>kdim</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="mpimod__stub_8f90_source.html#l00140">140</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a3d2a5d231fd9527bcbc1fde327326922"></a><!-- doxytag: member="mpimod_stub.f90::mpscdn" ref="a3d2a5d231fd9527bcbc1fde327326922" args="(p, n)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpscdn </td>
          <td>(</td>
          <td class="paramtype">real (kind=8), dimension(n)&#160;</td>
          <td class="paramname"><em>p</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>n</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="mpimod__stub_8f90_source.html#l00061">61</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="ac66e76c6144dfeadbc03bc5817553250"></a><!-- doxytag: member="mpimod_stub.f90::mpscgp" ref="ac66e76c6144dfeadbc03bc5817553250" args="(pf, pp, klev)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpscgp </td>
          <td>(</td>
          <td class="paramtype">real, dimension(nlon*nlat,klev)&#160;</td>
          <td class="paramname"><em>pf</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">real, dimension(nhor,klev)&#160;</td>
          <td class="paramname"><em>pp</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="mpimod__stub_8f90_source.html#l00074">74</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a8338d8609afcefbb1faa41f353c10ef9"></a><!-- doxytag: member="mpimod_stub.f90::mpscin" ref="a8338d8609afcefbb1faa41f353c10ef9" args="(k, n)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpscin </td>
          <td>(</td>
          <td class="paramtype">integer, dimension(n)&#160;</td>
          <td class="paramname"><em>k</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>n</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="mpimod__stub_8f90_source.html#l00051">51</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a1504cf64a1ffc198a8a1fe54ba00d775"></a><!-- doxytag: member="mpimod_stub.f90::mpscrn" ref="a1504cf64a1ffc198a8a1fe54ba00d775" args="(p, n)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpscrn </td>
          <td>(</td>
          <td class="paramtype">real, dimension(n)&#160;</td>
          <td class="paramname"><em>p</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>n</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="mpimod__stub_8f90_source.html#l00056">56</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a0c5adf4e8c7e39cf5a1038a1d34ebf30"></a><!-- doxytag: member="mpimod_stub.f90::mpscsp" ref="a0c5adf4e8c7e39cf5a1038a1d34ebf30" args="(pf, pp, klev)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpscsp </td>
          <td>(</td>
          <td class="paramtype">real, dimension(nesp,klev)&#160;</td>
          <td class="paramname"><em>pf</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">real, dimension(nspp,klev)&#160;</td>
          <td class="paramname"><em>pp</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="mpimod__stub_8f90_source.html#l00066">66</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a41bbd9334a3d0412c73399d699bbb237"></a><!-- doxytag: member="mpimod_stub.f90::mpstart" ref="a41bbd9334a3d0412c73399d699bbb237" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpstart </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="mpimod__stub_8f90_source.html#l00130">130</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="ac80e83b9bc0a4b459fed5f3b79cfafa0"></a><!-- doxytag: member="mpimod_stub.f90::mpstop" ref="ac80e83b9bc0a4b459fed5f3b79cfafa0" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpstop </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="mpimod__stub_8f90_source.html#l00136">136</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="af894efd9525c935f22415e017dcbc482"></a><!-- doxytag: member="mpimod_stub.f90::mpsum" ref="af894efd9525c935f22415e017dcbc482" args="(psp, klev)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpsum </td>
          <td>(</td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>psp</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="mpimod__stub_8f90_source.html#l00110">110</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="ad703e6ecd123e9b8280322e402d57d20"></a><!-- doxytag: member="mpimod_stub.f90::mpsumbcr" ref="ad703e6ecd123e9b8280322e402d57d20" args="(pr, kdim)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpsumbcr </td>
          <td>(</td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>pr</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>kdim</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="mpimod__stub_8f90_source.html#l00126">126</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="af2111ef6d5b772479a74e94d351440f0"></a><!-- doxytag: member="mpimod_stub.f90::mpsumr" ref="af2111ef6d5b772479a74e94d351440f0" args="(pr, kdim)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpsumr </td>
          <td>(</td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>pr</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>kdim</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="mpimod__stub_8f90_source.html#l00122">122</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a75a681a8d4b9ab5ba0d4fa97f909647b"></a><!-- doxytag: member="mpimod_stub.f90::mpsumsc" ref="a75a681a8d4b9ab5ba0d4fa97f909647b" args="(psf, psp, klev)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpsumsc </td>
          <td>(</td>
          <td class="paramtype">real, dimension(nesp,klev)&#160;</td>
          <td class="paramname"><em>psf</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">real, dimension(nspp,klev)&#160;</td>
          <td class="paramname"><em>psp</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="mpimod__stub_8f90_source.html#l00114">114</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="ac1dfb34daad89cf72ff04b6a58919b2b"></a><!-- doxytag: member="mpimod_stub.f90::mpsumval" ref="ac1dfb34daad89cf72ff04b6a58919b2b" args="(p, kdim, klev, psum)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpsumval </td>
          <td>(</td>
          <td class="paramtype">real, dimension(kdim,klev)&#160;</td>
          <td class="paramname"><em>p</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>kdim</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>klev</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>psum</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="mpimod__stub_8f90_source.html#l00245">245</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a3e3ab4b6cd8d7863f7bfc0e74b370488"></a><!-- doxytag: member="mpimod_stub.f90::mpwritegp" ref="a3e3ab4b6cd8d7863f7bfc0e74b370488" args="(ktape, p, kdim, klev)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpwritegp </td>
          <td>(</td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>ktape</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">real, dimension(kdim,klev)&#160;</td>
          <td class="paramname"><em>p</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>kdim</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="mpimod__stub_8f90_source.html#l00158">158</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a325e1b8f8412b422a06fb7558f212f7e"></a><!-- doxytag: member="mpimod_stub.f90::mpwritegph" ref="a325e1b8f8412b422a06fb7558f212f7e" args="(ktape, p, kdim, klev, ihead)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpwritegph </td>
          <td>(</td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>ktape</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">real, dimension(kdim,klev)&#160;</td>
          <td class="paramname"><em>p</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>kdim</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>klev</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">integer, dimension(8)&#160;</td>
          <td class="paramname"><em>ihead</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="mpimod__stub_8f90_source.html#l00164">164</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="aca5ad2279542f783c1d862333da96744"></a><!-- doxytag: member="mpimod_stub.f90::mpwritesp" ref="aca5ad2279542f783c1d862333da96744" args="(ktape, p, kdim, klev)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpwritesp </td>
          <td>(</td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>ktape</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">real, dimension(kdim,klev)&#160;</td>
          <td class="paramname"><em>p</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>kdim</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="mpimod__stub_8f90_source.html#l00152">152</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

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

<p>Definition at line <a class="el" href="mpimod__stub_8f90_source.html#l00024">24</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="af3212261e3ce775f26d09859c337b760"></a><!-- doxytag: member="mpimod_stub.f90::mrdiff" ref="af3212261e3ce775f26d09859c337b760" args="(p, d, n)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mrdiff </td>
          <td>(</td>
          <td class="paramtype">real, dimension(n)&#160;</td>
          <td class="paramname"><em>p</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">real, dimension(n)&#160;</td>
          <td class="paramname"><em>d</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>n</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="mpimod__stub_8f90_source.html#l00014">14</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
<a class="anchor" id="acb4a2403b5f65a70e7e5ff01ea4577f7"></a><!-- doxytag: member="mpimod_stub.f90::mrdimensions" ref="acb4a2403b5f65a70e7e5ff01ea4577f7" args="" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mrdimensions </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="mpimod__stub_8f90_source.html#l00010">10</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

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

<p>Definition at line <a class="el" href="mpimod__stub_8f90_source.html#l00020">20</a> of file <a class="el" href="mpimod__stub_8f90_source.html">mpimod_stub.f90</a>.</p>

</div>
</div>
</div>
</div>
  <div id="nav-path" class="navpath">
    <ul>
      <li class="navelem"><a class="el" href="mpimod__stub_8f90.html">mpimod_stub.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>