 (pascal1 5 6)
 ;=> 0
 
-
+(pascal1 1000 500)
 ;; Aber: diese Lösung ist nicht endrekursiv.
 ;; Können wir die Berechnung endrekursiv machen?
 

;; (pascal zeile spalte) berechnet

(comment
                  0 falls z < 1 oder s > z

  pascal(z s)  =  1 falls z = 1 oder z = s  


(factorial 6)
;=> 720

(factorial 5000N)
(fact2 5000N)
;=> eine sehr große Zahl!!

;; Noch eine andere Variante der Implementierung der Endrekursion
