Even sum & Odd product of a list, Swi-Prolog

Asked Sep 12 '15 at 23:12

Active Sep 13 '15 at 04:53

Viewed 71 times

I have a list of numbers and I have to calculate the sum of the Even numbers and the product of the Odd numbers of the same list. I'm new in prolog and this is my code so far:

l_odd_even([],0).
l_odd_even([H|T], Odd, [H|Etail], Sum) :-
    H rem 2 =:=0,
    split(T, Odd, Etail),
    Sum = H + Etail.
l_odd_even([H|T], [H|Otail], Even, Prod) :-
    H rem 2 =:=1,
    split(T, Otail, Even),
    Prod = H * Otail.

Can anyone help me here ? And I'd like some examples in order to test if the code works.

edited Sep 13 '15 at 04:53

false

10,264
13
101
209

asked Sep 12 '15 at 23:12

Rares

1

What do you need help with? Is it not working? What is the output you're getting? (I can't help because I don't know Prolog). – President James K. Polk Sep 12 '15 at 23:15
2

This is the second time you've posted this problem. Once is adequate. – lurker Sep 13 '15 at 22:55
1

@lurker: Please flag such cases. It helps a lot to find out which one is the "original" and which the duplicate. – false Sep 13 '15 at 22:58

Even sum & Odd product of a list, Swi-Prolog

0 Answers0