ss="line">    <span class="comment">! Initialization</span></div>
<div class="line">    fcn =&gt; rosenbrock</div>
<div class="line">    <span class="keyword">call </span>obj%set_fcn(fcn, 2)</div>
<div class="line"> </div>
<div class="line">    <span class="comment">! Define an initial guess - the solution is (1, 1)</span></div>
<div class="line">    <span class="keyword">call </span>random_number(x)</div>
<div class="line"> </div>
<div class="line">    <span class="comment">! Call the solver</span></div>
<