このディレクトリの索引

副文字列(_文字列,_開始位置,_副文字列の長さ,_残り文字数,_副文字列) :-
        sub_atom(_文字列,_開始位置,_副文字列の長さ,_残り文字数,_副文字列).


副文字列(_文字列,_副文字列) :-
        sub_atom(_文字列,_,_,_,_副文字列).


副文字列(_文字列,_前文字列,_中間文字列,_後文字列) :-
        sub_atom(_文字列,0,S,_,_前文字列),
        sub_atom(_文字列,S,_,R,_中間文字列),
        sub_atom(_文字列,_,R,0,_後文字列).


副文字列(_文字列,_前文字列,_中間文字列,_後文字列,L1,L2,L3) :-
        前文字列(_文字列,S,_前文字列,L1),
        中間文字列(_文字列,S,R,_中間文字列,L2),
        後文字列(_文字列,R,_後文字列,L3).

前文字列(_文字列,S,_前文字列,L1) :-
        sub_atom(_文字列,0,S,_,_前文字列),
        length(L1,S),
        atom_chars(_前文字列,L1).

中間文字列(_文字列,S,R,_中間文字列,L2) :-
        sub_atom(_文字列,S,Len,R,_中間文字列),
        length(L2,Len),
        atom_chars(_中間文字列,L2).

後文字列(_文字列,R,_後文字列,L3) :-
        sub_atom(_文字列,_,R,0,_後文字列),
        length(L3,R),
        atom_chars(_後文字列,L3).