me="l00099"></a><span class="lineno">   99</span>        </div>
<div class="line"><a id="l00100" name="l00100"></a><span class="lineno">  100</span>        integral = 0.0_r8</div>
<div class="line"><a id="l00101" name="l00101"></a><span class="lineno">  101</span>        fold = 0.0_r8</div>
<div class="line"><a id="l00102" name="l00102"></a><span class="lineno">  102</span>        p = 0.5*a</div>
<div class="line"><a id="l00103" name="l00103"></a><span class="lineno">  103</span>        t = 1.0e3</div>
<div