f true true x s y f isNat x isNat y s x double s y isNat 0 true isNat s x isNat x double 0 0 double s x s s double x f 4 true 0 s 1 isNat 1 double 1 0 0 FULL