s="line">    <span class="keywordtype">type</span>(nelder_mead) :: solver</div>
<div class="line">    <span class="keywordtype">type</span>(fcnnvar_helper) :: obj</div>
<div class="line">    <span class="keywordtype">procedure</span>(fcnnvar), <span class="keywordtype">pointer</span> :: fcn</div>
<div class="line"><span class="keywordtype">    real</span>(real64) :: x(2), fout</div>
<div class="line">    <span class="keywordtype">type</span>(iteration_behavior) :: ib</div>
<div class="line"> </div>
<div cla