Matrix-exponentiation operator: Difference between revisions

Content added Content deleted
(→‎{{header|Scheme}}: Added some missing functions)
Line 1,905: Line 1,905:


<lang scheme>
<lang scheme>
(define (even? n)
(if (= 0 (remainder n 2))
#t
#f))

(define (dec x)
(define (dec x)
(- x 1))
(- x 1))