fix typo and needs maplist.

This commit is contained in:
Vítor Santos Costa 2014-08-20 07:57:12 -05:00
parent 5aad8e380b
commit be6947d74c

View File

@ -29,7 +29,7 @@
the GNU General Public License. the GNU General Public License.
*/ */
:- module(aggretate, :- module(aggregate,
[ foreach/2, % :Generator, :Goal [ foreach/2, % :Generator, :Goal
aggregate/3, % +Templ, :Goal, -Result aggregate/3, % +Templ, :Goal, -Result
aggregate/4, % +Templ, +Discrim, :Goal, -Result aggregate/4, % +Templ, +Discrim, :Goal, -Result
@ -38,6 +38,7 @@
free_variables/4 % :Generator, :Template, +Vars0, -Vars free_variables/4 % :Generator, :Template, +Vars0, -Vars
]). ]).
:- use_module(library(ordsets)). :- use_module(library(ordsets)).
:- use_module(library(maplist)).
:- use_module(library(pairs)). :- use_module(library(pairs)).
:- use_module(library(error)). :- use_module(library(error)).
:- use_module(library(lists)). :- use_module(library(lists)).