From 9fe033ea88c2f705ec18c232873d056e0c229d72 Mon Sep 17 00:00:00 2001
From: Gaspard Coulet <gaspard.coulet@mines-ales.org>
Date: Wed, 28 Apr 2021 23:05:53 +0200
Subject: Initial commit

---
 sem_4/progaapp/TP1/day.bak | 15 +++++++++++++++
 1 file changed, 15 insertions(+)
 create mode 100644 sem_4/progaapp/TP1/day.bak

(limited to 'sem_4/progaapp/TP1/day.bak')

diff --git a/sem_4/progaapp/TP1/day.bak b/sem_4/progaapp/TP1/day.bak
new file mode 100644
index 0000000..a363622
--- /dev/null
+++ b/sem_4/progaapp/TP1/day.bak
@@ -0,0 +1,15 @@
+#lang racket
+(define bissextile
+  (lambda (x)
+    ( if (= (modulo x 4) 0)
+         (if (not (= ( modulo x 100) 0))
+             (#t)
+             (if (= ( modulo x 400) 0)
+                 (#t)
+                 (#f))
+            )
+         (#f))
+    )
+  )
+                
+             
\ No newline at end of file
-- 
cgit v1.2.3