root/logic
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

big tidy

Browse source
This commit is contained in:
hi 2025-08-15 10:06:31 +00:00
parent bd9b58c405
commit 687b5f1040
6 changed files with 54 additions and 39 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Logic/Language.hs
View file

@ -2,7 +2,7 @@ module Logic.Language where
-- Convenience newtype so strings of symbols are less ugly
newtype ConcatShowList symbol = ConcatShowList [symbol]
instance Show a => Show (ConcatShowList a) where
instance Show symbol => Show (ConcatShowList symbol) where
show (ConcatShowList xs) = concat $ map show xs
-- Formal language (/grammar/production system/whatever)