cord? ( object -- ? )


Vocabulary
sequences.cords

Inputs and outputs
objectan object
?a boolean


Word description
Tests if the object is an instance of the cord class.

Definition
USING: kernel math.vectors.simd.cords ;

IN: sequences.cords

: cord? ( object -- ? )
dup double-4?
[ drop t ] [
dup float-8?
[ drop t ] [
dup ulonglong-4?
[ drop t ] [
dup longlong-4?
[ drop t ] [
dup uint-8?
[ drop t ]
[ dup int-8? ~quotation~ ~quotation~ if ]
if
] if
] if
] if
] if ;