Strange hat-trans error

Hi,

I'm using hat 2.00 with hmake 3.06 and ghc 5.02.3 and get a strange
compilation error on the following (admittedly obscure) function:

map_fst3:: (a->a) -> ((a,b,c) ->d-> (a,b,c)) ->(a,b,c) -> d -> (a,b,c)
(f `map_fst3`g)  (a,b,c) d = (f a', b', c')
    where (a',b',c') = g (a,b,c) d

The error is:
>>>>>>>>>>>>>>>>>>>
hat-trans  foo.hs

Fail: Need infix operator at 131:18
<<<<<<<<<<<<<<<<<<<

Line 131 would be the 2nd of this 3-line example. Why does hat-trans
want an infix operator there? Can someone shed any light on this? ;)

Thanks,
Nils
-- 
Nils Ellmenreich, Lst. f. Programmierung, Universitaet Passau, Germany