Fix Applicative FT
Merge pull request #80 from supki/applicative-ft

Applicative FT is backwards