From 7a238e7df0c9c7c684b7f761f495b21aa088bd68 Mon Sep 17 00:00:00 2001 From: Masaya Tojo Date: Mon, 9 Nov 2020 02:56:59 +0900 Subject: wip10 --- rabbit-prover/primitive.scm | 25 ------------------------- 1 file changed, 25 deletions(-) delete mode 100644 rabbit-prover/primitive.scm (limited to 'rabbit-prover/primitive.scm') diff --git a/rabbit-prover/primitive.scm b/rabbit-prover/primitive.scm deleted file mode 100644 index e20406e..0000000 --- a/rabbit-prover/primitive.scm +++ /dev/null @@ -1,25 +0,0 @@ -;;; Rabbit Prover --- Prove S-expression -;;; Copyright © 2020 Masaya Tojo -;;; -;;; This file is part of Rabbit Prover. -;;; -;;; Rabbit Prover is free software; you can redistribute it and/or modify it -;;; under the terms of the GNU General Public License as published by -;;; the Free Software Foundation; either version 3 of the License, or -;;; (at your option) any later version. -;;; -;;; Rabbit Prover is distributed in the hope that it will be useful, but -;;; WITHOUT ANY WARRANTY; without even the implied warranty of -;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -;;; General Public License for more details. -;;; -;;; You should have received a copy of the GNU General Public License -;;; along with Rabbit Prover. If not, see . - -(define-module (rabbit-prover primitive) - #:export (natural?)) - -;; (natural? x) -> boolean? -(define (natural? x) - (and (integer? x) - (not (negative? x)))) -- cgit v1.2.3