Unicode

This now parses flawlessly.
```haskell
my_other_function :: (‹names›, ‹places›) → ‹atom›
my_other_function (Names, Places) =
  R1 = ø(Ø, Ça, Names)
  R2 = µ(Ð, Æ, Places)
  if R1 ≥ R2 ok else ko end
```
![49](https://cloud.githubusercontent.com/assets/278727/2939011/7a7c54fc-d930-11e3-8103-f759404be874.png)