class KNOT_GROUP
****
2001/1 merge group code for Theta-curve vertex relation (a b c)

1997/1 1997/8 un-oriented surface in S^4

1996/10 LINUX version

Kouji Kodama 1989/8 FTL-Modula2 version


Flattened version is here



Public


Features
getBandR(TCode:TCODE, inout bds:INT, out word:WORD):BOOL
**** need tStart
getCrossR(TCode:TCODE, inout i1:INT, out word:WORD):BOOL
getThetaVertexR(TCode:TCODE, inout i1:INT, out word:WORD):BOOL
**** i1 is start/end of 1-st string
get_Relator(TCode:TCODE, out relator:ARRAY{WORD})
get_Relator(TCode:TCODE,out relator:ARRAY{WORD},out gen2compo:ARRAY{CARD})
**** gen2compo[1..gen_max]: convert gen to component
get_Relator_Theta(TCode:TCODE, out relator:ARRAY{WORD})
**** relator=| crossing relations, 2 of verteces relations|.
get_Relator_Theta(TCode:TCODE, out relator:ARRAY{WORD},out gen2compo:ARRAY{CARD})
**** gen2compo[1..gen_max]: convert gen to component(string).
printBandR(TCode:TCODE)
printGroup(TCode:TCODE)
printGroupTheta(TCode:TCODE)
printKnotR(TCode:TCODE)
printThetaR(TCode:TCODE)
printWordLog(w:WORD)

The Sather Home Page