!if $wims_read_parm!=slib_header
 !goto proc
!endif
slib_title=The determinant of a square matrix
slib_parms=1\
,the input matrix
slib_author=Gang Xiao
slib_out=the determinant (empty if error)
!exit

:proc
slib_mat=!declosing $wims_read_parm
!if $slib_mat=$empty
 slib_out=
!else
 slib_out=!exec pari print(matdet([$slib_mat]))
!endif

