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 
slib_author=Gang, XIAO
 4 
slib_author=Gang, XIAO
5 
 
 5 
 
6 
slib_example= 3,6,5
 6 
slib_example= 3,6,5
7 
slib_require=pari
 7 
slib_require=pari
Line 14... Line 14...
14 
!bound slib_rows between integer 1 and 30 default 2
 14 
!bound slib_rows between integer 1 and 30 default 2
15 
!bound slib_cols between integer 1 and 30 default 2
 15 
!bound slib_cols between integer 1 and 30 default 2
16 
!bound slib_range between integer 1 and 1000000 default 2
 16 
!bound slib_range between integer 1 and 1000000 default 2
17 
 
 17 
 
18 
!if $slib_ring=Z
 18 
!if $slib_ring=Z
19 
 slib_ran1=(random($slib_range)+1)*(2*random(2)-1)
 19 
  slib_ran1=(random($slib_range)+1)*(2*random(2)-1)
20 
 slib_out=!exec pari print(matrix($slib_rows,$slib_cols,x,y,$slib_ran1))
 20 
  slib_out=!exec pari print(matrix($slib_rows,$slib_cols,x,y,$slib_ran1))
21 
 !exit
 21 
  !exit
22 
!endif
 22 
!endif