From d05b8cec8f30e719c412ff3b61f5b3c38c1beb4c Mon Sep 17 00:00:00 2001
From: Maxim Likhachev <envrm@yandex.ru>
Date: Sat, 20 Jun 2020 16:40:25 +0300
Subject: [PATCH] 007/104: pwd

---
 src/pwd.hs | 9 +++++++++
 1 file changed, 9 insertions(+)
 create mode 100644 src/pwd.hs

diff --git a/src/pwd.hs b/src/pwd.hs
new file mode 100644
index 0000000..67d3ef7
--- /dev/null
+++ b/src/pwd.hs
@@ -0,0 +1,9 @@
+{-# LANGUAGE NoImplicitPrelude #-}
+
+import Prelude            (IO, putStrLn)
+import Control.Monad      ((>>=))
+import System.Directory   (getCurrentDirectory)
+
+main :: IO ()
+main = getCurrentDirectory >>= putStrLn
+