Implement a function to sum Liste elements · ee01510045 - Gogs Jovian

Преглед на файлове

Implement a function to sum Liste elements

DricomDragon преди 5 години

родител

11c79ba97d

ревизия

ee01510045

променени са 1 файла, в които са добавени 4 реда и са изтрити 0 реда

Разделен изглед Покажи статистика за разликите

						
							+ 4
							
							- 0
						
list.hs
							 
								Целия файл
							
				@@ -1,2 +1,6 @@
			
				 data List = Ground | Leaf Integer List
			
				+hyperSum xs = case xs of
			
				+	Ground -> 0
			
				+	Leaf x tail -> x + hyperSum tail
			
				+