1.問題の説明：
フラグメントスプライシング
2.プログラムの一部：
％cd piecejoint
a = tic;
％％
グローバルallP
グローバルmarglmargr
グローバルld
グローバルpnpw ph
allP = brief_pretreat;
[margl、margr] = extractmargin;
lmark = brief_markline_accurate;
％save（ 'a'、 'lmark'）
％load（ 'a'）
%%%%%%%%%%%%%%%%%%%
pind = zeros（11,19）;
ティック= [04.5 10 20 26 30 36 40 47.5 50 57.01 60];
k =
1：11の場合pind（k、:) = find（tick（k）<lmark＆lmark <tick（k + 1））;
end
rerow = [4 6 8 10 2 3 5 7 9 11 1];
pind = pind（rerow、:) .;
%%
%%%%%%%%%%%%%%%%%%%%%%%%%% 55
P = zeros（11,19）;
k =
1：11の場合P（k、:) = Arrangemethod3_1（pind（k、:)）;
end
％writecomP（P、1）
％showP（P）
%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
upind = [];
dnind = P（2、：）;
ppind = pind（[1,7]、:);
ppind = ppind（:);
P（1、:) = Arrangemethod4（upind、ppind、dnind）;
％showP（P（1：2、:)）
upind = P（6、：）;
dnind = P（8、：）;
ppind = surface（[1,7]、：）;
ppind = ppind（：）;
P（7、:) = Arrangemethod4（upind、ppind、dnind）;
％showP（P（6：8、：））
％show2line（ppind（1:19）-1、ppind（20:38）-1）
%%%%%%%%%%%%%%%%% %% 5
showP（P）
toc（a）
3.シミュレーションの結論：
C74