>
<a name="l00029"></a>00029 <span class="comment">!</span>
<a name="l00030"></a>00030       use <span class="keywordflow">ice_kinds_mod</span>
<a name="l00031"></a>00031       use <span class="keywordflow">ice_constants</span>
<a name="l00032"></a>00032 <span class="comment">!</span>
<a name="l00033"></a>00033 <span class="comment">!EOP</span>
<a name="l00034"></a>00034 <span class="comment">!</span>
<a name="l00035"></a>00035       <span class="keyword">implicit none</span>
<a name="l00036"></a>00036     