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,
get_Relator_Theta(TCode:TCODE, out relator:ARRAY{WORD})
printBandR(TCode:TCODE)
printGroup(TCode:TCODE)
printGroupTheta(TCode:TCODE)
printKnotR(TCode:TCODE)
printThetaR(TCode:TCODE)
The Sather Home Page