infixr ** before * (f, g) {
   fun (x) { f (g (x))}
}

local x = read ();

write ((fun (x) { x+2} ** fun (x) { x+3})(7))