class TCODE |
---|
attr k:ARRAY{VERT}; .. Included as k |
---|
attr k:ARRAY{VERT}; .. Included as k |
---|
CodeDel(i:CARD) .. Included as CodeDel |
---|
**** | del the code not search for companionloop j::=i.upto!(k.size-2); k[j]:=k[j+1]; end;k:=k.resize(k.size-1); |
CodeDel(i:INT) .. Included as CodeDel |
---|
CodeDelCmp(i:INT) .. Included as CodeDelCmp |
---|
**** | CodeDel with trimming companion |
CodeIn(i:CARD) .. Included as CodeIn |
---|
CodeIn(c:VERTEXC, i:CARD) .. Included as CodeIn |
---|
CodeIn(c:VERTEXC, i:INT) .. Included as CodeIn |
---|
CodeIn(v:VERT, i:CARD) .. Included as CodeIn |
---|
**** | move up and insert. 'normal vertex,(x=0,y=0),work=0.k:=k.resize(k.size+1);loop j::=(k.size-2).downto!(i); k[j+1]:=k[j]; end;k[i]:=v; |
CodeInCmp(i:INT) .. Included as CodeInCmp |
---|
CodeInCmp(i,n:INT) .. Included as CodeInCmp |
---|
CodeInCmp(v:VERT, i:INT) .. Included as CodeInCmp |
---|
**** | CodeIn with trimming companion |
CodeInCmp(v:VERT, i,n:INT) .. Included as CodeInCmp |
---|
**** | CodeIn with trimming companion |
CodeRev(p1,p2:INT) .. Included as CodeRev |
---|
**** | Reverse Knot[] codes between p1,p2, needed 0<=p1,p2<=maxK |
CodeSplice(stp1,enp1,stp2,enp2:INT) .. Included as CodeSplice |
---|
**** | splice the code stp1..enp1 and stp2..enp2, stp1<enp1, stp2<enp2 |
aget(i:CARD):VERT .. Included as aget |
---|
aget(i:INT):VERT .. Included as aget |
---|
append(a:SAME) .. Included as append |
---|
**** | s::=k.size-1; k:=k.resize(s+a.k.size);loop i::=0.upto!(a.k.size-1); k[i+s]:=a.k[i]; end; |
append(a:SAME):SAME .. Included as append |
---|
**** | res:SAME:=clone; res.append(a); return res; |
append(v:VERT) .. Included as append |
---|
aset(i:CARD, v:VERT) .. Included as aset |
---|
aset(i:INT, v:VERT) .. Included as aset |
---|
bandStart:INT .. Included as bandStart |
---|
**** | k.size-1 if band is not exist |
check(print_message:BOOL):BOOL .. Included as check |
---|
clone:SAME .. Included as clone |
---|
compoDelCmp(stp:INT) .. Included as compoDelCmp |
---|
compoStart(c:INT):INT |
---|
**** | start point of c-th component. return position of "endc" if not exist. |
cp(inout dist:INT, s_beg,s_end:INT, s_knot:SAME) .. Included as cp |
---|
create:SAME .. Included as create |
---|
endOfString(i:INT, dir:INT):INT .. Included as endOfString |
---|
exgCmp(s1,s2,s3:INT) .. Included as exgCmp |
---|
**** | Exchange blocks (s1..s2-1) and (s2..s3-1). Assume that 0<= s1 <= s2 <= s3 <= length |
expCmp_n(pt:INT, s1,s2,s3:INT):INT .. Included as expCmp_n |
---|
flip .. Included as flip |
---|
has_band(p1,p2:INT):BOOL .. Included as has_band |
---|
**** | true if segment p1--p2 has band_attach pts. |
has_band:BOOL .. Included as has_band |
---|
has_ind(i:CARD):BOOL .. Included as has_ind |
---|
has_ind(i:INT):BOOL .. Included as has_ind |
---|
printD .. Included as kcode_cmp_printD |
---|
**** | print for debug |
compoStart(c:INT):INT .. Included as kcode_compoStart |
---|
**** | start point of c-th component. return -1, if #compo<c. |
length:CARD .. Included as length |
---|
**** | code length __except terminator__. |
number_compo:INT .. Included as number_compo |
---|
number_crossing:INT .. Included as number_crossing |
---|
**** |
___#of_crossings |
number_gen:CARD |
---|
number_negative_crossing:INT .. Included as number_negative_crossing |
---|
number_positive_crossing:INT .. Included as number_positive_crossing |
---|
number_self_crossing(stp:INT):INT .. Included as number_self_crossing |
---|
number_self_writhe(stp:INT):INT .. Included as number_self_writhe |
---|
number_writhe:INT .. Included as number_writhe |
---|
numbers_count(inout cr,inout cr_p,inout cr_n, inout compo,inout band:INT) .. Included as numbers_count |
---|
**** | # of crossings, knot , band in [stp..enp]. |
numbers_seg_count(stp,enp:INT, inout cr,inout cr_p,inout cr_n, inout compo,inout band:INT) .. Included as numbers_seg_count |
---|
**** | # of crossings, knot , band in [stp..enp] |
numbers_self_count(stp:INT, inout cr, inout cr_p,inout cr_n:INT) .. Included as numbers_self_count |
---|
printD |
---|
revK(i:INT) .. Included as revK |
---|
**** | ori. reverse the string |
revKCmp(i:INT) .. Included as revKCmp |
---|
**** | ori. reverse the string |
revKCmp_num(n,j0,j1:INT):INT .. Included as revKCmp_num |
---|
rotBack1(stp, enp:INT) .. Included as rotBack1 |
---|
**** | rotate back component of stp--enp by 1 |
rotComponent(stp, enp:INT, stp1:INT) .. Included as rotComponent |
---|
**** | rotate back component of stp--enp move stp1 to head |
rotOvCmp(stp:INT):INT .. Included as rotOvCmp |
---|
**** | return moved length move start points until the first crossing of the specified component is over cross |
rotateToOverCmp .. Included as rotateToOverCmp |
---|
**** | Attach "rotOV" to each component. move start points until the first crossing of each component is overcross. |
sCompoCmp(stp:INT) .. Included as sCompoCmp |
---|
**** | move sepcified component to the top of TCodestp points a head of a component. move the component to the first |
size:CARD .. Included as size |
---|
bad(message:BOOL,num:CARD, i:INT) .. Included as bad |
---|