(< complex) and friends

[Bill Schottstaedt]

guile> (< 1.0+1.0i)
#t
guile> (< 2.0 1.0+1.0i)

Backtrace:
In standard input:
   2: 0* [< 2.0 {1.0+1.0i}]

standard input:2:1: In procedure < in expression (< 2.0 1.0+1.0i):
standard input:2:1: Wrong type: 1.0+1.0i
ABORT: (wrong-type-arg)


(Happens also with > <= >=)