drei Teilmengen von data Exp:
Exp_CPS ==> App Identifier Exp_Value^*
    | If Exp_Value Exp_CPS Exp_CPS
    | Let Identifier Exp_Letable Exp_CPS
Exp_Value ==> Literal | Identifier 
Exp_Letable ==> Literal
    | Abs Identifier Exp_CPS
    | Exp_Value Op Exp_Value
Übung 1: Übersetze 
von Exp nach Exp_CPS:
(0 - (b * b)) + (4 * (a * c))
Übung 2: wegen CPS brauchen wir tatsächlich:
\ k -> k ((0 - (b * b)) + (4 * (a * c))