RosettaCodeData/Task/Substring-Top-and-tail/Picat/substring-top-and-tail-1.picat
2023-07-01 13:44:08 -04:00

20 lines
461 B
Text

go =>
test("upraisers"),
test("Δημοτική"),
nl.
test(S) =>
println(s=S),
println(butfirst=S.slice(2)),
println(butfirst=S.tail),
println(butfirst=S[2..S.len]),
println(butlast=S.but_last()),
println(butfirst_butlast=S.tail.but_last),
println(butfirst_butlast=slice(S,2,S.length-1)),
println(butfirst_butlast=[S[I] : I in 2..S.length-1]),
println(butfirst_butlast=S[2..S.length-1]),
nl.
but_last(S) = S.slice(1,S.length-1).