This repository has been archived on 2023-08-20. You can view files and clone it, but cannot push or open issues or pull requests.
yap-6.3/CLPQR/clpqr/examples/SESSION/131
vsc e5f4633c39 This commit was generated by cvs2svn to compensate for changes in r4,
which included commits to RCS files with non-trunk default branches.


git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@5 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
2001-04-09 19:54:03 +00:00

33 lines
1.6 KiB
Plaintext

/tmp/clpq
yes
| ?- [library('clpqr/examples/matmul')].
{consulting /freyung/christian/sicstus2.1.9.clp/library/clpqr/examples/matmul.pl...}
{/freyung/christian/sicstus2.1.9.clp/library/clpqr/examples/matmul.pl consulted, 50 msec 5216 bytes}
yes
| ?- inv_hilbert(5).
% took 130 msec
[25,-300,1050,-1400,630]
[-300,4800,-18900,26880,-12600]
[1050,-18900,79380,-117600,56700]
[-1400,26880,-117600,179200,-88200]
[630,-12600,56700,-88200,44100]
yes
| ?- inv_hilbert(10).
% took 1410 msec
[100,-4950,79200,-600600,2522520,-6306300,9609600,-8751600,4375800,-923780]
[-4950,326700,-5880600,47567520,-208107900,535134600,-832431600,770140800,-389883780,83140200]
[79200,-5880600,112907520,-951350400,4281076800,-11237826600,17758540800,-16635041280,8506555200,-1829084400]
[-600600,47567520,-951350400,8245036800,-37875637800,101001700800,-161602721280,152907955200,-78843164400,17071454400]
[2522520,-208107900,4281076800,-37875637800,176752976400,-477233036280,771285715200,-735869534400,382086104400,-83223340200]
[-6306300,535134600,-11237826600,101001700800,-477233036280,1301544644400,-2121035716800,2037792556800,-1064382719400,233025352560]
[9609600,-832431600,17758540800,-161602721280,771285715200,-2121035716800,3480673996800,-3363975014400,1766086882560,-388375587600]
[-8751600,770140800,-16635041280,152907955200,-735869534400,2037792556800,-3363975014400,3267861442560,-1723286307600,380449555200]
[4375800,-389883780,8506555200,-78843164400,382086104400,-1064382719400,1766086882560,-1723286307600,912328045200,-202113826200]
[-923780,83140200,-1829084400,17071454400,-83223340200,233025352560,-388375587600,380449555200,-202113826200,44914183600]
yes
| ?-