55 lines
1.4 KiB
Racket
55 lines
1.4 KiB
Racket
#lang scribble/manual
|
|
|
|
@(require
|
|
"../defs.rkt"
|
|
scribble/eval)
|
|
|
|
@(define curnel-eval (curnel-sandbox "(require cur/stdlib/bool cur/stdlib/sugar)"))
|
|
|
|
@title{Bool}
|
|
@defmodule[cur/stdlib/bool]
|
|
This library defines the datatype @racket[Bool] and several functions and forms for using them.
|
|
|
|
@; TODO: Define a @defdata macro for Cur
|
|
@deftogether[(@defthing[Bool Type]
|
|
@defthing[true Bool]
|
|
@defthing[false Bool])]{
|
|
The boolean datatype.
|
|
}
|
|
|
|
@defform[(if test-expr c-expr alt-expr)]{
|
|
A syntactic form that expands to the inductive eliminator for @racket[Bool]. This form is currently non-dependent---the branches do not know that @racket[test-expr] is equal to @racket[true] or @racket[false].
|
|
|
|
@examples[#:eval curnel-eval
|
|
(if true false true)
|
|
(elim Bool Type (λ (x : Bool) Bool) false true true)]
|
|
}
|
|
|
|
@defproc[(not [x Bool])
|
|
Bool]{
|
|
Negates the boolean @racket[x].
|
|
|
|
@examples[#:eval curnel-eval
|
|
(not true)
|
|
(not false)]
|
|
}
|
|
|
|
@defproc[(and [x Bool] [y Bool])
|
|
Bool]{
|
|
The boolean @racket[and]. True if and only if @racket[x] and @racket[y] are both either @racket[true] or @racket[false].
|
|
|
|
@examples[#:eval curnel-eval
|
|
(and true true)
|
|
(and false true)]
|
|
}
|
|
|
|
@defproc[(or [x Bool] [y Bool])
|
|
Bool]{
|
|
The boolean @racket[or]. True if and only if either @racket[x] or @racket[y] is @racket[true].
|
|
|
|
@examples[#:eval curnel-eval
|
|
(or true true)
|
|
(or false true)
|
|
(or false false)]
|
|
}
|