diff --git a/README.md b/README.md
index 1b4659f..4acdba4 100644
--- a/README.md
+++ b/README.md
@@ -89,6 +89,7 @@ Ruby
 Rust
 Scala
 Solidity
+Standard ML
 SQL
 Swift
 TrumpScript
diff --git a/implementations/main.sml b/implementations/main.sml
new file mode 100644
index 0000000..7769028
--- /dev/null
+++ b/implementations/main.sml
@@ -0,0 +1 @@
+fun is_prime x = false
diff --git a/optimized_implementations/main.sml b/optimized_implementations/main.sml
new file mode 100644
index 0000000..82cffc3
--- /dev/null
+++ b/optimized_implementations/main.sml
@@ -0,0 +1 @@
+val(is_prime)=fn(x)=>false