\m => minus (S (S (S m))) (S m) prf
:q
