From c84de0992f1ee0886f318ac59e61f551c980c3d7 Mon Sep 17 00:00:00 2001
From: sech1p <sech1p@disroot.org>
Date: Sun, 25 Jul 2021 18:08:20 +0200
Subject: [PATCH 1/2] Add uwu in Fortran

---
 README.md | 1 +
 uwu.f     | 3 +++
 2 files changed, 4 insertions(+)
 create mode 100644 uwu.f

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

From 22d98bbdd6e7c20bda11ef2ee53e6a430b7d6b11 Mon Sep 17 00:00:00 2001
From: sech1p <sech1p@disroot.org>
Date: Sun, 25 Jul 2021 18:21:21 +0200
Subject: [PATCH 2/2] Add uwu in COBOL

---
 README.md | 2 ++
 uwu.cbl   | 5 +++++
 uwu.gcbl  | 6 ++++++
 3 files changed, 13 insertions(+)
 create mode 100644 uwu.cbl
 create mode 100644 uwu.gcbl

diff --git a/README.md b/README.md
index 76c950c..a937e73 100644
--- a/README.md
+++ b/README.md
@@ -10,6 +10,8 @@ uwu in every programming language in the world
 - [C](uwu.c)
 - [C#](uwu.cs)
 - [C++](uwu.cpp)
+- [COBOL](uwu.cbl)
+ - [GnuCOBOL](uwu.gcbl)
 - [D](uwu.d)
 - [Elixir](uwu.ex)
 - [Emojicode](uwu.emojic)
diff --git a/uwu.cbl b/uwu.cbl
new file mode 100644
index 0000000..414c9fc
--- /dev/null
+++ b/uwu.cbl
@@ -0,0 +1,5 @@
+IDENTIFICATION DIVISION.
+PROGRAM-ID. UWU.
+PROCEDURE DIVISION.
+DISPLAY 'uwu'.
+STOP RUN.
diff --git a/uwu.gcbl b/uwu.gcbl
new file mode 100644
index 0000000..e732783
--- /dev/null
+++ b/uwu.gcbl
@@ -0,0 +1,6 @@
+000100 id division.
+000200 program-id. uwu.
+000300 procedure division.
+000400 display "uwu" end-display
+000500 goback.
+