Subversion Repositories wimsdev

Rev

Rev 15179 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 15179 Rev 18080
Line 73... Line 73...
73 
\integer{size=(1.5*\facteur)*(\M+1)}
 73 
\integer{size=(1.5*\facteur)*(\M+1)}
74 
\integer{height2=4*\height}
 74 
\integer{height2=4*\height}
75 
\text{size=\size,\height2}
 75 
\text{size=\size,\height2}
76 
\text{fleche=xrange \xrange
 76 
\text{fleche=xrange \xrange
77 
yrange \yrange
 77 
yrange \yrange
78 
lines \couleur,\M,\wi/2,-1,\wi/2,-1,-\wi/2,\M,-\wi/2,\M,-\wi,\N+0.5,0,\M,\wi,\M,\wi/2
 78 
polyline \couleur,\M,\wi/2,-1,\wi/2,-1,-\wi/2,\M,-\wi/2,\M,-\wi,\N+0.5,0,\M,\wi,\M,\wi/2
79 
fill 0,0,\couleur
 79 
fill 0,0,\couleur
80 
}
 80 
}
81 
 
 81 
 
82 
\text{STEP=\choix=0 ? wims(values x for x=1 to 2*\N)}
 82 
\text{STEP=\choix=0 ? wims(values x for x=1 to 2*\N)}
83 
\text{STEP=\choix=1 ? wims(values 2*x-1 for x=1 to \N)}
 83 
\text{STEP=\choix=1 ? wims(values 2*x-1 for x=1 to \N)}
Line 87... Line 87...
87 
\text{positionbas=}
 87 
\text{positionbas=}
88 
\text{positionhaut=}
 88 
\text{positionhaut=}
89 
\text{positionbas2=}
 89 
\text{positionbas2=}
90 
\for{j=0 to \N-1}{
 90 
\for{j=0 to \N-1}{
91 
  \text{fleche=\choix=0 or \choix=1 or \choix=3 ? \fleche
 91 
  \text{fleche=\choix=0 or \choix=1 or \choix=3 ? \fleche
92 
  line \j-0.1,-\wi/2,\j-0.1,-2*\wi,\couleur}
 92 
  segment \j-0.1,-\wi/2,\j-0.1,-2*\wi,\couleur}
93 
  \text{fleche=\choix=0 or \choix=2 or \choix=3? \fleche
 93 
  \text{fleche=\choix=0 or \choix=2 or \choix=3? \fleche
94 
  line \j-0.1,\wi/2,\j-0.1,2*\wi,\couleur}
 94 
  segment \j-0.1,\wi/2,\j-0.1,2*\wi,\couleur}
95 
  \text{ans=pari([2*\j+1,2*\j+2])}
 95 
  \text{ans=pari([2*\j+1,2*\j+2])}
96 
  \text{v=slib(draw/convpixel \j-0.5,-2,\size,\xrange,\yrange,0,pixels)}
 96 
  \text{v=slib(draw/convpixel \j-0.5,-2,\size,\xrange,\yrange,0,pixels)}
97 
  \text{positionbas=\positionbas
 97 
  \text{positionbas=\positionbas
98 
 r\ans[1],\v[1] x \v[2]}
 98 
 r\ans[1],\v[1] x \v[2]}
99 
 \text{v=slib(draw/convpixel \j-0.5,-2,\size,\xrange,\yrange,0,pixels)}
 99 
 \text{v=slib(draw/convpixel \j-0.5,-2,\size,\xrange,\yrange,0,pixels)}