Subversion Repositories wimsdev

!if $wims_read_parm!=slib_header

 !goto proc

!endif

slib_author=Bernadette, Perrin-Riou

slib_example= [1,2;x^2,y;e_1,e_2],lbrace,rbrack

!exit

:proc

slib_data=!item 1  of $wims_read_parm

slib_opt1=!item 2 of $wims_read_parm

slib_opt2=!item 3 of $wims_read_parm

!default slib_opt1=(

!default slib_opt2=)

slib_data=!declosing $slib_data

slib_data=!replace internal , by & in $slib_data

!if $slib_opt1 notwordof  (  ) .

 slib_opt1= \$slib_opt1

!endif

!if $slib_opt2 notwordof  (  ) .

  slib_opt2= \$slib_opt2

!endif

slib_data=!replace internal ;  by  $\

$\\$ $ in $slib_data

slib_out=\left $slib_opt1 \begin{matrix} $slib_data \end{matrix} \right $slib_opt2