  <span class="keyword">function </span><a class="code" href="ssht__test_8f90.html#a416afc440685d23877041f1b7632745a">ran2_dp</a>(idum)
<a name="l00505"></a>00505        use <span class="keywordflow">ssht_types_mod</span>, only: dp
<a name="l00506"></a>00506        <span class="keywordtype">real(dp) </span>:: ran2_dp
<a name="l00507"></a>00507        <span class="keywordtype">integer</span> :: idum
<a name="l00508"></a>00508 <span class="keyword">     end function ran2_dp</span>
<a name="l00509"></a>00509 <