





























if (* (* (* (* x 18.0) y) z) t) < -7.698496120324831e+222rm if -7.698496120324831e+222 < (* (* (* (* x 18.0) y) z) t) < -2.8808346348775406e+117rm if -2.8808346348775406e+117 < (* (* (* (* x 18.0) y) z) t) < -1.338160491931148rm if -1.338160491931148 < (* (* (* (* x 18.0) y) z) t) < 7.910479095796737e-45if 7.910479095796737e-45 < (* (* (* (* x 18.0) y) z) t) < 2.335362959655978e+146rm if 2.335362959655978e+146 < (* (* (* (* x 18.0) y) z) t) rm Original test:
(lambda ((x default) (y default) (z default) (t default) (a default) (b default) (c default) (i default) (j default) (k default))
#:name "Diagrams.Solve.Polynomial:cubForm from diagrams-solve-0.1"
(- (- (+ (- (* (* (* (* x 18.0) y) z) t) (* (* a 4.0) t)) (* b c)) (* (* x 4.0) i)) (* (* j 27.0) k)))