Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Add updated MSFPS.f, NGMFLD.f, OTLFT.f, OTLIFT.f, and ZENSUN.f htmls to gh-pages #689

Merged
merged 2 commits into from
Apr 12, 2023
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
68 changes: 58 additions & 10 deletions MSFPS_8f.html
Original file line number Diff line number Diff line change
Expand Up @@ -3,7 +3,7 @@
<head>
<meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
<meta http-equiv="X-UA-Compatible" content="IE=9"/>
<meta name="generator" content="Doxygen 1.8.6"/>
<meta name="generator" content="Doxygen 1.8.5"/>
<title>UPP: MSFPS.f File Reference</title>
<link href="tabs.css" rel="stylesheet" type="text/css"/>
<script type="text/javascript" src="jquery.js"></script>
Expand All @@ -30,15 +30,15 @@
<tr style="height: 56px;">
<td style="padding-left: 0.5em;">
<div id="projectname">UPP
&#160;<span id="projectnumber">V11.0.0</span>
&#160;<span id="projectnumber">11.0.0</span>
</div>
</td>
</tr>
</tbody>
</table>
</div>
<!-- end header part -->
<!-- Generated by Doxygen 1.8.6 -->
<!-- Generated by Doxygen 1.8.5 -->
<script type="text/javascript">
var searchBox = new SearchBox("searchBox", "search",false,'Search');
</script>
Expand Down Expand Up @@ -109,19 +109,19 @@
</div><!--header-->
<div class="contents">

<p>msfps() computes the map scale factor for a polar stereographic grid at a give latitude.
<p><a class="el" href="MSFPS_8f.html#a6c8f1d60cbab1f64dc65f900dc623b2e" title="msfps() computes the map scale factor for a polar stereographic grid at a give latitude. ">msfps()</a> computes the map scale factor for a polar stereographic grid at a give latitude.
<a href="#details">More...</a></p>

<p><a href="MSFPS_8f_source.html">Go to the source code of this file.</a></p>
<table class="memberdecls">
<tr class="heading"><td colspan="2"><h2 class="groupheader"><a name="func-members"></a>
Functions/Subroutines</h2></td></tr>
<tr class="memitem:a61f85c739a82a005bcba00dd4b7443ee"><td class="memItemLeft" align="right" valign="top"><a class="anchor" id="a61f85c739a82a005bcba00dd4b7443ee"></a>
subroutine&#160;</td><td class="memItemRight" valign="bottom"><b>MSFPS</b> (LAT, TRUELAT1, MSF)</td></tr>
<tr class="separator:a61f85c739a82a005bcba00dd4b7443ee"><td class="memSeparator" colspan="2">&#160;</td></tr>
<tr class="memitem:a6c8f1d60cbab1f64dc65f900dc623b2e"><td class="memItemLeft" align="right" valign="top">subroutine&#160;</td><td class="memItemRight" valign="bottom"><a class="el" href="MSFPS_8f.html#a6c8f1d60cbab1f64dc65f900dc623b2e">msfps</a> (LAT, TRUELAT1, MSF)</td></tr>
<tr class="memdesc:a6c8f1d60cbab1f64dc65f900dc623b2e"><td class="mdescLeft">&#160;</td><td class="mdescRight"><a class="el" href="MSFPS_8f.html#a6c8f1d60cbab1f64dc65f900dc623b2e" title="msfps() computes the map scale factor for a polar stereographic grid at a give latitude. ">msfps()</a> computes the map scale factor for a polar stereographic grid at a give latitude. <a href="#a6c8f1d60cbab1f64dc65f900dc623b2e">More...</a><br/></td></tr>
<tr class="separator:a6c8f1d60cbab1f64dc65f900dc623b2e"><td class="memSeparator" colspan="2">&#160;</td></tr>
</table>
<a name="details" id="details"></a><h2 class="groupheader">Detailed Description</h2>
<div class="textblock"><p>msfps() computes the map scale factor for a polar stereographic grid at a give latitude. </p>
<div class="textblock"><p><a class="el" href="MSFPS_8f.html#a6c8f1d60cbab1f64dc65f900dc623b2e" title="msfps() computes the map scale factor for a polar stereographic grid at a give latitude. ">msfps()</a> computes the map scale factor for a polar stereographic grid at a give latitude. </p>
<p>This subroutine computes the map scale factor for a polar stereographic grid at a give latitude.</p>
<dl class="params"><dt>Parameters</dt><dd>
<table class="params">
Expand All @@ -142,15 +142,63 @@ <h3>Program History Log</h3>
<dl class="section date"><dt>Date</dt><dd>2006-11-01 </dd></dl>

