From f8583f9a85f54d0a7b4902d0d23b1b83f387b593 Mon Sep 17 00:00:00 2001 From: Masaya Tojo Date: Mon, 24 Jun 2024 00:06:23 +0900 Subject: Rename function from `<>` to `op` --- README.md | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'README.md') diff --git a/README.md b/README.md index 5998fac..90bf8c2 100644 --- a/README.md +++ b/README.md @@ -25,9 +25,9 @@ $ chicken-install (module (mod7 semigroup) = (algebraic-structures semigroup) (import scheme (chicken module)) - (export <>) + (export op) - (define (<> x y) + (define (op x y) (assert (integer? x)) (assert (integer? y)) (assert (not (zero? x))) @@ -73,7 +73,7 @@ $ chicken-install In REPL: ``` -> (map (cut mod7:pow 3 <>) '(0 1 2 3 4 5 6 7 8 9 10 11)) +> (map (cut mod7:pow 3 op) '(0 1 2 3 4 5 6 7 8 9 10 11)) (1 3 2 6 4 5 1 3 2 6 4 5) > (mod7:fold '(1 2 3 4 5 6)) 6 -- cgit v1.2.3