1 """Can we show a mussa gl object?
5 from OpenGL.GLUT import *
6 from OpenGL.GL import *
12 self.s = "AAGGCCTT" * 5
13 self.seq = mussa.Sequence(self.s)
14 self.glseq = mussa.GlSequence(self.seq)
15 print self.glseq.width
18 glutInitDisplayMode(GLUT_RGBA | GLUT_DEPTH )
19 glutCreateWindow('mussa')
22 glOrtho(-10, len(self.s)+10, -50, 50, -50, 50)
24 glutDisplayFunc(self.display)
28 glClear(GL_COLOR_BUFFER_BIT)
29 self.glseq.draw(-50, self.glseq.width+50)
32 if __name__ == "__main__":