diff --git a/README.md b/README.md
index 35d638e..76c950c 100644
--- a/README.md
+++ b/README.md
@@ -14,6 +14,7 @@ uwu in every programming language in the world
 - [Elixir](uwu.ex)
 - [Emojicode](uwu.emojic)
 - [F#](uwu.fs)
+- [Fortran](uwu.f)
 - [Go](uwu.go)
 - [Haskell](uwu.hs)
 - [Java](uwu.java)
diff --git a/uwu.f b/uwu.f
new file mode 100644
index 0000000..c312e57
--- /dev/null
+++ b/uwu.f
@@ -0,0 +1,3 @@
+program uwu
+  print *, "uwu"
+end program