* drafts/haksup/Test.hs: