From 075afbe4d365d8056a610d6e05d699893337c064 Mon Sep 17 00:00:00 2001
From: Alexander Foremny <aforemny@posteo.de>
Date: Thu, 9 Nov 2023 15:13:31 +0100
Subject: improve list output

---
 app/Data/List/Extra.hs | 5 +++++
 1 file changed, 5 insertions(+)
 create mode 100644 app/Data/List/Extra.hs

(limited to 'app/Data/List')

diff --git a/app/Data/List/Extra.hs b/app/Data/List/Extra.hs
new file mode 100644
index 0000000..d01beb9
--- /dev/null
+++ b/app/Data/List/Extra.hs
@@ -0,0 +1,5 @@
+module Data.List.Extra (list) where
+
+list :: b -> ([a] -> b) -> [a] -> b
+list y _ [] = y
+list _ f xs = f xs
-- 
cgit v1.2.3