Menu
▾
▴
matlisp-devel
|
From: Michael A. K. <ma...@ll...> - 2001-10-25 20:43:15
|
The command (EIG A) seems to be okay, but not (EIG A T). This results in ZGEEV complaints as well as inconsistant error reports for succesive calls. A script demonstrating this follows... ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Demo a ZGEEV bug in MATLISP with ;; ;; CMU Common Lisp 18c, running on koerber.llan.ll.mit.edu ;; Send questions and bug reports to your local CMU CL maintainer, ;; or to cmu...@co.... and cmu...@co.... respectively. ;; Loaded subsystems: ;; Python 1.0, target Intel x86 ;; CLOS based on PCL version: September 16 92 PCL (f) ;; MATLISP/Pre 2.0 (use-package :m) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Okay read in a test array from the data set (see bottom of file) (with-open-file (in "tmp-ar.out" :direction :input) (defparameter tst-array (read in))) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;; BEGIN THE DEMO ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; This first block runs through the computational process with no ;; errors. It is missing the MULTIPLE-VALUE-BIND blocks (setf tst-matrix (make-complex-matrix tst-array) tst-a (m* (ctranspose tst-matrix) tst-matrix)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Finally note the error (eig tst-a t) ;; ** On entry to ZGEEV parameter number 10 had an illegal value ;; ** On entry to ZGEEV parameter number 12 had an illegal value ;;; Running this interactive will yeild different results... ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;; THE DATA FILE...save this as "tmp-ar.out" #2A((#C(16.005199412100566d0 47.07791625264504d0) #C(29.826457010016536d0 -35.54662313696197d0) #C(37.91375316204245d0 -19.17281260883403d0) #C(34.078224268488945d0 67.62670766716862d0) #C(38.13652518200501d0 -33.887006924403416d0) #C(42.759393512198166d0 32.918173842750406d0) #C(-71.39823869300109d0 -32.40367765926753d0) #C(27.14470974654928d0 -73.75317137227977d0) #C(16.448811595962425d0 63.0306188816642d0) #C(41.241561727845394d0 41.5135501218996d0) #C(5.937864642568172d0 54.01449571738566d0) #C(-100.12720430100853d0 -34.382131284070695d0)) (#C(23.198438739089735d0 -3.2958171922133435d0) #C(-14.798689856548828d0 -15.525503203611864d0) #C(17.905028974905527d0 -37.1099970013271d0) #C(36.724388182668314d0 -3.4097968555987936d0) #C(-8.202167726494334d0 -22.15776441397034d0) #C(22.765402850974013d0 -14.246823450586142d0) #C(-29.837503042439536d0 27.610590873165055d0) #C(-27.69352908727416d0 -25.603429543977743d0) #C(29.26292734178589d0 6.4705722866843915d0) #C(25.28672247416617d0 -8.324469887780374d0) #C(23.88214661871792d0 10.100304108596347d0) #C(-36.97796513733695d0 26.918809687378666d0)) (#C(-19.557419012822034d0 -16.01876797399043d0) #C(-9.51687364032257d0 25.14721169586665d0) #C(-35.46821117315311d0 4.116607731781016d0) #C(-22.55925481925319d0 -40.20579281634353d0) #C(-23.085928570747722d0 14.484677851031586d0) #C(-17.4998584340949d0 -24.284469427255893d0) #C(25.77614196159949d0 33.05447047033497d0) #C(-29.979368594305065d0 24.089878113232864d0) #C(16.2325585361298d0 -30.77869936446934d0) #C(0.30727870340845903d0 -28.10171520956098d0) #C(22.678763527863147d0 -15.955154218619441d0) #C(3.8851448943308355d0 46.34968269847154d0)) (#C(-22.937677533499805d0 12.761721168716882d0) #C(21.315429264837444d0 18.83295518657326d0) #C(-9.150000510781709d0 35.56094887921642d0) #C(-46.94667929802831d0 7.678921173141417d0) #C(4.844694486412525d0 28.737681603101393d0) #C(-30.57106678163329d0 7.216650033376111d0) #C(42.703123457005354d0 -11.533940863834651d0) #C(12.167847498141589d0 39.47633922261261d0) #C(-25.17568211763151d0 -26.531324192443176d0) #C(-26.880513070024065d0 -10.8978923340387d0) #C(-7.401550946912295d0 -28.458139382803562d0) #C(46.757656411101294d0 12.249717138832954d0)) (#C(-13.56814824052778d0 24.123790896398027d0) #C(29.05381752991641d0 4.403849836500797d0) #C(9.84951924595866d0 39.07668076500276d0) #C(-41.97494945374203d0 31.663796739354957d0) #C(20.75301717893658d0 22.06256309568527d0) #C(-23.66768499463233d0 23.865238658995487d0) #C(33.03702496188954d0 -37.73200787112589d0) #C(34.05816832014353d0 29.6586879121717d0) #C(-38.536506691388226d0 -11.85558712710001d0) #C(-34.77192722069896d0 5.885893865952018d0) #C(-21.59392776802898d0 -22.179506459891794d0) #C(52.542098466081214d0 -10.813227449552333d0)) (#C(20.36916910571722d0 3.5446044034764d0) #C(-3.5859771169017205d0 -21.756925513783962d0) #C(23.670942951988447d0 -16.06012387188525d0) #C(31.81978046881639d0 20.25002685966308d0) #C(10.628516075640219d0 -20.39792415229947d0) #C(22.47721964638637d0 10.907253852484363d0) #C(-32.9518303539806d0 -16.665469122363547d0) #C(13.815002177173396d0 -30.368747441613984d0) #C(0.7063684177762941d0 29.202053796469706d0) #C(10.284557400745966d0 22.520655600536365d0) #C(-10.93977441001412d0 20.693221232931364d0) #C(-18.904000592002348d0 -31.78710325395103d0)) (#C(30.46652312166895d0 -7.954182213026129d0) #C(-18.28476861378651d0 -28.682737449328883d0) #C(23.468407257697773d0 -40.2734815860169d0) #C(61.097276708636635d0 7.440043455989577d0) #C(2.124699597951931d0 -34.4674087761037d0) #C(38.658719492073004d0 -0.4640322349085191d0) #C(-55.06797925233883d0 4.166138081180903d0) #C(-2.970001681596121d0 -50.0726743288685d0) #C(21.107794356427465d0 40.252503164665455d0) #C(30.824454285995248d0 21.188093829239005d0) #C(0.17783263380597525d0 36.479763291975026d0) #C(-53.69663365420271d0 -30.456233869541414d0)) (#C(-11.143887328478538d0 20.79853099777082d0) #C(25.42411902356644d0 4.381869277689784d0) #C(9.480953113066764d0 32.63585615134894d0) #C(-33.92788469899318d0 27.741374722242934d0) #C(18.11765428905662d0 18.36795203800819d0) #C(-19.51426927465894d0 20.698231810035146d0) #C(27.55685967645361d0 -32.26699152575162d0) #C(28.991681354917375d0 23.675938037740806d0) #C(-32.52914943846797d0 -8.220192082169266d0) #C(-26.875457076142787d0 5.866557848721024d0) #C(-19.778632927020524d0 -18.082087110132754d0) #C(42.80794264134054d0 -13.33975854129635d0)) (#C(13.351731245561357d0 14.40178602909276d0) #C(10.356586771940307d0 -18.639113042615573d0) #C(27.30252929529623d0 2.6645900506457054d0) #C(10.941327995705267d0 34.22799719621003d0) #C(19.146344970196953d0 -8.362077718793147d0) #C(10.687342474568803d0 20.79580320713312d0) #C(-17.036403585521327d0 -29.863850016303964d0) #C(26.49189934717548d0 -15.864105482994917d0) #C(-15.783917237174197d0 21.94988184785033d0) #C(-4.399255169412217d0 22.29785857257167d0) #C(-18.497324257421294d0 9.337647442177557d0) #C(4.611847412785996d0 -35.0083563604576d0)) (#C(-20.427601090208906d0 -4.7827806408477205d0) #C(4.2764960026941115d0 21.249017402286437d0) #C(-22.96528846676614d0 19.302591691330665d0) #C(-34.57945943175243d0 -20.635197055670748d0) #C(-10.675683205197554d0 20.041160084144167d0) #C(-23.686455112170933d0 -9.867695698100231d0) #C(36.59189900906817d0 14.825760957058872d0) #C(-12.146895431202907d0 31.699636240981505d0) #C(-3.8350919084728545d0 -30.74838978746835d0) #C(-14.975589460162508d0 -20.94157387708863d0) #C(9.508959963440738d0 -24.074500373394567d0) #C(24.1186358712507d0 32.1705116404263d0)) (#C(-16.809229858652024d0 10.64614608834553d0) #C(17.326394687551172d0 12.309759891314783d0) #C(-6.440300562661456d0 29.68465271951954d0) #C(-40.36217464737333d0 7.201264298006153d0) #C(5.659591880888096d0 22.11147708933589d0) #C(-23.744510928438427d0 9.086835677771031d0) #C(36.16758933264222d0 -14.860877877641677d0) #C(12.014924474276373d0 31.45389566041442d0) #C(-22.589837196855772d0 -21.117735786032345d0) #C(-25.795723680385592d0 -6.962180446580348d0) #C(-8.082613602260205d0 -23.996552513370098d0) #C(39.753967069192704d0 9.634421817109795d0)) (#C(4.6639850364767135d0 -20.026791920386774d0) #C(-22.772827078181287d0 3.2781370378143935d0) #C(-19.73550205591679d0 -24.368811405764035d0) #C(20.77892089344874d0 -34.32290108108991d0) #C(-20.42872486396446d0 -10.85538500470752d0) #C(11.364963451920733d0 -25.69669414489729d0) #C(-13.989666464219805d0 34.82299400748158d0) #C(-30.420531175138656d0 -11.337389924841414d0) #C(30.78518769876881d0 -3.561045601021239d0) #C(19.876800884382547d0 -13.666746170698532d0) #C(23.959705431827203d0 10.084924984689255d0) #C(-32.72128203326361d0 26.269919299328937d0)) (#C(8.40042055640669d0 23.07388932527355d0) #C(20.356970456110343d0 -17.84171440960684d0) #C(34.824049988821045d0 14.288943821391573d0) #C(-1.1975493782747595d0 49.37110134180481d0) #C(27.560997714267337d0 -0.569753376667717d0) #C(3.23633741438303d0 32.89137714179628d0) #C(-7.618726350526517d0 -46.27057904835429d0) #C(40.21722287275555d0 -7.347188429116369d0) #C(-31.816618300979904d0 21.688908083405334d0) #C(-13.797538768455448d0 28.155657943176998d0) #C(-30.538474346489945d0 2.9895244366358895d0) #C(20.74971482158006d0 -47.25660091014599d0)) (#C(-7.126445159358812d0 18.797909175016795d0) #C(21.26313358467199d0 0.019686058254233307d0) #C(14.408978393641478d0 28.243053754310743d0) #C(-27.553714746320686d0 31.73834160068036d0) #C(17.02023605641506d0 14.593147998914493d0) #C(-15.661796301636723d0 20.871398863728672d0) #C(17.646410557224197d0 -31.60121079708061d0) #C(27.402441364610983d0 16.605159624549763d0) #C(-30.589414677739015d0 -4.092589045940567d0) #C(-22.7860496859832d0 9.91228768911711d0) #C(-18.600615488118017d0 -15.739081534167408d0) #C(39.90151537635921d0 -16.32818944371095d0)) (#C(-19.87520315057365d0 10.42991689484596d0) #C(17.763845019337953d0 15.581969761958192d0) #C(-8.651260396074676d0 32.82293589334493d0) #C(-44.089617561051355d0 5.898863156325472d0) #C(5.724601918488497d0 24.760430038165858d0) #C(-27.804646283718583d0 7.061364750806994d0) #C(38.81067282721568d0 -12.025597971875193d0) #C(10.828422665452692d0 35.019337354281376d0) #C(-23.077309402281298d0 -24.992996384688645d0) #C(-27.452481089465106d0 -8.962683211685171d0) #C(-6.736373148126053d0 -26.399626736757256d0) #C(43.797374929409465d0 13.389296715683468d0)) (#C(20.006089247505972d0 10.284227284026427d0) #C(1.507388805478719d0 -22.625597105132563d0) #C(30.678766309519073d0 -12.10465959138954d0) #C(28.99229295829483d0 31.746697951116d0) #C(16.923007298866096d0 -17.29162103699469d0) #C(20.94194454737485d0 18.139557733135796d0) #C(-32.263318650823535d0 -25.906192480017136d0) #C(22.703284338818378d0 -27.938798424809104d0) #C(-7.637357968736136d0 32.45277649168197d0) #C(7.5255661618171255d0 27.45090394444313d0) #C(-18.38569733093254d0 19.38017627661041d0) #C(-10.874599886745848d0 -43.12682620595745d0)) (#C(23.53339872007615d0 13.773313007350964d0) #C(3.146552737658422d0 -28.425858797998302d0) #C(39.19776299610373d0 -12.552203709344589d0) #C(35.22044910619708d0 40.5205588814613d0) #C(21.634664670030816d0 -23.24580280833951d0) #C(26.36995507193284d0 25.19653386500839d0) #C(-41.55793908105909d0 -32.81832210054749d0) #C(28.097515861265826d0 -37.26233335108873d0) #C(-8.459124863124769d0 42.38739040558611d0) #C(11.3193040695607d0 34.40356048992171d0) #C(-22.428604607719702d0 27.313449626749033d0) #C(-16.789585655377067d0 -58.24703665346114d0)) (#C(-0.6084970548442286d0 -29.532108853226916d0) #C(-28.164036166697592d0 14.971133303000082d0) #C(-33.226323177288684d0 -25.065269921844695d0) #C(13.597051154408128d0 -51.12964370996891d0) #C(-35.22367760241353d0 -5.990620128731898d0) #C(5.83422965785773d0 -40.373262532659375d0) #C(-6.954531988646704d0 55.527052860398925d0) #C(-49.59561394170671d0 -2.376245806745374d0) #C(42.272037196632816d0 -20.56963637714144d0) #C(22.002155727740774d0 -28.458785576763194d0) #C(38.766945656386476d0 0.6980734533018431d0) #C(-33.59312544740101d0 49.830822837862385d0)) (#C(-10.965856383178863d0 -20.098842883571784d0) #C(-13.578151834955891d0 18.882764211902582d0) #C(-33.572154393850305d0 -9.247101892200035d0) #C(-7.1983955408958415d0 -44.74021366251536d0) #C(-25.49195794016583d0 6.480992561130666d0) #C(-7.801677260802088d0 -29.99322788410162d0) #C(17.64699367607364d0 42.34057977382671d0) #C(-37.47105499331694d0 14.466975595019427d0) #C(26.410368987890138d0 -27.61329383342676d0) #C(8.0125520259677d0 -32.332668354370135d0) #C(28.345305080495482d0 -9.625657806045606d0) #C(-15.813544063380162d0 49.38867992999511d0)) (#C(-9.33137783968364d0 -18.663795611491395d0) #C(-14.043145694604d0 17.524482151220464d0) #C(-31.029495422489457d0 -5.2729071347279515d0) #C(-7.502968858188858d0 -39.790186102180755d0) #C(-24.25225866344128d0 5.43002868275967d0) #C(-6.968793470393193d0 -27.767127106546535d0) #C(12.847023596982307d0 35.56059110202828d0) #C(-32.07505652985733d0 13.166106940820804d0) #C(21.861224489547784d0 -24.77748267012699d0) #C(5.099214186339811d0 -25.3011905708243d0) #C(25.182794153209166d0 -9.514838415062272d0) #C(-7.769372871030493d0 44.41429266419108d0)) (#C(-1.6712447699758552d0 19.14818158504486d0) #C(19.4860433234232d0 -6.277156617940156d0) #C(20.96161933327692d0 20.166059769757148d0) #C(-13.704945535038723d0 33.982807980964495d0) #C(21.835308711286743d0 7.573203274621525d0) #C(-8.398445647436912d0 24.936781175547164d0) #C(7.9942716162507175d0 -35.225376453187565d0) #C(32.985970999229316d0 6.537892064711723d0) #C(-29.865047797605072d0 8.62597382434678d0) #C(-16.61241281364779d0 17.91514252525286d0) #C(-25.42137515199612d0 -4.582538744037608d0) #C(30.277093698649185d0 -30.796266708389453d0)) (#C(18.606415970124594d0 -17.79384385154076d0) #C(-25.423436877653735d0 -10.684928604444178d0) #C(-2.142176306648727d0 -37.578644136335356d0) #C(44.020556724799384d0 -21.61449965356597d0) #C(-14.718860631085006d0 -26.856275107723082d0) #C(29.913989576033174d0 -16.563306618437068d0) #C(-39.33653361607388d0 27.674950798706274d0) #C(-25.63429948777225d0 -34.963793631723d0) #C(36.165070599101895d0 19.31314337612928d0) #C(32.20836485698857d0 -0.20578418201003057d0) #C(18.201004027043247d0 27.165641682638526d0) #C(-55.72477269910214d0 0.5943045229224698d0)) (#C(11.45189400451073d0 -28.07289260642917d0) #C(-32.247940317224455d0 -0.7549526190357849d0) #C(-19.15819128796846d0 -41.40298370146726d0) #C(38.99631340056976d0 -43.1608974898529d0) #C(-28.176308003174693d0 -22.44479172765345d0) #C(25.44901274243493d0 -31.923710261668965d0) #C(-29.614840992657232d0 48.87854746012331d0) #C(-44.942605933428034d0 -26.457634447959606d0) #C(48.179706183881024d0 4.038430476343767d0) #C(34.15021892230524d0 -16.598093066410534d0) #C(33.91430307094719d0 19.645583948756776d0) #C(-60.935267634905756d0 29.203545501276768d0)) (#C(-1.2769142389579637d0 22.386381581072577d0) #C(22.93516990210861d0 -7.481159696362845d0) #C(23.818643041001355d0 24.586128288138674d0) #C(-17.753873718698756d0 40.45064294290625d0) #C(25.32313822836294d0 8.944620040152003d0) #C(-10.583127435478964d0 29.024726924750606d0) #C(11.649941994768884d0 -40.827082402250745d0) #C(37.2709394058087d0 9.157524477667172d0) #C(-35.38191714722737d0 8.043434907125535d0) #C(-21.172379820825448d0 19.454488943243405d0) #C(-28.597383823358108d0 -7.878283255366343d0) #C(37.070024458331154d0 -32.50015192813096d0)) (#C(8.88084461013064d0 22.41553698991546d0) #C(19.231246585346845d0 -17.84597954528991d0) #C(34.10976311525074d0 13.059255111966857d0) #C(1.9813994196561207d0 47.59741309099087d0) #C(29.096498306332528d0 -2.041486225892365d0) #C(3.0493965133310024d0 32.94933711057265d0) #C(-9.133226338784239d0 -43.541881979738534d0) #C(40.80635649449653d0 -9.164962946505081d0) #C(-31.17743844037981d0 24.6932942303004d0) #C(-10.970120856340456d0 29.371452736712367d0) #C(-32.4136679428261d0 5.747632603326573d0) #C(20.81784744852716d0 -51.532310222281666d0)) (#C(19.238554595648402d0 7.726289402272763d0) #C(0.992839808191091d0 -22.468228518864628d0) #C(29.989366333516323d0 -12.867613989473762d0) #C(29.436119947782192d0 29.007523322621438d0) #C(16.176348920224502d0 -18.5445126948348d0) #C(21.167373119287344d0 18.537880518023528d0) #C(-31.998639024851794d0 -22.685280924279866d0) #C(20.723958490529938d0 -29.88778641743582d0) #C(-5.349041315732679d0 33.42523356537456d0) #C(10.75622410345887d0 25.51151427016397d0) #C(-16.78668997650614d0 22.156677333829407d0) #C(-15.851838973649041d0 -44.32081587766065d0)) (#C(-4.559954623766297d0 18.530263083254674d0) #C(19.813466244522928d0 -2.080316540822887d0) #C(14.938153876833034d0 22.630847253220836d0) #C(-19.25543780287901d0 31.108379496818657d0) #C(18.979097339236134d0 12.244790195294778d0) #C(-11.821920616969987d0 21.14531015225459d0) #C(12.119230108674298d0 -30.980877557431608d0) #C(30.288118008709585d0 11.733714209557272d0) #C(-30.790724275261486d0 2.913114891482836d0) #C(-18.501733076253174d0 14.495248106095358d0) #C(-23.482943804891473d0 -9.02890749832166d0) #C(32.52588928424212d0 -25.571870605703975d0)) (#C(-12.93691438556375d0 20.975671984698764d0) #C(25.324251655781094d0 5.835348936973398d0) #C(9.516050135592842d0 35.45535997056422d0) #C(-39.15251963624497d0 30.843263698220596d0) #C(18.766455247989814d0 22.426566447919452d0) #C(-23.318208260851875d0 22.39291632624824d0) #C(29.11273367248906d0 -36.543054664241254d0) #C(33.40150378850584d0 27.592516962342046d0) #C(-38.42504422221019d0 -9.945888461269416d0) #C(-29.926463048105806d0 9.847285840518618d0) #C(-24.197501762235273d0 -20.836062777671067d0) #C(53.25415630633831d0 -15.530663268396314d0)) (#C(-19.75419433237322d0 -10.553588415665075d0) #C(-3.031645693309517d0 24.16689835868181d0) #C(-32.137217463128465d0 13.40719062007361d0) #C(-33.53248755334185d0 -32.19781581430464d0) #C(-20.082544933783254d0 18.736659407511887d0) #C(-22.325359926423133d0 -21.49037993800623d0) #C(32.827241614248344d0 24.351688312359244d0) #C(-22.610254322033285d0 30.90398731956259d0) #C(6.974715368425351d0 -36.30498407321026d0) #C(-10.11267701900123d0 -26.337261313800955d0) #C(20.863694810053826d0 -23.031182234527655d0) #C(16.591608276409275d0 49.445900518801686d0)) (#C(37.63202741306523d0 16.176211241294595d0) #C(1.7513576299814333d0 -43.07975763378812d0) #C(54.37692020178624d0 -26.79643445400149d0) #C(60.697080019400325d0 52.35222042428679d0) #C(31.21549204101368d0 -36.93523868390102d0) #C(42.67199277562833d0 33.94919909319257d0) #C(-64.25744144281298d0 -39.84325943839809d0) #C(35.71776977614306d0 -59.62646936949104d0) #C(-5.901312225768027d0 64.18637749922105d0) #C(21.54280917499099d0 45.53117216150264d0) #C(-29.584579535159158d0 44.57681646154522d0) #C(-37.2155779475878d0 -82.41959732009526d0)) (#C(14.524132780009195d0 13.623056881927784d0) #C(8.162549447647276d0 -17.646876142768303d0) #C(30.077203701928514d0 0.2540953738508839d0) #C(17.647981237878366d0 37.71203353528246d0) #C(18.701212535923368d0 -11.050195936325649d0) #C(12.397249781302968d0 20.38427696089352d0) #C(-25.833655082529923d0 -27.330242508986725d0) #C(26.365166490401087d0 -21.565964614143944d0) #C(-14.308552486380588d0 27.818702490537817d0) #C(2.0150536946410513d0 26.16268618313825d0) #C(-19.79531209736659d0 12.05620462600083d0) #C(2.110572659546233d0 -45.22575477491056d0)) (#C(0.0651105983111071d0 -23.710363391609654d0) #C(-22.54571334271586d0 9.323112614311775d0) #C(-26.293748098137357d0 -23.050562194377093d0) #C(12.879277677458898d0 -42.35732811755458d0) #C(-27.412292497883474d0 -7.566090072116373d0) #C(8.040680593753182d0 -30.218955273331108d0) #C(-8.108149525641632d0 42.315940713948144d0) #C(-40.292048586659824d0 -6.602323067650219d0) #C(36.32827704015976d0 -11.373662562965567d0) #C(21.154695998857356d0 -22.210894957756725d0) #C(31.463700139670895d0 6.2617850436389775d0) #C(-37.32755015969687d0 37.360753778609116d0)) (#C(-16.91179530575683d0 -13.008493803188003d0) #C(-6.968026851858035d0 21.488433108679153d0) #C(-30.826505908982092d0 4.485456598300678d0) #C(-20.993508308743603d0 -36.24100328984831d0) #C(-20.008508689317843d0 13.771498325700833d0) #C(-15.685808087510008d0 -21.88534139265269d0) #C(27.107519921770358d0 29.88797514744888d0) #C(-26.900239086637256d0 24.709479616081907d0) #C(11.96994160937588d0 -30.335577530236996d0) #C(-3.3644542113168363d0 -26.1492617215737d0) #C(19.593702948275048d0 -17.065044596768264d0) #C(4.464246033554232d0 44.61211152606719d0)) (#C(16.47922658060789d0 8.24196700348842d0) #C(1.3754235929483114d0 -18.613441814569445d0) #C(23.725735872666633d0 -12.876744934550725d0) #C(25.36179610835923d0 22.907335071565534d0) #C(14.56291841018876d0 -16.203429150505098d0) #C(21.10073018461531d0 14.356477437760248d0) #C(-29.71488963881536d0 -17.882543988249335d0) #C(16.67127181943891d0 -27.158599342495123d0) #C(0.3940785344197666d0 26.8237954228201d0) #C(10.228848885594678d0 15.715734596458146d0) #C(-8.934605227989202d0 22.34120219908364d0) #C(-20.867288996391366d0 -34.46935429399547d0)) (#C(0.9788014372851368d0 20.84384942284433d0) #C(18.598443947527834d0 -9.235201957055825d0) #C(26.69600440491243d0 18.79160670193516d0) #C(-10.066756674313016d0 41.16492957735946d0) #C(25.12806586113738d0 5.121219763817638d0) #C(-4.19985853120954d0 30.197316782935985d0) #C(0.9072159512787294d0 -40.22961495672622d0) #C(38.18217673578897d0 0.5003747179633216d0) #C(-30.60446070483478d0 16.293461515097984d0) #C(-13.312872998161406d0 23.787379750352258d0) #C(-29.479555453100197d0 -0.9456730418070203d0) #C(31.227778481365895d0 -44.833933568777795d0)) (#C(-23.47860866218026d0 13.792086215181875d0) #C(20.01941267132026d0 15.79863350021831d0) #C(-6.670337370580076d0 38.02130503284532d0) #C(-50.71184912823191d0 9.792790657424263d0) #C(8.41857575074038d0 30.316773929932683d0) #C(-33.23583117333454d0 11.35402986810276d0) #C(46.71691624566056d0 -20.217619297132277d0) #C(18.20298348863441d0 43.2865782681384d0) #C(-31.171739838938116d0 -25.152654385434552d0) #C(-31.680290356509225d0 -3.663362797878526d0) #C(-15.83197406158224d0 -31.6580180713909d0) #C(61.501443382237966d0 10.840201382404173d0)) (#C(0.10047329643357417d0 25.8016485914385d0) #C(22.091811976455908d0 -10.069236564553844d0) #C(25.331954761713327d0 20.787279328235055d0) #C(-14.435733505689447d0 41.215958353750295d0) #C(28.38112920713415d0 6.689665233886117d0) #C(-4.251584627070743d0 33.53752766081943d0) #C(5.7920341378935625d0 -48.299548705243154d0) #C(42.46860621307887d0 5.032798142080736d0) #C(-32.60600083456306d0 15.436528841084893d0) #C(-17.578806483935438d0 22.815395868826627d0) #C(-32.06377188415438d0 1.5923631713183966d0) #C(31.766640420121046d0 -40.57704191322392d0)) (#C(7.769961653339088d0 29.209317949727545d0) #C(22.458971295648222d0 -16.80047439449538d0) #C(38.227408067502175d0 18.687074245116026d0) #C(-3.9902229830964386d0 55.803459409155685d0) #C(34.78588187350524d0 0.17391737634724413d0) #C(1.6867184272369964d0 40.20038466639097d0) #C(-9.683586833715307d0 -56.00758545492581d0) #C(51.36351375237134d0 -7.804157054345702d0) #C(-36.88092483619934d0 28.26456964992201d0) #C(-13.888915651885302d0 34.68460504535169d0) #C(-38.17269242485322d0 7.286643599618525d0) #C(31.764450524807547d0 -61.19285148585033d0)) (#C(-18.667478607484018d0 -3.852051487669408d0) #C(4.884199744126256d0 19.133474005211433d0) #C(-21.530424245593412d0 18.908313525250563d0) #C(-33.58659480205376d0 -19.75641483406408d0) #C(-9.233499477585292d0 21.65329344725752d0) #C(-27.11186732801051d0 -10.175297378866095d0) #C(40.35974717017079d0 12.028666745791844d0) #C(-10.07371796032676d0 35.45643878650669d0) #C(-7.237185575554468d0 -31.176014268043094d0) #C(-15.62176723167416d0 -19.82076914463089d0) #C(4.492456416518198d0 -25.931864743064903d0) #C(32.65654448126914d0 34.51540062289765d0)) (#C(-19.877996171119793d0 6.847862647881454d0) #C(13.233733156786268d0 15.932431869561295d0) #C(-10.964251073924203d0 27.861189699625456d0) #C(-38.65106835635165d0 -0.5187448541567896d0) #C(0.8184733409339309d0 24.014275118417178d0) #C(-27.27870048671639d0 3.3322287211073434d0) #C(38.504884249497955d0 -7.31881491123686d0) #C(6.106354948159545d0 34.72383859650756d0) #C(-20.413222616825006d0 -24.667780600193705d0) #C(-23.873743233396727d0 -8.402523925386616d0) #C(-5.709332906134597d0 -26.093520952468463d0) #C(39.380218669744636d0 20.673653784037484d0)) (#C(-25.23645103340055d0 6.1446705059922575d0) #C(15.85673396649326d0 21.613152295321548d0) #C(-16.147582310414638d0 36.36788219506637d0) #C(-50.99741685818256d0 -3.009798144845014d0) #C(-1.1263291890398954d0 30.17523216125455d0) #C(-37.2239742638276d0 1.4956094327135645d0) #C(50.03803191175425d0 -5.771458825865462d0) #C(5.500086455284813d0 45.008868526957144d0) #C(-25.69655042386285d0 -33.9216721547608d0) #C(-31.220684402858566d0 -11.718140444633868d0) #C(-4.890160178613581d0 -35.749666887487535d0) #C(55.52318825017169d0 26.369555926129536d0)) (#C(-14.134077416083283d0 -25.03022942419842d0) #C(-16.866994820068527d0 23.919695560000065d0) #C(-44.55174180872987d0 -4.319630683859716d0) #C(-13.174102590869953d0 -56.7352049924371d0) #C(-32.78194045331086d0 10.293761106155355d0) #C(-14.619512177542179d0 -39.01908531360173d0) #C(25.42253160382149d0 50.98119574501915d0) #C(-46.17726333913453d0 21.5895970412013d0) #C(28.58906697080551d0 -39.261600517399835d0) #C(2.094859912198201d0 -39.14175232281485d0) #C(36.603640061148106d0 -17.197454090724108d0) #C(-7.838304916664162d0 71.64644127992904d0)) (#C(-19.22168864215866d0 -39.517803248804455d0) #C(-29.110304421545642d0 33.09183319449663d0) #C(-63.27268046854961d0 -14.260692311883252d0) #C(-12.858484418826d0 -84.1291544452629d0) #C(-49.46083558656674d0 8.438334760463086d0) #C(-13.212397612119139d0 -60.04737440711269d0) #C(24.68734248181108d0 79.92787709704048d0) #C(-72.38374518662705d0 22.12282515511019d0) #C(48.09939930448076d0 -51.84229437974023d0) #C(12.199067944583817d0 -54.93317293527209d0) #C(57.96716377035359d0 -16.987601358624556d0) #C(-28.79276594522159d0 98.54388123546055d0)) (#C(18.188382636032504d0 -10.16925174080693d0) #C(-15.921462821588149d0 -14.692572738578647d0) #C(7.196925633904898d0 -33.13499324488163d0) #C(42.960253774612305d0 -8.149906939997694d0) #C(-5.743822390395862d0 -25.175047491851142d0) #C(30.71160896166991d0 -6.7766026111585695d0) #C(-35.93271121340688d0 15.401892999204573d0) #C(-15.431934743918566d0 -36.28867943896592d0) #C(29.257686740368353d0 24.187054780462063d0) #C(30.526474775978553d0 2.1212448096752268d0) #C(9.799678846877466d0 29.48274216390205d0) #C(-57.508031694431835d0 -9.241987226989396d0)) (#C(23.82453549894591d0 9.76035109829465d0) #C(-1.8500282743549634d0 -22.32404940490633d0) #C(27.414179125933586d0 -21.151011261362463d0) #C(39.54829728080921d0 27.765035631988553d0) #C(12.52247164862034d0 -26.54106181243566d0) #C(33.01840823349694d0 12.711354275815259d0) #C(-46.26277283186393d0 -16.025730078665678d0) #C(13.689725665352526d0 -40.914852816148496d0) #C(9.52651586447311d0 35.8897373256374d0) #C(19.300724402165603d0 21.874722867322163d0) #C(-6.851409368745549d0 30.86669880902098d0) #C(-39.7165617116595d0 -41.082106672199664d0)) (#C(16.15322137718652d0 13.7424690672899d0) #C(4.0896313068208805d0 -18.175412830335432d0) #C(30.586416360144703d0 -7.739128567868834d0) #C(20.79299831736634d0 38.075287780284576d0) #C(18.520669659606956d0 -14.51809897105853d0) #C(19.05919743147489d0 21.285919662656198d0) #C(-30.390117648922732d0 -29.782933740495693d0) #C(27.446944422302938d0 -24.05158389161799d0) #C(-8.08030406326626d0 30.041457662526295d0) #C(6.26409764836794d0 24.205237011890887d0) #C(-18.46807124960667d0 19.71224496568477d0) #C(-6.893953538316055d0 -48.11654990562017d0)) (#C(45.02941567303659d0 -14.318972420035744d0) #C(-30.767007751468217d0 -33.46605368845244d0) #C(19.774948621442526d0 -63.07386042163265d0) #C(90.83736290776831d0 -0.05821143355961311d0) #C(-5.388683813928371d0 -53.57086338736182d0) #C(67.07840492893222d0 -12.250613946520499d0) #C(-89.18685624381455d0 19.18633375422205d0) #C(-16.930916384405077d0 -79.95608299103853d0) #C(49.490904786413935d0 51.94947715028759d0) #C(53.835379156489935d0 18.082131605589165d0) #C(16.92405483488318d0 60.142008863693... [truncated message content] |
|
From: Tunc S. <si...@ee...> - 2001-10-25 23:39:49
|
I just installed the latest cvs'ed matlisp on solaris. The install went find for CMUCL. I saw earlier that you mentioned a package problem with SAVE-MATLISP. I did not get this; the saved image loads in a package called MATLISP-USER that is using the MATLISP package; I think that is ok. The script below, however, does reproduce the error with CMUCL. I also installed using Allegro. The install did not work because the f77-mangling.lisp and ffi-acl.lisp are not compatible. However, replacing all "_" with "" in f77-mangling is a sufficient hack to install using Allegro. SAVE-MATLISP also works for Allegro. The script below, again, does reproduce the error with Allegro. MATLISP-USER(1): :ld test ; Loading /home/eclair3/varaiya/simsek/tmp/mk/test.lisp ** On entry to ZGEEV parameter number 10 had an illegal value ** On entry to ZGEEV parameter number 12 had an illegal value Regards, Tunc "Michael A. Koerber" wrote: > > The command (EIG A) seems to be okay, but not (EIG A T). This > results in ZGEEV complaints as well as inconsistant error reports > for succesive calls. A script demonstrating this follows... > > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; > ;; Demo a ZGEEV bug in MATLISP with > ;; > ;; CMU Common Lisp 18c, running on koerber.llan.ll.mit.edu > ;; Send questions and bug reports to your local CMU CL maintainer, > ;; or to cmu...@co.... and cmu...@co.... respectively. > ;; Loaded subsystems: > ;; Python 1.0, target Intel x86 > ;; CLOS based on PCL version: September 16 92 PCL (f) > ;; MATLISP/Pre 2.0 > > (use-package :m) > > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; > ;; Okay read in a test array from the data set (see bottom of file) > (with-open-file (in "tmp-ar.out" :direction :input) > (defparameter tst-array (read in))) > > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; > ;;; BEGIN THE DEMO > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; > ;; This first block runs through the computational process with no > ;; errors. It is missing the MULTIPLE-VALUE-BIND blocks > > (setf tst-matrix (make-complex-matrix tst-array) > tst-a (m* (ctranspose tst-matrix) tst-matrix)) > > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; > ;; Finally note the error > (eig tst-a t) > > ;; ** On entry to ZGEEV parameter number 10 had an illegal value > ;; ** On entry to ZGEEV parameter number 12 had an illegal value > > ;;; Running this interactive will yeild different results... > > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; > ;;; THE DATA FILE...save this as "tmp-ar.out" > #2A((#C(16.005199412100566d0 47.07791625264504d0) > #C(29.826457010016536d0 -35.54662313696197d0) > #C(37.91375316204245d0 -19.17281260883403d0) > #C(34.078224268488945d0 67.62670766716862d0) > #C(38.13652518200501d0 -33.887006924403416d0) > #C(42.759393512198166d0 32.918173842750406d0) > #C(-71.39823869300109d0 -32.40367765926753d0) > #C(27.14470974654928d0 -73.75317137227977d0) > #C(16.448811595962425d0 63.0306188816642d0) > #C(41.241561727845394d0 41.5135501218996d0) > #C(5.937864642568172d0 54.01449571738566d0) > #C(-100.12720430100853d0 -34.382131284070695d0)) > (#C(23.198438739089735d0 -3.2958171922133435d0) > #C(-14.798689856548828d0 -15.525503203611864d0) > #C(17.905028974905527d0 -37.1099970013271d0) > #C(36.724388182668314d0 -3.4097968555987936d0) > #C(-8.202167726494334d0 -22.15776441397034d0) > #C(22.765402850974013d0 -14.246823450586142d0) > #C(-29.837503042439536d0 27.610590873165055d0) > #C(-27.69352908727416d0 -25.603429543977743d0) > #C(29.26292734178589d0 6.4705722866843915d0) > #C(25.28672247416617d0 -8.324469887780374d0) > #C(23.88214661871792d0 10.100304108596347d0) > #C(-36.97796513733695d0 26.918809687378666d0)) > (#C(-19.557419012822034d0 -16.01876797399043d0) > #C(-9.51687364032257d0 25.14721169586665d0) > #C(-35.46821117315311d0 4.116607731781016d0) > #C(-22.55925481925319d0 -40.20579281634353d0) > #C(-23.085928570747722d0 14.484677851031586d0) > #C(-17.4998584340949d0 -24.284469427255893d0) > #C(25.77614196159949d0 33.05447047033497d0) > #C(-29.979368594305065d0 24.089878113232864d0) > #C(16.2325585361298d0 -30.77869936446934d0) > #C(0.30727870340845903d0 -28.10171520956098d0) > #C(22.678763527863147d0 -15.955154218619441d0) > #C(3.8851448943308355d0 46.34968269847154d0)) > (#C(-22.937677533499805d0 12.761721168716882d0) > #C(21.315429264837444d0 18.83295518657326d0) > #C(-9.150000510781709d0 35.56094887921642d0) > #C(-46.94667929802831d0 7.678921173141417d0) > #C(4.844694486412525d0 28.737681603101393d0) > #C(-30.57106678163329d0 7.216650033376111d0) > #C(42.703123457005354d0 -11.533940863834651d0) > #C(12.167847498141589d0 39.47633922261261d0) > #C(-25.17568211763151d0 -26.531324192443176d0) > #C(-26.880513070024065d0 -10.8978923340387d0) > #C(-7.401550946912295d0 -28.458139382803562d0) > #C(46.757656411101294d0 12.249717138832954d0)) > (#C(-13.56814824052778d0 24.123790896398027d0) > #C(29.05381752991641d0 4.403849836500797d0) > #C(9.84951924595866d0 39.07668076500276d0) > #C(-41.97494945374203d0 31.663796739354957d0) > #C(20.75301717893658d0 22.06256309568527d0) > #C(-23.66768499463233d0 23.865238658995487d0) > #C(33.03702496188954d0 -37.73200787112589d0) > #C(34.05816832014353d0 29.6586879121717d0) > #C(-38.536506691388226d0 -11.85558712710001d0) > #C(-34.77192722069896d0 5.885893865952018d0) > #C(-21.59392776802898d0 -22.179506459891794d0) > #C(52.542098466081214d0 -10.813227449552333d0)) > (#C(20.36916910571722d0 3.5446044034764d0) > #C(-3.5859771169017205d0 -21.756925513783962d0) > #C(23.670942951988447d0 -16.06012387188525d0) > #C(31.81978046881639d0 20.25002685966308d0) > #C(10.628516075640219d0 -20.39792415229947d0) > #C(22.47721964638637d0 10.907253852484363d0) > #C(-32.9518303539806d0 -16.665469122363547d0) > #C(13.815002177173396d0 -30.368747441613984d0) > #C(0.7063684177762941d0 29.202053796469706d0) > #C(10.284557400745966d0 22.520655600536365d0) > #C(-10.93977441001412d0 20.693221232931364d0) > #C(-18.904000592002348d0 -31.78710325395103d0)) > (#C(30.46652312166895d0 -7.954182213026129d0) > #C(-18.28476861378651d0 -28.682737449328883d0) > #C(23.468407257697773d0 -40.2734815860169d0) > #C(61.097276708636635d0 7.440043455989577d0) > #C(2.124699597951931d0 -34.4674087761037d0) > #C(38.658719492073004d0 -0.4640322349085191d0) > #C(-55.06797925233883d0 4.166138081180903d0) > #C(-2.970001681596121d0 -50.0726743288685d0) > #C(21.107794356427465d0 40.252503164665455d0) > #C(30.824454285995248d0 21.188093829239005d0) > #C(0.17783263380597525d0 36.479763291975026d0) > #C(-53.69663365420271d0 -30.456233869541414d0)) > (#C(-11.143887328478538d0 20.79853099777082d0) > #C(25.42411902356644d0 4.381869277689784d0) > #C(9.480953113066764d0 32.63585615134894d0) > #C(-33.92788469899318d0 27.741374722242934d0) > #C(18.11765428905662d0 18.36795203800819d0) > #C(-19.51426927465894d0 20.698231810035146d0) > #C(27.55685967645361d0 -32.26699152575162d0) > #C(28.991681354917375d0 23.675938037740806d0) > #C(-32.52914943846797d0 -8.220192082169266d0) > #C(-26.875457076142787d0 5.866557848721024d0) > #C(-19.778632927020524d0 -18.082087110132754d0) > #C(42.80794264134054d0 -13.33975854129635d0)) > (#C(13.351731245561357d0 14.40178602909276d0) > #C(10.356586771940307d0 -18.639113042615573d0) > #C(27.30252929529623d0 2.6645900506457054d0) > #C(10.941327995705267d0 34.22799719621003d0) > #C(19.146344970196953d0 -8.362077718793147d0) > #C(10.687342474568803d0 20.79580320713312d0) > #C(-17.036403585521327d0 -29.863850016303964d0) > #C(26.49189934717548d0 -15.864105482994917d0) > #C(-15.783917237174197d0 21.94988184785033d0) > #C(-4.399255169412217d0 22.29785857257167d0) > #C(-18.497324257421294d0 9.337647442177557d0) > #C(4.611847412785996d0 -35.0083563604576d0)) > (#C(-20.427601090208906d0 -4.7827806408477205d0) > #C(4.2764960026941115d0 21.249017402286437d0) > #C(-22.96528846676614d0 19.302591691330665d0) > #C(-34.57945943175243d0 -20.635197055670748d0) > #C(-10.675683205197554d0 20.041160084144167d0) > #C(-23.686455112170933d0 -9.867695698100231d0) > #C(36.59189900906817d0 14.825760957058872d0) > #C(-12.146895431202907d0 31.699636240981505d0) > #C(-3.8350919084728545d0 -30.74838978746835d0) > #C(-14.975589460162508d0 -20.94157387708863d0) > #C(9.508959963440738d0 -24.074500373394567d0) > #C(24.1186358712507d0 32.1705116404263d0)) > (#C(-16.809229858652024d0 10.64614608834553d0) > #C(17.326394687551172d0 12.309759891314783d0) > #C(-6.440300562661456d0 29.68465271951954d0) > #C(-40.36217464737333d0 7.201264298006153d0) > #C(5.659591880888096d0 22.11147708933589d0) > #C(-23.744510928438427d0 9.086835677771031d0) > #C(36.16758933264222d0 -14.860877877641677d0) > #C(12.014924474276373d0 31.45389566041442d0) > #C(-22.589837196855772d0 -21.117735786032345d0) > #C(-25.795723680385592d0 -6.962180446580348d0) > #C(-8.082613602260205d0 -23.996552513370098d0) > #C(39.753967069192704d0 9.634421817109795d0)) > (#C(4.6639850364767135d0 -20.026791920386774d0) > #C(-22.772827078181287d0 3.2781370378143935d0) > #C(-19.73550205591679d0 -24.368811405764035d0) > #C(20.77892089344874d0 -34.32290108108991d0) > #C(-20.42872486396446d0 -10.85538500470752d0) > #C(11.364963451920733d0 -25.69669414489729d0) > #C(-13.989666464219805d0 34.82299400748158d0) > #C(-30.420531175138656d0 -11.337389924841414d0) > #C(30.78518769876881d0 -3.561045601021239d0) > #C(19.876800884382547d0 -13.666746170698532d0) > #C(23.959705431827203d0 10.084924984689255d0) > #C(-32.72128203326361d0 26.269919299328937d0)) > (#C(8.40042055640669d0 23.07388932527355d0) > #C(20.356970456110343d0 -17.84171440960684d0) > #C(34.824049988821045d0 14.288943821391573d0) > #C(-1.1975493782747595d0 49.37110134180481d0) > #C(27.560997714267337d0 -0.569753376667717d0) > #C(3.23633741438303d0 32.89137714179628d0) > #C(-7.618726350526517d0 -46.27057904835429d0) > #C(40.21722287275555d0 -7.347188429116369d0) > #C(-31.816618300979904d0 21.688908083405334d0) > #C(-13.797538768455448d0 28.155657943176998d0) > #C(-30.538474346489945d0 2.9895244366358895d0) > #C(20.74971482158006d0 -47.25660091014599d0)) > (#C(-7.126445159358812d0 18.797909175016795d0) > #C(21.26313358467199d0 0.019686058254233307d0) > #C(14.408978393641478d0 28.243053754310743d0) > #C(-27.553714746320686d0 31.73834160068036d0) > #C(17.02023605641506d0 14.593147998914493d0) > #C(-15.661796301636723d0 20.871398863728672d0) > #C(17.646410557224197d0 -31.60121079708061d0) > #C(27.402441364610983d0 16.605159624549763d0) > #C(-30.589414677739015d0 -4.092589045940567d0) > #C(-22.7860496859832d0 9.91228768911711d0) > #C(-18.600615488118017d0 -15.739081534167408d0) > #C(39.90151537635921d0 -16.32818944371095d0)) > (#C(-19.87520315057365d0 10.42991689484596d0) > #C(17.763845019337953d0 15.581969761958192d0) > #C(-8.651260396074676d0 32.82293589334493d0) > #C(-44.089617561051355d0 5.898863156325472d0) > #C(5.724601918488497d0 24.760430038165858d0) > #C(-27.804646283718583d0 7.061364750806994d0) > #C(38.81067282721568d0 -12.025597971875193d0) > #C(10.828422665452692d0 35.019337354281376d0) > #C(-23.077309402281298d0 -24.992996384688645d0) > #C(-27.452481089465106d0 -8.962683211685171d0) > #C(-6.736373148126053d0 -26.399626736757256d0) > #C(43.797374929409465d0 13.389296715683468d0)) > (#C(20.006089247505972d0 10.284227284026427d0) > #C(1.507388805478719d0 -22.625597105132563d0) > #C(30.678766309519073d0 -12.10465959138954d0) > #C(28.99229295829483d0 31.746697951116d0) > #C(16.923007298866096d0 -17.29162103699469d0) > #C(20.94194454737485d0 18.139557733135796d0) > #C(-32.263318650823535d0 -25.906192480017136d0) > #C(22.703284338818378d0 -27.938798424809104d0) > #C(-7.637357968736136d0 32.45277649168197d0) > #C(7.5255661618171255d0 27.45090394444313d0) > #C(-18.38569733093254d0 19.38017627661041d0) > #C(-10.874599886745848d0 -43.12682620595745d0)) > (#C(23.53339872007615d0 13.773313007350964d0) > #C(3.146552737658422d0 -28.425858797998302d0) > #C(39.19776299610373d0 -12.552203709344589d0) > #C(35.22044910619708d0 40.5205588814613d0) > #C(21.634664670030816d0 -23.24580280833951d0) > #C(26.36995507193284d0 25.19653386500839d0) > #C(-41.55793908105909d0 -32.81832210054749d0) > #C(28.097515861265826d0 -37.26233335108873d0) > #C(-8.459124863124769d0 42.38739040558611d0) > #C(11.3193040695607d0 34.40356048992171d0) > #C(-22.428604607719702d0 27.313449626749033d0) > #C(-16.789585655377067d0 -58.24703665346114d0)) > (#C(-0.6084970548442286d0 -29.532108853226916d0) > #C(-28.164036166697592d0 14.971133303000082d0) > #C(-33.226323177288684d0 -25.065269921844695d0) > #C(13.597051154408128d0 -51.12964370996891d0) > #C(-35.22367760241353d0 -5.990620128731898d0) > #C(5.83422965785773d0 -40.373262532659375d0) > #C(-6.954531988646704d0 55.527052860398925d0) > #C(-49.59561394170671d0 -2.376245806745374d0) > #C(42.272037196632816d0 -20.56963637714144d0) > #C(22.002155727740774d0 -28.458785576763194d0) > #C(38.766945656386476d0 0.6980734533018431d0) > #C(-33.59312544740101d0 49.830822837862385d0)) > (#C(-10.965856383178863d0 -20.098842883571784d0) > #C(-13.578151834955891d0 18.882764211902582d0) > #C(-33.572154393850305d0 -9.247101892200035d0) > #C(-7.1983955408958415d0 -44.74021366251536d0) > #C(-25.49195794016583d0 6.480992561130666d0) > #C(-7.801677260802088d0 -29.99322788410162d0) > #C(17.64699367607364d0 42.34057977382671d0) > #C(-37.47105499331694d0 14.466975595019427d0) > #C(26.410368987890138d0 -27.61329383342676d0) > #C(8.0125520259677d0 -32.332668354370135d0) > #C(28.345305080495482d0 -9.625657806045606d0) > #C(-15.813544063380162d0 49.38867992999511d0)) > (#C(-9.33137783968364d0 -18.663795611491395d0) > #C(-14.043145694604d0 17.524482151220464d0) > #C(-31.029495422489457d0 -5.2729071347279515d0) > #C(-7.502968858188858d0 -39.790186102180755d0) > #C(-24.25225866344128d0 5.43002868275967d0) > #C(-6.968793470393193d0 -27.767127106546535d0) > #C(12.847023596982307d0 35.56059110202828d0) > #C(-32.07505652985733d0 13.166106940820804d0) > #C(21.861224489547784d0 -24.77748267012699d0) > #C(5.099214186339811d0 -25.3011905708243d0) > #C(25.182794153209166d0 -9.514838415062272d0) > #C(-7.769372871030493d0 44.41429266419108d0)) > (#C(-1.6712447699758552d0 19.14818158504486d0) > #C(19.4860433234232d0 -6.277156617940156d0) > #C(20.96161933327692d0 20.166059769757148d0) > #C(-13.704945535038723d0 33.982807980964495d0) > #C(21.835308711286743d0 7.573203274621525d0) > #C(-8.398445647436912d0 24.936781175547164d0) > #C(7.9942716162507175d0 -35.225376453187565d0) > #C(32.985970999229316d0 6.537892064711723d0) > #C(-29.865047797605072d0 8.62597382434678d0) > #C(-16.61241281364779d0 17.91514252525286d0) > #C(-25.42137515199612d0 -4.582538744037608d0) > #C(30.277093698649185d0 -30.796266708389453d0)) > (#C(18.606415970124594d0 -17.79384385154076d0) > #C(-25.423436877653735d0 -10.684928604444178d0) > #C(-2.142176306648727d0 -37.578644136335356d0) > #C(44.020556724799384d0 -21.61449965356597d0) > #C(-14.718860631085006d0 -26.856275107723082d0) > #C(29.913989576033174d0 -16.563306618437068d0) > #C(-39.33653361607388d0 27.674950798706274d0) > #C(-25.63429948777225d0 -34.963793631723d0) > #C(36.165070599101895d0 19.31314337612928d0) > #C(32.20836485698857d0 -0.20578418201003057d0) > #C(18.201004027043247d0 27.165641682638526d0) > #C(-55.72477269910214d0 0.5943045229224698d0)) > (#C(11.45189400451073d0 -28.07289260642917d0) > #C(-32.247940317224455d0 -0.7549526190357849d0) > #C(-19.15819128796846d0 -41.40298370146726d0) > #C(38.99631340056976d0 -43.1608974898529d0) > #C(-28.176308003174693d0 -22.44479172765345d0) > #C(25.44901274243493d0 -31.923710261668965d0) > #C(-29.614840992657232d0 48.87854746012331d0) > #C(-44.942605933428034d0 -26.457634447959606d0) > #C(48.179706183881024d0 4.038430476343767d0) > #C(34.15021892230524d0 -16.598093066410534d0) > #C(33.91430307094719d0 19.645583948756776d0) > #C(-60.935267634905756d0 29.203545501276768d0)) > (#C(-1.2769142389579637d0 22.386381581072577d0) > #C(22.93516990210861d0 -7.481159696362845d0) > #C(23.818643041001355d0 24.586128288138674d0) > #C(-17.753873718698756d0 40.45064294290625d0) > #C(25.32313822836294d0 8.944620040152003d0) > #C(-10.583127435478964d0 29.024726924750606d0) > #C(11.649941994768884d0 -40.827082402250745d0) > #C(37.2709394058087d0 9.157524477667172d0) > #C(-35.38191714722737d0 8.043434907125535d0) > #C(-21.172379820825448d0 19.454488943243405d0) > #C(-28.597383823358108d0 -7.878283255366343d0) > #C(37.070024458331154d0 -32.50015192813096d0)) > (#C(8.88084461013064d0 22.41553698991546d0) > #C(19.231246585346845d0 -17.84597954528991d0) > #C(34.10976311525074d0 13.059255111966857d0) > #C(1.9813994196561207d0 47.59741309099087d0) > #C(29.096498306332528d0 -2.041486225892365d0) > #C(3.0493965133310024d0 32.94933711057265d0) > #C(-9.133226338784239d0 -43.541881979738534d0) > #C(40.80635649449653d0 -9.164962946505081d0) > #C(-31.17743844037981d0 24.6932942303004d0) > #C(-10.970120856340456d0 29.371452736712367d0) > #C(-32.4136679428261d0 5.747632603326573d0) > #C(20.81784744852716d0 -51.532310222281666d0)) > (#C(19.238554595648402d0 7.726289402272763d0) > #C(0.992839808191091d0 -22.468228518864628d0) > #C(29.989366333516323d0 -12.867613989473762d0) > #C(29.436119947782192d0 29.007523322621438d0) > #C(16.176348920224502d0 -18.5445126948348d0) > #C(21.167373119287344d0 18.537880518023528d0) > #C(-31.998639024851794d0 -22.685280924279866d0) > #C(20.723958490529938d0 -29.88778641743582d0) > #C(-5.349041315732679d0 33.42523356537456d0) > #C(10.75622410345887d0 25.51151427016397d0) > #C(-16.78668997650614d0 22.156677333829407d0) > #C(-15.851838973649041d0 -44.32081587766065d0)) > (#C(-4.559954623766297d0 18.530263083254674d0) > #C(19.813466244522928d0 -2.080316540822887d0) > #C(14.938153876833034d0 22.630847253220836d0) > #C(-19.25543780287901d0 31.108379496818657d0) > #C(18.979097339236134d0 12.244790195294778d0) > #C(-11.821920616969987d0 21.14531015225459d0) > #C(12.119230108674298d0 -30.980877557431608d0) > #C(30.288118008709585d0 11.733714209557272d0) > #C(-30.790724275261486d0 2.913114891482836d0) > #C(-18.501733076253174d0 14.495248106095358d0) > #C(-23.482943804891473d0 -9.02890749832166d0) > #C(32.52588928424212d0 -25.571870605703975d0)) > (#C(-12.93691438556375d0 20.975671984698764d0) > #C(25.324251655781094d0 5.835348936973398d0) > #C(9.516050135592842d0 35.45535997056422d0) > #C(-39.15251963624497d0 30.843263698220596d0) > #C(18.766455247989814d0 22.426566447919452d0) > #C(-23.318208260851875d0 22.39291632624824d0) > #C(29.11273367248906d0 -36.543054664241254d0) > #C(33.40150378850584d0 27.592516962342046d0) > #C(-38.42504422221019d0 -9.945888461269416d0) > #C(-29.926463048105806d0 9.847285840518618d0) > #C(-24.197501762235273d0 -20.836062777671067d0) > #C(53.25415630633831d0 -15.530663268396314d0)) > (#C(-19.75419433237322d0 -10.553588415665075d0) > #C(-3.031645693309517d0 24.16689835868181d0) > #C(-32.137217463128465d0 13.40719062007361d0) > #C(-33.53248755334185d0 -32.19781581430464d0) > #C(-20.082544933783254d0 18.736659407511887d0) > #C(-22.325359926423133d0 -21.49037993800623d0) > #C(32.827241614248344d0 24.351688312359244d0) > #C(-22.610254322033285d0 30.90398731956259d0) > #C(6.974715368425351d0 -36.30498407321026d0) > #C(-10.11267701900123d0 -26.337261313800955d0) > #C(20.863694810053826d0 -23.031182234527655d0) > #C(16.591608276409275d0 49.445900518801686d0)) > (#C(37.63202741306523d0 16.176211241294595d0) > #C(1.7513576299814333d0 -43.07975763378812d0) > #C(54.37692020178624d0 -26.79643445400149d0) > #C(60.697080019400325d0 52.35222042428679d0) > #C(31.21549204101368d0 -36.93523868390102d0) > #C(42.67199277562833d0 33.94919909319257d0) > #C(-64.25744144281298d0 -39.84325943839809d0) > #C(35.71776977614306d0 -59.62646936949104d0) > #C(-5.901312225768027d0 64.18637749922105d0) > #C(21.54280917499099d0 45.53117216150264d0) > #C(-29.584579535159158d0 44.57681646154522d0) > #C(-37.2155779475878d0 -82.41959732009526d0)) > (#C(14.524132780009195d0 13.623056881927784d0) > #C(8.162549447647276d0 -17.646876142768303d0) > #C(30.077203701928514d0 0.2540953738508839d0) > #C(17.647981237878366d0 37.71203353528246d0) > #C(18.701212535923368d0 -11.050195936325649d0) > #C(12.397249781302968d0 20.38427696089352d0) > #C(-25.833655082529923d0 -27.330242508986725d0) > #C(26.365166490401087d0 -21.565964614143944d0) > #C(-14.308552486380588d0 27.818702490537817d0) > #C(2.0150536946410513d0 26.16268618313825d0) > #C(-19.79531209736659d0 12.05620462600083d0) > #C(2.110572659546233d0 -45.22575477491056d0)) > (#C(0.0651105983111071d0 -23.710363391609654d0) > #C(-22.54571334271586d0 9.323112614311775d0) > #C(-26.293748098137357d0 -23.050562194377093d0) > #C(12.879277677458898d0 -42.35732811755458d0) > #C(-27.412292497883474d0 -7.566090072116373d0) > #C(8.040680593753182d0 -30.218955273331108d0) > #C(-8.108149525641632d0 42.315940713948144d0) > #C(-40.292048586659824d0 -6.602323067650219d0) > #C(36.32827704015976d0 -11.373662562965567d0) > #C(21.154695998857356d0 -22.210894957756725d0) > #C(31.463700139670895d0 6.2617850436389775d0) > #C(-37.32755015969687d0 37.360753778609116d0)) > (#C(-16.91179530575683d0 -13.008493803188003d0) > #C(-6.968026851858035d0 21.488433108679153d0) > #C(-30.826505908982092d0 4.485456598300678d0) > #C(-20.993508308743603d0 -36.24100328984831d0) > #C(-20.008508689317843d0 13.771498325700833d0) > #C(-15.685808087510008d0 -21.88534139265269d0) > #C(27.107519921770358d0 29.88797514744888d0) > #C(-26.900239086637256d0 24.709479616081907d0) > #C(11.96994160937588d0 -30.335577530236996d0) > #C(-3.3644542113168363d0 -26.1492617215737d0) > #C(19.593702948275048d0 -17.065044596768264d0) > #C(4.464246033554232d0 44.61211152606719d0)) > (#C(16.47922658060789d0 8.24196700348842d0) > #C(1.3754235929483114d0 -18.613441814569445d0) > #C(23.725735872666633d0 -12.876744934550725d0) > #C(25.36179610835923d0 22.907335071565534d0) > #C(14.56291841018876d0 -16.203429150505098d0) > #C(21.10073018461531d0 14.356477437760248d0) > #C(-29.71488963881536d0 -17.882543988249335d0) > #C(16.67127181943891d0 -27.158599342495123d0) > #C(0.3940785344197666d0 26.8237954228201d0) > #C(10.228848885594678d0 15.715734596458146d0) > #C(-8.934605227989202d0 22.34120219908364d0) > #C(-20.867288996391366d0 -34.46935429399547d0)) > (#C(0.9788014372851368d0 20.84384942284433d0) > #C(18.598443947527834d0 -9.235201957055825d0) > #C(26.69600440491243d0 18.79160670193516d0) > #C(-10.066756674313016d0 41.16492957735946d0) > #C(25.12806586113738d0 5.121219763817638d0) > #C(-4.19985853120954d0 30.197316782935985d0) > #C(0.9072159512787294d0 -40.22961495672622d0) > #C(38.18217673578897d0 0.5003747179633216d0) > #C(-30.60446070483478d0 16.293461515097984d0) > #C(-13.312872998161406d0 23.787379750352258d0) > #C(-29.479555453100197d0 -0.9456730418070203d0) > #C(31.227778481365895d0 -44.833933568777795d0)) > (#C(-23.47860866218026d0 13.792086215181875d0) > #C(20.01941267132026d0 15.79863350021831d0) > #C(-6.670337370580076d0 38.02130503284532d0) > #C(-50.71184912823191d0 9.792790657424263d0) > #C(8.41857575074038d0 30.316773929932683d0) > #C(-33.23583117333454d0 11.35402986810276d0) > #C(46.71691624566056d0 -20.217619297132277d0) > #C(18.20298348863441d0 43.2865782681384d0) > #C(-31.171739838938116d0 -25.152654385434552d0) > #C(-31.680290356509225d0 -3.663362797878526d0) > #C(-15.83197406158224d0 -31.6580180713909d0) > #C(61.501443382237966d0 10.840201382404173d0)) > (#C(0.10047329643357417d0 25.8016485914385d0) > #C(22.091811976455908d0 -10.069236564553844d0) > #C(25.331954761713327d0 20.787279328235055d0) > #C(-14.435733505689447d0 41.215958353750295d0) > #C(28.38112920713415d0 6.689665233886117d0) > #C(-4.251584627070743d0 33.53752766081943d0) > #C(5.7920341378935625d0 -48.299548705243154d0) > #C(42.46860621307887d0 5.032798142080736d0) > #C(-32.60600083456306d0 15.436528841084893d0) > #C(-17.578806483935438d0 22.815395868826627d0) > #C(-32.06377188415438d0 1.5923631713183966d0) > #C(31.766640420121046d0 -40.57704191322392d0)) > (#C(7.769961653339088d0 29.209317949727545d0) > #C(22.458971295648222d0 -16.80047439449538d0) > #C(38.227408067502175d0 18.687074245116026d0) > #C(-3.9902229830964386d0 55.803459409155685d0) > #C(34.78588187350524d0 0.17391737634724413d0) > #C(1.6867184272369964d0 40.20038466639097d0) > #C(-9.683586833715307d0 -56.00758545492581d0) > #C(51.36351375237134d0 -7.804157054345702d0) > #C(-36.88092483619934d0 28.26456964992201d0) > #C(-13.888915651885302d0 34.68460504535169d0) > #C(-38.17269242485322d0 7.286643599618525d0) > #C(31.764450524807547d0 -61.19285148585033d0)) > (#C(-18.667478607484018d0 -3.852051487669408d0) > #C(4.884199744126256d0 19.133474005211433d0) > #C(-21.530424245593412d0 18.908313525250563d0) > #C(-33.58659480205376d0 -19.75641483406408d0) > #C(-9.233499477585292d0 21.65329344725752d0) > #C(-27.11186732801051d0 -10.175297378866095d0) > #C(40.35974717017079d0 12.028666745791844d0) > #C(-10.07371796032676d0 35.45643878650669d0) > #C(-7.237185575554468d0 -31.176014268043094d0) > #C(-15.62176723167416d0 -19.82076914463089d0) > #C(4.492456416518198d0 -25.931864743064903d0) > #C(32.65654448126914d0 34.51540062289765d0)) > (#C(-19.877996171119793d0 6.847862647881454d0) > #C(13.233733156786268d0 15.932431869561295d0) > #C(-10.964251073924203d0 27.861189699625456d0) > #C(-38.65106835635165d0 -0.5187448541567896d0) > #C(0.8184733409339309d0 24.014275118417178d0) > #C(-27.27870048671639d0 3.3322287211073434d0) > #C(38.504884249497955d0 -7.31881491123686d0) > #C(6.106354948159545d0 34.72383859650756d0) > #C(-20.413222616825006d0 -24.667780600193705d0) > #C(-23.873743233396727d0 -8.402523925386616d0) > #C(-5.709332906134597d0 -26.093520952468463d0) > #C(39.380218669744636d0 20.673653784037484d0)) > (#C(-25.23645103340055d0 6.1446705059922575d0) > #C(15.85673396649326d0 21.613152295321548d0) > #C(-16.147582310414638d0 36.36788219506637d0) > #C(-50.99741685818256d0 -3.009798144845014d0) > #C(-1.1263291890398954d0 30.17523216125455d0) > #C(-37.2239742638276d0 1.4956094327135645d0) > #C(50.03803191175425d0 -5.771458825865462d0) > #C(5.500086455284813d0 45.008868526957144d0) > #C(-25.69655042386285d0 -33.9216721547608d0) > #C(-31.220684402858566d0 -11.718140444633868d0) > #C(-4.890160178613581d0 -35.749666887487535d0) > #C(55.52318825017169d0 26.369555926129536d0)) > (#C(-14.134077416083283d0 -25.03022942419842d0) > #C(-16.866994820068527d0 23.919695560000065d0) > #C(-44.55174180872987d0 -4.319630683859716d0) > #C(-13.174102590869953d0 -56.7352049924371d0) > #C(-32.78194045331086d0 10.293761106155355d0) > #C(-14.619512177542179d0 -39.01908531360173d0) > #C(25.42253160382149d0 50.98119574501915d0) > #C(-46.17726333913453d0 21.5895970412013d0) > #C(28.58906697080551d0 -39.261600517399835d0) > #C(2.094859912198201d0 -39.14175232281485d0) > #C(36.603640061148106d0 -17.197454090724108d0) > #C(-7.838304916664162d0 71.64644127992904d0)) > (#C(-19.22168864215866d0 -39.517803248804455d0) > #C(-29.110304421545642d0 33.09183319449663d0) > #C(-63.27268046854961d0 -14.260692311883252d0) > #C(-12.858484418826d0 -84.1291544452629d0) > #C(-49.46083558656674d0 8.438334760463086d0) > #C(-13.212397612119139d0 -60.04737440711269d0) > #C(24.68734248181108d0 79.92787709704048d0) > #C(-72.38374518662705d0 22.12282515511019d0) > #C(48.09939930448076d0 -51.84229437974023d0) > #C(12.199067944583817d0 -54.93317293527209d0) > #C(57.96716377035359d0 -16.987601358624556d0) > #C(-28.79276594522159d0 98.54388123546055d0)) > (#C(18.188382636032504d0 -10.16925174080693d0) > #C(-15.921462821588149d0 -14.692572738578647d0) > #C(7.196925633904898d0 -33.13499324488163d0) > #C(42.960253774612305d0 -8.149906939997694d0) > #C(-5.743822390395862d0 -25.175047491851142d0) > #C(30.7116089616699... [truncated message content] |
|
From: Tunc S. <si...@ee...> - 2001-10-25 23:42:35
|
(sending again because message was too big) Tunc Simsek wrote: > > I just installed the latest cvs'ed matlisp on solaris. > The install went find for CMUCL. I saw earlier that > you mentioned a package problem with SAVE-MATLISP. > I did not get this; the saved image loads in a package > called MATLISP-USER that is using the MATLISP package; > I think that is ok. > > The script below, however, does reproduce the error with CMUCL. > > > I also installed using Allegro. The install did not work > because the f77-mangling.lisp and ffi-acl.lisp are not compatible. > However, replacing all "_" with "" in f77-mangling is a sufficient > hack to install using Allegro. SAVE-MATLISP also works for Allegro. > > The script below, again, does reproduce the error with Allegro. > > MATLISP-USER(1): :ld test > ; Loading /home/eclair3/varaiya/simsek/tmp/mk/test.lisp > ** On entry to ZGEEV parameter number 10 had an illegal value > ** On entry to ZGEEV parameter number 12 had an illegal value > > Regards, > Tunc > > "Michael A. Koerber" wrote: > > > > The command (EIG A) seems to be okay, but not (EIG A T). This > > results in ZGEEV complaints as well as inconsistant error reports > > for succesive calls. A script demonstrating this follows... > > > > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; > > ;; Demo a ZGEEV bug in MATLISP with > > ;; > > ;; CMU Common Lisp 18c, running on koerber.llan.ll.mit.edu > > ;; Send questions and bug reports to your local CMU CL maintainer, > > ;; or to cmu...@co.... and cmu...@co.... respectively. > > ;; Loaded subsystems: > > ;; Python 1.0, target Intel x86 > > ;; CLOS based on PCL version: September 16 92 PCL (f) > > ;; MATLISP/Pre 2.0 > > > > (use-package :m) > > > > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; > > ;; Okay read in a test array from the data set (see bottom of file) > > (with-open-file (in "tmp-ar.out" :direction :input) > > (defparameter tst-array (read in))) > > > > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; > > ;;; BEGIN THE DEMO > > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; > > ;; This first block runs through the computational process with no > > ;; errors. It is missing the MULTIPLE-VALUE-BIND blocks > > > > (setf tst-matrix (make-complex-matrix tst-array) > > tst-a (m* (ctranspose tst-matrix) tst-matrix)) > > > > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; > > ;; Finally note the error > > (eig tst-a t) > > > > ;; ** On entry to ZGEEV parameter number 10 had an illegal value > > ;; ** On entry to ZGEEV parameter number 12 had an illegal value > > > > ;;; Running this interactive will yeild different results... > > > > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; > > ;;; THE DATA FILE...save this as "tmp-ar.out" > > #2A((#C(16.005199412100566d0 47.07791625264504d0) > > #C(29.826457010016536d0 -35.54662313696197d0) > > #C(37.91375316204245d0 -19.17281260883403d0) > > #C(34. [snip] |
|
From: Tunc S. <si...@ee...> - 2001-10-26 21:09:35
|
FYI: after the recent (yesterdays) batch of fixes (thanks!) I did a cvs update and now both Allegro and CMU on Solaris work fine w.r.t: i) installation ii) Michael's ZGEEV bug Regards, Tunc Tunc Simsek wrote: > > I just installed the latest cvs'ed matlisp on solaris. > The install went find for CMUCL. I saw earlier that > you mentioned a package problem with SAVE-MATLISP. > I did not get this; the saved image loads in a package > called MATLISP-USER that is using the MATLISP package; > I think that is ok. > > The script below, however, does reproduce the error with CMUCL. > > > I also installed using Allegro. The install did not work > because the f77-mangling.lisp and ffi-acl.lisp are not compatible. > However, replacing all "_" with "" in f77-mangling is a sufficient > hack to install using Allegro. SAVE-MATLISP also works for Allegro. > > The script below, again, does reproduce the error with Allegro. > > MATLISP-USER(1): :ld test > ; Loading /home/eclair3/varaiya/simsek/tmp/mk/test.lisp > ** On entry to ZGEEV parameter number 10 had an illegal value > ** On entry to ZGEEV parameter number 12 had an illegal value > > Regards, > Tunc > > "Michael A. Koerber" wrote: > > > > The command (EIG A) seems to be okay, but not (EIG A T). This > > results in ZGEEV complaints as well as inconsistant error reports > > for succesive calls. A script demonstrating this follows... > > > > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; > > ;; Demo a ZGEEV bug in MATLISP with > > ;; > > ;; CMU Common Lisp 18c, running on koerber.llan.ll.mit.edu > > ;; Send questions and bug reports to your local CMU CL maintainer, > > ;; or to cmu...@co.... and cmu...@co.... respectively. > > ;; Loaded subsystems: > > ;; Python 1.0, target Intel x86 > > ;; CLOS based on PCL version: September 16 92 PCL (f) > > ;; MATLISP/Pre 2.0 > > > > (use-package :m) > > > > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; > > ;; Okay read in a test array from the data set (see bottom of file) > > (with-open-file (in "tmp-ar.out" :direction :input) > > (defparameter tst-array (read in))) > > > > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; > > ;;; BEGIN THE DEMO > > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; > > ;; This first block runs through the computational process with no > > ;; errors. It is missing the MULTIPLE-VALUE-BIND blocks > > > > (setf tst-matrix (make-complex-matrix tst-array) > > tst-a (m* (ctranspose tst-matrix) tst-matrix)) > > > > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; > > ;; Finally note the error > > (eig tst-a t) > > > > ;; ** On entry to ZGEEV parameter number 10 had an illegal value > > ;; ** On entry to ZGEEV parameter number 12 had an illegal value > > > > ;;; Running this interactive will yeild different results... > > > > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; > > ;;; THE DATA FILE...save this as "tmp-ar.out" > > #2A((#C(16.005199412100566d0 47.07791625264504d0) > > #C(29.826457010016536d0 -35.54662313696197d0) [snip] |
|
From: Michael A. K. <ma...@ll...> - 2001-10-26 14:10:03
|
The error occurs in the determination of LWORK for both DGEEV and ZGEEV.
When determining LWORK, if JOBVR is V, the LDVR must be >= N. This
requires moving the (LET ((XXX ...)) to below the CASE statement for the JOB
type.
Diffs are as follows:
-------------- snip, snip, snip --------------------
diff -e geev.lisp ~/fopen/geev.lisp
386,405c
(let* ((ldvr (if (equal jobvr "V") n 1))
(xxx (allocate-complex-store ldvr)))
(multiple-value-bind (store-a store-w store-vl store-vr work info)
(zgeev jobvl
jobvr
n ; N
xxx ; A
n ; LDA
xxx ; W
xxx ; VL
1 ; LDVL
xxx ; VR
ldvr ; LDVR
work ; WORK
-1 ; LWORK
xxx ; RWORK
0 ) ; INFO
(declare (ignore store-a store-w store-vl store-vr info))
;; The desired size in in work[0], which we convert to an
;; integer.
(ceiling (aref work 0)))))))
.
375,376c
(let ((work (allocate-complex-store 1)))
.
247,266c
(let* ((ldvr (if (equal jobvr "V") n 1))
(xxx (allocate-complex-store ldvr)))
(multiple-value-bind (store-a store-wr store-wi store-vl store-vr
work info)
(dgeev jobvl
jobvr
n ; N
xxx ; A
n ; LDA
xxx ; WR
xxx ; WI
xxx ; VL
1 ; LDVL
xxx ; VR
ldvr ; LDVR
work ; WORK
-1 ; LWORK
0 ) ; INFO
(declare (ignore store-a store-wr store-wi store-vl store-vr))
(assert (zerop info))
(ceiling (realpart (aref work 0))))))))
.
236,237c
(let ((work (allocate-real-store 1)))
.
|
|
From: Raymond T. <to...@rt...> - 2001-10-26 15:25:45
|
>>>>> "Michael" == Michael A Koerber <ma...@ll...> writes:
Michael> The error occurs in the determination of LWORK for both DGEEV and ZGEEV.
Michael> When determining LWORK, if JOBVR is V, the LDVR must be >= N. This
Michael> requires moving the (LET ((XXX ...)) to below the CASE statement for the JOB
Michael> type.
Michael> Diffs are as follows:
Applied. (Please use context (-c) or unified (-u) diffs. They're
better than -e diffs.)
Ray
|
|
From: Michael A. K. <ma...@ll...> - 2001-10-26 15:27:43
|
> Applied. (Please use context (-c) or unified (-u) diffs. They're > better than -e diffs.) Noted... tnx mike |
Thanks for helping keep SourceForge clean.
X