Subversion Repositories wimsdev

Rev

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

Rev 10908 Rev 11363
Line 3... Line 3...
3
!set tmp_n=2
3
!set tmp_n=2
4
!for tmp_j=1 to $tmp_n
4
!for tmp_j=1 to $tmp_n
5
  !set tmp_penal$tmp_j=!values rint(100*(($tmp_n-$tmp_j)/$tmp_n)^x)/10 for x in $tmp_liste
5
  !set tmp_penal$tmp_j=!values rint(100*(($tmp_n-$tmp_j)/$tmp_n)^x)/10 for x in $tmp_liste
6
!next
6
!next
7
 
7
 
8
!readproc slib/text/matrixhtml [,$tmp_liste\
8
!readproc slib/text/matrixhtml [$name_entete1,$tmp_liste\
9
1,$tmp_penal1\
9
1 $name_entete2,$tmp_penal1\
10
],wimscenter wimsborder,TH=[1;1] CAPTION="$name_example1"
10
],wimscenter wimsborder,TH=[1;1] CAPTION="$name_example1"
11
 
11
 
12
$slib_out
12
$slib_out
13
 
13
 
14
!set tmp_n=4
14
!set tmp_n=4
15
!for tmp_j=1 to $tmp_n
15
!for tmp_j=1 to $tmp_n
16
  !set tmp_penal$tmp_j=!values rint(100*(($tmp_n-$tmp_j)/$tmp_n)^x)/10 for x in $tmp_liste
16
  !set tmp_penal$tmp_j=!values rint(100*(($tmp_n-$tmp_j)/$tmp_n)^x)/10 for x in $tmp_liste
17
!next
17
!next
18
 
18
 
19
!readproc slib/text/matrixhtml [,$tmp_liste\
19
!readproc slib/text/matrixhtml [$name_entete1,$tmp_liste\
20
1,$tmp_penal1\
20
1 $name_entete2,$tmp_penal1\
21
2,$tmp_penal2\
21
2 $name_entete2,$tmp_penal2\
22
3,$tmp_penal3\
22
3 $name_entete2,$tmp_penal3\
23
],wimscenter wimsborder,TH=[1;1] CAPTION="$name_example1"
23
],wimscenter wimsborder,TH=[1;1] CAPTION="$name_example1"
24
 
24
 
25
$slib_out
25
$slib_out