<p>Definition in file <a class="el" href="MSFPS_8f_source.html">MSFPS.f</a>.</p>
</div></div><!-- contents -->
</div><h2 class="groupheader">Function/Subroutine Documentation</h2>
<a class="anchor" id="a6c8f1d60cbab1f64dc65f900dc623b2e"></a>
<div class="memitem">
<div class="memproto">
<table class="memname">
<tr>
<td class="memname">subroutine msfps </td>
<td>(</td>
<td class="paramtype">real, intent(in)&#160;</td>
<td class="paramname"><em>LAT</em>, </td>
</tr>
<tr>
<td class="paramkey"></td>
<td></td>
<td class="paramtype">real, intent(in)&#160;</td>
<td class="paramname"><em>TRUELAT1</em>, </td>
</tr>
<tr>
<td class="paramkey"></td>
<td></td>
<td class="paramtype">real, intent(out)&#160;</td>
<td class="paramname"><em>MSF</em>&#160;</td>
</tr>
<tr>
<td></td>
<td>)</td>
<td></td><td></td>
</tr>
</table>
</div><div class="memdoc">

<p><a class="el" href="MSFPS_8f.html#a6c8f1d60cbab1f64dc65f900dc623b2e" title="msfps() computes the map scale factor for a polar stereographic grid at a give latitude. ">msfps()</a> computes the map scale factor for a polar stereographic grid at a give latitude. </p>
<p>This subroutine computes the map scale factor for a polar stereographic grid at a give latitude.</p>
<dl class="params"><dt>Parameters</dt><dd>
<table class="params">
<tr><td class="paramdir">[in]</td><td class="paramname">LAT</td><td>Latitude at which map factor is valid. </td></tr>
<tr><td class="paramdir">[in]</td><td class="paramname">TRUELAT1</td><td>TRUELAT 1. </td></tr>
<tr><td class="paramdir">[out]</td><td class="paramname">MSF</td><td>Map scale factor. </td></tr>
</table>
</dd>
</dl>

<p>Definition at line <a class="el" href="MSFPS_8f_source.html#l00026">26</a> of file <a class="el" href="MSFPS_8f_source.html">MSFPS.f</a>.</p>

<p>Referenced by <a class="el" href="INITPOST_8F_source.html#l00025">initpost()</a>, <a class="el" href="INITPOST__GFS__NEMS__MPIIO_8f_source.html#l00032">initpost_gfs_nems_mpiio()</a>, and <a class="el" href="INITPOST__NETCDF_8f_source.html#l00038">initpost_netcdf()</a>.</p>

