%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% Procedura per il calcolo della lunghezza di una lista 
% 
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%%% lungh(L,N): vero se N e' la lunghezza (- numero di elementi)
%%% della lista L

lungh([],0).
lungh([X|R],N) :-
     lungh(R,NR),
     N is NR +1.

