info/learnxinyminutes-docs
1
0
Fork 0
mirror of https://github.com/adambard/learnxinyminutes-docs.git synced 2025-08-13 18:24:39 +02:00
Code Issues Releases Wiki Activity

Merge pull request #3037 from twopoint718/master

Browse Source 
[Standard ML/en] Add case expression to SML docs
This commit is contained in:
Pratik Karki
2018-02-28 16:17:52 +05:45
committed by GitHub
parent a26d106ed7 9999a30e04
commit 3b0a97df42
1 changed files with 11 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
standard-ml.html.markdown
View File

@@ -6,6 +6,7 @@ contributors:
- ["David Pedersen", "http://lonelyproton.com/"] - ["David Pedersen", "http://lonelyproton.com/"]
- ["James Baker", "http://www.jbaker.io/"] - ["James Baker", "http://www.jbaker.io/"]
- ["Leo Zovic", "http://langnostic.inaimathi.ca/"] - ["Leo Zovic", "http://langnostic.inaimathi.ca/"]
- ["Chris Wilson", "http://sencjw.com/"]
--- ---
Standard ML is a functional programming language with type inference and some Standard ML is a functional programming language with type inference and some
@@ -266,6 +267,16 @@ fun second_elem (x::y::xs) = y
fun evenly_positioned_elems (odd::even::xs) = even::evenly_positioned_elems xs fun evenly_positioned_elems (odd::even::xs) = even::evenly_positioned_elems xs
| evenly_positioned_elems [odd] = [] (* Base case: throw away *) | evenly_positioned_elems [odd] = [] (* Base case: throw away *)
| evenly_positioned_elems [] = [] (* Base case *) | evenly_positioned_elems [] = [] (* Base case *)
(* The case expression can also be used to pattern match and return a value *)
datatype temp =
C of real
| F of real
fun temp_to_f t =
case t of
C x => x * (9.0 / 5.0) + 32.0
| F x => x
(* When matching on records, you must use their slot names, and you must bind (* When matching on records, you must use their slot names, and you must bind
every slot in a record. The order of the slots doesn't matter though. *) every slot in a record. The order of the slots doesn't matter though. *)