e"><a name="l00046"></a><span class="lineno">   46</span>&#160;<span class="keywordtype">    real</span>(wp) :: starttime, endtime</div>
<div class="line"><a name="l00047"></a><span class="lineno">   47</span>&#160;    </div>
<div class="line"><a name="l00048"></a><span class="lineno">   48</span>&#160;    <span class="keywordtype">type</span>(vector) :: rvec, rvec1</div>
<div class="line"><a name="l00049"></a><span class="lineno">   49</span>&#160;    <span class="keywordtype">type</span>(<a class="code" h