TECLIM
/
PlaSim


			
							1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345
							<!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.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_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/mpimod.f90 File Reference</div>  </div>
</div>
<div class="contents">

<p><a href="mpimod_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="classmpimod.html">mpimod</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">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod_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_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_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_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_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_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_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_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_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_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_8f90.html#a0d1453ad027ffece9843cdeff7178f79">mpgallgp</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_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_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_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_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_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_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_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_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_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_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_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_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_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_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_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_8f90.html#aa6e5f06de5db1764ec5ee24c21bae378">mpi_info</a> (nprocess, npid)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod_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_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_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_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_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_8f90.html#ac1dfb34daad89cf72ff04b6a58919b2b">mpsumval</a> (p, kdim, klev, psum)</td></tr>
<tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="mpimod_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_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_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_8f90.html#acb4a2403b5f65a70e7e5ff01ea4577f7">mrdimensions</a></td></tr>
</table>
<hr/><h2>Function/Subroutine Documentation</h2>
<a class="anchor" id="a89982355acc98319bfc191dab28da805"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00019">19</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a85cfae5acde5c37604edf690e9c2f7cf"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00031">31</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a40b910e38273e7f3c9dc4ed36d3e67a0"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00071">71</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="aded092db7f8071a727e2e96887702ca7"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00045">45</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="af2a0a009162180d4abb1daa1bad60cf2"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00057">57</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a5aef7e33503e0c46b1d8c0b984c398d1"></a><!-- doxytag: member="mpimod.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">real, dimension(nlat,nlev)&#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_8f90_source.html#l00222">222</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="aaa1210298789f4fd7b7702c276eb80a9"></a><!-- doxytag: member="mpimod.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(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_8f90_source.html#l00146">146</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a0d1453ad027ffece9843cdeff7178f79"></a><!-- doxytag: member="mpimod.f90::mpgallgp" ref="a0d1453ad027ffece9843cdeff7178f79" args="(pf, pp, klev)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpgallgp </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_8f90_source.html#l00165">165</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a54cf45feb57177de8eaab2e6b01a7aa2"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00240">240</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="ac053a575b1230f8e4a296164dba5ab27"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00203">203</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a58d54c2e0590e63a7459417831afe5cf"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00521">521</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="acf82ae878fff75151cab59cdd0925ae0"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00502">502</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="aa6e5f06de5db1764ec5ee24c21bae378"></a><!-- doxytag: member="mpimod.f90::mpi_info" ref="aa6e5f06de5db1764ec5ee24c21bae378" args="(nprocess, npid)" -->
<div class="memitem">
<div class="memproto">
      <table class="memname">
        <tr>
          <td class="memname">subroutine mpi_info </td>
          <td>(</td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>nprocess</em>, </td>
        </tr>
        <tr>
          <td class="paramkey"></td>
          <td></td>
          <td class="paramtype">&#160;</td>
          <td class="paramname"><em>npid</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_8f90_source.html#l00486">486</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a1b6ac2b98059a43359ac0edfeb9c2ad7"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00632">632</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a7e675330db7b46cf0bf0cc8edd2d413c"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00557">557</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a79c341b7b52bf44470898581072660b8"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00539">539</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a463456bde27045e2cf286e6e6082b9aa"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00366">366</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a4aceba15459fefd864a0ed3313b0073d"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00444">444</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a3d2a5d231fd9527bcbc1fde327326922"></a><!-- doxytag: member="mpimod.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(*)&#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_8f90_source.html#l00113">113</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="ac66e76c6144dfeadbc03bc5817553250"></a><!-- doxytag: member="mpimod.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(nugp,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_8f90_source.html#l00127">127</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a8338d8609afcefbb1faa41f353c10ef9"></a><!-- doxytag: member="mpimod.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(*)&#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_8f90_source.html#l00084">84</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a1504cf64a1ffc198a8a1fe54ba00d775"></a><!-- doxytag: member="mpimod.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(*)&#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_8f90_source.html#l00099">99</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a0c5adf4e8c7e39cf5a1038a1d34ebf30"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00184">184</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a41bbd9334a3d0412c73399d699bbb237"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00326">326</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="ac80e83b9bc0a4b459fed5f3b79cfafa0"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00353">353</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="af894efd9525c935f22415e017dcbc482"></a><!-- doxytag: member="mpimod.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">real, dimension(nesp,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_8f90_source.html#l00259">259</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="ad703e6ecd123e9b8280322e402d57d20"></a><!-- doxytag: member="mpimod.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">real, dimension(kdim)&#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_8f90_source.html#l00310">310</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="af2111ef6d5b772479a74e94d351440f0"></a><!-- doxytag: member="mpimod.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">real, dimension(kdim)&#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_8f90_source.html#l00294">294</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a75a681a8d4b9ab5ba0d4fa97f909647b"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00276">276</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="ac1dfb34daad89cf72ff04b6a58919b2b"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00648">648</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a3e3ab4b6cd8d7863f7bfc0e74b370488"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00389">389</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a325e1b8f8412b422a06fb7558f212f7e"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00410">410</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="aca5ad2279542f783c1d862333da96744"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00465">465</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="ab1311e17e35732047db4b93e1bb6c984"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00671">671</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="af3212261e3ce775f26d09859c337b760"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00661">661</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="acb4a2403b5f65a70e7e5ff01ea4577f7"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00675">675</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

</div>
</div>
<a class="anchor" id="a5d2bb9cfe68e5feb6de6b359f04398e3"></a><!-- doxytag: member="mpimod.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_8f90_source.html#l00667">667</a> of file <a class="el" href="mpimod_8f90_source.html">mpimod.f90</a>.</p>

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