Subversion Repositories wimsdev

Rev

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

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