</div>
</div>
</div><!-- contents -->
</div><!-- doc-content -->
<!-- start footer part -->
<div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
<ul>
<li class="navelem"><a class="el" href="dir_d8b772108138bf796aaa3f7fe4e09294.html">sorc</a></li><li class="navelem"><a class="el" href="dir_29f0049402def9fd0d109199f2d306c2.html">ncep_post.fd</a></li><li class="navelem"><a class="el" href="MSFPS_8f.html">MSFPS.f</a></li>
<li class="footer">Generated by
<a href="http://www.doxygen.org/index.html">
<img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.6 </li>
<img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.5 </li>
</ul>
</div>
</body>
Expand Down
2 changes: 1 addition & 1 deletion MSFPS_8f.js
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
var MSFPS_8f =
[
[ "MSFPS", "MSFPS_8f.html#a61f85c739a82a005bcba00dd4b7443ee", null ]
[ "msfps", "MSFPS_8f.html#a6c8f1d60cbab1f64dc65f900dc623b2e", null ]
];
74 changes: 39 additions & 35 deletions MSFPS_8f_source.html
Original file line number Diff line number Diff line change
Expand Up @@ -3,7 +3,7 @@
<head>
<meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
<meta http-equiv="X-UA-Compatible" content="IE=9"/>
<meta name="generator" content="Doxygen 1.8.6"/>
<meta name="generator" content="Doxygen 1.8.5"/>
<title>UPP: MSFPS.f Source File</title>
<link href="tabs.css" rel="stylesheet" type="text/css"/>
<script type="text/javascript" src="jquery.js"></script>
Expand All @@ -30,15 +30,15 @@
<tr style="height: 56px;">
<td style="padding-left: 0.5em;">
<div id="projectname">UPP
&#160;<span id="projectnumber">V11.0.0</span>
&#160;<span id="projectnumber">11.0.0</span>
</div>
</td>
</tr>
</tbody>
</table>
</div>
<!-- end header part -->
<!-- Generated by Doxygen 1.8.6 -->
<!-- Generated by Doxygen 1.8.5 -->
<script type="text/javascript">
var searchBox = new SearchBox("searchBox", "search",false,'Search');
</script>
Expand Down Expand Up @@ -107,39 +107,43 @@
</div><!--header-->
<div class="contents">
<a href="MSFPS_8f.html">Go to the documentation of this file.</a><div class="fragment"><div class="line"><a name="l00001"></a><span class="lineno"> 1</span>&#160;</div>
<div class="line"><a name="l00016"></a><span class="lineno"> 16</span>&#160;<span class="keyword"> SUBROUTINE </span>msfps(LAT,TRUELAT1,MSF)</div>
<div class="line"><a name="l00017"></a><span class="lineno"> 17</span>&#160;</div>
<div class="line"><a name="l00018"></a><span class="lineno"> 18</span>&#160;</div>
<div class="line"><a name="l00019"></a><span class="lineno"> 19</span>&#160;<span class="comment">! Computes the map scale factor for a Polar Stereographic grid at a given</span></div>
<div class="line"><a name="l00020"></a><span class="lineno"> 20</span>&#160;<span class="comment">! latitude.</span></div>
<div class="line"><a name="l00021"></a><span class="lineno"> 21</span>&#160;</div>
<div class="line"><a name="l00022"></a><span class="lineno"> 22</span>&#160; <span class="keywordtype">IMPLICIT NONE</span></div>
<div class="line"><a name="l00023"></a><span class="lineno"> 23</span>&#160;</div>
<div class="line"><a name="l00024"></a><span class="lineno"> 24</span>&#160;<span class="comment">! Define some private constants</span></div>
<div class="line"><a name="l00025"></a><span class="lineno"> 25</span>&#160;<span class="comment">!</span></div>
<div class="line"><a name="l00026"></a><span class="lineno"> 26</span>&#160; <span class="keywordtype">REAL</span>, <span class="keywordtype">PARAMETER</span> :: pi = 3.1415927</div>
<div class="line"><a name="l00027"></a><span class="lineno"> 27</span>&#160; <span class="keywordtype">REAL</span>, <span class="keywordtype">PARAMETER</span> :: rad_per_deg = pi / 180.</div>
<div class="line"><a name="l00016"></a><span class="lineno"> 16</span>&#160;</div>
<div class="line"><a name="l00017"></a><span class="lineno"> 17</span>&#160;<span class="comment">! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -</span></div>
<div class="line"><a name="l00025"></a><span class="lineno"> 25</span>&#160;</div>
<div class="line"><a name="l00026"></a><span class="lineno"><a class="line" href="MSFPS_8f.html#a6c8f1d60cbab1f64dc65f900dc623b2e"> 26</a></span>&#160;<span class="keyword"> SUBROUTINE </span><a class="code" href="MSFPS_8f.html#a6c8f1d60cbab1f64dc65f900dc623b2e">msfps</a>(LAT,TRUELAT1,MSF)</div>
<div class="line"><a name="l00027"></a><span class="lineno"> 27</span>&#160;</div>
<div class="line"><a name="l00028"></a><span class="lineno"> 28</span>&#160;</div>
<div class="line"><a name="l00029"></a><span class="lineno"> 29</span>&#160; <span class="keywordtype">REAL</span>, <span class="keywordtype">INTENT(IN)</span> :: lat <span class="comment">! latitude where msf is requested</span></div>
<div class="line"><a name="l00030"></a><span class="lineno"> 30</span>&#160; <span class="keywordtype">REAL</span>, <span class="keywordtype">INTENT(IN)</span> :: truelat1</div>
<div class="line"><a name="l00031"></a><span class="lineno"> 31</span>&#160; <span class="keywordtype">REAL</span>, <span class="keywordtype">INTENT(OUT)</span> :: msf</div>
<div class="line"><a name="l00032"></a><span class="lineno"> 32</span>&#160;</div>
<div class="line"><a name="l00033"></a><span class="lineno"> 33</span>&#160; <span class="keywordtype">REAL</span> :: psi1, psix, pole</div>
<div class="line"><a name="l00034"></a><span class="lineno"> 34</span>&#160;</div>
<div class="line"><a name="l00035"></a><span class="lineno"> 35</span>&#160; <span class="keywordflow">IF</span> (truelat1 &gt;= 0.) <span class="keywordflow">THEN</span></div>
<div class="line"><a name="l00036"></a><span class="lineno"> 36</span>&#160; psi1 = (90. - truelat1) * rad_per_deg</div>
<div class="line"><a name="l00037"></a><span class="lineno"> 37</span>&#160; pole =90.</div>
<div class="line"><a name="l00038"></a><span class="lineno"> 38</span>&#160; <span class="keywordflow">ELSE</span></div>
<div class="line"><a name="l00039"></a><span class="lineno"> 39</span>&#160; psi1 = (90. + truelat1) * rad_per_deg</div>
<div class="line"><a name="l00040"></a><span class="lineno"> 40</span>&#160; pole = -90.</div>
<div class="line"><a name="l00041"></a><span class="lineno"> 41</span>&#160; <span class="keywordflow">ENDIF</span></div>
<div class="line"><a name="l00029"></a><span class="lineno"> 29</span>&#160;<span class="comment">! Computes the map scale factor for a Polar Stereographic grid at a given</span></div>
<div class="line"><a name="l00030"></a><span class="lineno"> 30</span>&#160;<span class="comment">! latitude.</span></div>
<div class="line"><a name="l00031"></a><span class="lineno"> 31</span>&#160;</div>
<div class="line"><a name="l00032"></a><span class="lineno"> 32</span>&#160; <span class="keywordtype">IMPLICIT NONE</span></div>
<div class="line"><a name="l00033"></a><span class="lineno"> 33</span>&#160;</div>
<div class="line"><a name="l00034"></a><span class="lineno"> 34</span>&#160;<span class="comment">! Define some private constants</span></div>
<div class="line"><a name="l00035"></a><span class="lineno"> 35</span>&#160;<span class="comment">!</span></div>
<div class="line"><a name="l00036"></a><span class="lineno"> 36</span>&#160; <span class="keywordtype">REAL</span>, <span class="keywordtype">PARAMETER</span> :: pi = 3.1415927</div>
<div class="line"><a name="l00037"></a><span class="lineno"> 37</span>&#160; <span class="keywordtype">REAL</span>, <span class="keywordtype">PARAMETER</span> :: rad_per_deg = pi / 180.</div>
<div class="line"><a name="l00038"></a><span class="lineno"> 38</span>&#160;</div>
<div class="line"><a name="l00039"></a><span class="lineno"> 39</span>&#160; <span class="keywordtype">REAL</span>, <span class="keywordtype">INTENT(IN)</span> :: lat <span class="comment">! latitude where msf is requested</span></div>
<div class="line"><a name="l00040"></a><span class="lineno"> 40</span>&#160; <span class="keywordtype">REAL</span>, <span class="keywordtype">INTENT(IN)</span> :: truelat1</div>
<div class="line"><a name="l00041"></a><span class="lineno"> 41</span>&#160; <span class="keywordtype">REAL</span>, <span class="keywordtype">INTENT(OUT)</span> :: msf</div>
<div class="line"><a name="l00042"></a><span class="lineno"> 42</span>&#160;</div>
<div class="line"><a name="l00043"></a><span class="lineno"> 43</span>&#160; psix = (pole - lat)*rad_per_deg</div>
<div class="line"><a name="l00044"></a><span class="lineno"> 44</span>&#160; msf = ((1.+cos(psi1))/(1.0 + cos(psix)))</div>
<div class="line"><a name="l00045"></a><span class="lineno"> 45</span>&#160; <span class="keywordflow">RETURN</span></div>
<div class="line"><a name="l00046"></a><span class="lineno"> 46</span>&#160;</div>
<div class="line"><a name="l00047"></a><span class="lineno"> 47</span>&#160;<span class="keyword"> END SUBROUTINE </span>msfps</div>
<div class="line"><a name="l00048"></a><span class="lineno"> 48</span>&#160;</div>
<div class="line"><a name="l00043"></a><span class="lineno"> 43</span>&#160; <span class="keywordtype">REAL</span> :: psi1, psix, pole</div>
<div class="line"><a name="l00044"></a><span class="lineno"> 44</span>&#160;</div>
<div class="line"><a name="l00045"></a><span class="lineno"> 45</span>&#160; <span class="keywordflow">IF</span> (truelat1 &gt;= 0.) <span class="keywordflow">THEN</span></div>
<div class="line"><a name="l00046"></a><span class="lineno"> 46</span>&#160; psi1 = (90. - truelat1) * rad_per_deg</div>
<div class="line"><a name="l00047"></a><span class="lineno"> 47</span>&#160; pole =90.</div>
<div class="line"><a name="l00048"></a><span class="lineno"> 48</span>&#160; <span class="keywordflow">ELSE</span></div>
<div class="line"><a name="l00049"></a><span class="lineno"> 49</span>&#160; psi1 = (90. + truelat1) * rad_per_deg</div>
<div class="line"><a name="l00050"></a><span class="lineno"> 50</span>&#160; pole = -90.</div>
<div class="line"><a name="l00051"></a><span class="lineno"> 51</span>&#160; <span class="keywordflow">ENDIF</span></div>
<div class="line"><a name="l00052"></a><span class="lineno"> 52</span>&#160;</div>
<div class="line"><a name="l00053"></a><span class="lineno"> 53</span>&#160; psix = (pole - lat)*rad_per_deg</div>
<div class="line"><a name="l00054"></a><span class="lineno"> 54</span>&#160; msf = ((1.+cos(psi1))/(1.0 + cos(psix)))</div>
<div class="line"><a name="l00055"></a><span class="lineno"> 55</span>&#160; <span class="keywordflow">RETURN</span></div>
<div class="line"><a name="l00056"></a><span class="lineno"> 56</span>&#160;</div>
<div class="line"><a name="l00057"></a><span class="lineno"> 57</span>&#160;<span class="keyword"> END SUBROUTINE </span><a class="code" href="MSFPS_8f.html#a6c8f1d60cbab1f64dc65f900dc623b2e">msfps</a></div>
<div class="line"><a name="l00058"></a><span class="lineno"> 58</span>&#160;</div>
<div class="ttc" id="MSFPS_8f_html_a6c8f1d60cbab1f64dc65f900dc623b2e"><div class="ttname"><a href="MSFPS_8f.html#a6c8f1d60cbab1f64dc65f900dc623b2e">msfps</a></div><div class="ttdeci">subroutine msfps(LAT, TRUELAT1, MSF)</div><div class="ttdoc">msfps() computes the map scale factor for a polar stereographic grid at a give latitude. </div><div class="ttdef"><b>Definition:</b> <a href="MSFPS_8f_source.html#l00026">MSFPS.f:26</a></div></div>
</div><!-- fragment --></div><!-- contents -->
</div><!-- doc-content -->
<!-- start footer part -->
Expand All @@ -148,7 +152,7 @@
<li class="navelem"><a class="el" href="dir_d8b772108138bf796aaa3f7fe4e09294.html">sorc</a></li><li class="navelem"><a class="el" href="dir_29f0049402def9fd0d109199f2d306c2.html">ncep_post.fd</a></li><li class="navelem"><a class="el" href="MSFPS_8f.html">MSFPS.f</a></li>
<li class="footer">Generated by
<a href="http://www.doxygen.org/index.html">
<img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.6 </li>
<img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.5 </li>
</ul>
</div>
</body>
Expand Down
Loading