Create print_inverted_pyramid_pattern.hs (#4979)

Writing a Haskell program to print inverted pyramid pattern.
codinasion-archive · Jan 3, 2024 · 4fa34d4 · 4fa34d4 · vercel · Jan 3, 2024
1 parent 2710a1a
commit 4fa34d4
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/program/program/print-inverted-pyramid-pattern/print_inverted_pyramid_pattern.hs b/program/program/print-inverted-pyramid-pattern/print_inverted_pyramid_pattern.hs
@@ -0,0 +1,3 @@
+main = do
+  let n = 5
+  mapM_ (putStrLn . unwords . map show) [[1..x] | x <- [n,n-1..1]]