replace(+List, +Index, +With, -ListOut)
将List中的第Index项以原子With替换掉,并将结果输出至ListOut。
例:
?- replace([w,o,m,a,n],4,e,Output).
传回 Output = [w, o, m, e, n].
适用的Prolog版本:SWI-Prolog
将List中的第Index项以原子With替换掉,并将结果输出至ListOut。
- 代码:
replace(List, Index, With, ListOut) :-
Idx is Index - 1, length(Before,Idx),
append(Before, [_Discard|Rest], List),
append(Before, [With|Rest], ListOut).
例:
?- replace([w,o,m,a,n],4,e,Output).
传回 Output = [w, o, m, e, n].
适用的Prolog版本:SWI-Prolog