Inicio Explorar Ayuda
Iniciar sesión
TECLIM
/
PlaSim
3
0
Fork 0
Archivos Incidencias 0 Pull Requests 0 Wiki
Rama: master
Ramas Etiquetas
PlaSim
/
puma
/
dox
/
html
/
puma_8f90.html

puma_8f90.html 83 KB
Permalink Histórico Raw

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060 
  1. <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
    2. 

  2. <html xmlns="http://www.w3.org/1999/xhtml">
    3. 

  3. <head>
    4. 

  4. <meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
    5. 

  5. <title>PUMA: /Users/home/WC/puma/src/puma.f90 File Reference</title>
    6. 

  6. 

  7. <link href="tabs.css" rel="stylesheet" type="text/css"/>
    8. 

  8. <link href="doxygen.css" rel="stylesheet" type="text/css" />
    9. 

  9. <link href="navtree.css" rel="stylesheet" type="text/css"/>
    10. 

  10. <script type="text/javascript" src="jquery.js"></script>
    11. 

  11. <script type="text/javascript" src="resize.js"></script>
    12. 

  12. <script type="text/javascript" src="navtree.js"></script>
    13. 

  13. <script type="text/javascript">
    14. 

  14.   $(document).ready(initResizable);
    15. 

  15. </script>
    16. 

  16. <link href="search/search.css" rel="stylesheet" type="text/css"/>
    17. 

  17. <script type="text/javascript" src="search/search.js"></script>
    18. 

  18. <script type="text/javascript">
    19. 

  19.   $(document).ready(function() { searchBox.OnSelectItem(0); });
    20. 

  20. </script>
    21. 

  21. 

  22. </head>
    23. 

  23. <body>
    24. 

  24. <div id="top"><!-- do not remove this div! -->
    25. 

  25. 

  26. 

  27. <div id="titlearea">
    28. 

  28. <table cellspacing="0" cellpadding="0">
    29. 

  29.  <tbody>
    30. 

  30.  <tr style="height: 56px;">
    31. 

  31.   
    32. 

  32.   <td id="projectlogo"><img alt="Logo" src="puma103.jpg"/></td>
    33. 

  33.   
    34. 

  34.   
    35. 

  35.   <td style="padding-left: 0.5em;">
    36. 

  36.    <div id="projectname">PUMA
    37. 

  37.    &#160;<span id="projectnumber">219</span>
    38. 

  38.    </div>
    39. 

  39.    <div id="projectbrief">Portable University Model of the Atmosphere</div>
    40. 

  40.   </td>
    41. 

  41.   
    42. 

  42.   
    43. 

  43.   
    44. 

  44.  </tr>
    45. 

  45.  </tbody>
    46. 

  46. </table>
    47. 

  47. </div>
    48. 

  48. 

  49. <!-- Generated by Doxygen 1.7.5.1 -->
    50. 

  50. <script type="text/javascript">
    51. 

  51. var searchBox = new SearchBox("searchBox", "search",false,'Search');
    52. 

  52. </script>
    53. 

  53.   <div id="navrow1" class="tabs">
    54. 

  54.     <ul class="tablist">
    55. 

  55.       <li><a href="index.html"><span>Main&#160;Page</span></a></li>
    56. 

  56.       <li><a href="annotated.html"><span>Data&#160;Types&#160;List</span></a></li>
    57. 

  57.       <li class="current"><a href="files.html"><span>Files</span></a></li>
    58. 

  58.       <li>
    59. 

  59.         <div id="MSearchBox" class="MSearchBoxInactive">
    60. 

  60.         <span class="left">
    61. 

  61.           <img id="MSearchSelect" src="search/mag_sel.png"
    62. 

  62.                onmouseover="return searchBox.OnSearchSelectShow()"
    63. 

  63.                onmouseout="return searchBox.OnSearchSelectHide()"
    64. 

  64.                alt=""/>
    65. 

  65.           <input type="text" id="MSearchField" value="Search" accesskey="S"
    66. 

  66.                onfocus="searchBox.OnSearchFieldFocus(true)" 
    67. 

  67.                onblur="searchBox.OnSearchFieldFocus(false)" 
    68. 

  68.                onkeyup="searchBox.OnSearchFieldChange(event)"/>
    69. 

  69.           </span><span class="right">
    70. 

  70.             <a id="MSearchClose" href="javascript:searchBox.CloseResultsWindow()"><img id="MSearchCloseImg" border="0" src="search/close.png" alt=""/></a>
    71. 

  71.           </span>
    72. 

  72.         </div>
    73. 

  73.       </li>
    74. 

  74.     </ul>
    75. 

  75.   </div>
    76. 

  76.   <div id="navrow2" class="tabs2">
    77. 

  77.     <ul class="tablist">
    78. 

  78.       <li><a href="files.html"><span>File&#160;List</span></a></li>
    79. 

  79.       <li><a href="globals.html"><span>File&#160;Members</span></a></li>
    80. 

  80.     </ul>
    81. 

  81.   </div>
    82. 

  82. </div>
    83. 

  83. <div id="side-nav" class="ui-resizable side-nav-resizable">
    84. 

  84.   <div id="nav-tree">
    85. 

  85.     <div id="nav-tree-contents">
    86. 

  86.     </div>
    87. 

  87.   </div>
    88. 

  88.   <div id="splitbar" style="-moz-user-select:none;" 
    89. 

  89.        class="ui-resizable-handle">
    90. 

  90.   </div>
    91. 

  91. </div>
    92. 

  92. <script type="text/javascript">
    93. 

  93.   initNavTree('puma_8f90.html','');
    94. 

  94. </script>
    95. 

  95. <div id="doc-content">
    96. 

  96. <div class="header">
    97. 

  97.   <div class="summary">
    98. 

  98. <a href="#nested-classes">Data Types</a> &#124;
    99. 

  99. <a href="#func-members">Functions/Subroutines</a>  </div>
    100. 

  100.   <div class="headertitle">
    101. 

  101. <div class="title">/Users/home/WC/puma/src/puma.f90 File Reference</div>  </div>
    102. 

  102. </div>
    103. 

  103. <div class="contents">
    104. 

  104. 

  105. <p><a href="puma_8f90_source.html">Go to the source code of this file.</a></p>
    106. 

  106. <table class="memberdecls">
    107. 

  107. <tr><td colspan="2"><h2><a name="nested-classes"></a>
    108. 

  108. Data Types</h2></td></tr>
    109. 

  109. <tr><td class="memItemLeft" align="right" valign="top">module &#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="classpumamod.html">pumamod</a></td></tr>
    110. 

  110. <tr><td class="memItemLeft" align="right" valign="top">module &#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="classradmod.html">radmod</a></td></tr>
    111. 

  111. <tr><td class="memItemLeft" align="right" valign="top">module &#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="classprepmod.html">prepmod</a></td></tr>
    112. 

  112. <tr><td class="memItemLeft" align="right" valign="top">type &#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="structprepmod_1_1ppp__type.html">prepmod::ppp_type</a></td></tr>
    113. 

  113. <tr><td class="memItemLeft" align="right" valign="top">interface &#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="interfaceprepmod_1_1ppp__def__int.html">prepmod::ppp_def_int</a></td></tr>
    114. 

  114. <tr><td class="memItemLeft" align="right" valign="top">interface &#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="interfaceprepmod_1_1ppp__def__real.html">prepmod::ppp_def_real</a></td></tr>
    115. 

  115. <tr><td colspan="2"><h2><a name="func-members"></a>
    116. 

  116. Functions/Subroutines</h2></td></tr>
    117. 

  117. <tr><td class="memItemLeft" align="right" valign="top">program&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#ab9b07e4288c177e089731e7560c18ac1">puma_main</a></td></tr>
    118. 

  118. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a37eac16619683a2be841fc68b9281299">setfilenames</a></td></tr>
    119. 

  119. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#ab7757291a70ca39d0c7a7e8db515c058">opendiag</a></td></tr>
    120. 

  120. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a486bae2289e6e28e652b41555030d3e6">allocate_arrays</a></td></tr>
    121. 

  121. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#afde378004f20ed8741a7e9bcd82cbfe4">prolog</a></td></tr>
    122. 

  122. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#af02944c9cc5103c31e4ed9b779e7cc79">master</a></td></tr>
    123. 

  123. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a35d7c22447dc50ab86832b4615994d32">epilog</a></td></tr>
    124. 

  124. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#aa07fedd638dbdd8e1799b83d34eb35e3">read_atmos_restart</a></td></tr>
    125. 

  125. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a51f5938296dd343ce807dbb6d1a16e49">initfd</a></td></tr>
    126. 

  126. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a811c67568d6f12806d6b6f86813d2bc4">read_resolution</a></td></tr>
    127. 

  127. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a0952e51b37b6196b4f5d85a5cb93c75b">resolution</a></td></tr>
    128. 

  128. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a8a75958ca9ba25aeec49db140b483871">readnl</a></td></tr>
    129. 

  129. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#ad3f0e22c057591beabda5d99c3f40c4c">ppp_def_int</a> (pname, nvar, ndim)</td></tr>
    130. 

  130. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a3e4cf6a68be16437f50762bf77e52370">ppp_def_real</a> (pname, rvar, ndim)</td></tr>
    131. 

  131. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a4c83f2cca37be70c03946309fc4e2a52">ppp_read_i</a> (a, ndim, nread)</td></tr>
    132. 

  132. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a1e7bdf5ee1faa40d34b6cc93ebc3acc3">ppp_read_r</a> (a, ndim, nread)</td></tr>
    133. 

  133. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a859f80933ca252bcc87f27d3996fea05">ppp_interface</a></td></tr>
    134. 

  134. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#af1e6869836cefedb3f5cc8a574944d91">select_zonal_waves</a></td></tr>
    135. 

  135. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a01c0a9ea1eee2f86044600c5e81dbebd">select_spectral_modes</a></td></tr>
    136. 

  136. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a00e3481744c3185f0f91d35c101f28e4">set_vertical_grid</a></td></tr>
    137. 

  137. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a5087a1dafe7b39d03c6547fde711b55a">initpm</a></td></tr>
    138. 

  138. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#aa2b3f98ff1c27bb557c695c15708ad1f">makebm</a></td></tr>
    139. 

  139. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a96b9223819624937b18b4e5b29e95a91">initsi</a></td></tr>
    140. 

  140. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#acbd8e7fdd2e1f60dbca741a700fb292a">initrandom</a></td></tr>
    141. 

  141. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a9a888c599145a63cdd108dffa553b509">printseed</a></td></tr>
    142. 

  142. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#aea6c13c68157972ea21768a5ea43e154">initruido</a></td></tr>
    143. 

  143. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#ab257e27330a3ab13c9c90ebd985ef60e">stepruido</a></td></tr>
    144. 

  144. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#ac5b1247975fc97ef45931e410766a417">minvers</a> (a, n)</td></tr>
    145. 

  145. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a13d49d9c008cbc01f37c0c31d2012ad4">lubksb</a> (a, n, indx, b)</td></tr>
    146. 

  146. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#afa767a8d587c360ca92357e066b6bf22">ludcmp</a> (a, n, indx)</td></tr>
    147. 

  147. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a7278b4e4c576939f77bc4055e51cdaef">filter_zonal_waves</a> (pfc)</td></tr>
    148. 

  148. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a9a1e7493444984ad2c2161609dbb6e69">filter_spectral_modes</a></td></tr>
    149. 

  149. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#abdcee9a4a4d07fc6e5b7a7f5768026ac">noise</a> (kickval)</td></tr>
    150. 

  150. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a4a662c6d6619fc6405eb110f62653dc0">setzt</a></td></tr>
    151. 

  151. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#aa92d6879772b364173e13521d835895e">printprofile</a></td></tr>
    152. 

  152. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#aa8533c8ebc4415ef95ca9c34c4ba7d6b">read_surf</a> (kcode, psp, klev, kread)</td></tr>
    153. 

  153. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a9dfa3f46641f3df498d07ff40df08a57">read_vargp</a> (kcode, klev, kread)</td></tr>
    154. 

  154. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#ad0981694b4fc7644f20d9ad785deba27">diag</a></td></tr>
    155. 

  155. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a901150c868c1f2d65744ec49df0c24ed">prisp</a></td></tr>
    156. 

  156. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a8625954404de5b08c55626c4f8a62972">powerspec</a> (pf, pspec)</td></tr>
    157. 

  157. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a53adeff6424dd4b2f124771625a47ca5">powerprint</a> (text, pspec)</td></tr>
    158. 

  158. <tr><td class="memItemLeft" align="right" valign="top">function&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a87f2e4ed3831dc32e18d25fe42d0bfab">rmssp</a> (pf)</td></tr>
    159. 

  159. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a9617b01410b9d0a76ca6ceb1b333bb96">energy</a></td></tr>
    160. 

  160. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a6628dcb7258ff7477a7bc7f3098cded3">ntomin</a> (kstep, imin, ihou, iday, imon, iyea)</td></tr>
    161. 

  161. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a6b0de7569cc691823dd1104ff42a6993">ntodat</a> (istep, <a class="el" href="pumax_8c.html#a3c3df9a533eb74fcdcd614a15a8026dc">datch</a>)</td></tr>
    162. 

  162. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a7d2fe5c057c4ef8c0b7981ddeb0cce41">wrspam</a> (ps, klev, title, scale)</td></tr>
    163. 

  163. <tr><td class="memItemLeft" align="right" valign="top">function&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a41d141fdb78d222639310fec575eaea5">cab</a> (i)</td></tr>
    164. 

  164. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a03b2185c8a9dc75ed4169a7d9bf65863">wrzs</a> (zs, title, scale)</td></tr>
    165. 

  165. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a8e59ae6d7b5a22b0e46c56187cdd62cf">xsect</a></td></tr>
    166. 

  166. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a29f97b19d997b3a5c29df1fd4cdd4792">writesp</a> (kunit, pf, kcode, klev, pscale, poff)</td></tr>
    167. 

  167. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a8f8e06ff9c98bc44f6c356d5ffc0a426">writegp</a> (kunit, pf, kcode, klev)</td></tr>
    168. 

  168. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a0352cc6bbeedace31c54d9afba847ad6">outsp</a></td></tr>
    169. 

  169. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a1f5ebb3d7ab8cc007a6ed2d81b858f03">outgp</a></td></tr>
    170. 

  170. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#ab608e12bdff55ab600a9d975673c5a53">checkunit</a></td></tr>
    171. 

  171. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a03d027a1b5f735efb9bce2396d5fc2b6">legpri</a></td></tr>
    172. 

  172. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a7780f6c3a813605c014f7da964ff83d2">inilat</a></td></tr>
    173. 

  173. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#aefdbfd36b330ce29d344d428431119c9">gridpoint</a></td></tr>
    174. 

  174. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a0e2e6d98e219c0540bd78f5673a2dd57">calcgp</a> (gtn, gpm, gvp)</td></tr>
    175. 

  175. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a218b1f5483f314ea3a7eeba949933773">spectral</a></td></tr>
    176. 

  176. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a1ad2c0878e366bb7f12ca880fd36c654">mrcheck</a> (f)</td></tr>
    177. 

  177. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a28029d854398252d4d3b4eb9f161fed7">diagp</a> (zampl)</td></tr>
    178. 

  178. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a6cbd3f404dc5fbac334929a64cf2757f">heatgp</a> (zampl)</td></tr>
    179. 

  179. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#ad1bea0bb9fdda56c5251fa64e712b7b1">vdiff</a> (pt, pz, pd, ptt, pzt, pdt)</td></tr>
    180. 

  180. <tr><td class="memItemLeft" align="right" valign="top">real function&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#abc1c514e88a9fc8af7e7fb69f67c2340">gasdev</a> ()</td></tr>
    181. 

  181. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a0c040011dabc1b712353c37a4d90cc68">sponge</a></td></tr>
    182. 

  182. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a4f476f8f243b066b52526d1a2696b48f">mkenerdiag</a> (pst, pstt, psp, pspt, penergy)</td></tr>
    183. 

  183. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a36962178b35132627d3f0c4a2b816a92">mkentrodiag</a> (pst, pstt, psp, pentropy)</td></tr>
    184. 

  184. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a079a9ea6caa3eb9d5ef5e0c82f76a2b9">mkdheat</a> (zszt1, zszt2, zsdt1, zsdt2, zsp)</td></tr>
    185. 

  185. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a30cefc96eb08dde625692abb8eae576e">mkekin</a> (zszp, zsdp, zp, zekin)</td></tr>
    186. 

  186. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#abc6f135f96d6f8c9636cef2d9c9dd796">mkekin2</a> (zszp, zsdp, zspp, zekin)</td></tr>
    187. 

  187. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a0af984bd0f7283956290a0964e69cf0e">mkepot</a> (zstp, zp, zepot)</td></tr>
    188. 

  188. <tr><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="puma_8f90.html#a23384f45e8ba553e7aaed8b22a9a80e8">mkepot2</a> (zstp, zspp, zepot)</td></tr>
    189. 

  189. </table>
    190. 

  190. <hr/><h2>Function/Subroutine Documentation</h2>
    191. 

  191. <a class="anchor" id="a486bae2289e6e28e652b41555030d3e6"></a><!-- doxytag: member="puma.f90::allocate_arrays" ref="a486bae2289e6e28e652b41555030d3e6" args="" -->
    192. 

  192. <div class="memitem">
    193. 

  193. <div class="memproto">
    194. 

  194.       <table class="memname">
    195. 

  195.         <tr>
    196. 

  196.           <td class="memname">subroutine allocate_arrays </td>
    197. 

  197.           <td>(</td>
    198. 

  198.           <td class="paramname"></td><td>)</td>
    199. 

  199.           <td></td>
    200. 

  200.         </tr>
    201. 

  201.       </table>
    202. 

  202. </div>
    203. 

  203. <div class="memdoc">
    204. 

  204. 

  205. <p>Definition at line <a class="el" href="puma_8f90_source.html#l00593">593</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    206. 

  206. 

  207. </div>
    208. 

  208. </div>
    209. 

  209. <a class="anchor" id="a41d141fdb78d222639310fec575eaea5"></a><!-- doxytag: member="puma.f90::cab" ref="a41d141fdb78d222639310fec575eaea5" args="(i)" -->
    210. 

  210. <div class="memitem">
    211. 

  211. <div class="memproto">
    212. 

  212.       <table class="memname">
    213. 

  213.         <tr>
    214. 

  214.           <td class="memname">function wrspam::cab </td>
    215. 

  215.           <td>(</td>
    216. 

  216.           <td class="paramtype">&#160;</td>
    217. 

  217.           <td class="paramname"><em>i</em></td><td>)</td>
    218. 

  218.           <td></td>
    219. 

  219.         </tr>
    220. 

  220.       </table>
    221. 

  221. </div>
    222. 

  222. <div class="memdoc">
    223. 

  223. 

  224. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02805">2805</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    225. 

  225. 

  226. </div>
    227. 

  227. </div>
    228. 

  228. <a class="anchor" id="a0e2e6d98e219c0540bd78f5673a2dd57"></a><!-- doxytag: member="puma.f90::calcgp" ref="a0e2e6d98e219c0540bd78f5673a2dd57" args="(gtn, gpm, gvp)" -->
    229. 

  229. <div class="memitem">
    230. 

  230. <div class="memproto">
    231. 

  231.       <table class="memname">
    232. 

  232.         <tr>
    233. 

  233.           <td class="memname">subroutine calcgp </td>
    234. 

  234.           <td>(</td>
    235. 

  235.           <td class="paramtype">real, dimension(nhor,nlev)&#160;</td>
    236. 

  236.           <td class="paramname"><em>gtn</em>, </td>
    237. 

  237.         </tr>
    238. 

  238.         <tr>
    239. 

  239.           <td class="paramkey"></td>
    240. 

  240.           <td></td>
    241. 

  241.           <td class="paramtype">real, dimension(nhor)&#160;</td>
    242. 

  242.           <td class="paramname"><em>gpm</em>, </td>
    243. 

  243.         </tr>
    244. 

  244.         <tr>
    245. 

  245.           <td class="paramkey"></td>
    246. 

  246.           <td></td>
    247. 

  247.           <td class="paramtype">real, dimension(nhor)&#160;</td>
    248. 

  248.           <td class="paramname"><em>gvp</em>&#160;</td>
    249. 

  249.         </tr>
    250. 

  250.         <tr>
    251. 

  251.           <td></td>
    252. 

  252.           <td>)</td>
    253. 

  253.           <td></td><td></td>
    254. 

  254.         </tr>
    255. 

  255.       </table>
    256. 

  256. </div>
    257. 

  257. <div class="memdoc">
    258. 

  258. 

  259. <p>Definition at line <a class="el" href="puma_8f90_source.html#l03252">3252</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    260. 

  260. 

  261. </div>
    262. 

  262. </div>
    263. 

  263. <a class="anchor" id="ab608e12bdff55ab600a9d975673c5a53"></a><!-- doxytag: member="puma.f90::checkunit" ref="ab608e12bdff55ab600a9d975673c5a53" args="" -->
    264. 

  264. <div class="memitem">
    265. 

  265. <div class="memproto">
    266. 

  266.       <table class="memname">
    267. 

  267.         <tr>
    268. 

  268.           <td class="memname">subroutine checkunit </td>
    269. 

  269.           <td>(</td>
    270. 

  270.           <td class="paramname"></td><td>)</td>
    271. 

  271.           <td></td>
    272. 

  272.         </tr>
    273. 

  273.       </table>
    274. 

  274. </div>
    275. 

  275. <div class="memdoc">
    276. 

  276. 

  277. <p>Definition at line <a class="el" href="puma_8f90_source.html#l03033">3033</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    278. 

  278. 

  279. </div>
    280. 

  280. </div>
    281. 

  281. <a class="anchor" id="ad0981694b4fc7644f20d9ad785deba27"></a><!-- doxytag: member="puma.f90::diag" ref="ad0981694b4fc7644f20d9ad785deba27" args="" -->
    282. 

  282. <div class="memitem">
    283. 

  283. <div class="memproto">
    284. 

  284.       <table class="memname">
    285. 

  285.         <tr>
    286. 

  286.           <td class="memname">subroutine diag </td>
    287. 

  287.           <td>(</td>
    288. 

  288.           <td class="paramname"></td><td>)</td>
    289. 

  289.           <td></td>
    290. 

  290.         </tr>
    291. 

  291.       </table>
    292. 

  292. </div>
    293. 

  293. <div class="memdoc">
    294. 

  294. 

  295. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02546">2546</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    296. 

  296. 

  297. </div>
    298. 

  298. </div>
    299. 

  299. <a class="anchor" id="a28029d854398252d4d3b4eb9f161fed7"></a><!-- doxytag: member="puma.f90::diagp" ref="a28029d854398252d4d3b4eb9f161fed7" args="(zampl)" -->
    300. 

  300. <div class="memitem">
    301. 

  301. <div class="memproto">
    302. 

  302.       <table class="memname">
    303. 

  303.         <tr>
    304. 

  304.           <td class="memname">subroutine diagp </td>
    305. 

  305.           <td>(</td>
    306. 

  306.           <td class="paramtype">real&#160;</td>
    307. 

  307.           <td class="paramname"><em>zampl</em></td><td>)</td>
    308. 

  308.           <td></td>
    309. 

  309.         </tr>
    310. 

  310.       </table>
    311. 

  311. </div>
    312. 

  312. <div class="memdoc">
    313. 

  313. 

  314. <p>Definition at line <a class="el" href="puma_8f90_source.html#l03941">3941</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    315. 

  315. 

  316. </div>
    317. 

  317. </div>
    318. 

  318. <a class="anchor" id="a9617b01410b9d0a76ca6ceb1b333bb96"></a><!-- doxytag: member="puma.f90::energy" ref="a9617b01410b9d0a76ca6ceb1b333bb96" args="" -->
    319. 

  319. <div class="memitem">
    320. 

  320. <div class="memproto">
    321. 

  321.       <table class="memname">
    322. 

  322.         <tr>
    323. 

  323.           <td class="memname">subroutine energy </td>
    324. 

  324.           <td>(</td>
    325. 

  325.           <td class="paramname"></td><td>)</td>
    326. 

  326.           <td></td>
    327. 

  327.         </tr>
    328. 

  328.       </table>
    329. 

  329. </div>
    330. 

  330. <div class="memdoc">
    331. 

  331. 

  332. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02653">2653</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    333. 

  333. 

  334. </div>
    335. 

  335. </div>
    336. 

  336. <a class="anchor" id="a35d7c22447dc50ab86832b4615994d32"></a><!-- doxytag: member="puma.f90::epilog" ref="a35d7c22447dc50ab86832b4615994d32" args="" -->
    337. 

  337. <div class="memitem">
    338. 

  338. <div class="memproto">
    339. 

  339.       <table class="memname">
    340. 

  340.         <tr>
    341. 

  341.           <td class="memname">subroutine epilog </td>
    342. 

  342.           <td>(</td>
    343. 

  343.           <td class="paramname"></td><td>)</td>
    344. 

  344.           <td></td>
    345. 

  345.         </tr>
    346. 

  346.       </table>
    347. 

  347. </div>
    348. 

  348. <div class="memdoc">
    349. 

  349. 

  350. <p>Definition at line <a class="el" href="puma_8f90_source.html#l00976">976</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    351. 

  351. 

  352. </div>
    353. 

  353. </div>
    354. 

  354. <a class="anchor" id="a9a1e7493444984ad2c2161609dbb6e69"></a><!-- doxytag: member="puma.f90::filter_spectral_modes" ref="a9a1e7493444984ad2c2161609dbb6e69" args="" -->
    355. 

  355. <div class="memitem">
    356. 

  356. <div class="memproto">
    357. 

  357.       <table class="memname">
    358. 

  358.         <tr>
    359. 

  359.           <td class="memname">subroutine filter_spectral_modes </td>
    360. 

  360.           <td>(</td>
    361. 

  361.           <td class="paramname"></td><td>)</td>
    362. 

  362.           <td></td>
    363. 

  363.         </tr>
    364. 

  364.       </table>
    365. 

  365. </div>
    366. 

  366. <div class="memdoc">
    367. 

  367. 

  368. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02135">2135</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    369. 

  369. 

  370. </div>
    371. 

  371. </div>
    372. 

  372. <a class="anchor" id="a7278b4e4c576939f77bc4055e51cdaef"></a><!-- doxytag: member="puma.f90::filter_zonal_waves" ref="a7278b4e4c576939f77bc4055e51cdaef" args="(pfc)" -->
    373. 

  373. <div class="memitem">
    374. 

  374. <div class="memproto">
    375. 

  375.       <table class="memname">
    376. 

  376.         <tr>
    377. 

  377.           <td class="memname">subroutine filter_zonal_waves </td>
    378. 

  378.           <td>(</td>
    379. 

  379.           <td class="paramtype">, dimension(2,nlon/2,nlpp)&#160;</td>
    380. 

  380.           <td class="paramname"><em>pfc</em></td><td>)</td>
    381. 

  381.           <td></td>
    382. 

  382.         </tr>
    383. 

  383.       </table>
    384. 

  384. </div>
    385. 

  385. <div class="memdoc">
    386. 

  386. 

  387. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02118">2118</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    388. 

  388. 

  389. </div>
    390. 

  390. </div>
    391. 

  391. <a class="anchor" id="abc1c514e88a9fc8af7e7fb69f67c2340"></a><!-- doxytag: member="puma.f90::gasdev" ref="abc1c514e88a9fc8af7e7fb69f67c2340" args="()" -->
    392. 

  392. <div class="memitem">
    393. 

  393. <div class="memproto">
    394. 

  394.       <table class="memname">
    395. 

  395.         <tr>
    396. 

  396.           <td class="memname">real function gasdev </td>
    397. 

  397.           <td>(</td>
    398. 

  398.           <td class="paramname"></td><td>)</td>
    399. 

  399.           <td></td>
    400. 

  400.         </tr>
    401. 

  401.       </table>
    402. 

  402. </div>
    403. 

  403. <div class="memdoc">
    404. 

  404. 

  405. <p>Definition at line <a class="el" href="puma_8f90_source.html#l04162">4162</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    406. 

  406. 

  407. </div>
    408. 

  408. </div>
    409. 

  409. <a class="anchor" id="aefdbfd36b330ce29d344d428431119c9"></a><!-- doxytag: member="puma.f90::gridpoint" ref="aefdbfd36b330ce29d344d428431119c9" args="" -->
    410. 

  410. <div class="memitem">
    411. 

  411. <div class="memproto">
    412. 

  412.       <table class="memname">
    413. 

  413.         <tr>
    414. 

  414.           <td class="memname">subroutine gridpoint </td>
    415. 

  415.           <td>(</td>
    416. 

  416.           <td class="paramname"></td><td>)</td>
    417. 

  417.           <td></td>
    418. 

  418.         </tr>
    419. 

  419.       </table>
    420. 

  420. </div>
    421. 

  421. <div class="memdoc">
    422. 

  422. 

  423. <p>Definition at line <a class="el" href="puma_8f90_source.html#l03108">3108</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    424. 

  424. 

  425. </div>
    426. 

  426. </div>
    427. 

  427. <a class="anchor" id="a6cbd3f404dc5fbac334929a64cf2757f"></a><!-- doxytag: member="puma.f90::heatgp" ref="a6cbd3f404dc5fbac334929a64cf2757f" args="(zampl)" -->
    428. 

  428. <div class="memitem">
    429. 

  429. <div class="memproto">
    430. 

  430.       <table class="memname">
    431. 

  431.         <tr>
    432. 

  432.           <td class="memname">subroutine heatgp </td>
    433. 

  433.           <td>(</td>
    434. 

  434.           <td class="paramtype">real&#160;</td>
    435. 

  435.           <td class="paramname"><em>zampl</em></td><td>)</td>
    436. 

  436.           <td></td>
    437. 

  437.         </tr>
    438. 

  438.       </table>
    439. 

  439. </div>
    440. 

  440. <div class="memdoc">
    441. 

  441. 

  442. <p>Definition at line <a class="el" href="puma_8f90_source.html#l04001">4001</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    443. 

  443. 

  444. </div>
    445. 

  445. </div>
    446. 

  446. <a class="anchor" id="a7780f6c3a813605c014f7da964ff83d2"></a><!-- doxytag: member="puma.f90::inilat" ref="a7780f6c3a813605c014f7da964ff83d2" args="" -->
    447. 

  447. <div class="memitem">
    448. 

  448. <div class="memproto">
    449. 

  449.       <table class="memname">
    450. 

  450.         <tr>
    451. 

  451.           <td class="memname">subroutine inilat </td>
    452. 

  452.           <td>(</td>
    453. 

  453.           <td class="paramname"></td><td>)</td>
    454. 

  454.           <td></td>
    455. 

  455.         </tr>
    456. 

  456.       </table>
    457. 

  457. </div>
    458. 

  458. <div class="memdoc">
    459. 

  459. 

  460. <p>Definition at line <a class="el" href="puma_8f90_source.html#l03086">3086</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    461. 

  461. 

  462. </div>
    463. 

  463. </div>
    464. 

  464. <a class="anchor" id="a51f5938296dd343ce807dbb6d1a16e49"></a><!-- doxytag: member="puma.f90::initfd" ref="a51f5938296dd343ce807dbb6d1a16e49" args="" -->
    465. 

  465. <div class="memitem">
    466. 

  466. <div class="memproto">
    467. 

  467.       <table class="memname">
    468. 

  468.         <tr>
    469. 

  469.           <td class="memname">subroutine initfd </td>
    470. 

  470.           <td>(</td>
    471. 

  471.           <td class="paramname"></td><td>)</td>
    472. 

  472.           <td></td>
    473. 

  473.         </tr>
    474. 

  474.       </table>
    475. 

  475. </div>
    476. 

  476. <div class="memdoc">
    477. 

  477. 

  478. <p>Definition at line <a class="el" href="puma_8f90_source.html#l01168">1168</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    479. 

  479. 

  480. </div>
    481. 

  481. </div>
    482. 

  482. <a class="anchor" id="a5087a1dafe7b39d03c6547fde711b55a"></a><!-- doxytag: member="puma.f90::initpm" ref="a5087a1dafe7b39d03c6547fde711b55a" args="" -->
    483. 

  483. <div class="memitem">
    484. 

  484. <div class="memproto">
    485. 

  485.       <table class="memname">
    486. 

  486.         <tr>
    487. 

  487.           <td class="memname">subroutine initpm </td>
    488. 

  488.           <td>(</td>
    489. 

  489.           <td class="paramname"></td><td>)</td>
    490. 

  490.           <td></td>
    491. 

  491.         </tr>
    492. 

  492.       </table>
    493. 

  493. </div>
    494. 

  494. <div class="memdoc">
    495. 

  495. 

  496. <p>Definition at line <a class="el" href="puma_8f90_source.html#l01625">1625</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    497. 

  497. 

  498. </div>
    499. 

  499. </div>
    500. 

  500. <a class="anchor" id="acbd8e7fdd2e1f60dbca741a700fb292a"></a><!-- doxytag: member="puma.f90::initrandom" ref="acbd8e7fdd2e1f60dbca741a700fb292a" args="" -->
    501. 

  501. <div class="memitem">
    502. 

  502. <div class="memproto">
    503. 

  503.       <table class="memname">
    504. 

  504.         <tr>
    505. 

  505.           <td class="memname">subroutine initrandom </td>
    506. 

  506.           <td>(</td>
    507. 

  507.           <td class="paramname"></td><td>)</td>
    508. 

  508.           <td></td>
    509. 

  509.         </tr>
    510. 

  510.       </table>
    511. 

  511. </div>
    512. 

  512. <div class="memdoc">
    513. 

  513. 

  514. <p>Definition at line <a class="el" href="puma_8f90_source.html#l01926">1926</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    515. 

  515. 

  516. </div>
    517. 

  517. </div>
    518. 

  518. <a class="anchor" id="aea6c13c68157972ea21768a5ea43e154"></a><!-- doxytag: member="puma.f90::initruido" ref="aea6c13c68157972ea21768a5ea43e154" args="" -->
    519. 

  519. <div class="memitem">
    520. 

  520. <div class="memproto">
    521. 

  521.       <table class="memname">
    522. 

  522.         <tr>
    523. 

  523.           <td class="memname">subroutine initruido </td>
    524. 

  524.           <td>(</td>
    525. 

  525.           <td class="paramname"></td><td>)</td>
    526. 

  526.           <td></td>
    527. 

  527.         </tr>
    528. 

  528.       </table>
    529. 

  529. </div>
    530. 

  530. <div class="memdoc">
    531. 

  531. 

  532. <p>Definition at line <a class="el" href="puma_8f90_source.html#l01975">1975</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    533. 

  533. 

  534. </div>
    535. 

  535. </div>
    536. 

  536. <a class="anchor" id="a96b9223819624937b18b4e5b29e95a91"></a><!-- doxytag: member="puma.f90::initsi" ref="a96b9223819624937b18b4e5b29e95a91" args="" -->
    537. 

  537. <div class="memitem">
    538. 

  538. <div class="memproto">
    539. 

  539.       <table class="memname">
    540. 

  540.         <tr>
    541. 

  541.           <td class="memname">subroutine initsi </td>
    542. 

  542.           <td>(</td>
    543. 

  543.           <td class="paramname"></td><td>)</td>
    544. 

  544.           <td></td>
    545. 

  545.         </tr>
    546. 

  546.       </table>
    547. 

  547. </div>
    548. 

  548. <div class="memdoc">
    549. 

  549. 

  550. <p>Definition at line <a class="el" href="puma_8f90_source.html#l01812">1812</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    551. 

  551. 

  552. </div>
    553. 

  553. </div>
    554. 

  554. <a class="anchor" id="a03d027a1b5f735efb9bce2396d5fc2b6"></a><!-- doxytag: member="puma.f90::legpri" ref="a03d027a1b5f735efb9bce2396d5fc2b6" args="" -->
    555. 

  555. <div class="memitem">
    556. 

  556. <div class="memproto">
    557. 

  557.       <table class="memname">
    558. 

  558.         <tr>
    559. 

  559.           <td class="memname">subroutine legpri </td>
    560. 

  560.           <td>(</td>
    561. 

  561.           <td class="paramname"></td><td>)</td>
    562. 

  562.           <td></td>
    563. 

  563.         </tr>
    564. 

  564.       </table>
    565. 

  565. </div>
    566. 

  566. <div class="memdoc">
    567. 

  567. 

  568. <p>Definition at line <a class="el" href="puma_8f90_source.html#l03061">3061</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    569. 

  569. 

  570. </div>
    571. 

  571. </div>
    572. 

  572. <a class="anchor" id="a13d49d9c008cbc01f37c0c31d2012ad4"></a><!-- doxytag: member="puma.f90::lubksb" ref="a13d49d9c008cbc01f37c0c31d2012ad4" args="(a, n, indx, b)" -->
    573. 

  573. <div class="memitem">
    574. 

  574. <div class="memproto">
    575. 

  575.       <table class="memname">
    576. 

  576.         <tr>
    577. 

  577.           <td class="memname">subroutine lubksb </td>
    578. 

  578.           <td>(</td>
    579. 

  579.           <td class="paramtype">, dimension(n,n)&#160;</td>
    580. 

  580.           <td class="paramname"><em>a</em>, </td>
    581. 

  581.         </tr>
    582. 

  582.         <tr>
    583. 

  583.           <td class="paramkey"></td>
    584. 

  584.           <td></td>
    585. 

  585.           <td class="paramtype">&#160;</td>
    586. 

  586.           <td class="paramname"><em>n</em>, </td>
    587. 

  587.         </tr>
    588. 

  588.         <tr>
    589. 

  589.           <td class="paramkey"></td>
    590. 

  590.           <td></td>
    591. 

  591.           <td class="paramtype">, dimension(n)&#160;</td>
    592. 

  592.           <td class="paramname"><em>indx</em>, </td>
    593. 

  593.         </tr>
    594. 

  594.         <tr>
    595. 

  595.           <td class="paramkey"></td>
    596. 

  596.           <td></td>
    597. 

  597.           <td class="paramtype">, dimension(n)&#160;</td>
    598. 

  598.           <td class="paramname"><em>b</em>&#160;</td>
    599. 

  599.         </tr>
    600. 

  600.         <tr>
    601. 

  601.           <td></td>
    602. 

  602.           <td>)</td>
    603. 

  603.           <td></td><td></td>
    604. 

  604.         </tr>
    605. 

  605.       </table>
    606. 

  606. </div>
    607. 

  607. <div class="memdoc">
    608. 

  608. 

  609. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02047">2047</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    610. 

  610. 

  611. </div>
    612. 

  612. </div>
    613. 

  613. <a class="anchor" id="afa767a8d587c360ca92357e066b6bf22"></a><!-- doxytag: member="puma.f90::ludcmp" ref="afa767a8d587c360ca92357e066b6bf22" args="(a, n, indx)" -->
    614. 

  614. <div class="memitem">
    615. 

  615. <div class="memproto">
    616. 

  616.       <table class="memname">
    617. 

  617.         <tr>
    618. 

  618.           <td class="memname">subroutine ludcmp </td>
    619. 

  619.           <td>(</td>
    620. 

  620.           <td class="paramtype">, dimension(n,n)&#160;</td>
    621. 

  621.           <td class="paramname"><em>a</em>, </td>
    622. 

  622.         </tr>
    623. 

  623.         <tr>
    624. 

  624.           <td class="paramkey"></td>
    625. 

  625.           <td></td>
    626. 

  626.           <td class="paramtype">&#160;</td>
    627. 

  627.           <td class="paramname"><em>n</em>, </td>
    628. 

  628.         </tr>
    629. 

  629.         <tr>
    630. 

  630.           <td class="paramkey"></td>
    631. 

  631.           <td></td>
    632. 

  632.           <td class="paramtype">, dimension(n)&#160;</td>
    633. 

  633.           <td class="paramname"><em>indx</em>&#160;</td>
    634. 

  634.         </tr>
    635. 

  635.         <tr>
    636. 

  636.           <td></td>
    637. 

  637.           <td>)</td>
    638. 

  638.           <td></td><td></td>
    639. 

  639.         </tr>
    640. 

  640.       </table>
    641. 

  641. </div>
    642. 

  642. <div class="memdoc">
    643. 

  643. 

  644. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02078">2078</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    645. 

  645. 

  646. </div>
    647. 

  647. </div>
    648. 

  648. <a class="anchor" id="aa2b3f98ff1c27bb557c695c15708ad1f"></a><!-- doxytag: member="puma.f90::makebm" ref="aa2b3f98ff1c27bb557c695c15708ad1f" args="" -->
    649. 

  649. <div class="memitem">
    650. 

  650. <div class="memproto">
    651. 

  651.       <table class="memname">
    652. 

  652.         <tr>
    653. 

  653.           <td class="memname">subroutine makebm </td>
    654. 

  654.           <td>(</td>
    655. 

  655.           <td class="paramname"></td><td>)</td>
    656. 

  656.           <td></td>
    657. 

  657.         </tr>
    658. 

  658.       </table>
    659. 

  659. </div>
    660. 

  660. <div class="memdoc">
    661. 

  661. 

  662. <p>Definition at line <a class="el" href="puma_8f90_source.html#l01786">1786</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    663. 

  663. 

  664. </div>
    665. 

  665. </div>
    666. 

  666. <a class="anchor" id="af02944c9cc5103c31e4ed9b779e7cc79"></a><!-- doxytag: member="puma.f90::master" ref="af02944c9cc5103c31e4ed9b779e7cc79" args="" -->
    667. 

  667. <div class="memitem">
    668. 

  668. <div class="memproto">
    669. 

  669.       <table class="memname">
    670. 

  670.         <tr>
    671. 

  671.           <td class="memname">subroutine master </td>
    672. 

  672.           <td>(</td>
    673. 

  673.           <td class="paramname"></td><td>)</td>
    674. 

  674.           <td></td>
    675. 

  675.         </tr>
    676. 

  676.       </table>
    677. 

  677. </div>
    678. 

  678. <div class="memdoc">
    679. 

  679. 

  680. <p>Definition at line <a class="el" href="puma_8f90_source.html#l00918">918</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    681. 

  681. 

  682. </div>
    683. 

  683. </div>
    684. 

  684. <a class="anchor" id="ac5b1247975fc97ef45931e410766a417"></a><!-- doxytag: member="puma.f90::minvers" ref="ac5b1247975fc97ef45931e410766a417" args="(a, n)" -->
    685. 

  685. <div class="memitem">
    686. 

  686. <div class="memproto">
    687. 

  687.       <table class="memname">
    688. 

  688.         <tr>
    689. 

  689.           <td class="memname">subroutine minvers </td>
    690. 

  690.           <td>(</td>
    691. 

  691.           <td class="paramtype">, dimension(n,n)&#160;</td>
    692. 

  692.           <td class="paramname"><em>a</em>, </td>
    693. 

  693.         </tr>
    694. 

  694.         <tr>
    695. 

  695.           <td class="paramkey"></td>
    696. 

  696.           <td></td>
    697. 

  697.           <td class="paramtype">&#160;</td>
    698. 

  698.           <td class="paramname"><em>n</em>&#160;</td>
    699. 

  699.         </tr>
    700. 

  700.         <tr>
    701. 

  701.           <td></td>
    702. 

  702.           <td>)</td>
    703. 

  703.           <td></td><td></td>
    704. 

  704.         </tr>
    705. 

  705.       </table>
    706. 

  706. </div>
    707. 

  707. <div class="memdoc">
    708. 

  708. 

  709. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02028">2028</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    710. 

  710. 

  711. </div>
    712. 

  712. </div>
    713. 

  713. <a class="anchor" id="a079a9ea6caa3eb9d5ef5e0c82f76a2b9"></a><!-- doxytag: member="puma.f90::mkdheat" ref="a079a9ea6caa3eb9d5ef5e0c82f76a2b9" args="(zszt1, zszt2, zsdt1, zsdt2, zsp)" -->
    714. 

  714. <div class="memitem">
    715. 

  715. <div class="memproto">
    716. 

  716.       <table class="memname">
    717. 

  717.         <tr>
    718. 

  718.           <td class="memname">subroutine mkdheat </td>
    719. 

  719.           <td>(</td>
    720. 

  720.           <td class="paramtype">real, dimension(nspp,nlev)&#160;</td>
    721. 

  721.           <td class="paramname"><em>zszt1</em>, </td>
    722. 

  722.         </tr>
    723. 

  723.         <tr>
    724. 

  724.           <td class="paramkey"></td>
    725. 

  725.           <td></td>
    726. 

  726.           <td class="paramtype">real, dimension(nspp,nlev)&#160;</td>
    727. 

  727.           <td class="paramname"><em>zszt2</em>, </td>
    728. 

  728.         </tr>
    729. 

  729.         <tr>
    730. 

  730.           <td class="paramkey"></td>
    731. 

  731.           <td></td>
    732. 

  732.           <td class="paramtype">real, dimension(nspp,nlev)&#160;</td>
    733. 

  733.           <td class="paramname"><em>zsdt1</em>, </td>
    734. 

  734.         </tr>
    735. 

  735.         <tr>
    736. 

  736.           <td class="paramkey"></td>
    737. 

  737.           <td></td>
    738. 

  738.           <td class="paramtype">real, dimension(nspp,nlev)&#160;</td>
    739. 

  739.           <td class="paramname"><em>zsdt2</em>, </td>
    740. 

  740.         </tr>
    741. 

  741.         <tr>
    742. 

  742.           <td class="paramkey"></td>
    743. 

  743.           <td></td>
    744. 

  744.           <td class="paramtype">real, dimension(nspp)&#160;</td>
    745. 

  745.           <td class="paramname"><em>zsp</em>&#160;</td>
    746. 

  746.         </tr>
    747. 

  747.         <tr>
    748. 

  748.           <td></td>
    749. 

  749.           <td>)</td>
    750. 

  750.           <td></td><td></td>
    751. 

  751.         </tr>
    752. 

  752.       </table>
    753. 

  753. </div>
    754. 

  754. <div class="memdoc">
    755. 

  755. 

  756. <p>Definition at line <a class="el" href="puma_8f90_source.html#l04343">4343</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    757. 

  757. 

  758. </div>
    759. 

  759. </div>
    760. 

  760. <a class="anchor" id="a30cefc96eb08dde625692abb8eae576e"></a><!-- doxytag: member="puma.f90::mkekin" ref="a30cefc96eb08dde625692abb8eae576e" args="(zszp, zsdp, zp, zekin)" -->
    761. 

  761. <div class="memitem">
    762. 

  762. <div class="memproto">
    763. 

  763.       <table class="memname">
    764. 

  764.         <tr>
    765. 

  765.           <td class="memname">subroutine mkekin </td>
    766. 

  766.           <td>(</td>
    767. 

  767.           <td class="paramtype">real, dimension(nspp,nlev)&#160;</td>
    768. 

  768.           <td class="paramname"><em>zszp</em>, </td>
    769. 

  769.         </tr>
    770. 

  770.         <tr>
    771. 

  771.           <td class="paramkey"></td>
    772. 

  772.           <td></td>
    773. 

  773.           <td class="paramtype">real, dimension(nspp,nlev)&#160;</td>
    774. 

  774.           <td class="paramname"><em>zsdp</em>, </td>
    775. 

  775.         </tr>
    776. 

  776.         <tr>
    777. 

  777.           <td class="paramkey"></td>
    778. 

  778.           <td></td>
    779. 

  779.           <td class="paramtype">real, dimension(nhor)&#160;</td>
    780. 

  780.           <td class="paramname"><em>zp</em>, </td>
    781. 

  781.         </tr>
    782. 

  782.         <tr>
    783. 

  783.           <td class="paramkey"></td>
    784. 

  784.           <td></td>
    785. 

  785.           <td class="paramtype">real, dimension(nhor)&#160;</td>
    786. 

  786.           <td class="paramname"><em>zekin</em>&#160;</td>
    787. 

  787.         </tr>
    788. 

  788.         <tr>
    789. 

  789.           <td></td>
    790. 

  790.           <td>)</td>
    791. 

  791.           <td></td><td></td>
    792. 

  792.         </tr>
    793. 

  793.       </table>
    794. 

  794. </div>
    795. 

  795. <div class="memdoc">
    796. 

  796. 

  797. <p>Definition at line <a class="el" href="puma_8f90_source.html#l04518">4518</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    798. 

  798. 

  799. </div>
    800. 

  800. </div>
    801. 

  801. <a class="anchor" id="abc6f135f96d6f8c9636cef2d9c9dd796"></a><!-- doxytag: member="puma.f90::mkekin2" ref="abc6f135f96d6f8c9636cef2d9c9dd796" args="(zszp, zsdp, zspp, zekin)" -->
    802. 

  802. <div class="memitem">
    803. 

  803. <div class="memproto">
    804. 

  804.       <table class="memname">
    805. 

  805.         <tr>
    806. 

  806.           <td class="memname">subroutine mkekin2 </td>
    807. 

  807.           <td>(</td>
    808. 

  808.           <td class="paramtype">real, dimension(nspp,nlev)&#160;</td>
    809. 

  809.           <td class="paramname"><em>zszp</em>, </td>
    810. 

  810.         </tr>
    811. 

  811.         <tr>
    812. 

  812.           <td class="paramkey"></td>
    813. 

  813.           <td></td>
    814. 

  814.           <td class="paramtype">real, dimension(nspp,nlev)&#160;</td>
    815. 

  815.           <td class="paramname"><em>zsdp</em>, </td>
    816. 

  816.         </tr>
    817. 

  817.         <tr>
    818. 

  818.           <td class="paramkey"></td>
    819. 

  819.           <td></td>
    820. 

  820.           <td class="paramtype">real, dimension(nspp)&#160;</td>
    821. 

  821.           <td class="paramname"><em>zspp</em>, </td>
    822. 

  822.         </tr>
    823. 

  823.         <tr>
    824. 

  824.           <td class="paramkey"></td>
    825. 

  825.           <td></td>
    826. 

  826.           <td class="paramtype">real, dimension(nhor)&#160;</td>
    827. 

  827.           <td class="paramname"><em>zekin</em>&#160;</td>
    828. 

  828.         </tr>
    829. 

  829.         <tr>
    830. 

  830.           <td></td>
    831. 

  831.           <td>)</td>
    832. 

  832.           <td></td><td></td>
    833. 

  833.         </tr>
    834. 

  834.       </table>
    835. 

  835. </div>
    836. 

  836. <div class="memdoc">
    837. 

  837. 

  838. <p>Definition at line <a class="el" href="puma_8f90_source.html#l04550">4550</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    839. 

  839. 

  840. </div>
    841. 

  841. </div>
    842. 

  842. <a class="anchor" id="a4f476f8f243b066b52526d1a2696b48f"></a><!-- doxytag: member="puma.f90::mkenerdiag" ref="a4f476f8f243b066b52526d1a2696b48f" args="(pst, pstt, psp, pspt, penergy)" -->
    843. 

  843. <div class="memitem">
    844. 

  844. <div class="memproto">
    845. 

  845.       <table class="memname">
    846. 

  846.         <tr>
    847. 

  847.           <td class="memname">subroutine mkenerdiag </td>
    848. 

  848.           <td>(</td>
    849. 

  849.           <td class="paramtype">real, dimension(nspp,nlev)&#160;</td>
    850. 

  850.           <td class="paramname"><em>pst</em>, </td>
    851. 

  851.         </tr>
    852. 

  852.         <tr>
    853. 

  853.           <td class="paramkey"></td>
    854. 

  854.           <td></td>
    855. 

  855.           <td class="paramtype">real, dimension(nspp,nlev)&#160;</td>
    856. 

  856.           <td class="paramname"><em>pstt</em>, </td>
    857. 

  857.         </tr>
    858. 

  858.         <tr>
    859. 

  859.           <td class="paramkey"></td>
    860. 

  860.           <td></td>
    861. 

  861.           <td class="paramtype">real, dimension(nspp)&#160;</td>
    862. 

  862.           <td class="paramname"><em>psp</em>, </td>
    863. 

  863.         </tr>
    864. 

  864.         <tr>
    865. 

  865.           <td class="paramkey"></td>
    866. 

  866.           <td></td>
    867. 

  867.           <td class="paramtype">real, dimension(nspp)&#160;</td>
    868. 

  868.           <td class="paramname"><em>pspt</em>, </td>
    869. 

  869.         </tr>
    870. 

  870.         <tr>
    871. 

  871.           <td class="paramkey"></td>
    872. 

  872.           <td></td>
    873. 

  873.           <td class="paramtype">real, dimension(nhor)&#160;</td>
    874. 

  874.           <td class="paramname"><em>penergy</em>&#160;</td>
    875. 

  875.         </tr>
    876. 

  876.         <tr>
    877. 

  877.           <td></td>
    878. 

  878.           <td>)</td>
    879. 

  879.           <td></td><td></td>
    880. 

  880.         </tr>
    881. 

  881.       </table>
    882. 

  882. </div>
    883. 

  883. <div class="memdoc">
    884. 

  884. 

  885. <p>Definition at line <a class="el" href="puma_8f90_source.html#l04244">4244</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    886. 

  886. 

  887. </div>
    888. 

  888. </div>
    889. 

  889. <a class="anchor" id="a36962178b35132627d3f0c4a2b816a92"></a><!-- doxytag: member="puma.f90::mkentrodiag" ref="a36962178b35132627d3f0c4a2b816a92" args="(pst, pstt, psp, pentropy)" -->
    890. 

  890. <div class="memitem">
    891. 

  891. <div class="memproto">
    892. 

  892.       <table class="memname">
    893. 

  893.         <tr>
    894. 

  894.           <td class="memname">subroutine mkentrodiag </td>
    895. 

  895.           <td>(</td>
    896. 

  896.           <td class="paramtype">real, dimension(nspp,nlev)&#160;</td>
    897. 

  897.           <td class="paramname"><em>pst</em>, </td>
    898. 

  898.         </tr>
    899. 

  899.         <tr>
    900. 

  900.           <td class="paramkey"></td>
    901. 

  901.           <td></td>
    902. 

  902.           <td class="paramtype">real, dimension(nspp,nlev)&#160;</td>
    903. 

  903.           <td class="paramname"><em>pstt</em>, </td>
    904. 

  904.         </tr>
    905. 

  905.         <tr>
    906. 

  906.           <td class="paramkey"></td>
    907. 

  907.           <td></td>
    908. 

  908.           <td class="paramtype">real, dimension(nspp)&#160;</td>
    909. 

  909.           <td class="paramname"><em>psp</em>, </td>
    910. 

  910.         </tr>
    911. 

  911.         <tr>
    912. 

  912.           <td class="paramkey"></td>
    913. 

  913.           <td></td>
    914. 

  914.           <td class="paramtype">real, dimension(nhor)&#160;</td>
    915. 

  915.           <td class="paramname"><em>pentropy</em>&#160;</td>
    916. 

  916.         </tr>
    917. 

  917.         <tr>
    918. 

  918.           <td></td>
    919. 

  919.           <td>)</td>
    920. 

  920.           <td></td><td></td>
    921. 

  921.         </tr>
    922. 

  922.       </table>
    923. 

  923. </div>
    924. 

  924. <div class="memdoc">
    925. 

  925. 

  926. <p>Definition at line <a class="el" href="puma_8f90_source.html#l04298">4298</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    927. 

  927. 

  928. </div>
    929. 

  929. </div>
    930. 

  930. <a class="anchor" id="a0af984bd0f7283956290a0964e69cf0e"></a><!-- doxytag: member="puma.f90::mkepot" ref="a0af984bd0f7283956290a0964e69cf0e" args="(zstp, zp, zepot)" -->
    931. 

  931. <div class="memitem">
    932. 

  932. <div class="memproto">
    933. 

  933.       <table class="memname">
    934. 

  934.         <tr>
    935. 

  935.           <td class="memname">subroutine mkepot </td>
    936. 

  936.           <td>(</td>
    937. 

  937.           <td class="paramtype">real, dimension(nspp,nlev)&#160;</td>
    938. 

  938.           <td class="paramname"><em>zstp</em>, </td>
    939. 

  939.         </tr>
    940. 

  940.         <tr>
    941. 

  941.           <td class="paramkey"></td>
    942. 

  942.           <td></td>
    943. 

  943.           <td class="paramtype">real, dimension(nhor)&#160;</td>
    944. 

  944.           <td class="paramname"><em>zp</em>, </td>
    945. 

  945.         </tr>
    946. 

  946.         <tr>
    947. 

  947.           <td class="paramkey"></td>
    948. 

  948.           <td></td>
    949. 

  949.           <td class="paramtype">real, dimension(nhor)&#160;</td>
    950. 

  950.           <td class="paramname"><em>zepot</em>&#160;</td>
    951. 

  951.         </tr>
    952. 

  952.         <tr>
    953. 

  953.           <td></td>
    954. 

  954.           <td>)</td>
    955. 

  955.           <td></td><td></td>
    956. 

  956.         </tr>
    957. 

  957.       </table>
    958. 

  958. </div>
    959. 

  959. <div class="memdoc">
    960. 

  960. 

  961. <p>Definition at line <a class="el" href="puma_8f90_source.html#l04592">4592</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    962. 

  962. 

  963. </div>
    964. 

  964. </div>
    965. 

  965. <a class="anchor" id="a23384f45e8ba553e7aaed8b22a9a80e8"></a><!-- doxytag: member="puma.f90::mkepot2" ref="a23384f45e8ba553e7aaed8b22a9a80e8" args="(zstp, zspp, zepot)" -->
    966. 

  966. <div class="memitem">
    967. 

  967. <div class="memproto">
    968. 

  968.       <table class="memname">
    969. 

  969.         <tr>
    970. 

  970.           <td class="memname">subroutine mkepot2 </td>
    971. 

  971.           <td>(</td>
    972. 

  972.           <td class="paramtype">real, dimension(nspp,nlev)&#160;</td>
    973. 

  973.           <td class="paramname"><em>zstp</em>, </td>
    974. 

  974.         </tr>
    975. 

  975.         <tr>
    976. 

  976.           <td class="paramkey"></td>
    977. 

  977.           <td></td>
    978. 

  978.           <td class="paramtype">real, dimension(nspp)&#160;</td>
    979. 

  979.           <td class="paramname"><em>zspp</em>, </td>
    980. 

  980.         </tr>
    981. 

  981.         <tr>
    982. 

  982.           <td class="paramkey"></td>
    983. 

  983.           <td></td>
    984. 

  984.           <td class="paramtype">real, dimension(nhor)&#160;</td>
    985. 

  985.           <td class="paramname"><em>zepot</em>&#160;</td>
    986. 

  986.         </tr>
    987. 

  987.         <tr>
    988. 

  988.           <td></td>
    989. 

  989.           <td>)</td>
    990. 

  990.           <td></td><td></td>
    991. 

  991.         </tr>
    992. 

  992.       </table>
    993. 

  993. </div>
    994. 

  994. <div class="memdoc">
    995. 

  995. 

  996. <p>Definition at line <a class="el" href="puma_8f90_source.html#l04621">4621</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    997. 

  997. 

  998. </div>
    999. 

  999. </div>
    1000. 

  1000. <a class="anchor" id="a1ad2c0878e366bb7f12ca880fd36c654"></a><!-- doxytag: member="puma.f90::mrcheck" ref="a1ad2c0878e366bb7f12ca880fd36c654" args="(f)" -->
    1001. 

  1001. <div class="memitem">
    1002. 

  1002. <div class="memproto">
    1003. 

  1003.       <table class="memname">
    1004. 

  1004.         <tr>
    1005. 

  1005.           <td class="memname">subroutine mrcheck </td>
    1006. 

  1006.           <td>(</td>
    1007. 

  1007.           <td class="paramtype">real, dimension(*)&#160;</td>
    1008. 

  1008.           <td class="paramname"><em>f</em></td><td>)</td>
    1009. 

  1009.           <td></td>
    1010. 

  1010.         </tr>
    1011. 

  1011.       </table>
    1012. 

  1012. </div>
    1013. 

  1013. <div class="memdoc">
    1014. 

  1014. 

  1015. <p>Definition at line <a class="el" href="puma_8f90_source.html#l03925">3925</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1016. 

  1016. 

  1017. </div>
    1018. 

  1018. </div>
    1019. 

  1019. <a class="anchor" id="abdcee9a4a4d07fc6e5b7a7f5768026ac"></a><!-- doxytag: member="puma.f90::noise" ref="abdcee9a4a4d07fc6e5b7a7f5768026ac" args="(kickval)" -->
    1020. 

  1020. <div class="memitem">
    1021. 

  1021. <div class="memproto">
    1022. 

  1022.       <table class="memname">
    1023. 

  1023.         <tr>
    1024. 

  1024.           <td class="memname">subroutine noise </td>
    1025. 

  1025.           <td>(</td>
    1026. 

  1026.           <td class="paramtype">integer&#160;</td>
    1027. 

  1027.           <td class="paramname"><em>kickval</em></td><td>)</td>
    1028. 

  1028.           <td></td>
    1029. 

  1029.         </tr>
    1030. 

  1030.       </table>
    1031. 

  1031. </div>
    1032. 

  1032. <div class="memdoc">
    1033. 

  1033. 

  1034. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02173">2173</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1035. 

  1035. 

  1036. </div>
    1037. 

  1037. </div>
    1038. 

  1038. <a class="anchor" id="a6b0de7569cc691823dd1104ff42a6993"></a><!-- doxytag: member="puma.f90::ntodat" ref="a6b0de7569cc691823dd1104ff42a6993" args="(istep, datch)" -->
    1039. 

  1039. <div class="memitem">
    1040. 

  1040. <div class="memproto">
    1041. 

  1041.       <table class="memname">
    1042. 

  1042.         <tr>
    1043. 

  1043.           <td class="memname">subroutine ntodat </td>
    1044. 

  1044.           <td>(</td>
    1045. 

  1045.           <td class="paramtype">&#160;</td>
    1046. 

  1046.           <td class="paramname"><em>istep</em>, </td>
    1047. 

  1047.         </tr>
    1048. 

  1048.         <tr>
    1049. 

  1049.           <td class="paramkey"></td>
    1050. 

  1050.           <td></td>
    1051. 

  1051.           <td class="paramtype">character(18)&#160;</td>
    1052. 

  1052.           <td class="paramname"><em>datch</em>&#160;</td>
    1053. 

  1053.         </tr>
    1054. 

  1054.         <tr>
    1055. 

  1055.           <td></td>
    1056. 

  1056.           <td>)</td>
    1057. 

  1057.           <td></td><td></td>
    1058. 

  1058.         </tr>
    1059. 

  1059.       </table>
    1060. 

  1060. </div>
    1061. 

  1061. <div class="memdoc">
    1062. 

  1062. 

  1063. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02759">2759</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1064. 

  1064. 

  1065. </div>
    1066. 

  1066. </div>
    1067. 

  1067. <a class="anchor" id="a6628dcb7258ff7477a7bc7f3098cded3"></a><!-- doxytag: member="puma.f90::ntomin" ref="a6628dcb7258ff7477a7bc7f3098cded3" args="(kstep, imin, ihou, iday, imon, iyea)" -->
    1068. 

  1068. <div class="memitem">
    1069. 

  1069. <div class="memproto">
    1070. 

  1070.       <table class="memname">
    1071. 

  1071.         <tr>
    1072. 

  1072.           <td class="memname">subroutine ntomin </td>
    1073. 

  1073.           <td>(</td>
    1074. 

  1074.           <td class="paramtype">&#160;</td>
    1075. 

  1075.           <td class="paramname"><em>kstep</em>, </td>
    1076. 

  1076.         </tr>
    1077. 

  1077.         <tr>
    1078. 

  1078.           <td class="paramkey"></td>
    1079. 

  1079.           <td></td>
    1080. 

  1080.           <td class="paramtype">&#160;</td>
    1081. 

  1081.           <td class="paramname"><em>imin</em>, </td>
    1082. 

  1082.         </tr>
    1083. 

  1083.         <tr>
    1084. 

  1084.           <td class="paramkey"></td>
    1085. 

  1085.           <td></td>
    1086. 

  1086.           <td class="paramtype">&#160;</td>
    1087. 

  1087.           <td class="paramname"><em>ihou</em>, </td>
    1088. 

  1088.         </tr>
    1089. 

  1089.         <tr>
    1090. 

  1090.           <td class="paramkey"></td>
    1091. 

  1091.           <td></td>
    1092. 

  1092.           <td class="paramtype">&#160;</td>
    1093. 

  1093.           <td class="paramname"><em>iday</em>, </td>
    1094. 

  1094.         </tr>
    1095. 

  1095.         <tr>
    1096. 

  1096.           <td class="paramkey"></td>
    1097. 

  1097.           <td></td>
    1098. 

  1098.           <td class="paramtype">&#160;</td>
    1099. 

  1099.           <td class="paramname"><em>imon</em>, </td>
    1100. 

  1100.         </tr>
    1101. 

  1101.         <tr>
    1102. 

  1102.           <td class="paramkey"></td>
    1103. 

  1103.           <td></td>
    1104. 

  1104.           <td class="paramtype">&#160;</td>
    1105. 

  1105.           <td class="paramname"><em>iyea</em>&#160;</td>
    1106. 

  1106.         </tr>
    1107. 

  1107.         <tr>
    1108. 

  1108.           <td></td>
    1109. 

  1109.           <td>)</td>
    1110. 

  1110.           <td></td><td></td>
    1111. 

  1111.         </tr>
    1112. 

  1112.       </table>
    1113. 

  1113. </div>
    1114. 

  1114. <div class="memdoc">
    1115. 

  1115. 

  1116. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02737">2737</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1117. 

  1117. 

  1118. </div>
    1119. 

  1119. </div>
    1120. 

  1120. <a class="anchor" id="ab7757291a70ca39d0c7a7e8db515c058"></a><!-- doxytag: member="puma.f90::opendiag" ref="ab7757291a70ca39d0c7a7e8db515c058" args="" -->
    1121. 

  1121. <div class="memitem">
    1122. 

  1122. <div class="memproto">
    1123. 

  1123.       <table class="memname">
    1124. 

  1124.         <tr>
    1125. 

  1125.           <td class="memname">subroutine opendiag </td>
    1126. 

  1126.           <td>(</td>
    1127. 

  1127.           <td class="paramname"></td><td>)</td>
    1128. 

  1128.           <td></td>
    1129. 

  1129.         </tr>
    1130. 

  1130.       </table>
    1131. 

  1131. </div>
    1132. 

  1132. <div class="memdoc">
    1133. 

  1133. 

  1134. <p>Definition at line <a class="el" href="puma_8f90_source.html#l00578">578</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1135. 

  1135. 

  1136. </div>
    1137. 

  1137. </div>
    1138. 

  1138. <a class="anchor" id="a1f5ebb3d7ab8cc007a6ed2d81b858f03"></a><!-- doxytag: member="puma.f90::outgp" ref="a1f5ebb3d7ab8cc007a6ed2d81b858f03" args="" -->
    1139. 

  1139. <div class="memitem">
    1140. 

  1140. <div class="memproto">
    1141. 

  1141.       <table class="memname">
    1142. 

  1142.         <tr>
    1143. 

  1143.           <td class="memname">subroutine outgp </td>
    1144. 

  1144.           <td>(</td>
    1145. 

  1145.           <td class="paramname"></td><td>)</td>
    1146. 

  1146.           <td></td>
    1147. 

  1147.         </tr>
    1148. 

  1148.       </table>
    1149. 

  1149. </div>
    1150. 

  1150. <div class="memdoc">
    1151. 

  1151. 

  1152. <p>Definition at line <a class="el" href="puma_8f90_source.html#l03004">3004</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1153. 

  1153. 

  1154. </div>
    1155. 

  1155. </div>
    1156. 

  1156. <a class="anchor" id="a0352cc6bbeedace31c54d9afba847ad6"></a><!-- doxytag: member="puma.f90::outsp" ref="a0352cc6bbeedace31c54d9afba847ad6" args="" -->
    1157. 

  1157. <div class="memitem">
    1158. 

  1158. <div class="memproto">
    1159. 

  1159.       <table class="memname">
    1160. 

  1160.         <tr>
    1161. 

  1161.           <td class="memname">subroutine outsp </td>
    1162. 

  1162.           <td>(</td>
    1163. 

  1163.           <td class="paramname"></td><td>)</td>
    1164. 

  1164.           <td></td>
    1165. 

  1165.         </tr>
    1166. 

  1166.       </table>
    1167. 

  1167. </div>
    1168. 

  1168. <div class="memdoc">
    1169. 

  1169. 

  1170. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02934">2934</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1171. 

  1171. 

  1172. </div>
    1173. 

  1173. </div>
    1174. 

  1174. <a class="anchor" id="a53adeff6424dd4b2f124771625a47ca5"></a><!-- doxytag: member="puma.f90::powerprint" ref="a53adeff6424dd4b2f124771625a47ca5" args="(text, pspec)" -->
    1175. 

  1175. <div class="memitem">
    1176. 

  1176. <div class="memproto">
    1177. 

  1177.       <table class="memname">
    1178. 

  1178.         <tr>
    1179. 

  1179.           <td class="memname">subroutine powerprint </td>
    1180. 

  1180.           <td>(</td>
    1181. 

  1181.           <td class="paramtype">character(3)&#160;</td>
    1182. 

  1182.           <td class="paramname"><em>text</em>, </td>
    1183. 

  1183.         </tr>
    1184. 

  1184.         <tr>
    1185. 

  1185.           <td class="paramkey"></td>
    1186. 

  1186.           <td></td>
    1187. 

  1187.           <td class="paramtype">real, dimension(ntp1)&#160;</td>
    1188. 

  1188.           <td class="paramname"><em>pspec</em>&#160;</td>
    1189. 

  1189.         </tr>
    1190. 

  1190.         <tr>
    1191. 

  1191.           <td></td>
    1192. 

  1192.           <td>)</td>
    1193. 

  1193.           <td></td><td></td>
    1194. 

  1194.         </tr>
    1195. 

  1195.       </table>
    1196. 

  1196. </div>
    1197. 

  1197. <div class="memdoc">
    1198. 

  1198. 

  1199. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02615">2615</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1200. 

  1200. 

  1201. </div>
    1202. 

  1202. </div>
    1203. 

  1203. <a class="anchor" id="a8625954404de5b08c55626c4f8a62972"></a><!-- doxytag: member="puma.f90::powerspec" ref="a8625954404de5b08c55626c4f8a62972" args="(pf, pspec)" -->
    1204. 

  1204. <div class="memitem">
    1205. 

  1205. <div class="memproto">
    1206. 

  1206.       <table class="memname">
    1207. 

  1207.         <tr>
    1208. 

  1208.           <td class="memname">subroutine powerspec </td>
    1209. 

  1209.           <td>(</td>
    1210. 

  1210.           <td class="paramtype">real, dimension(2,ncsp)&#160;</td>
    1211. 

  1211.           <td class="paramname"><em>pf</em>, </td>
    1212. 

  1212.         </tr>
    1213. 

  1213.         <tr>
    1214. 

  1214.           <td class="paramkey"></td>
    1215. 

  1215.           <td></td>
    1216. 

  1216.           <td class="paramtype">real, dimension(ntp1)&#160;</td>
    1217. 

  1217.           <td class="paramname"><em>pspec</em>&#160;</td>
    1218. 

  1218.         </tr>
    1219. 

  1219.         <tr>
    1220. 

  1220.           <td></td>
    1221. 

  1221.           <td>)</td>
    1222. 

  1222.           <td></td><td></td>
    1223. 

  1223.         </tr>
    1224. 

  1224.       </table>
    1225. 

  1225. </div>
    1226. 

  1226. <div class="memdoc">
    1227. 

  1227. 

  1228. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02592">2592</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1229. 

  1229. 

  1230. </div>
    1231. 

  1231. </div>
    1232. 

  1232. <a class="anchor" id="ad3f0e22c057591beabda5d99c3f40c4c"></a><!-- doxytag: member="puma.f90::ppp_def_int" ref="ad3f0e22c057591beabda5d99c3f40c4c" args="(pname, nvar, ndim)" -->
    1233. 

  1233. <div class="memitem">
    1234. 

  1234. <div class="memproto">
    1235. 

  1235.       <table class="memname">
    1236. 

  1236.         <tr>
    1237. 

  1237.           <td class="memname">subroutine ppp_def_int </td>
    1238. 

  1238.           <td>(</td>
    1239. 

  1239.           <td class="paramtype">character (*)&#160;</td>
    1240. 

  1240.           <td class="paramname"><em>pname</em>, </td>
    1241. 

  1241.         </tr>
    1242. 

  1242.         <tr>
    1243. 

  1243.           <td class="paramkey"></td>
    1244. 

  1244.           <td></td>
    1245. 

  1245.           <td class="paramtype">integer, target&#160;</td>
    1246. 

  1246.           <td class="paramname"><em>nvar</em>, </td>
    1247. 

  1247.         </tr>
    1248. 

  1248.         <tr>
    1249. 

  1249.           <td class="paramkey"></td>
    1250. 

  1250.           <td></td>
    1251. 

  1251.           <td class="paramtype">&#160;</td>
    1252. 

  1252.           <td class="paramname"><em>ndim</em>&#160;</td>
    1253. 

  1253.         </tr>
    1254. 

  1254.         <tr>
    1255. 

  1255.           <td></td>
    1256. 

  1256.           <td>)</td>
    1257. 

  1257.           <td></td><td></td>
    1258. 

  1258.         </tr>
    1259. 

  1259.       </table>
    1260. 

  1260. </div>
    1261. 

  1261. <div class="memdoc">
    1262. 

  1262. 

  1263. <p>Definition at line <a class="el" href="puma_8f90_source.html#l01385">1385</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1264. 

  1264. 

  1265. </div>
    1266. 

  1266. </div>
    1267. 

  1267. <a class="anchor" id="a3e4cf6a68be16437f50762bf77e52370"></a><!-- doxytag: member="puma.f90::ppp_def_real" ref="a3e4cf6a68be16437f50762bf77e52370" args="(pname, rvar, ndim)" -->
    1268. 

  1268. <div class="memitem">
    1269. 

  1269. <div class="memproto">
    1270. 

  1270.       <table class="memname">
    1271. 

  1271.         <tr>
    1272. 

  1272.           <td class="memname">subroutine ppp_def_real </td>
    1273. 

  1273.           <td>(</td>
    1274. 

  1274.           <td class="paramtype">character (*)&#160;</td>
    1275. 

  1275.           <td class="paramname"><em>pname</em>, </td>
    1276. 

  1276.         </tr>
    1277. 

  1277.         <tr>
    1278. 

  1278.           <td class="paramkey"></td>
    1279. 

  1279.           <td></td>
    1280. 

  1280.           <td class="paramtype">real, target&#160;</td>
    1281. 

  1281.           <td class="paramname"><em>rvar</em>, </td>
    1282. 

  1282.         </tr>
    1283. 

  1283.         <tr>
    1284. 

  1284.           <td class="paramkey"></td>
    1285. 

  1285.           <td></td>
    1286. 

  1286.           <td class="paramtype">&#160;</td>
    1287. 

  1287.           <td class="paramname"><em>ndim</em>&#160;</td>
    1288. 

  1288.         </tr>
    1289. 

  1289.         <tr>
    1290. 

  1290.           <td></td>
    1291. 

  1291.           <td>)</td>
    1292. 

  1292.           <td></td><td></td>
    1293. 

  1293.         </tr>
    1294. 

  1294.       </table>
    1295. 

  1295. </div>
    1296. 

  1296. <div class="memdoc">
    1297. 

  1297. 

  1298. <p>Definition at line <a class="el" href="puma_8f90_source.html#l01405">1405</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1299. 

  1299. 

  1300. </div>
    1301. 

  1301. </div>
    1302. 

  1302. <a class="anchor" id="a859f80933ca252bcc87f27d3996fea05"></a><!-- doxytag: member="puma.f90::ppp_interface" ref="a859f80933ca252bcc87f27d3996fea05" args="" -->
    1303. 

  1303. <div class="memitem">
    1304. 

  1304. <div class="memproto">
    1305. 

  1305.       <table class="memname">
    1306. 

  1306.         <tr>
    1307. 

  1307.           <td class="memname">subroutine ppp_interface </td>
    1308. 

  1308.           <td>(</td>
    1309. 

  1309.           <td class="paramname"></td><td>)</td>
    1310. 

  1310.           <td></td>
    1311. 

  1311.         </tr>
    1312. 

  1312.       </table>
    1313. 

  1313. </div>
    1314. 

  1314. <div class="memdoc">
    1315. 

  1315. 

  1316. <p>Definition at line <a class="el" href="puma_8f90_source.html#l01450">1450</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1317. 

  1317. 

  1318. </div>
    1319. 

  1319. </div>
    1320. 

  1320. <a class="anchor" id="a4c83f2cca37be70c03946309fc4e2a52"></a><!-- doxytag: member="puma.f90::ppp_read_i" ref="a4c83f2cca37be70c03946309fc4e2a52" args="(a, ndim, nread)" -->
    1321. 

  1321. <div class="memitem">
    1322. 

  1322. <div class="memproto">
    1323. 

  1323.       <table class="memname">
    1324. 

  1324.         <tr>
    1325. 

  1325.           <td class="memname">subroutine ppp_read_i </td>
    1326. 

  1326.           <td>(</td>
    1327. 

  1327.           <td class="paramtype">integer, dimension(ndim)&#160;</td>
    1328. 

  1328.           <td class="paramname"><em>a</em>, </td>
    1329. 

  1329.         </tr>
    1330. 

  1330.         <tr>
    1331. 

  1331.           <td class="paramkey"></td>
    1332. 

  1332.           <td></td>
    1333. 

  1333.           <td class="paramtype">&#160;</td>
    1334. 

  1334.           <td class="paramname"><em>ndim</em>, </td>
    1335. 

  1335.         </tr>
    1336. 

  1336.         <tr>
    1337. 

  1337.           <td class="paramkey"></td>
    1338. 

  1338.           <td></td>
    1339. 

  1339.           <td class="paramtype">&#160;</td>
    1340. 

  1340.           <td class="paramname"><em>nread</em>&#160;</td>
    1341. 

  1341.         </tr>
    1342. 

  1342.         <tr>
    1343. 

  1343.           <td></td>
    1344. 

  1344.           <td>)</td>
    1345. 

  1345.           <td></td><td></td>
    1346. 

  1346.         </tr>
    1347. 

  1347.       </table>
    1348. 

  1348. </div>
    1349. 

  1349. <div class="memdoc">
    1350. 

  1350. 

  1351. <p>Definition at line <a class="el" href="puma_8f90_source.html#l01420">1420</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1352. 

  1352. 

  1353. </div>
    1354. 

  1354. </div>
    1355. 

  1355. <a class="anchor" id="a1e7bdf5ee1faa40d34b6cc93ebc3acc3"></a><!-- doxytag: member="puma.f90::ppp_read_r" ref="a1e7bdf5ee1faa40d34b6cc93ebc3acc3" args="(a, ndim, nread)" -->
    1356. 

  1356. <div class="memitem">
    1357. 

  1357. <div class="memproto">
    1358. 

  1358.       <table class="memname">
    1359. 

  1359.         <tr>
    1360. 

  1360.           <td class="memname">subroutine ppp_read_r </td>
    1361. 

  1361.           <td>(</td>
    1362. 

  1362.           <td class="paramtype">real, dimension(ndim)&#160;</td>
    1363. 

  1363.           <td class="paramname"><em>a</em>, </td>
    1364. 

  1364.         </tr>
    1365. 

  1365.         <tr>
    1366. 

  1366.           <td class="paramkey"></td>
    1367. 

  1367.           <td></td>
    1368. 

  1368.           <td class="paramtype">&#160;</td>
    1369. 

  1369.           <td class="paramname"><em>ndim</em>, </td>
    1370. 

  1370.         </tr>
    1371. 

  1371.         <tr>
    1372. 

  1372.           <td class="paramkey"></td>
    1373. 

  1373.           <td></td>
    1374. 

  1374.           <td class="paramtype">&#160;</td>
    1375. 

  1375.           <td class="paramname"><em>nread</em>&#160;</td>
    1376. 

  1376.         </tr>
    1377. 

  1377.         <tr>
    1378. 

  1378.           <td></td>
    1379. 

  1379.           <td>)</td>
    1380. 

  1380.           <td></td><td></td>
    1381. 

  1381.         </tr>
    1382. 

  1382.       </table>
    1383. 

  1383. </div>
    1384. 

  1384. <div class="memdoc">
    1385. 

  1385. 

  1386. <p>Definition at line <a class="el" href="puma_8f90_source.html#l01433">1433</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1387. 

  1387. 

  1388. </div>
    1389. 

  1389. </div>
    1390. 

  1390. <a class="anchor" id="aa92d6879772b364173e13521d835895e"></a><!-- doxytag: member="puma.f90::printprofile" ref="aa92d6879772b364173e13521d835895e" args="" -->
    1391. 

  1391. <div class="memitem">
    1392. 

  1392. <div class="memproto">
    1393. 

  1393.       <table class="memname">
    1394. 

  1394.         <tr>
    1395. 

  1395.           <td class="memname">subroutine printprofile </td>
    1396. 

  1396.           <td>(</td>
    1397. 

  1397.           <td class="paramname"></td><td>)</td>
    1398. 

  1398.           <td></td>
    1399. 

  1399.         </tr>
    1400. 

  1400.       </table>
    1401. 

  1401. </div>
    1402. 

  1402. <div class="memdoc">
    1403. 

  1403. 

  1404. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02344">2344</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1405. 

  1405. 

  1406. </div>
    1407. 

  1407. </div>
    1408. 

  1408. <a class="anchor" id="a9a888c599145a63cdd108dffa553b509"></a><!-- doxytag: member="puma.f90::printseed" ref="a9a888c599145a63cdd108dffa553b509" args="" -->
    1409. 

  1409. <div class="memitem">
    1410. 

  1410. <div class="memproto">
    1411. 

  1411.       <table class="memname">
    1412. 

  1412.         <tr>
    1413. 

  1413.           <td class="memname">subroutine printseed </td>
    1414. 

  1414.           <td>(</td>
    1415. 

  1415.           <td class="paramname"></td><td>)</td>
    1416. 

  1416.           <td></td>
    1417. 

  1417.         </tr>
    1418. 

  1418.       </table>
    1419. 

  1419. </div>
    1420. 

  1420. <div class="memdoc">
    1421. 

  1421. 

  1422. <p>Definition at line <a class="el" href="puma_8f90_source.html#l01954">1954</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1423. 

  1423. 

  1424. </div>
    1425. 

  1425. </div>
    1426. 

  1426. <a class="anchor" id="a901150c868c1f2d65744ec49df0c24ed"></a><!-- doxytag: member="puma.f90::prisp" ref="a901150c868c1f2d65744ec49df0c24ed" args="" -->
    1427. 

  1427. <div class="memitem">
    1428. 

  1428. <div class="memproto">
    1429. 

  1429.       <table class="memname">
    1430. 

  1430.         <tr>
    1431. 

  1431.           <td class="memname">subroutine prisp </td>
    1432. 

  1432.           <td>(</td>
    1433. 

  1433.           <td class="paramname"></td><td>)</td>
    1434. 

  1434.           <td></td>
    1435. 

  1435.         </tr>
    1436. 

  1436.       </table>
    1437. 

  1437. </div>
    1438. 

  1438. <div class="memdoc">
    1439. 

  1439. 

  1440. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02560">2560</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1441. 

  1441. 

  1442. </div>
    1443. 

  1443. </div>
    1444. 

  1444. <a class="anchor" id="afde378004f20ed8741a7e9bcd82cbfe4"></a><!-- doxytag: member="puma.f90::prolog" ref="afde378004f20ed8741a7e9bcd82cbfe4" args="" -->
    1445. 

  1445. <div class="memitem">
    1446. 

  1446. <div class="memproto">
    1447. 

  1447.       <table class="memname">
    1448. 

  1448.         <tr>
    1449. 

  1449.           <td class="memname">subroutine prolog </td>
    1450. 

  1450.           <td>(</td>
    1451. 

  1451.           <td class="paramname"></td><td>)</td>
    1452. 

  1452.           <td></td>
    1453. 

  1453.         </tr>
    1454. 

  1454.       </table>
    1455. 

  1455. </div>
    1456. 

  1456. <div class="memdoc">
    1457. 

  1457. 

  1458. <p>Definition at line <a class="el" href="puma_8f90_source.html#l00686">686</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1459. 

  1459. 

  1460. </div>
    1461. 

  1461. </div>
    1462. 

  1462. <a class="anchor" id="ab9b07e4288c177e089731e7560c18ac1"></a><!-- doxytag: member="puma.f90::puma_main" ref="ab9b07e4288c177e089731e7560c18ac1" args="" -->
    1463. 

  1463. <div class="memitem">
    1464. 

  1464. <div class="memproto">
    1465. 

  1465.       <table class="memname">
    1466. 

  1466.         <tr>
    1467. 

  1467.           <td class="memname">program puma_main </td>
    1468. 

  1468.           <td>(</td>
    1469. 

  1469.           <td class="paramname"></td><td>)</td>
    1470. 

  1470.           <td></td>
    1471. 

  1471.         </tr>
    1472. 

  1472.       </table>
    1473. 

  1473. </div>
    1474. 

  1474. <div class="memdoc">
    1475. 

  1475. 

  1476. <p>Definition at line <a class="el" href="puma_8f90_source.html#l00484">484</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1477. 

  1477. 

  1478. </div>
    1479. 

  1479. </div>
    1480. 

  1480. <a class="anchor" id="aa07fedd638dbdd8e1799b83d34eb35e3"></a><!-- doxytag: member="puma.f90::read_atmos_restart" ref="aa07fedd638dbdd8e1799b83d34eb35e3" args="" -->
    1481. 

  1481. <div class="memitem">
    1482. 

  1482. <div class="memproto">
    1483. 

  1483.       <table class="memname">
    1484. 

  1484.         <tr>
    1485. 

  1485.           <td class="memname">subroutine read_atmos_restart </td>
    1486. 

  1486.           <td>(</td>
    1487. 

  1487.           <td class="paramname"></td><td>)</td>
    1488. 

  1488.           <td></td>
    1489. 

  1489.         </tr>
    1490. 

  1490.       </table>
    1491. 

  1491. </div>
    1492. 

  1492. <div class="memdoc">
    1493. 

  1493. 

  1494. <p>Definition at line <a class="el" href="puma_8f90_source.html#l01086">1086</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1495. 

  1495. 

  1496. </div>
    1497. 

  1497. </div>
    1498. 

  1498. <a class="anchor" id="a811c67568d6f12806d6b6f86813d2bc4"></a><!-- doxytag: member="puma.f90::read_resolution" ref="a811c67568d6f12806d6b6f86813d2bc4" args="" -->
    1499. 

  1499. <div class="memitem">
    1500. 

  1500. <div class="memproto">
    1501. 

  1501.       <table class="memname">
    1502. 

  1502.         <tr>
    1503. 

  1503.           <td class="memname">subroutine read_resolution </td>
    1504. 

  1504.           <td>(</td>
    1505. 

  1505.           <td class="paramname"></td><td>)</td>
    1506. 

  1506.           <td></td>
    1507. 

  1507.         </tr>
    1508. 

  1508.       </table>
    1509. 

  1509. </div>
    1510. 

  1510. <div class="memdoc">
    1511. 

  1511. 

  1512. <p>Definition at line <a class="el" href="puma_8f90_source.html#l01253">1253</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1513. 

  1513. 

  1514. </div>
    1515. 

  1515. </div>
    1516. 

  1516. <a class="anchor" id="aa8533c8ebc4415ef95ca9c34c4ba7d6b"></a><!-- doxytag: member="puma.f90::read_surf" ref="aa8533c8ebc4415ef95ca9c34c4ba7d6b" args="(kcode, psp, klev, kread)" -->
    1517. 

  1517. <div class="memitem">
    1518. 

  1518. <div class="memproto">
    1519. 

  1519.       <table class="memname">
    1520. 

  1520.         <tr>
    1521. 

  1521.           <td class="memname">subroutine read_surf </td>
    1522. 

  1522.           <td>(</td>
    1523. 

  1523.           <td class="paramtype">&#160;</td>
    1524. 

  1524.           <td class="paramname"><em>kcode</em>, </td>
    1525. 

  1525.         </tr>
    1526. 

  1526.         <tr>
    1527. 

  1527.           <td class="paramkey"></td>
    1528. 

  1528.           <td></td>
    1529. 

  1529.           <td class="paramtype">real, dimension(nesp,klev)&#160;</td>
    1530. 

  1530.           <td class="paramname"><em>psp</em>, </td>
    1531. 

  1531.         </tr>
    1532. 

  1532.         <tr>
    1533. 

  1533.           <td class="paramkey"></td>
    1534. 

  1534.           <td></td>
    1535. 

  1535.           <td class="paramtype">&#160;</td>
    1536. 

  1536.           <td class="paramname"><em>klev</em>, </td>
    1537. 

  1537.         </tr>
    1538. 

  1538.         <tr>
    1539. 

  1539.           <td class="paramkey"></td>
    1540. 

  1540.           <td></td>
    1541. 

  1541.           <td class="paramtype">integer&#160;</td>
    1542. 

  1542.           <td class="paramname"><em>kread</em>&#160;</td>
    1543. 

  1543.         </tr>
    1544. 

  1544.         <tr>
    1545. 

  1545.           <td></td>
    1546. 

  1546.           <td>)</td>
    1547. 

  1547.           <td></td><td></td>
    1548. 

  1548.         </tr>
    1549. 

  1549.       </table>
    1550. 

  1550. </div>
    1551. 

  1551. <div class="memdoc">
    1552. 

  1552. 

  1553. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02380">2380</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1554. 

  1554. 

  1555. </div>
    1556. 

  1556. </div>
    1557. 

  1557. <a class="anchor" id="a9dfa3f46641f3df498d07ff40df08a57"></a><!-- doxytag: member="puma.f90::read_vargp" ref="a9dfa3f46641f3df498d07ff40df08a57" args="(kcode, klev, kread)" -->
    1558. 

  1558. <div class="memitem">
    1559. 

  1559. <div class="memproto">
    1560. 

  1560.       <table class="memname">
    1561. 

  1561.         <tr>
    1562. 

  1562.           <td class="memname">subroutine read_vargp </td>
    1563. 

  1563.           <td>(</td>
    1564. 

  1564.           <td class="paramtype">&#160;</td>
    1565. 

  1565.           <td class="paramname"><em>kcode</em>, </td>
    1566. 

  1566.         </tr>
    1567. 

  1567.         <tr>
    1568. 

  1568.           <td class="paramkey"></td>
    1569. 

  1569.           <td></td>
    1570. 

  1570.           <td class="paramtype">&#160;</td>
    1571. 

  1571.           <td class="paramname"><em>klev</em>, </td>
    1572. 

  1572.         </tr>
    1573. 

  1573.         <tr>
    1574. 

  1574.           <td class="paramkey"></td>
    1575. 

  1575.           <td></td>
    1576. 

  1576.           <td class="paramtype">&#160;</td>
    1577. 

  1577.           <td class="paramname"><em>kread</em>&#160;</td>
    1578. 

  1578.         </tr>
    1579. 

  1579.         <tr>
    1580. 

  1580.           <td></td>
    1581. 

  1581.           <td>)</td>
    1582. 

  1582.           <td></td><td></td>
    1583. 

  1583.         </tr>
    1584. 

  1584.       </table>
    1585. 

  1585. </div>
    1586. 

  1586. <div class="memdoc">
    1587. 

  1587. 

  1588. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02434">2434</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1589. 

  1589. 

  1590. </div>
    1591. 

  1591. </div>
    1592. 

  1592. <a class="anchor" id="a8a75958ca9ba25aeec49db140b483871"></a><!-- doxytag: member="puma.f90::readnl" ref="a8a75958ca9ba25aeec49db140b483871" args="" -->
    1593. 

  1593. <div class="memitem">
    1594. 

  1594. <div class="memproto">
    1595. 

  1595.       <table class="memname">
    1596. 

  1596.         <tr>
    1597. 

  1597.           <td class="memname">subroutine readnl </td>
    1598. 

  1598.           <td>(</td>
    1599. 

  1599.           <td class="paramname"></td><td>)</td>
    1600. 

  1600.           <td></td>
    1601. 

  1601.         </tr>
    1602. 

  1602.       </table>
    1603. 

  1603. </div>
    1604. 

  1604. <div class="memdoc">
    1605. 

  1605. 

  1606. <p>Definition at line <a class="el" href="puma_8f90_source.html#l01307">1307</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1607. 

  1607. 

  1608. </div>
    1609. 

  1609. </div>
    1610. 

  1610. <a class="anchor" id="a0952e51b37b6196b4f5d85a5cb93c75b"></a><!-- doxytag: member="puma.f90::resolution" ref="a0952e51b37b6196b4f5d85a5cb93c75b" args="" -->
    1611. 

  1611. <div class="memitem">
    1612. 

  1612. <div class="memproto">
    1613. 

  1613.       <table class="memname">
    1614. 

  1614.         <tr>
    1615. 

  1615.           <td class="memname">subroutine resolution </td>
    1616. 

  1616.           <td>(</td>
    1617. 

  1617.           <td class="paramname"></td><td>)</td>
    1618. 

  1618.           <td></td>
    1619. 

  1619.         </tr>
    1620. 

  1620.       </table>
    1621. 

  1621. </div>
    1622. 

  1622. <div class="memdoc">
    1623. 

  1623. 

  1624. <p>Definition at line <a class="el" href="puma_8f90_source.html#l01276">1276</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1625. 

  1625. 

  1626. </div>
    1627. 

  1627. </div>
    1628. 

  1628. <a class="anchor" id="a87f2e4ed3831dc32e18d25fe42d0bfab"></a><!-- doxytag: member="puma.f90::rmssp" ref="a87f2e4ed3831dc32e18d25fe42d0bfab" args="(pf)" -->
    1629. 

  1629. <div class="memitem">
    1630. 

  1630. <div class="memproto">
    1631. 

  1631.       <table class="memname">
    1632. 

  1632.         <tr>
    1633. 

  1633.           <td class="memname">function rmssp </td>
    1634. 

  1634.           <td>(</td>
    1635. 

  1635.           <td class="paramtype">real, dimension(nesp,nlev)&#160;</td>
    1636. 

  1636.           <td class="paramname"><em>pf</em></td><td>)</td>
    1637. 

  1637.           <td></td>
    1638. 

  1638.         </tr>
    1639. 

  1639.       </table>
    1640. 

  1640. </div>
    1641. 

  1641. <div class="memdoc">
    1642. 

  1642. 

  1643. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02635">2635</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1644. 

  1644. 

  1645. </div>
    1646. 

  1646. </div>
    1647. 

  1647. <a class="anchor" id="a01c0a9ea1eee2f86044600c5e81dbebd"></a><!-- doxytag: member="puma.f90::select_spectral_modes" ref="a01c0a9ea1eee2f86044600c5e81dbebd" args="" -->
    1648. 

  1648. <div class="memitem">
    1649. 

  1649. <div class="memproto">
    1650. 

  1650.       <table class="memname">
    1651. 

  1651.         <tr>
    1652. 

  1652.           <td class="memname">subroutine select_spectral_modes </td>
    1653. 

  1653.           <td>(</td>
    1654. 

  1654.           <td class="paramname"></td><td>)</td>
    1655. 

  1655.           <td></td>
    1656. 

  1656.         </tr>
    1657. 

  1657.       </table>
    1658. 

  1658. </div>
    1659. 

  1659. <div class="memdoc">
    1660. 

  1660. 

  1661. <p>Definition at line <a class="el" href="puma_8f90_source.html#l01540">1540</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1662. 

  1662. 

  1663. </div>
    1664. 

  1664. </div>
    1665. 

  1665. <a class="anchor" id="af1e6869836cefedb3f5cc8a574944d91"></a><!-- doxytag: member="puma.f90::select_zonal_waves" ref="af1e6869836cefedb3f5cc8a574944d91" args="" -->
    1666. 

  1666. <div class="memitem">
    1667. 

  1667. <div class="memproto">
    1668. 

  1668.       <table class="memname">
    1669. 

  1669.         <tr>
    1670. 

  1670.           <td class="memname">subroutine select_zonal_waves </td>
    1671. 

  1671.           <td>(</td>
    1672. 

  1672.           <td class="paramname"></td><td>)</td>
    1673. 

  1673.           <td></td>
    1674. 

  1674.         </tr>
    1675. 

  1675.       </table>
    1676. 

  1676. </div>
    1677. 

  1677. <div class="memdoc">
    1678. 

  1678. 

  1679. <p>Definition at line <a class="el" href="puma_8f90_source.html#l01527">1527</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1680. 

  1680. 

  1681. </div>
    1682. 

  1682. </div>
    1683. 

  1683. <a class="anchor" id="a00e3481744c3185f0f91d35c101f28e4"></a><!-- doxytag: member="puma.f90::set_vertical_grid" ref="a00e3481744c3185f0f91d35c101f28e4" args="" -->
    1684. 

  1684. <div class="memitem">
    1685. 

  1685. <div class="memproto">
    1686. 

  1686.       <table class="memname">
    1687. 

  1687.         <tr>
    1688. 

  1688.           <td class="memname">subroutine set_vertical_grid </td>
    1689. 

  1689.           <td>(</td>
    1690. 

  1690.           <td class="paramname"></td><td>)</td>
    1691. 

  1691.           <td></td>
    1692. 

  1692.         </tr>
    1693. 

  1693.       </table>
    1694. 

  1694. </div>
    1695. 

  1695. <div class="memdoc">
    1696. 

  1696. 

  1697. <p>Definition at line <a class="el" href="puma_8f90_source.html#l01553">1553</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1698. 

  1698. 

  1699. </div>
    1700. 

  1700. </div>
    1701. 

  1701. <a class="anchor" id="a37eac16619683a2be841fc68b9281299"></a><!-- doxytag: member="puma.f90::setfilenames" ref="a37eac16619683a2be841fc68b9281299" args="" -->
    1702. 

  1702. <div class="memitem">
    1703. 

  1703. <div class="memproto">
    1704. 

  1704.       <table class="memname">
    1705. 

  1705.         <tr>
    1706. 

  1706.           <td class="memname">subroutine setfilenames </td>
    1707. 

  1707.           <td>(</td>
    1708. 

  1708.           <td class="paramname"></td><td>)</td>
    1709. 

  1709.           <td></td>
    1710. 

  1710.         </tr>
    1711. 

  1711.       </table>
    1712. 

  1712. </div>
    1713. 

  1713. <div class="memdoc">
    1714. 

  1714. 

  1715. <p>Definition at line <a class="el" href="puma_8f90_source.html#l00552">552</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1716. 

  1716. 

  1717. </div>
    1718. 

  1718. </div>
    1719. 

  1719. <a class="anchor" id="a4a662c6d6619fc6405eb110f62653dc0"></a><!-- doxytag: member="puma.f90::setzt" ref="a4a662c6d6619fc6405eb110f62653dc0" args="" -->
    1720. 

  1720. <div class="memitem">
    1721. 

  1721. <div class="memproto">
    1722. 

  1722.       <table class="memname">
    1723. 

  1723.         <tr>
    1724. 

  1724.           <td class="memname">subroutine setzt </td>
    1725. 

  1725.           <td>(</td>
    1726. 

  1726.           <td class="paramname"></td><td>)</td>
    1727. 

  1727.           <td></td>
    1728. 

  1728.         </tr>
    1729. 

  1729.       </table>
    1730. 

  1730. </div>
    1731. 

  1731. <div class="memdoc">
    1732. 

  1732. 

  1733. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02267">2267</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1734. 

  1734. 

  1735. </div>
    1736. 

  1736. </div>
    1737. 

  1737. <a class="anchor" id="a218b1f5483f314ea3a7eeba949933773"></a><!-- doxytag: member="puma.f90::spectral" ref="a218b1f5483f314ea3a7eeba949933773" args="" -->
    1738. 

  1738. <div class="memitem">
    1739. 

  1739. <div class="memproto">
    1740. 

  1740.       <table class="memname">
    1741. 

  1741.         <tr>
    1742. 

  1742.           <td class="memname">subroutine spectral </td>
    1743. 

  1743.           <td>(</td>
    1744. 

  1744.           <td class="paramname"></td><td>)</td>
    1745. 

  1745.           <td></td>
    1746. 

  1746.         </tr>
    1747. 

  1747.       </table>
    1748. 

  1748. </div>
    1749. 

  1749. <div class="memdoc">
    1750. 

  1750. 

  1751. <p>Definition at line <a class="el" href="puma_8f90_source.html#l03477">3477</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1752. 

  1752. 

  1753. </div>
    1754. 

  1754. </div>
    1755. 

  1755. <a class="anchor" id="a0c040011dabc1b712353c37a4d90cc68"></a><!-- doxytag: member="puma.f90::sponge" ref="a0c040011dabc1b712353c37a4d90cc68" args="" -->
    1756. 

  1756. <div class="memitem">
    1757. 

  1757. <div class="memproto">
    1758. 

  1758.       <table class="memname">
    1759. 

  1759.         <tr>
    1760. 

  1760.           <td class="memname">subroutine sponge </td>
    1761. 

  1761.           <td>(</td>
    1762. 

  1762.           <td class="paramname"></td><td>)</td>
    1763. 

  1763.           <td></td>
    1764. 

  1764.         </tr>
    1765. 

  1765.       </table>
    1766. 

  1766. </div>
    1767. 

  1767. <div class="memdoc">
    1768. 

  1768. 

  1769. <p>Definition at line <a class="el" href="puma_8f90_source.html#l04191">4191</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1770. 

  1770. 

  1771. </div>
    1772. 

  1772. </div>
    1773. 

  1773. <a class="anchor" id="ab257e27330a3ab13c9c90ebd985ef60e"></a><!-- doxytag: member="puma.f90::stepruido" ref="ab257e27330a3ab13c9c90ebd985ef60e" args="" -->
    1774. 

  1774. <div class="memitem">
    1775. 

  1775. <div class="memproto">
    1776. 

  1776.       <table class="memname">
    1777. 

  1777.         <tr>
    1778. 

  1778.           <td class="memname">subroutine stepruido </td>
    1779. 

  1779.           <td>(</td>
    1780. 

  1780.           <td class="paramname"></td><td>)</td>
    1781. 

  1781.           <td></td>
    1782. 

  1782.         </tr>
    1783. 

  1783.       </table>
    1784. 

  1784. </div>
    1785. 

  1785. <div class="memdoc">
    1786. 

  1786. 

  1787. <p>Definition at line <a class="el" href="puma_8f90_source.html#l01990">1990</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1788. 

  1788. 

  1789. </div>
    1790. 

  1790. </div>
    1791. 

  1791. <a class="anchor" id="ad1bea0bb9fdda56c5251fa64e712b7b1"></a><!-- doxytag: member="puma.f90::vdiff" ref="ad1bea0bb9fdda56c5251fa64e712b7b1" args="(pt, pz, pd, ptt, pzt, pdt)" -->
    1792. 

  1792. <div class="memitem">
    1793. 

  1793. <div class="memproto">
    1794. 

  1794.       <table class="memname">
    1795. 

  1795.         <tr>
    1796. 

  1796.           <td class="memname">subroutine vdiff </td>
    1797. 

  1797.           <td>(</td>
    1798. 

  1798.           <td class="paramtype">real, dimension(nspp,nlev)&#160;</td>
    1799. 

  1799.           <td class="paramname"><em>pt</em>, </td>
    1800. 

  1800.         </tr>
    1801. 

  1801.         <tr>
    1802. 

  1802.           <td class="paramkey"></td>
    1803. 

  1803.           <td></td>
    1804. 

  1804.           <td class="paramtype">real, dimension(nspp,nlev)&#160;</td>
    1805. 

  1805.           <td class="paramname"><em>pz</em>, </td>
    1806. 

  1806.         </tr>
    1807. 

  1807.         <tr>
    1808. 

  1808.           <td class="paramkey"></td>
    1809. 

  1809.           <td></td>
    1810. 

  1810.           <td class="paramtype">real, dimension(nspp,nlev)&#160;</td>
    1811. 

  1811.           <td class="paramname"><em>pd</em>, </td>
    1812. 

  1812.         </tr>
    1813. 

  1813.         <tr>
    1814. 

  1814.           <td class="paramkey"></td>
    1815. 

  1815.           <td></td>
    1816. 

  1816.           <td class="paramtype">real, dimension(nspp,nlev)&#160;</td>
    1817. 

  1817.           <td class="paramname"><em>ptt</em>, </td>
    1818. 

  1818.         </tr>
    1819. 

  1819.         <tr>
    1820. 

  1820.           <td class="paramkey"></td>
    1821. 

  1821.           <td></td>
    1822. 

  1822.           <td class="paramtype">real, dimension(nspp,nlev)&#160;</td>
    1823. 

  1823.           <td class="paramname"><em>pzt</em>, </td>
    1824. 

  1824.         </tr>
    1825. 

  1825.         <tr>
    1826. 

  1826.           <td class="paramkey"></td>
    1827. 

  1827.           <td></td>
    1828. 

  1828.           <td class="paramtype">real, dimension(nspp,nlev)&#160;</td>
    1829. 

  1829.           <td class="paramname"><em>pdt</em>&#160;</td>
    1830. 

  1830.         </tr>
    1831. 

  1831.         <tr>
    1832. 

  1832.           <td></td>
    1833. 

  1833.           <td>)</td>
    1834. 

  1834.           <td></td><td></td>
    1835. 

  1835.         </tr>
    1836. 

  1836.       </table>
    1837. 

  1837. </div>
    1838. 

  1838. <div class="memdoc">
    1839. 

  1839. 

  1840. <p>Definition at line <a class="el" href="puma_8f90_source.html#l04039">4039</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1841. 

  1841. 

  1842. </div>
    1843. 

  1843. </div>
    1844. 

  1844. <a class="anchor" id="a8f8e06ff9c98bc44f6c356d5ffc0a426"></a><!-- doxytag: member="puma.f90::writegp" ref="a8f8e06ff9c98bc44f6c356d5ffc0a426" args="(kunit, pf, kcode, klev)" -->
    1845. 

  1845. <div class="memitem">
    1846. 

  1846. <div class="memproto">
    1847. 

  1847.       <table class="memname">
    1848. 

  1848.         <tr>
    1849. 

  1849.           <td class="memname">subroutine writegp </td>
    1850. 

  1850.           <td>(</td>
    1851. 

  1851.           <td class="paramtype">&#160;</td>
    1852. 

  1852.           <td class="paramname"><em>kunit</em>, </td>
    1853. 

  1853.         </tr>
    1854. 

  1854.         <tr>
    1855. 

  1855.           <td class="paramkey"></td>
    1856. 

  1856.           <td></td>
    1857. 

  1857.           <td class="paramtype">real, dimension(nhor)&#160;</td>
    1858. 

  1858.           <td class="paramname"><em>pf</em>, </td>
    1859. 

  1859.         </tr>
    1860. 

  1860.         <tr>
    1861. 

  1861.           <td class="paramkey"></td>
    1862. 

  1862.           <td></td>
    1863. 

  1863.           <td class="paramtype">&#160;</td>
    1864. 

  1864.           <td class="paramname"><em>kcode</em>, </td>
    1865. 

  1865.         </tr>
    1866. 

  1866.         <tr>
    1867. 

  1867.           <td class="paramkey"></td>
    1868. 

  1868.           <td></td>
    1869. 

  1869.           <td class="paramtype">&#160;</td>
    1870. 

  1870.           <td class="paramname"><em>klev</em>&#160;</td>
    1871. 

  1871.         </tr>
    1872. 

  1872.         <tr>
    1873. 

  1873.           <td></td>
    1874. 

  1874.           <td>)</td>
    1875. 

  1875.           <td></td><td></td>
    1876. 

  1876.         </tr>
    1877. 

  1877.       </table>
    1878. 

  1878. </div>
    1879. 

  1879. <div class="memdoc">
    1880. 

  1880. 

  1881. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02901">2901</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1882. 

  1882. 

  1883. </div>
    1884. 

  1884. </div>
    1885. 

  1885. <a class="anchor" id="a29f97b19d997b3a5c29df1fd4cdd4792"></a><!-- doxytag: member="puma.f90::writesp" ref="a29f97b19d997b3a5c29df1fd4cdd4792" args="(kunit, pf, kcode, klev, pscale, poff)" -->
    1886. 

  1886. <div class="memitem">
    1887. 

  1887. <div class="memproto">
    1888. 

  1888.       <table class="memname">
    1889. 

  1889.         <tr>
    1890. 

  1890.           <td class="memname">subroutine writesp </td>
    1891. 

  1891.           <td>(</td>
    1892. 

  1892.           <td class="paramtype">&#160;</td>
    1893. 

  1893.           <td class="paramname"><em>kunit</em>, </td>
    1894. 

  1894.         </tr>
    1895. 

  1895.         <tr>
    1896. 

  1896.           <td class="paramkey"></td>
    1897. 

  1897.           <td></td>
    1898. 

  1898.           <td class="paramtype">real, dimension(nrsp)&#160;</td>
    1899. 

  1899.           <td class="paramname"><em>pf</em>, </td>
    1900. 

  1900.         </tr>
    1901. 

  1901.         <tr>
    1902. 

  1902.           <td class="paramkey"></td>
    1903. 

  1903.           <td></td>
    1904. 

  1904.           <td class="paramtype">&#160;</td>
    1905. 

  1905.           <td class="paramname"><em>kcode</em>, </td>
    1906. 

  1906.         </tr>
    1907. 

  1907.         <tr>
    1908. 

  1908.           <td class="paramkey"></td>
    1909. 

  1909.           <td></td>
    1910. 

  1910.           <td class="paramtype">&#160;</td>
    1911. 

  1911.           <td class="paramname"><em>klev</em>, </td>
    1912. 

  1912.         </tr>
    1913. 

  1913.         <tr>
    1914. 

  1914.           <td class="paramkey"></td>
    1915. 

  1915.           <td></td>
    1916. 

  1916.           <td class="paramtype">&#160;</td>
    1917. 

  1917.           <td class="paramname"><em>pscale</em>, </td>
    1918. 

  1918.         </tr>
    1919. 

  1919.         <tr>
    1920. 

  1920.           <td class="paramkey"></td>
    1921. 

  1921.           <td></td>
    1922. 

  1922.           <td class="paramtype">&#160;</td>
    1923. 

  1923.           <td class="paramname"><em>poff</em>&#160;</td>
    1924. 

  1924.         </tr>
    1925. 

  1925.         <tr>
    1926. 

  1926.           <td></td>
    1927. 

  1927.           <td>)</td>
    1928. 

  1928.           <td></td><td></td>
    1929. 

  1929.         </tr>
    1930. 

  1930.       </table>
    1931. 

  1931. </div>
    1932. 

  1932. <div class="memdoc">
    1933. 

  1933. 

  1934. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02870">2870</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1935. 

  1935. 

  1936. </div>
    1937. 

  1937. </div>
    1938. 

  1938. <a class="anchor" id="a7d2fe5c057c4ef8c0b7981ddeb0cce41"></a><!-- doxytag: member="puma.f90::wrspam" ref="a7d2fe5c057c4ef8c0b7981ddeb0cce41" args="(ps, klev, title, scale)" -->
    1939. 

  1939. <div class="memitem">
    1940. 

  1940. <div class="memproto">
    1941. 

  1941.       <table class="memname">
    1942. 

  1942.         <tr>
    1943. 

  1943.           <td class="memname">subroutine wrspam </td>
    1944. 

  1944.           <td>(</td>
    1945. 

  1945.           <td class="paramtype">, dimension(nrsp)&#160;</td>
    1946. 

  1946.           <td class="paramname"><em>ps</em>, </td>
    1947. 

  1947.         </tr>
    1948. 

  1948.         <tr>
    1949. 

  1949.           <td class="paramkey"></td>
    1950. 

  1950.           <td></td>
    1951. 

  1951.           <td class="paramtype">&#160;</td>
    1952. 

  1952.           <td class="paramname"><em>klev</em>, </td>
    1953. 

  1953.         </tr>
    1954. 

  1954.         <tr>
    1955. 

  1955.           <td class="paramkey"></td>
    1956. 

  1956.           <td></td>
    1957. 

  1957.           <td class="paramtype">character(30)&#160;</td>
    1958. 

  1958.           <td class="paramname"><em>title</em>, </td>
    1959. 

  1959.         </tr>
    1960. 

  1960.         <tr>
    1961. 

  1961.           <td class="paramkey"></td>
    1962. 

  1962.           <td></td>
    1963. 

  1963.           <td class="paramtype">&#160;</td>
    1964. 

  1964.           <td class="paramname"><em>scale</em>&#160;</td>
    1965. 

  1965.         </tr>
    1966. 

  1966.         <tr>
    1967. 

  1967.           <td></td>
    1968. 

  1968.           <td>)</td>
    1969. 

  1969.           <td></td><td></td>
    1970. 

  1970.         </tr>
    1971. 

  1971.       </table>
    1972. 

  1972. </div>
    1973. 

  1973. <div class="memdoc">
    1974. 

  1974. 

  1975. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02774">2774</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    1976. 

  1976. 

  1977. </div>
    1978. 

  1978. </div>
    1979. 

  1979. <a class="anchor" id="a03b2185c8a9dc75ed4169a7d9bf65863"></a><!-- doxytag: member="puma.f90::wrzs" ref="a03b2185c8a9dc75ed4169a7d9bf65863" args="(zs, title, scale)" -->
    1980. 

  1980. <div class="memitem">
    1981. 

  1981. <div class="memproto">
    1982. 

  1982.       <table class="memname">
    1983. 

  1983.         <tr>
    1984. 

  1984.           <td class="memname">subroutine wrzs </td>
    1985. 

  1985.           <td>(</td>
    1986. 

  1986.           <td class="paramtype">, dimension(nlat,nlev)&#160;</td>
    1987. 

  1987.           <td class="paramname"><em>zs</em>, </td>
    1988. 

  1988.         </tr>
    1989. 

  1989.         <tr>
    1990. 

  1990.           <td class="paramkey"></td>
    1991. 

  1991.           <td></td>
    1992. 

  1992.           <td class="paramtype">character(30)&#160;</td>
    1993. 

  1993.           <td class="paramname"><em>title</em>, </td>
    1994. 

  1994.         </tr>
    1995. 

  1995.         <tr>
    1996. 

  1996.           <td class="paramkey"></td>
    1997. 

  1997.           <td></td>
    1998. 

  1998.           <td class="paramtype">&#160;</td>
    1999. 

  1999.           <td class="paramname"><em>scale</em>&#160;</td>
    2000. 

  2000.         </tr>
    2001. 

  2001.         <tr>
    2002. 

  2002.           <td></td>
    2003. 

  2003.           <td>)</td>
    2004. 

  2004.           <td></td><td></td>
    2005. 

  2005.         </tr>
    2006. 

  2006.       </table>
    2007. 

  2007. </div>
    2008. 

  2008. <div class="memdoc">
    2009. 

  2009. 

  2010. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02814">2814</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    2011. 

  2011. 

  2012. </div>
    2013. 

  2013. </div>
    2014. 

  2014. <a class="anchor" id="a8e59ae6d7b5a22b0e46c56187cdd62cf"></a><!-- doxytag: member="puma.f90::xsect" ref="a8e59ae6d7b5a22b0e46c56187cdd62cf" args="" -->
    2015. 

  2015. <div class="memitem">
    2016. 

  2016. <div class="memproto">
    2017. 

  2017.       <table class="memname">
    2018. 

  2018.         <tr>
    2019. 

  2019.           <td class="memname">subroutine xsect </td>
    2020. 

  2020.           <td>(</td>
    2021. 

  2021.           <td class="paramname"></td><td>)</td>
    2022. 

  2022.           <td></td>
    2023. 

  2023.         </tr>
    2024. 

  2024.       </table>
    2025. 

  2025. </div>
    2026. 

  2026. <div class="memdoc">
    2027. 

  2027. 

  2028. <p>Definition at line <a class="el" href="puma_8f90_source.html#l02851">2851</a> of file <a class="el" href="puma_8f90_source.html">puma.f90</a>.</p>
    2029. 

  2029. 

  2030. </div>
    2031. 

  2031. </div>
    2032. 

  2032. </div>
    2033. 

  2033. </div>
    2034. 

  2034.   <div id="nav-path" class="navpath">
    2035. 

  2035.     <ul>
    2036. 

  2036.       <li class="navelem"><a class="el" href="puma_8f90.html">puma.f90</a>      </li>
    2037. 

  2037. <!-- window showing the filter options -->
    2038. 

  2038. <div id="MSearchSelectWindow"
    2039. 

  2039.      onmouseover="return searchBox.OnSearchSelectShow()"
    2040. 

  2040.      onmouseout="return searchBox.OnSearchSelectHide()"
    2041. 

  2041.      onkeydown="return searchBox.OnSearchSelectKey(event)">
    2042. 

  2042. <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>
    2043. 

  2043. 

  2044. <!-- iframe showing the search results (closed by default) -->
    2045. 

  2045. <div id="MSearchResultsWindow">
    2046. 

  2046. <iframe src="javascript:void(0)" frameborder="0" 
    2047. 

  2047.         name="MSearchResults" id="MSearchResults">
    2048. 

  2048. </iframe>
    2049. 

  2049. </div>
    2050. 

  2050. 

  2051. 

  2052.     <li class="footer">Generated on Wed Sep 21 2011 12:35:46 for PUMA by
    2053. 

  2053.     <a href="http://www.doxygen.org/index.html">
    2054. 

  2054.     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.7.5.1 </li>
    2055. 

  2055.    </ul>
    2056. 

  2056.  </div>
    2057. 

  2057. 

  2058. 

  2059. </body>
    2060. 

  2060. </html>
    2061.