All pastes #369367 Raw Edit

RLa

public text v1 · immutable
#369367 ·published 2007-02-23 20:12 UTC
rendered paste body
total_sum:- total_sum(0).

total_sum(S):- S > 20, !.

total_sum(S):- random(R), T is R + S, write(T), nl, total_sum(T).