Subversion Repositories wimsdev

Rev

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

Rev 7692 Rev 13585
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=Gang, XIAO
5
slib_author=Gang, XIAO
6
 
6
 
7
slib_example=1,0;6,1
7
slib_example=1,0;6,1
Line 9... Line 9...
9
!exit
9
!exit
10
 
10
 
11
:proc
11
:proc
12
slib_mat=!declosing $wims_read_parm
12
slib_mat=!declosing $wims_read_parm
13
!if $slib_mat=$empty
13
!if $slib_mat=$empty
14
 slib_out=
14
  slib_out=
15
!else
15
!else
16
 slib_out=!exec pari print([$slib_mat]^-1)
16
  slib_out=!exec pari print([$slib_mat]^-1)
17
!endif
17
!endif