Difference between revisions of "SubL/examples.constantp"

From Public Domain Knowledge Bank
Jump to: navigation, search
(Created page with "<noinclude> == SubL/examples.1 == </noinclude> === constantp === CYC(56): (constantp) Error: Cannot make an arity 0 function from #<Function CONSTANTP> {req=1 ...} CYC(...")
 
Line 3: Line 3:
 
</noinclude>
 
</noinclude>
 
=== constantp ===
 
=== constantp ===
 +
==== constantp w/ 0 arg ====
 
  CYC(56): (constantp)
 
  CYC(56): (constantp)
 
  Error: Cannot make an arity 0 function from #<Function CONSTANTP> {req=1 ...}
 
  Error: Cannot make an arity 0 function from #<Function CONSTANTP> {req=1 ...}
 +
==== constantp w/ >2 arg ====
 
  CYC(#): (constantp #$Lenat #$Lenat #$Lenat)
 
  CYC(#): (constantp #$Lenat #$Lenat #$Lenat)
 
  Error: Cannot make an arity 3 function from #<Function CONSTANTP> {req=1 opt=1 allowsrest=false}
 
  Error: Cannot make an arity 3 function from #<Function CONSTANTP> {req=1 opt=1 allowsrest=false}
 
 
==== constantp w/ 1 arg ====
 
==== constantp w/ 1 arg ====
 
===== (constantp "a") =====
 
===== (constantp "a") =====

Revision as of 02:40, 8 March 2019

SubL/examples.1

constantp

constantp w/ 0 arg

CYC(56): (constantp)
Error: Cannot make an arity 0 function from #<Function CONSTANTP> {req=1 ...}

constantp w/ >2 arg

CYC(#): (constantp #$Lenat #$Lenat #$Lenat)
Error: Cannot make an arity 3 function from #<Function CONSTANTP> {req=1 opt=1 allowsrest=false}

constantp w/ 1 arg

(constantp "a")
CYC(54): (constantp "a")
[Time: 0.0 secs]
T
(constantp #$Lenat)
CYC(#): (constantp #$Lenat)
[Time: 0.002 secs]
T
(constantp 'a)
CYC(#): (constantp 'a)
[Time: 0.0 secs]
NIL

constantp w/ 2 arg

(constantp #$Lenat "a")
CYC(#): (constantp #$Lenat "a")
[Time: 0.001 secs]
T