X-Git-Url: http://lambda.jimpryor.net/git/gitweb.cgi?p=lambda.git;a=blobdiff_plain;f=week6.mdwn;h=ac94b79c36373bf7377477a83206231c8ec97f2c;hp=5898788187b1c1cf4fb5e53631f024aaee09103e;hb=afc4f7a71546e785d23f59b46fd9d7f035748a60;hpb=177c81322f3487ac795fbcb58e8fb765bbc1f86d;ds=sidebyside diff --git a/week6.mdwn b/week6.mdwn index 58987881..ac94b79c 100644 --- a/week6.mdwn +++ b/week6.mdwn @@ -200,7 +200,7 @@ let div (x:int) (y:int) = _ -> Some (x / y);; (* -val div : int -> int -> int option = \ +val div : int -> int -> int option = fun # div 12 3;; - : int option = Some 4 # div 12 0;;