[Haskell] Simple Fudgets-question

[Henrik Berg]

Hi!

I can't find any function in the Fudgets-library to do this:

(F a b) -> (F a (a, b))

That is, I have a fudget taking input of type a and giving output of
type b, and I want to convert it to a fudget taking input of type a
and giving output of type (a, b).  All I want to do is to resend the
input out on the output.  I'm quite new to Fudgets (and Haskell in
general), and feel quite stuck on this problem.  Anyone here care to
give me a hint?

-- 
Henrik