0168     <span class="comment">%*****************************************************</span>
0169     
0170     <span class="comment">% count requested function evaluations</span>
0171     k=k+1;
0172     
0173     <span class="comment">% check correctness of step</span>
0174     <span class="comment">% note that alp1&gt;=alp2 unless alp1=0</span>
0175     <span class="keyword">if</span> (alp &lt; stpmin || alp &lt;= alp2)
0176       <span class="comment">% new step size too small</span>
0177       obj.prin