!(let $T (1.0 0.9)
      (let* ((($f1 $c1) $T))
            ($f1 $c1)))