From 67a898893884f229d64886a220ba422dd0d66e78 Mon Sep 17 00:00:00 2001
From: Guillermo Ramos
Date: Wed, 9 May 2012 15:45:31 +0200
Subject: [Erlang] Día 2

---
 erlang/shopping.erl | 4 ++++
 1 file changed, 4 insertions(+)
 create mode 100644 erlang/shopping.erl

(limited to 'erlang/shopping.erl')

diff --git a/erlang/shopping.erl b/erlang/shopping.erl
new file mode 100644
index 0000000..e1cc4f4
--- /dev/null
+++ b/erlang/shopping.erl
@@ -0,0 +1,4 @@
+-module(shopping).
+-export([shopping/1]).
+
+shopping(List) -> [{Item, Quant*Price} || {Item, Quant, Price} <- List].
-- 
cgit v1.2.3