(define vratfcipricti
   (lambda (x)
      (lambda (a) (+ a x))
   )
)

(define soucet (lambda (x y) ((vratfcipricti x) y) ))

(define apply2 
   (lambda (fce parm1 parm2)
      (fce parm1 parm2)
   )
)

(apply2 soucet 4 8)