Lines Matching refs:fc
409 set cmd $f; lappend cmd $c; set fc [eval $cmd]
411 puts "f($c) = $fc (initial dilatation by phi)"
414 while { $fb >= $fc } {
418 set r [expr { ($b - $a) * ($fb - $fc) }]
442 if { $fu < $fc } {
444 # fb > fu and fc > fu, so there is a minimum between b and c
447 return [list $b $fb $u $fu $c $fc]
480 if { $fu > $fc } {
484 return [list $b $fb $c $fc $u $fu]
488 # function is still decreasing fa > fb > fc > fu. Take
491 set b $c; set fb $fc
492 set c $u; set fc $fu
522 set b $c; set fb $fc
523 set c $u; set fc $fu
526 return [list $a $fa $b $fb $c $fc]
590 foreach { a fa b fb c fc } [brackmin $f $x1 $x2 $params(-trace)] {