Subversion Repositories wimsdev

!if $wims_read_parm!=slib_header
 !goto proc
!endif
slib_title= Matrix in Tex
slib_parms=3\
,matrix between brackets\
(,  lbrace, rbrack,..\
),  lbrace, rbrack,..
slib_author=Bernadette PERRIN-RIOU
slib_out=tex matrix with  options (lbrace,lbrack,..., or nothing)
slib_comment= no transformation is made on the elements of the matrix
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