Rev 4349 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 4349 | Rev 7692 | ||
|---|---|---|---|
| Line 23... | Line 23... | ||
| 23 | slib_M1=vecextract(matrix($slib_size,$slib_size,x,y,$slib_coef),[$slib_sh1],[$slib_sh2]) |
23 | slib_M1=vecextract(matrix($slib_size,$slib_size,x,y,$slib_coef),[$slib_sh1],[$slib_sh2]) |
| 24 | slib_M2=matrix($slib_size,$slib_size,x,y,$slib_ran1) |
24 | slib_M2=matrix($slib_size,$slib_size,x,y,$slib_ran1) |
| 25 | slib_out=!exec pari M2=$slib_M2;if(matdet(M2)<>0,print(M2),print($slib_M1)) |
25 | slib_out=!exec pari M2=$slib_M2;if(matdet(M2)<>0,print(M2),print($slib_M1)) |
| 26 | !exit |
26 | !exit |
| 27 | !endif |
27 | !endif |
| 28 | - | ||