deobfuscate haskell golf a bit

Keep only a single <$> to test its ligature.
Language comment in front and in full.

diff --git a/unicode.txt b/unicode.txt
index c2be4c93a63312bcffa1cb5e0bc5defb98cc9343..2c29f9431c20392aef116cdac2139e509ef0744b 100644 (file)
--- a/unicode.txt
+++ b/unicode.txt
@@ -32,7 +32,7 @@ Code:
 
   perl -pe's/\w/$^ =~ $& > chop($^ = $& . $^) ? "@-" : $&/ge'
 
-  fix$(<$>)<$>(:)<*>((<$>((:[{- hs -}])<$>))(=<<)<$>(*)<$>(>>=)(+)($))$1
+  {- haskell -}fix$(.)<$>(:)<*>((.((:[]).))(=<<).(*).(>>=)(+)($))$1
 
   ↑1 ⍵∨.∧3 4=+/,¯1 0 1∘.⊖¯1 0 1⌽¨⊂⍵ ⍝ game of life