Ideone.com

fork download

(let ((a 1.2) (b 1.0) (c 0.2))
  (display(=(- a b) c))
  (newline)
(display(=(- (* a 10) (* b 10)) (* c 10))))

Success #stdin #stdout 0s 18088KB

stdin

Standard input is empty

stdout

#f
#t

https://ideone.com/ecVHdi

language:

Scheme (chicken 4.13)

created:

visibility:

public

Share or Embed source code

The brand new service which powers Ideone!

Widget for compiling and running the source code in a web browser!