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)}