SubL/examples.numberp
From Public Domain Knowledge Bank
From SubL/examples.1
numberp
(numberp 1)
(numberp 1) [Time: 0.0 secs] T
(numberp #$Lenat)
CYC(#): (numberp #$Lenat) [Time: 0.0 secs] NIL
(numberp 1) [Time: 0.0 secs] T
CYC(#): (numberp #$Lenat) [Time: 0.0 secs] NIL