move agda files into subdir

2022-09-30 20:24:38 -05:00 · 2022-09-30 20:24:38 -05:00 · a9004d0a88
parent 94f8f83da4
commit a9004d0a88
8 changed files with 5 additions and 6 deletions
--- a/.gitignore
+++ b/.gitignore
@ -1,5 +1,5 @@
-MAlonzo/
-out/
-*.agdai
+agda/*.agdai
+agda/Calc
+agda/MAlonzo/

-Calc
+out/
--- a/agda/Calc.agda
+++ b/agda/Calc.agda
--- a/agda/Eval.agda
+++ b/agda/Eval.agda
--- a/agda/Map.agda
+++ b/agda/Map.agda
--- a/agda/Parse.agda
+++ b/agda/Parse.agda
--- a/agda/Show.agda
+++ b/agda/Show.agda
--- a/agda/State.agda
+++ b/agda/State.agda
--- a/agda/Util.agda
+++ b/agda/Util.agda
@ -50,8 +50,7 @@ filterNothing (just x ∷ xs) = x ∷ filterNothing xs

 -- take the item at the given index
 takeIndex : {A : Set} → A → List A → Nat → A
-takeIndex d [] 0 = d
-takeIndex d [] (suc x) = d
+takeIndex d [] _ = d
 takeIndex d (x ∷ xs) 0 = x
 takeIndex d (x ∷ xs) (suc n) = takeIndex d xs n