You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
#lang racket/base
|
|
(provide And)
|
|
(define (And #:a a #:b b)
|
|
(define out (if (and (not (zero? a)) (not (zero? b)))
|
|
1
|
|
0))
|
|
out)
|