Subversion Repositories wimsdev

Rev

Rev 7692 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7692 Rev 8584
Line 122... Line 122...
122 
 
 122 
 
123 
!! axe_x
 123 
!! axe_x
124 
slib_dessin=$slib_dessin\
 124 
slib_dessin=$slib_dessin\
125 
linewidth 3\
 125 
linewidth 3\
126 
hline 0, $[10*$slib_yo], $slib_grey\
 126 
hline 0, $[10*$slib_yo], $slib_grey\
127 
line $[10*$slib_xd-3],$[10*$slib_yo-1],$[10*$slib_xd-1],$[10*$slib_yo], $slib_grey\
 127 
segment $[10*$slib_xd-3],$[10*$slib_yo-1],$[10*$slib_xd-1],$[10*$slib_yo], $slib_grey\
128 
line $[10*$slib_xd-3],$[10*$slib_yo+1],$[10*$slib_xd-1],$[10*$slib_yo], $slib_grey\
 128 
segment $[10*$slib_xd-3],$[10*$slib_yo+1],$[10*$slib_xd-1],$[10*$slib_yo], $slib_grey\
129 
parallel 0,$[10*$slib_yo+1],0,$[10*$slib_yo-1], 10, 0, $slib_xd+1, $slib_grey
 129 
parallel 0,$[10*$slib_yo+1],0,$[10*$slib_yo-1], 10, 0, $slib_xd+1, $slib_grey
130 
 
 130 
 
131 
slib_val=$[-$slib_xo*$slib_xs]
 131 
slib_val=$[-$slib_xo*$slib_xs]
132 
slib_dessin=$slib_dessin\
 132 
slib_dessin=$slib_dessin\
133 
linewidth 1
 133 
linewidth 1
Line 143... Line 143...
143 
 
 143 
 
144 
!! axe_y
 144 
!! axe_y
145 
slib_dessin=$slib_dessin\
 145 
slib_dessin=$slib_dessin\
146 
linewidth 3\
 146 
linewidth 3\
147 
vline $[10*$slib_xo],0, $slib_grey\
 147 
vline $[10*$slib_xo],0, $slib_grey\
148 
line $[10*$slib_xo-1],$[10*$slib_yd-3],$[10*$slib_xo],$[10*$slib_yd-1], $slib_grey\
 148 
segment $[10*$slib_xo-1],$[10*$slib_yd-3],$[10*$slib_xo],$[10*$slib_yd-1], $slib_grey\
149 
line $[10*$slib_xo+1],$[10*$slib_yd-3],$[10*$slib_xo],$[10*$slib_yd-1], $slib_grey\
 149 
segment $[10*$slib_xo+1],$[10*$slib_yd-3],$[10*$slib_xo],$[10*$slib_yd-1], $slib_grey\
150 
parallel $[10*$slib_xo+1],0,$[10*$slib_xo-1], 0, 0, 10, $slib_yd+1, $slib_grey
 150 
parallel $[10*$slib_xo+1],0,$[10*$slib_xo-1], 0, 0, 10, $slib_yd+1, $slib_grey
151 
 
 151 
 
152 
slib_val=$[-$slib_yo*$slib_ys]
 152 
slib_val=$[-$slib_yo*$slib_ys]
153 
slib_dessin=$slib_dessin\
 153 
slib_dessin=$slib_dessin\
154 
linewidth 1
 154 
linewidth 1
Line 177... Line 177...
177 
 slib_y1=$[10*$slib_yo+$slib_y-0.6]
 177 
 slib_y1=$[10*$slib_yo+$slib_y-0.6]
178 
 slib_y2=$[10*$slib_yo+$slib_y+0.6]
 178 
 slib_y2=$[10*$slib_yo+$slib_y+0.6]
179 
 !! add one red dot
 179 
 !! add one red dot
180 
 slib_dessin=$slib_dessin\
 180 
 slib_dessin=$slib_dessin\
181 
 linewidth 2\
 181 
 linewidth 2\
182 
 line $slib_x1,$slib_y1,$slib_x2,$slib_y2,red\
 182 
 segment $slib_x1,$slib_y1,$slib_x2,$slib_y2,red\
183 
 line $slib_x2,$slib_y1,$slib_x1,$slib_y2,red
 183 
 segment $slib_x2,$slib_y1,$slib_x1,$slib_y2,red
184 
!endif $i < $n1
 184 
!endif $i < $n1
185 
!next i
 185 
!next i
186 
 
 186 
 
187 
!! the function : blue thin curve
 187 
!! the function : blue thin curve
188 
slib_n = !itemcnt $slib_f
 188 
slib_n = !itemcnt $slib_f
Line 213... Line 213...
213 
 slib_y1=$[10*$slib_yo+$slib_y-0.6]
 213 
 slib_y1=$[10*$slib_yo+$slib_y-0.6]
214 
 slib_y2=$[10*$slib_yo+$slib_y+0.6]
 214 
 slib_y2=$[10*$slib_yo+$slib_y+0.6]
215 
 !! add one '$slib_dc' dot
 215 
 !! add one '$slib_dc' dot
216 
 slib_dessin=$slib_dessin\
 216 
 slib_dessin=$slib_dessin\
217 
 linewidth 2\
 217 
 linewidth 2\
218 
 line $slib_x1,$slib_y1,$slib_x2,$slib_y2,$slib_dc\
 218 
 segment $slib_x1,$slib_y1,$slib_x2,$slib_y2,$slib_dc\
219 
 line $slib_x2,$slib_y1,$slib_x1,$slib_y2,$slib_dc
 219 
 segment $slib_x2,$slib_y1,$slib_x1,$slib_y2,$slib_dc
220 
!endif $i < $n2
 220 
!endif $i < $n2
221 
!next i
 221 
!next i
222 
 
 222 
 
223 
slib_out= $slib_dessin
 223 
slib_out= $slib_dessin