Advertisement
Guest User

Untitled

a guest
Jun 19th, 2018
74
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.29 KB | None | 0 0
  1. fun paskal i j =
  2. if j = 0 then
  3. 1
  4. else if i = j then
  5. 1
  6. else
  7. (paskal (i-1) j)+(paskal (i-1) (j-1))
  8.  
  9. fun paskal2 i j =
  10. if i = j then
  11. [1]
  12. else
  13. [paskal i j] @ paskal2 i (j+1)
  14.  
  15. fun paskal3 n =
  16. if n = 1 then
  17. [[1]]
  18. else
  19. (paskal3 (n-1)) @ [paskal2 n 0]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement