Skip to content
Snippets Groups Projects
Commit 8872aa8e authored by Christophe Geuzaine's avatar Christophe Geuzaine
Browse files

*** empty log message ***

parent 53006c2c
No related branches found
No related tags found
No related merge requests found
// this tests that we can still load as many views as we want.
// (even if only 200 are allowed in the GUI)
For i In {0:250}
Include "../../tutorial/view1.pos" ;
Include "../../tutorial/view2.pos" ;
EndFor
General.Trackball = 0;
General.RotationX = 0 ;
General.Color.Background = White ;
General.Color.Foreground = Red ;
View[0].IntervalsType = 2 ;
View[0].RaiseZ = 0.1 ;
For(1:300)
General.RotationX += 10 ;
General.RotationY = General.RotationX / 3 ;
View[0].TimeStep +=
(View[0].TimeStep < View[0].NbTimeStep-1) ? 1 : 0 ;
View[0].RaiseZ -= .01 ;
Sleep 0.1;
Draw;
EndFor
a = 1;
Printf("a = %g", a);
b[] = {1,2,3};
Printf("b = %g %g %g", b[{0:1}]);
Printf("b[a] = %g", b[a]);
Printf("b[b[0]] = %g", b[b[0]]);
c[{1,2,3}] = {5,6,7} ;
c[0] = 4 ;
Printf("c = %g %g %g %g", c[]);
c[{0:3}] = {-1,-2,-3,-4} ;
Printf("c = %g %g %g %g", c[]);
c[{b[]}] = {8,9,10} ;
Printf("c = %g %g %g %g", c[]);
/*
This is a very simple control sequense
with 2 imbricated loops
*/
For t In {0:1:0.1}
For x In {0:0.5:0.1}
Point(newp) = {t,x,0,.1};
EndFor
EndFor
Include "../../tutorial/view1.pos" ;
View[0].Name = "gloups.prout" ;
General.Trackball = 0 ;
For num In {1:2}
General.RotationX += 10 ;
Print StrCat( StrPrefix(Sprintf(View[0].Name)) , Sprintf("-%g.jpg", num) ) ;
Draw ;
EndFor
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment