10/02/14 08:49:35
>>713
% Prolog
% <Aゾーン>にバックトラックさせるためには例えば、
'5行の文字列のいずれかをランダムに返す'(L,_文字列) :-
N is random mod 5 + 1,
list_nth(N,L,なにぬねの),!.
'5行の文字列のいずれかをランダムに返す'(L,_文字列) :-
N is random mod 5 + 1,
list_nth(N,L,_文字列).
'5行の文字列のいずれかをランダムに返す'(L,_文字列) :-
'5行の文字列のいずれかをランダムに返す'(L,_文字列).
% これで一度なにぬねのが利用された後はこの述語は非決定性の性質を一旦失う。