% ==========================================================================
% $Id: list_inversion.pl,v 1.2 2014/01/21 04:49:19 jlang Exp $
% CSI2120 example Code for lecture 5
% ==========================================================================
% (C)opyright:
%
%   Jochen Lang
%   EECS, University of Ottawa
%   800 King Edward Ave.
%   Ottawa, On., K1N 6N5
%   Canada. 
%   http://www.eecs.uottawa.ca/~jlang
% 
% Creator: jlang (Jochen Lang) based on Clocksin & Mellish
% Email:   jlang@eecs.uottawa.ca
% ==========================================================================
% $Log: list_inversion.pl,v $
% Revision 1.2  2014/01/21 04:49:19  jlang
% List processing for lecture 5.
%
% Revision 1.1  2014/01/20 18:13:39  jlang
% Created list processing examples for lecture 4.
%
% ==========================================================================
reverseList([],L,L) :- !.
reverseList([H|T],L,R) :- reverseList(T,[H|L],R).

mirrorAccu(L,R) :- reverseList(L,[],R).