Subversion Repositories wimsdev

Rev

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

Rev 13584 Rev 18093
Line 3... Line 3...
3 
!endif
 3 
!endif
4 
 
 4 
 
5 
slib_author=Bernadette, Perrin-Riou
 5 
slib_author=Bernadette, Perrin-Riou
6 
 
 6 
 
7 
slib_example= [1,2;x^2,y;e_1,e_2],lbrace,rbrack\
 7 
slib_example= [1,2;x^2,y;e_1,e_2],lbrace,rbrack\
8 
[1,2;x^2,y;e_1,e_2],lbrace,rbrack,html
 8 
[1,2;x^2,y;e_1,e_2],lbrace,rbrack,html\
9 
!exit
 9 
[1,2;x^2,y;e_1,e_2],,,html\
- 
 
 10 
[1,2;x^2,y;e_1,e_2],.,.,html\
- 
 
 11 
[1,2;x^2,y;e_1,e_2],lbrace,none,html\
10 
 
 12 
 
- 
 
 13 
!exit
- 
 
 14 
 
11 
:proc
 15 
:proc
12 
 
 16 
 
13 
!distribute items $wims_read_parm into slib_data,slib_opt1,slib_opt2,slib_opt3
 17 
!distribute items $wims_read_parm into slib_data,slib_opt1,slib_opt2,slib_opt3
- 
 
 18 
slib_opt1=!replace internal none by . in $slib_opt1
- 
 
 19 
slib_opt2=!replace internal none by . in $slib_opt2
14 
!default slib_opt1=(
 20 
!default slib_opt1=(
15 
!default slib_opt2=)
 21 
!default slib_opt2=)
16 
 
 22 
 
17 
slib_data=!declosing $slib_data
 23 
slib_data=!declosing $slib_data
18 
slib_data=!replace internal , by & in $slib_data
 24 
slib_data=!replace internal , by & in $slib_data
19 
 
 25 
 
20 
!if $slib_opt1 notwordof ( ) .
 26 
!if $slib_opt1 notwordof ( ) .
21 
  slib_opt1= \$slib_opt1
 27 
  slib_opt1= \$slib_opt1
22 
!endif
 28 
!endif
23 
 
 - 
 
24 
!if $slib_opt2 notwordof ( ) .
 29 
!if $slib_opt2 notwordof ( ) .
25 
  slib_opt2= \$slib_opt2
 30 
  slib_opt2= \$slib_opt2
26 
!endif
 31 
!endif
27 
 
 32 
 
28 
slib_data=!replace internal ; by $\\$ $\
 33 
slib_data=!replace internal ; by $\\$ $\