an class="keywordtype">real(kreal)</span>, <span class="keywordtype">intent(in)</span> :: x, y</div>
<div class="line"><a name="l00183"></a><span class="lineno">  183</span>&#160;<span class="comment">!   DepthLaplacian = -320.0_kreal * exp( - 50.0_kreal * ( (x - 0.5_kreal)**2 + (y-0.5_kreal)**2) ) * &amp;</span></div>
<div class="line"><a name="l00184"></a><span class="lineno">  184</span>&#160;<span class="comment">!       ( 12.0_kreal + 25.0_kreal * ( - x - y + x*x + y*y))</span></div>
<div class="line">