Dev-XYS
diff --git a/‎chapter06-Recursive-functions/1.hs‎
Lines changed: 3 additions & 0 deletions b/‎chapter06-Recursive-functions/1.hs‎
Lines changed: 3 additions & 0 deletions
@@ -0,0 +1,3 @@
+fac :: Int -> Int
+fac 0 = 1
+fac n | n > 0 = n * fac (n - 1)
Original file line number	Diff line number	Diff line change
`@@ -0,0 +1,3 @@`
	`1`	`+fac :: Int -> Int`
	`2`	`+fac 0 = 1`
	`3`	`+fac n \| n > 0 = n * fac (n - 1)`