pascal function

1
2
3
4
5
6
7
8
9
10
11
12
    $ fay
    > let pascal = iterate (\row -> zipWith (+) (0 : row) (row ++ [0])) [1] in (take 25 pascal)
    (function(){
      var pascal = new Fay$$$(function(){
        return Fay$$_(Fay$$_(Main$iterate)(function($p1){
          var row = $p1;
          return Fay$$_(Fay$$_(Fay$$_(Main$zipWith)(Fay$$add))
             (Fay$$_(Fay$$_(Fay$$cons)(0))(row)))(Fay$$_(Fay$$_(Main$$43$$43$)(row))(Fay$$list([0])));
        }))(Fay$$list([1]));
      });
      return Fay$$_(Fay$$_(Main$take)(25))(pascal);
    })()