ass="comment">%********************************************</span>
0318     <span class="comment">%* compute new trial stepsize (goto150)     *</span>
0319     <span class="comment">%********************************************</span>
0320     
0321     bSafeguard = 1;
0322     
0323     <span class="comment">% extrapolation phase</span>
0324     <span class="keyword">if</span> (alp1 == 0.)
0325       <span class="comment">% only short steps, mu&gt;1/2, expand</span>
0326       <span class="keyword">if</spa