Rev 7936 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 7936 | Rev 13594 | ||
---|---|---|---|
Line 1... | Line 1... | ||
1 | !if $wims_read_parm!=slib_header |
1 | !if $wims_read_parm!=slib_header |
2 | !goto proc |
2 | !goto proc |
3 | !endif |
3 | !endif |
4 | 4 | ||
5 | slib_author=Yves, Noël |
5 | slib_author=Yves, Noël |
6 | slib_comment= |
6 | slib_comment= |
7 | !!exemple à changer ensuite mais sert de test. |
7 | !!exemple à changer ensuite mais sert de test. |
Line 13... | Line 13... | ||
13 | 13 | ||
14 | 14 | ||
15 | !set expsize=scriptsize |
15 | !set expsize=scriptsize |
16 | !default slib_size=0 |
16 | !default slib_size=0 |
17 | !if $slib_size>4 |
17 | !if $slib_size>4 |
18 | !set slib_size=4 |
18 | !set slib_size=4 |
19 | !endif |
19 | !endif |
20 | !if $slib_size>0 |
20 | !if $slib_size>0 |
21 | !if $slib_size<2 |
21 | !if $slib_size<2 |
22 | !set size=large |
22 | !set size=large |
23 | !set expsize=scriptsize |
- | |
24 | !else |
- | |
25 | !if $slib_size<3 |
- | |
26 | !set size=Large |
- | |
27 | !set expsize=scriptsize |
23 | !set expsize=scriptsize |
28 | !else |
24 | !else |
29 | !if $slib_size< |
25 | !if $slib_size<3 |
- | 26 | !set size=Large |
|
- | 27 | !set expsize=scriptsize |
|
- | 28 | !else |
|
- | 29 | !if $slib_size<4 |
|
30 | !set size=huge |
30 | !set size=huge |
31 | !set expsize=large |
31 | !set expsize=large |
32 | !else |
32 | !else |
33 | !set size=Huge |
33 | !set size=Huge |
34 | !set expsize=Large |
34 | !set expsize=Large |
- | 35 | !endif |
|
35 | !endif |
36 | !endif |
36 | !endif |
37 | !endif |
37 | !endif |
- | |
38 | !endif |
38 | !endif |
39 | 39 | ||
40 | !set masse=!charcnt $slib_masse |
40 | !set masse=!charcnt $slib_masse |
41 | !set atom=!charcnt $slib_atom |
41 | !set atom=!charcnt $slib_atom |
42 | !set ind=!charcnt $slib_ind |
42 | !set ind=!charcnt $slib_ind |
43 | !set exp=!charcnt $slib_exp |
43 | !set exp=!charcnt $slib_exp |
44 | !set undersc=_{ |
44 | !set undersc=_{ |
45 | 45 | ||
46 | !if $slib_size >0 |
46 | !if $slib_size >0 |
47 | !set slib_out={\$size\vphantom{I}} |
47 | !set slib_out={\$size\vphantom{I}} |
48 | !else |
48 | !else |
49 | !set slib_out=\, |
49 | !set slib_out=\, |
50 | !endif |
50 | !endif |
51 | !if $atom>0 |
51 | !if $atom>0 |
52 | !set slib_out=$slib_out$undersc |
52 | !set slib_out=$slib_out$undersc |
53 | !if $masse!=$atom and $masse>0 |
53 | !if $masse!=$atom and $masse>0 |
54 | !set diffma=!eval $masse-$atom |
54 | !set diffma=!eval $masse-$atom |
55 | !if $diffma=1 |
55 | !if $diffma=1 |
56 | !set slib_out=$slib_out\phantom{1} |
56 | !set slib_out=$slib_out\phantom{1} |
57 | !else |
57 | !else |
58 | !set slib_out=$slib_out\phantom{11} |
58 | !set slib_out=$slib_out\phantom{11} |
59 | !endif |
59 | !endif |
60 | !endif |
60 | !endif |
61 | !set slib_out=$slib_out$\$expsize{$slib_atom}} |
61 | !set slib_out=$slib_out$\$expsize{$slib_atom}} |
62 | !endif |
62 | !endif |
63 | !if $masse>0 |
63 | !if $masse>0 |
64 | !if $slib_size>2 |
64 | !if $slib_size>2 |
65 | !set slib_out=$slib_out^{\$expsize{$slib_masse}} |
65 | !set slib_out=$slib_out^{\$expsize{$slib_masse}} |
66 | !else |
66 | !else |
67 | !set slib_out=$slib_out^{$slib_masse} |
67 | !set slib_out=$slib_out^{$slib_masse} |
68 | !endif |
68 | !endif |
69 | !endif |
69 | !endif |
70 | 70 | ||
71 | !if $slib_size >0 |
71 | !if $slib_size >0 |
72 | !set slib_out=$slib_out{\$size{\mathrm{$slib_elem}}} |
72 | !set slib_out=$slib_out{\$size{\mathrm{$slib_elem}}} |
73 | !else |
73 | !else |
74 | !set slib_out=$slib_out\mathrm{$slib_elem} |
74 | !set slib_out=$slib_out\mathrm{$slib_elem} |
75 | !endif |
75 | !endif |
76 | !if $ind>0 |
76 | !if $ind>0 |
77 | !if $slib_size>2 |
77 | !if $slib_size>2 |
78 | !set slib_out=$slib_out$undersc\$expsize{$slib_ind}} |
78 | !set slib_out=$slib_out$undersc\$expsize{$slib_ind}} |
79 | !else |
79 | !else |
80 | !set slib_out=$slib_out$undersc$slib_ind} |
80 | !set slib_out=$slib_out$undersc$slib_ind} |
81 | !endif |
81 | !endif |
82 | !endif |
82 | !endif |
83 | !if $exp>0 |
83 | !if $exp>0 |
84 | !if $slib_size>2 |
84 | !if $slib_size>2 |
85 | !set slib_out=$slib_out^{\$expsize{$slib_exp}} |
85 | !set slib_out=$slib_out^{\$expsize{$slib_exp}} |
86 | !else |
86 | !else |
87 | !set slib_out=$slib_out^{$slib_exp} |
87 | !set slib_out=$slib_out^{$slib_exp} |
88 | !endif |
88 | !endif |
89 | !endif |
89 | !endif |