From a55f2e2793da93f53b8fc30bdaa28296a3484bd1 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Du=C5=A1ek=20Daniel=20=28165256=29?= <xdusek21@vutbr.cz>
Date: Sat, 6 Oct 2018 09:14:59 +0200
Subject: [PATCH] Add - Haskell Hello World!

---
 README.md     | 5 +++++
 code/hello.hs | 5 +++++
 2 files changed, 10 insertions(+)
 create mode 100644 code/hello.hs

diff --git a/README.md b/README.md
index 880c083..cf14e68 100644
--- a/README.md
+++ b/README.md
@@ -292,6 +292,11 @@ Please note that this project is released with a [Code of Conduct](CODE_OF_CONDU
 - Interested in node, ionic, angular, docker
 - [![github-alt][github-img]](https://github.com/davidmoura07)
 
+### Daniel Dusek
+- No one of consequence.
+- [![twitter-alt][twitter-img]](https://twitter.com/DusekDan)
+- [![github-alt][github-img]](https://github.com/DusekDan)
+
 # E
 
 ### Elijah Rwothoromo
diff --git a/code/hello.hs b/code/hello.hs
new file mode 100644
index 0000000..f411dd4
--- /dev/null
+++ b/code/hello.hs
@@ -0,0 +1,5 @@
+{-# In Haskell, fibonacci function is considered a Hello world! application. #-}
+fibAcc n = go n (0,1)
+  where
+    go !n (!a, !b) | n==0      = a
+                   | otherwise = go (n-1) (b, a+b)
\ No newline at end of file