Write a function in Scheme, cond->if , which takes a cond expression, and transforms it into a set of nested if expressions. For example,

> (cond->if (cond ((> x y) (- x y)) ((< x y) (- y x)) (else 0))) (if (> x y) (- x y) (if (< x y) (- y x) 0))