RosettaCodeData/Task/Substring/Prolog/substring-2.pro

8 lines
193 B
Prolog
Raw Permalink Normal View History

2015-02-20 00:35:01 -05:00
?- substring_task("abcdefghijk", 2, 4, "d", "ef").
from n to m :cdef
from n to end :cdefghijk
string minus last char :abcdefghij
form known char to m :defg
from known substring to m :efgh
true