fun fine (x y) = 0 let fine = 0