Oops, I must have brainfarted when transcribing the prices over. There are still two solutions, though (here's a version which also prints out the rows' totals):
| ?- paytherent([199,379,549,159,229,359],X,Y).
X = [379,199,229,159,359,549] Y = [379,428,518,549] ? a
X = [359,199,229,159,379,549] Y = [359,428,538,549]
![[personal profile]](https://www.dreamwidth.org/img/silk/identity/user.png)
rosecarmine
(no subject)
Date: 2012-10-02 05:52 am (UTC)| ?- paytherent([199,379,549,159,229,359],X,Y).
X = [379,199,229,159,359,549]
Y = [379,428,518,549] ? a
X = [359,199,229,159,379,549]
Y = [359,428,538,549]