RosettaCodeData/Task/Substring/Logtalk/substring-2.logtalk

8 lines
85 B
Plaintext

| ?- ?- substring::test('abcdefgh', 2, 3, 'b', 'bc').
cde
cdefgh
abcdefg
bcd
bcd
yes