Visible infix info from imports

This commit is contained in:
2024-10-22 22:08:34 -07:00
parent 19b42d72e5
commit fe323618e7
8 changed files with 79 additions and 60 deletions

View File

@@ -1,23 +1,6 @@
module Day1
import Lib
ptype Int
-- TODO fix import of fixity declarations
infixr 4 _::_
infixl 3 _<_
infixl 4 _-_
infixl 4 _+_
infixl 5 _*_
infixl 5 _/_
infixr 0 _$_
-- Code
infixl 7 _._
_._ : {A B C : U} -> (B -> C) -> (A -> B) -> A -> C
(f . g) x = f ( g x)
digits1 : List Char -> List Int
digits1 Nil = Nil