Adds a `apply-reduction-relation*' example to the docs

This commit is contained in:
Casey Klein 2010-07-21 08:45:54 -05:00
parent ad308e32f1
commit ae99d4e5bc

View File

@ -875,6 +875,19 @@ sequences that do not repeat, this function will not
terminate (it does terminate if the only infinite reduction paths are cyclic). terminate (it does terminate if the only infinite reduction paths are cyclic).
} }
@examples[
#:eval redex-eval
(define-language empty-lang)
(define R
(reduction-relation
empty-lang
(--> 0 1)
(--> 0 2)
(--> 2 3)
(--> 3 3)))
(apply-reduction-relation R 0)
(apply-reduction-relation* R 0)]
@defidform[-->]{ Recognized specially within @defidform[-->]{ Recognized specially within
@racket[reduction-relation]. A @racket[-->] form is an @racket[reduction-relation]. A @racket[-->] form is an
error elsewhere. } error elsewhere. }