ruby-lapack 1.4.1a → 1.5

Sign up to get free protection for your applications and to get access to all the features.
Files changed (1638) hide show
  1. data/Rakefile +1 -2
  2. data/ext/cbbcsd.c +34 -34
  3. data/ext/cbdsqr.c +20 -20
  4. data/ext/cgbbrd.c +12 -12
  5. data/ext/cgbcon.c +13 -13
  6. data/ext/cgbequ.c +3 -3
  7. data/ext/cgbequb.c +2 -2
  8. data/ext/cgbrfs.c +22 -22
  9. data/ext/cgbrfsx.c +43 -43
  10. data/ext/cgbsv.c +2 -2
  11. data/ext/cgbsvx.c +25 -25
  12. data/ext/cgbsvxx.c +36 -36
  13. data/ext/cgbtf2.c +3 -3
  14. data/ext/cgbtrf.c +3 -3
  15. data/ext/cgbtrs.c +11 -11
  16. data/ext/cgebak.c +11 -11
  17. data/ext/cgebal.c +1 -1
  18. data/ext/cgebd2.c +1 -1
  19. data/ext/cgebrd.c +1 -1
  20. data/ext/cgecon.c +1 -1
  21. data/ext/cgees.c +3 -3
  22. data/ext/cgeesx.c +4 -4
  23. data/ext/cgeev.c +4 -4
  24. data/ext/cgeevx.c +5 -5
  25. data/ext/cgegs.c +2 -2
  26. data/ext/cgegv.c +3 -3
  27. data/ext/cgehd2.c +1 -1
  28. data/ext/cgehrd.c +2 -2
  29. data/ext/cgelqf.c +6 -6
  30. data/ext/cgels.c +2 -2
  31. data/ext/cgelsd.c +9 -9
  32. data/ext/cgelss.c +2 -2
  33. data/ext/cgelsx.c +12 -12
  34. data/ext/cgelsy.c +12 -12
  35. data/ext/cgeql2.c +1 -1
  36. data/ext/cgeqlf.c +1 -1
  37. data/ext/cgeqp3.c +11 -11
  38. data/ext/cgeqpf.c +11 -11
  39. data/ext/cgeqr2.c +1 -1
  40. data/ext/cgeqr2p.c +1 -1
  41. data/ext/cgeqrf.c +1 -1
  42. data/ext/cgeqrfp.c +1 -1
  43. data/ext/cgerfs.c +31 -31
  44. data/ext/cgerfsx.c +25 -25
  45. data/ext/cgerqf.c +6 -6
  46. data/ext/cgesc2.c +13 -13
  47. data/ext/cgesdd.c +3 -3
  48. data/ext/cgesvd.c +4 -4
  49. data/ext/cgesvx.c +32 -32
  50. data/ext/cgesvxx.c +26 -26
  51. data/ext/cgetf2.c +1 -1
  52. data/ext/cgetrf.c +1 -1
  53. data/ext/cgetri.c +10 -10
  54. data/ext/cgetrs.c +10 -10
  55. data/ext/cggbak.c +11 -11
  56. data/ext/cggbal.c +11 -11
  57. data/ext/cgges.c +15 -15
  58. data/ext/cggesx.c +6 -6
  59. data/ext/cggev.c +3 -3
  60. data/ext/cggevx.c +5 -5
  61. data/ext/cgghrd.c +14 -14
  62. data/ext/cggqrf.c +9 -9
  63. data/ext/cggrqf.c +1 -1
  64. data/ext/cggsvd.c +3 -3
  65. data/ext/cggsvp.c +4 -4
  66. data/ext/cgtcon.c +20 -20
  67. data/ext/cgtrfs.c +48 -48
  68. data/ext/cgtsv.c +8 -8
  69. data/ext/cgtsvx.c +55 -55
  70. data/ext/cgttrs.c +19 -19
  71. data/ext/cgtts2.c +20 -20
  72. data/ext/chbev.c +3 -3
  73. data/ext/chbevd.c +9 -9
  74. data/ext/chbevx.c +7 -7
  75. data/ext/chbgst.c +15 -15
  76. data/ext/chbgv.c +15 -15
  77. data/ext/chbgvd.c +20 -20
  78. data/ext/chbgvx.c +9 -9
  79. data/ext/chbtrd.c +13 -13
  80. data/ext/checon.c +12 -12
  81. data/ext/cheequb.c +1 -1
  82. data/ext/cheev.c +2 -2
  83. data/ext/cheevd.c +7 -7
  84. data/ext/cheevr.c +12 -12
  85. data/ext/cheevx.c +7 -7
  86. data/ext/chegs2.c +2 -2
  87. data/ext/chegst.c +2 -2
  88. data/ext/chegv.c +13 -13
  89. data/ext/chegvd.c +18 -18
  90. data/ext/chegvx.c +19 -19
  91. data/ext/cherfs.c +31 -31
  92. data/ext/cherfsx.c +43 -43
  93. data/ext/chesv.c +10 -10
  94. data/ext/chesvx.c +15 -15
  95. data/ext/chesvxx.c +41 -41
  96. data/ext/chetd2.c +1 -1
  97. data/ext/chetf2.c +1 -1
  98. data/ext/chetrd.c +2 -2
  99. data/ext/chetrf.c +2 -2
  100. data/ext/chetri.c +1 -1
  101. data/ext/chetrs.c +10 -10
  102. data/ext/chetrs2.c +10 -10
  103. data/ext/chfrk.c +6 -6
  104. data/ext/chgeqz.c +27 -27
  105. data/ext/chpcon.c +1 -1
  106. data/ext/chpev.c +2 -2
  107. data/ext/chpevd.c +2 -2
  108. data/ext/chpevx.c +7 -7
  109. data/ext/chpgst.c +10 -10
  110. data/ext/chpgv.c +2 -2
  111. data/ext/chpgvd.c +11 -11
  112. data/ext/chpgvx.c +8 -8
  113. data/ext/chprfs.c +10 -10
  114. data/ext/chpsv.c +1 -1
  115. data/ext/chpsvx.c +20 -20
  116. data/ext/chptrd.c +1 -1
  117. data/ext/chptrf.c +1 -1
  118. data/ext/chptri.c +1 -1
  119. data/ext/chptrs.c +1 -1
  120. data/ext/chsein.c +21 -21
  121. data/ext/chseqr.c +4 -4
  122. data/ext/cla_gbamv.c +14 -14
  123. data/ext/cla_gbrcond_c.c +33 -33
  124. data/ext/cla_gbrcond_x.c +32 -32
  125. data/ext/cla_gbrfsx_extended.c +75 -75
  126. data/ext/cla_gbrpvgrw.c +13 -13
  127. data/ext/cla_geamv.c +6 -6
  128. data/ext/cla_gercond_c.c +31 -31
  129. data/ext/cla_gercond_x.c +30 -30
  130. data/ext/cla_gerfsx_extended.c +81 -81
  131. data/ext/cla_heamv.c +12 -12
  132. data/ext/cla_hercond_c.c +31 -31
  133. data/ext/cla_hercond_x.c +30 -30
  134. data/ext/cla_herfsx_extended.c +82 -82
  135. data/ext/cla_herpvgrw.c +14 -14
  136. data/ext/cla_lin_berr.c +14 -14
  137. data/ext/cla_porcond_c.c +23 -23
  138. data/ext/cla_porcond_x.c +22 -22
  139. data/ext/cla_porfsx_extended.c +74 -74
  140. data/ext/cla_porpvgrw.c +2 -2
  141. data/ext/cla_rpvgrw.c +12 -12
  142. data/ext/cla_syamv.c +13 -13
  143. data/ext/cla_syrcond_c.c +31 -31
  144. data/ext/cla_syrcond_x.c +30 -30
  145. data/ext/cla_syrfsx_extended.c +82 -82
  146. data/ext/cla_syrpvgrw.c +14 -14
  147. data/ext/cla_wwaddw.c +11 -11
  148. data/ext/clabrd.c +2 -2
  149. data/ext/clacn2.c +2 -2
  150. data/ext/clacp2.c +1 -1
  151. data/ext/clacpy.c +1 -1
  152. data/ext/clacrm.c +11 -11
  153. data/ext/clacrt.c +12 -12
  154. data/ext/claed7.c +42 -42
  155. data/ext/claed8.c +27 -27
  156. data/ext/claein.c +14 -14
  157. data/ext/clags2.c +5 -5
  158. data/ext/clagtm.c +21 -21
  159. data/ext/clahef.c +1 -1
  160. data/ext/clahqr.c +6 -6
  161. data/ext/clahr2.c +1 -1
  162. data/ext/clahrd.c +1 -1
  163. data/ext/claic1.c +12 -12
  164. data/ext/clals0.c +37 -37
  165. data/ext/clalsa.c +72 -72
  166. data/ext/clalsd.c +4 -4
  167. data/ext/clangb.c +3 -3
  168. data/ext/clange.c +1 -1
  169. data/ext/clangt.c +10 -10
  170. data/ext/clanhb.c +2 -2
  171. data/ext/clanhe.c +1 -1
  172. data/ext/clanhf.c +3 -3
  173. data/ext/clanhp.c +2 -2
  174. data/ext/clanhs.c +1 -1
  175. data/ext/clanht.c +1 -1
  176. data/ext/clansb.c +2 -2
  177. data/ext/clansp.c +2 -2
  178. data/ext/clansy.c +1 -1
  179. data/ext/clantb.c +3 -3
  180. data/ext/clantp.c +2 -2
  181. data/ext/clantr.c +3 -3
  182. data/ext/clapll.c +10 -10
  183. data/ext/clapmr.c +1 -1
  184. data/ext/clapmt.c +11 -11
  185. data/ext/claqgb.c +2 -2
  186. data/ext/claqge.c +10 -10
  187. data/ext/claqhb.c +2 -2
  188. data/ext/claqhe.c +12 -12
  189. data/ext/claqhp.c +2 -2
  190. data/ext/claqp2.c +10 -10
  191. data/ext/claqps.c +20 -20
  192. data/ext/claqr0.c +3 -3
  193. data/ext/claqr1.c +4 -4
  194. data/ext/claqr2.c +18 -18
  195. data/ext/claqr3.c +18 -18
  196. data/ext/claqr4.c +3 -3
  197. data/ext/claqr5.c +21 -21
  198. data/ext/claqsb.c +13 -13
  199. data/ext/claqsp.c +2 -2
  200. data/ext/claqsy.c +12 -12
  201. data/ext/clar1v.c +15 -15
  202. data/ext/clar2v.c +19 -19
  203. data/ext/clarf.c +2 -2
  204. data/ext/clarfb.c +16 -16
  205. data/ext/clarfg.c +1 -1
  206. data/ext/clarfgp.c +1 -1
  207. data/ext/clarft.c +2 -2
  208. data/ext/clarfx.c +3 -3
  209. data/ext/clargv.c +2 -2
  210. data/ext/clarnv.c +1 -1
  211. data/ext/clarrv.c +40 -40
  212. data/ext/clarscl2.c +8 -8
  213. data/ext/clartv.c +20 -20
  214. data/ext/clarz.c +11 -11
  215. data/ext/clarzb.c +14 -14
  216. data/ext/clarzt.c +2 -2
  217. data/ext/clascl.c +4 -4
  218. data/ext/clascl2.c +8 -8
  219. data/ext/claset.c +4 -4
  220. data/ext/clasr.c +2 -2
  221. data/ext/classq.c +2 -2
  222. data/ext/claswp.c +2 -2
  223. data/ext/clasyf.c +1 -1
  224. data/ext/clatbs.c +14 -14
  225. data/ext/clatdf.c +21 -21
  226. data/ext/clatps.c +12 -12
  227. data/ext/clatrd.c +1 -1
  228. data/ext/clatrs.c +15 -15
  229. data/ext/clatrz.c +1 -1
  230. data/ext/clatzm.c +3 -3
  231. data/ext/clauu2.c +1 -1
  232. data/ext/clauum.c +1 -1
  233. data/ext/cpbcon.c +3 -3
  234. data/ext/cpbequ.c +1 -1
  235. data/ext/cpbrfs.c +12 -12
  236. data/ext/cpbstf.c +1 -1
  237. data/ext/cpbsv.c +1 -1
  238. data/ext/cpbsvx.c +23 -23
  239. data/ext/cpbtf2.c +1 -1
  240. data/ext/cpbtrf.c +1 -1
  241. data/ext/cpbtrs.c +1 -1
  242. data/ext/cpftrf.c +2 -2
  243. data/ext/cpftri.c +2 -2
  244. data/ext/cpftrs.c +2 -2
  245. data/ext/cpocon.c +1 -1
  246. data/ext/cporfs.c +23 -23
  247. data/ext/cporfsx.c +22 -22
  248. data/ext/cposv.c +9 -9
  249. data/ext/cposvx.c +12 -12
  250. data/ext/cposvxx.c +20 -20
  251. data/ext/cpotf2.c +1 -1
  252. data/ext/cpotrf.c +1 -1
  253. data/ext/cpotri.c +1 -1
  254. data/ext/cpotrs.c +9 -9
  255. data/ext/cppcon.c +1 -1
  256. data/ext/cppequ.c +1 -1
  257. data/ext/cpprfs.c +20 -20
  258. data/ext/cppsv.c +1 -1
  259. data/ext/cppsvx.c +12 -12
  260. data/ext/cpptrf.c +1 -1
  261. data/ext/cpptri.c +1 -1
  262. data/ext/cpptrs.c +1 -1
  263. data/ext/cpstf2.c +2 -2
  264. data/ext/cpstrf.c +2 -2
  265. data/ext/cptcon.c +1 -1
  266. data/ext/cpteqr.c +10 -10
  267. data/ext/cptrfs.c +12 -12
  268. data/ext/cptsv.c +8 -8
  269. data/ext/cptsvx.c +19 -19
  270. data/ext/cpttrs.c +1 -1
  271. data/ext/cptts2.c +1 -1
  272. data/ext/crot.c +11 -11
  273. data/ext/cspcon.c +1 -1
  274. data/ext/cspmv.c +3 -3
  275. data/ext/cspr.c +11 -11
  276. data/ext/csprfs.c +10 -10
  277. data/ext/cspsv.c +1 -1
  278. data/ext/cspsvx.c +20 -20
  279. data/ext/csptrf.c +1 -1
  280. data/ext/csptri.c +1 -1
  281. data/ext/csptrs.c +1 -1
  282. data/ext/csrscl.c +2 -2
  283. data/ext/cstedc.c +10 -10
  284. data/ext/cstegr.c +18 -18
  285. data/ext/cstein.c +14 -14
  286. data/ext/cstemr.c +22 -22
  287. data/ext/csteqr.c +10 -10
  288. data/ext/csycon.c +12 -12
  289. data/ext/csyconv.c +12 -12
  290. data/ext/csyequb.c +1 -1
  291. data/ext/csymv.c +13 -13
  292. data/ext/csyr.c +4 -4
  293. data/ext/csyrfs.c +31 -31
  294. data/ext/csyrfsx.c +43 -43
  295. data/ext/csysv.c +10 -10
  296. data/ext/csysvx.c +15 -15
  297. data/ext/csysvxx.c +41 -41
  298. data/ext/csyswapr.c +2 -2
  299. data/ext/csytf2.c +1 -1
  300. data/ext/csytrf.c +2 -2
  301. data/ext/csytri.c +1 -1
  302. data/ext/csytri2.c +3 -3
  303. data/ext/csytri2x.c +2 -2
  304. data/ext/csytrs.c +10 -10
  305. data/ext/csytrs2.c +10 -10
  306. data/ext/ctbcon.c +3 -3
  307. data/ext/ctbrfs.c +14 -14
  308. data/ext/ctbtrs.c +2 -2
  309. data/ext/ctfsm.c +5 -5
  310. data/ext/ctftri.c +1 -1
  311. data/ext/ctfttp.c +1 -1
  312. data/ext/ctfttr.c +1 -1
  313. data/ext/ctgevc.c +32 -32
  314. data/ext/ctgex2.c +14 -14
  315. data/ext/ctgexc.c +25 -25
  316. data/ext/ctgsen.c +37 -37
  317. data/ext/ctgsja.c +26 -26
  318. data/ext/ctgsna.c +24 -24
  319. data/ext/ctgsy2.c +22 -22
  320. data/ext/ctgsyl.c +42 -42
  321. data/ext/ctpcon.c +2 -2
  322. data/ext/ctprfs.c +13 -13
  323. data/ext/ctptri.c +1 -1
  324. data/ext/ctptrs.c +3 -3
  325. data/ext/ctpttf.c +1 -1
  326. data/ext/ctpttr.c +1 -1
  327. data/ext/ctrcon.c +3 -3
  328. data/ext/ctrevc.c +12 -12
  329. data/ext/ctrexc.c +1 -1
  330. data/ext/ctrrfs.c +11 -11
  331. data/ext/ctrsen.c +13 -13
  332. data/ext/ctrsna.c +20 -20
  333. data/ext/ctrsyl.c +11 -11
  334. data/ext/ctrti2.c +1 -1
  335. data/ext/ctrtri.c +1 -1
  336. data/ext/ctrtrs.c +10 -10
  337. data/ext/ctrttf.c +1 -1
  338. data/ext/ctrttp.c +1 -1
  339. data/ext/cunbdb.c +15 -15
  340. data/ext/cuncsd.c +27 -27
  341. data/ext/cung2l.c +9 -9
  342. data/ext/cung2r.c +9 -9
  343. data/ext/cungbr.c +1 -1
  344. data/ext/cunghr.c +7 -7
  345. data/ext/cungl2.c +1 -1
  346. data/ext/cunglq.c +9 -9
  347. data/ext/cungql.c +9 -9
  348. data/ext/cungqr.c +9 -9
  349. data/ext/cungr2.c +1 -1
  350. data/ext/cungrq.c +9 -9
  351. data/ext/cungtr.c +6 -6
  352. data/ext/cunm2l.c +12 -12
  353. data/ext/cunm2r.c +12 -12
  354. data/ext/cunmbr.c +3 -3
  355. data/ext/cunmhr.c +12 -12
  356. data/ext/cunml2.c +1 -1
  357. data/ext/cunmlq.c +7 -7
  358. data/ext/cunmql.c +12 -12
  359. data/ext/cunmqr.c +12 -12
  360. data/ext/cunmr2.c +1 -1
  361. data/ext/cunmr3.c +10 -10
  362. data/ext/cunmrq.c +7 -7
  363. data/ext/cunmrz.c +10 -10
  364. data/ext/cunmtr.c +17 -17
  365. data/ext/cupgtr.c +8 -8
  366. data/ext/cupmtr.c +2 -2
  367. data/ext/dbbcsd.c +29 -29
  368. data/ext/dbdsdc.c +6 -6
  369. data/ext/dbdsqr.c +20 -20
  370. data/ext/ddisna.c +1 -1
  371. data/ext/dgbbrd.c +12 -12
  372. data/ext/dgbcon.c +13 -13
  373. data/ext/dgbequ.c +3 -3
  374. data/ext/dgbequb.c +2 -2
  375. data/ext/dgbrfs.c +22 -22
  376. data/ext/dgbrfsx.c +43 -43
  377. data/ext/dgbsv.c +2 -2
  378. data/ext/dgbsvx.c +25 -25
  379. data/ext/dgbsvxx.c +36 -36
  380. data/ext/dgbtf2.c +3 -3
  381. data/ext/dgbtrf.c +3 -3
  382. data/ext/dgbtrs.c +11 -11
  383. data/ext/dgebak.c +11 -11
  384. data/ext/dgebal.c +1 -1
  385. data/ext/dgebd2.c +1 -1
  386. data/ext/dgebrd.c +1 -1
  387. data/ext/dgecon.c +1 -1
  388. data/ext/dgees.c +3 -3
  389. data/ext/dgeesx.c +4 -4
  390. data/ext/dgeev.c +3 -3
  391. data/ext/dgeevx.c +5 -5
  392. data/ext/dgegs.c +2 -2
  393. data/ext/dgegv.c +3 -3
  394. data/ext/dgehd2.c +1 -1
  395. data/ext/dgehrd.c +2 -2
  396. data/ext/dgejsv.c +16 -16
  397. data/ext/dgelqf.c +6 -6
  398. data/ext/dgels.c +2 -2
  399. data/ext/dgelsd.c +7 -7
  400. data/ext/dgelss.c +2 -2
  401. data/ext/dgelsx.c +12 -12
  402. data/ext/dgelsy.c +12 -12
  403. data/ext/dgeql2.c +1 -1
  404. data/ext/dgeqlf.c +1 -1
  405. data/ext/dgeqp3.c +11 -11
  406. data/ext/dgeqpf.c +11 -11
  407. data/ext/dgeqr2.c +1 -1
  408. data/ext/dgeqr2p.c +1 -1
  409. data/ext/dgeqrf.c +1 -1
  410. data/ext/dgeqrfp.c +1 -1
  411. data/ext/dgerfs.c +31 -31
  412. data/ext/dgerfsx.c +25 -25
  413. data/ext/dgerqf.c +6 -6
  414. data/ext/dgesc2.c +13 -13
  415. data/ext/dgesdd.c +3 -3
  416. data/ext/dgesvd.c +4 -4
  417. data/ext/dgesvj.c +15 -15
  418. data/ext/dgesvx.c +32 -32
  419. data/ext/dgesvxx.c +26 -26
  420. data/ext/dgetf2.c +1 -1
  421. data/ext/dgetrf.c +1 -1
  422. data/ext/dgetri.c +10 -10
  423. data/ext/dgetrs.c +10 -10
  424. data/ext/dggbak.c +11 -11
  425. data/ext/dggbal.c +11 -11
  426. data/ext/dgges.c +15 -15
  427. data/ext/dggesx.c +6 -6
  428. data/ext/dggev.c +3 -3
  429. data/ext/dggevx.c +4 -4
  430. data/ext/dgghrd.c +14 -14
  431. data/ext/dggqrf.c +9 -9
  432. data/ext/dggrqf.c +1 -1
  433. data/ext/dggsvd.c +3 -3
  434. data/ext/dggsvp.c +4 -4
  435. data/ext/dgsvj0.c +20 -20
  436. data/ext/dgsvj1.c +26 -26
  437. data/ext/dgtcon.c +20 -20
  438. data/ext/dgtrfs.c +48 -48
  439. data/ext/dgtsv.c +8 -8
  440. data/ext/dgtsvx.c +55 -55
  441. data/ext/dgttrs.c +19 -19
  442. data/ext/dgtts2.c +20 -20
  443. data/ext/dhgeqz.c +27 -27
  444. data/ext/dhsein.c +42 -42
  445. data/ext/dhseqr.c +4 -4
  446. data/ext/dla_gbamv.c +16 -16
  447. data/ext/dla_gbrcond.c +25 -25
  448. data/ext/dla_gbrfsx_extended.c +56 -56
  449. data/ext/dla_gbrpvgrw.c +13 -13
  450. data/ext/dla_geamv.c +4 -4
  451. data/ext/dla_gercond.c +31 -31
  452. data/ext/dla_gerfsx_extended.c +70 -70
  453. data/ext/dla_lin_berr.c +14 -14
  454. data/ext/dla_porcond.c +15 -15
  455. data/ext/dla_porfsx_extended.c +74 -74
  456. data/ext/dla_porpvgrw.c +2 -2
  457. data/ext/dla_rpvgrw.c +12 -12
  458. data/ext/dla_syamv.c +12 -12
  459. data/ext/dla_syrcond.c +31 -31
  460. data/ext/dla_syrfsx_extended.c +82 -82
  461. data/ext/dla_syrpvgrw.c +14 -14
  462. data/ext/dla_wwaddw.c +11 -11
  463. data/ext/dlabad.c +1 -1
  464. data/ext/dlabrd.c +2 -2
  465. data/ext/dlacn2.c +2 -2
  466. data/ext/dlacpy.c +1 -1
  467. data/ext/dlaebz.c +43 -43
  468. data/ext/dlaed0.c +2 -2
  469. data/ext/dlaed1.c +20 -20
  470. data/ext/dlaed2.c +21 -21
  471. data/ext/dlaed3.c +30 -30
  472. data/ext/dlaed4.c +12 -12
  473. data/ext/dlaed5.c +11 -11
  474. data/ext/dlaed6.c +12 -12
  475. data/ext/dlaed7.c +35 -35
  476. data/ext/dlaed8.c +16 -16
  477. data/ext/dlaed9.c +14 -14
  478. data/ext/dlaeda.c +31 -31
  479. data/ext/dlaein.c +13 -13
  480. data/ext/dlaexc.c +14 -14
  481. data/ext/dlag2s.c +2 -2
  482. data/ext/dlags2.c +4 -4
  483. data/ext/dlagtf.c +10 -10
  484. data/ext/dlagtm.c +21 -21
  485. data/ext/dlagts.c +13 -13
  486. data/ext/dlahqr.c +6 -6
  487. data/ext/dlahr2.c +1 -1
  488. data/ext/dlahrd.c +1 -1
  489. data/ext/dlaic1.c +12 -12
  490. data/ext/dlaln2.c +16 -16
  491. data/ext/dlals0.c +37 -37
  492. data/ext/dlalsa.c +72 -72
  493. data/ext/dlalsd.c +4 -4
  494. data/ext/dlamrg.c +1 -1
  495. data/ext/dlaneg.c +1 -1
  496. data/ext/dlangb.c +3 -3
  497. data/ext/dlange.c +1 -1
  498. data/ext/dlangt.c +10 -10
  499. data/ext/dlanhs.c +1 -1
  500. data/ext/dlansb.c +2 -2
  501. data/ext/dlansf.c +3 -3
  502. data/ext/dlansp.c +3 -3
  503. data/ext/dlanst.c +1 -1
  504. data/ext/dlansy.c +2 -2
  505. data/ext/dlantb.c +2 -2
  506. data/ext/dlantp.c +2 -2
  507. data/ext/dlantr.c +3 -3
  508. data/ext/dlapll.c +10 -10
  509. data/ext/dlapmr.c +1 -1
  510. data/ext/dlapmt.c +11 -11
  511. data/ext/dlaqgb.c +2 -2
  512. data/ext/dlaqge.c +10 -10
  513. data/ext/dlaqp2.c +10 -10
  514. data/ext/dlaqps.c +20 -20
  515. data/ext/dlaqr0.c +3 -3
  516. data/ext/dlaqr1.c +2 -2
  517. data/ext/dlaqr2.c +18 -18
  518. data/ext/dlaqr3.c +18 -18
  519. data/ext/dlaqr4.c +3 -3
  520. data/ext/dlaqr5.c +9 -9
  521. data/ext/dlaqsb.c +13 -13
  522. data/ext/dlaqsp.c +2 -2
  523. data/ext/dlaqsy.c +12 -12
  524. data/ext/dlaqtr.c +12 -12
  525. data/ext/dlar1v.c +15 -15
  526. data/ext/dlar2v.c +19 -19
  527. data/ext/dlarf.c +2 -2
  528. data/ext/dlarfb.c +16 -16
  529. data/ext/dlarfg.c +1 -1
  530. data/ext/dlarfgp.c +1 -1
  531. data/ext/dlarft.c +2 -2
  532. data/ext/dlarfx.c +2 -2
  533. data/ext/dlargv.c +2 -2
  534. data/ext/dlarnv.c +1 -1
  535. data/ext/dlarra.c +20 -20
  536. data/ext/dlarrb.c +22 -22
  537. data/ext/dlarrc.c +13 -13
  538. data/ext/dlarrd.c +25 -25
  539. data/ext/dlarre.c +17 -17
  540. data/ext/dlarrf.c +21 -21
  541. data/ext/dlarrj.c +23 -23
  542. data/ext/dlarrk.c +3 -3
  543. data/ext/dlarrv.c +40 -40
  544. data/ext/dlarscl2.c +8 -8
  545. data/ext/dlartv.c +20 -20
  546. data/ext/dlaruv.c +1 -1
  547. data/ext/dlarz.c +11 -11
  548. data/ext/dlarzb.c +14 -14
  549. data/ext/dlarzt.c +2 -2
  550. data/ext/dlascl.c +4 -4
  551. data/ext/dlascl2.c +8 -8
  552. data/ext/dlasd0.c +3 -3
  553. data/ext/dlasd1.c +13 -13
  554. data/ext/dlasd2.c +18 -18
  555. data/ext/dlasd3.c +15 -15
  556. data/ext/dlasd4.c +12 -12
  557. data/ext/dlasd5.c +11 -11
  558. data/ext/dlasd6.c +14 -14
  559. data/ext/dlasd7.c +25 -25
  560. data/ext/dlasd8.c +27 -27
  561. data/ext/dlasda.c +5 -5
  562. data/ext/dlasdq.c +20 -20
  563. data/ext/dlaset.c +3 -3
  564. data/ext/dlasq3.c +8 -8
  565. data/ext/dlasq4.c +5 -5
  566. data/ext/dlasq5.c +3 -3
  567. data/ext/dlasq6.c +1 -1
  568. data/ext/dlasr.c +2 -2
  569. data/ext/dlasrt.c +1 -1
  570. data/ext/dlassq.c +2 -2
  571. data/ext/dlaswp.c +2 -2
  572. data/ext/dlasy2.c +24 -24
  573. data/ext/dlasyf.c +1 -1
  574. data/ext/dlat2s.c +1 -1
  575. data/ext/dlatbs.c +14 -14
  576. data/ext/dlatdf.c +21 -21
  577. data/ext/dlatps.c +12 -12
  578. data/ext/dlatrd.c +1 -1
  579. data/ext/dlatrs.c +15 -15
  580. data/ext/dlatrz.c +1 -1
  581. data/ext/dlatzm.c +2 -2
  582. data/ext/dlauu2.c +1 -1
  583. data/ext/dlauum.c +1 -1
  584. data/ext/dopgtr.c +8 -8
  585. data/ext/dopmtr.c +2 -2
  586. data/ext/dorbdb.c +15 -15
  587. data/ext/dorcsd.c +13 -13
  588. data/ext/dorg2l.c +9 -9
  589. data/ext/dorg2r.c +9 -9
  590. data/ext/dorgbr.c +1 -1
  591. data/ext/dorghr.c +7 -7
  592. data/ext/dorgl2.c +1 -1
  593. data/ext/dorglq.c +9 -9
  594. data/ext/dorgql.c +9 -9
  595. data/ext/dorgqr.c +9 -9
  596. data/ext/dorgr2.c +1 -1
  597. data/ext/dorgrq.c +9 -9
  598. data/ext/dorgtr.c +6 -6
  599. data/ext/dorm2l.c +12 -12
  600. data/ext/dorm2r.c +12 -12
  601. data/ext/dormbr.c +3 -3
  602. data/ext/dormhr.c +12 -12
  603. data/ext/dorml2.c +1 -1
  604. data/ext/dormlq.c +7 -7
  605. data/ext/dormql.c +12 -12
  606. data/ext/dormqr.c +12 -12
  607. data/ext/dormr2.c +1 -1
  608. data/ext/dormr3.c +10 -10
  609. data/ext/dormrq.c +7 -7
  610. data/ext/dormrz.c +10 -10
  611. data/ext/dormtr.c +17 -17
  612. data/ext/dpbcon.c +3 -3
  613. data/ext/dpbequ.c +1 -1
  614. data/ext/dpbrfs.c +12 -12
  615. data/ext/dpbstf.c +1 -1
  616. data/ext/dpbsv.c +1 -1
  617. data/ext/dpbsvx.c +23 -23
  618. data/ext/dpbtf2.c +1 -1
  619. data/ext/dpbtrf.c +1 -1
  620. data/ext/dpbtrs.c +1 -1
  621. data/ext/dpftrf.c +2 -2
  622. data/ext/dpftri.c +2 -2
  623. data/ext/dpftrs.c +2 -2
  624. data/ext/dpocon.c +1 -1
  625. data/ext/dporfs.c +23 -23
  626. data/ext/dporfsx.c +22 -22
  627. data/ext/dposv.c +9 -9
  628. data/ext/dposvx.c +12 -12
  629. data/ext/dposvxx.c +20 -20
  630. data/ext/dpotf2.c +1 -1
  631. data/ext/dpotrf.c +1 -1
  632. data/ext/dpotri.c +1 -1
  633. data/ext/dpotrs.c +9 -9
  634. data/ext/dppcon.c +1 -1
  635. data/ext/dppequ.c +1 -1
  636. data/ext/dpprfs.c +20 -20
  637. data/ext/dppsv.c +1 -1
  638. data/ext/dppsvx.c +12 -12
  639. data/ext/dpptrf.c +1 -1
  640. data/ext/dpptri.c +1 -1
  641. data/ext/dpptrs.c +1 -1
  642. data/ext/dpstf2.c +2 -2
  643. data/ext/dpstrf.c +2 -2
  644. data/ext/dptcon.c +1 -1
  645. data/ext/dpteqr.c +10 -10
  646. data/ext/dptrfs.c +30 -30
  647. data/ext/dptsv.c +8 -8
  648. data/ext/dptsvx.c +19 -19
  649. data/ext/dpttrs.c +8 -8
  650. data/ext/dptts2.c +8 -8
  651. data/ext/drscl.c +2 -2
  652. data/ext/dsbev.c +3 -3
  653. data/ext/dsbevd.c +9 -9
  654. data/ext/dsbevx.c +7 -7
  655. data/ext/dsbgst.c +15 -15
  656. data/ext/dsbgv.c +15 -15
  657. data/ext/dsbgvd.c +20 -20
  658. data/ext/dsbgvx.c +10 -10
  659. data/ext/dsbtrd.c +13 -13
  660. data/ext/dsfrk.c +5 -5
  661. data/ext/dspcon.c +1 -1
  662. data/ext/dspev.c +2 -2
  663. data/ext/dspevd.c +7 -7
  664. data/ext/dspevx.c +7 -7
  665. data/ext/dspgst.c +10 -10
  666. data/ext/dspgv.c +2 -2
  667. data/ext/dspgvd.c +7 -7
  668. data/ext/dspgvx.c +8 -8
  669. data/ext/dsposv.c +10 -10
  670. data/ext/dsprfs.c +10 -10
  671. data/ext/dspsv.c +1 -1
  672. data/ext/dspsvx.c +20 -20
  673. data/ext/dsptrd.c +1 -1
  674. data/ext/dsptrf.c +1 -1
  675. data/ext/dsptri.c +1 -1
  676. data/ext/dsptrs.c +1 -1
  677. data/ext/dstebz.c +5 -5
  678. data/ext/dstedc.c +5 -5
  679. data/ext/dstegr.c +18 -18
  680. data/ext/dstein.c +14 -14
  681. data/ext/dstemr.c +22 -22
  682. data/ext/dsteqr.c +10 -10
  683. data/ext/dstev.c +1 -1
  684. data/ext/dstevd.c +7 -7
  685. data/ext/dstevr.c +16 -16
  686. data/ext/dstevx.c +6 -6
  687. data/ext/dsycon.c +12 -12
  688. data/ext/dsyconv.c +12 -12
  689. data/ext/dsyequb.c +1 -1
  690. data/ext/dsyev.c +2 -2
  691. data/ext/dsyevd.c +1 -1
  692. data/ext/dsyevr.c +6 -6
  693. data/ext/dsyevx.c +7 -7
  694. data/ext/dsygs2.c +2 -2
  695. data/ext/dsygst.c +2 -2
  696. data/ext/dsygv.c +13 -13
  697. data/ext/dsygvd.c +18 -18
  698. data/ext/dsygvx.c +19 -19
  699. data/ext/dsyrfs.c +31 -31
  700. data/ext/dsyrfsx.c +43 -43
  701. data/ext/dsysv.c +10 -10
  702. data/ext/dsysvx.c +15 -15
  703. data/ext/dsysvxx.c +41 -41
  704. data/ext/dsyswapr.c +2 -2
  705. data/ext/dsytd2.c +1 -1
  706. data/ext/dsytf2.c +1 -1
  707. data/ext/dsytrd.c +2 -2
  708. data/ext/dsytrf.c +2 -2
  709. data/ext/dsytri.c +1 -1
  710. data/ext/dsytri2.c +3 -3
  711. data/ext/dsytri2x.c +2 -2
  712. data/ext/dsytrs.c +10 -10
  713. data/ext/dsytrs2.c +10 -10
  714. data/ext/dtbcon.c +3 -3
  715. data/ext/dtbrfs.c +14 -14
  716. data/ext/dtbtrs.c +2 -2
  717. data/ext/dtfsm.c +13 -13
  718. data/ext/dtftri.c +1 -1
  719. data/ext/dtfttp.c +1 -1
  720. data/ext/dtfttr.c +2 -2
  721. data/ext/dtgevc.c +32 -32
  722. data/ext/dtgex2.c +23 -23
  723. data/ext/dtgexc.c +24 -24
  724. data/ext/dtgsen.c +37 -37
  725. data/ext/dtgsja.c +26 -26
  726. data/ext/dtgsna.c +24 -24
  727. data/ext/dtgsy2.c +22 -22
  728. data/ext/dtgsyl.c +42 -42
  729. data/ext/dtpcon.c +2 -2
  730. data/ext/dtprfs.c +13 -13
  731. data/ext/dtptri.c +1 -1
  732. data/ext/dtptrs.c +3 -3
  733. data/ext/dtpttf.c +1 -1
  734. data/ext/dtpttr.c +1 -1
  735. data/ext/dtrcon.c +3 -3
  736. data/ext/dtrevc.c +12 -12
  737. data/ext/dtrexc.c +1 -1
  738. data/ext/dtrrfs.c +11 -11
  739. data/ext/dtrsen.c +13 -13
  740. data/ext/dtrsna.c +20 -20
  741. data/ext/dtrsyl.c +11 -11
  742. data/ext/dtrti2.c +1 -1
  743. data/ext/dtrtri.c +1 -1
  744. data/ext/dtrtrs.c +10 -10
  745. data/ext/dtrttf.c +1 -1
  746. data/ext/dtrttp.c +1 -1
  747. data/ext/dzsum1.c +1 -1
  748. data/ext/icmax1.c +1 -1
  749. data/ext/ieeeck.c +1 -1
  750. data/ext/ilaclc.c +1 -1
  751. data/ext/ilaclr.c +1 -1
  752. data/ext/iladlc.c +1 -1
  753. data/ext/iladlr.c +1 -1
  754. data/ext/ilaenv.c +4 -4
  755. data/ext/ilaslc.c +1 -1
  756. data/ext/ilaslr.c +1 -1
  757. data/ext/ilazlc.c +1 -1
  758. data/ext/ilazlr.c +1 -1
  759. data/ext/iparmq.c +3 -3
  760. data/ext/izmax1.c +1 -1
  761. data/ext/rb_lapack.c +3146 -3146
  762. data/ext/rb_lapack.h +1 -1
  763. data/ext/sbbcsd.c +29 -29
  764. data/ext/sbdsdc.c +10 -10
  765. data/ext/sbdsqr.c +20 -20
  766. data/ext/scsum1.c +1 -1
  767. data/ext/sdisna.c +1 -1
  768. data/ext/sgbbrd.c +12 -12
  769. data/ext/sgbcon.c +13 -13
  770. data/ext/sgbequ.c +3 -3
  771. data/ext/sgbequb.c +2 -2
  772. data/ext/sgbrfs.c +22 -22
  773. data/ext/sgbrfsx.c +43 -43
  774. data/ext/sgbsv.c +2 -2
  775. data/ext/sgbsvx.c +25 -25
  776. data/ext/sgbsvxx.c +36 -36
  777. data/ext/sgbtf2.c +3 -3
  778. data/ext/sgbtrf.c +3 -3
  779. data/ext/sgbtrs.c +11 -11
  780. data/ext/sgebak.c +11 -11
  781. data/ext/sgebal.c +1 -1
  782. data/ext/sgebd2.c +1 -1
  783. data/ext/sgebrd.c +1 -1
  784. data/ext/sgecon.c +1 -1
  785. data/ext/sgees.c +3 -3
  786. data/ext/sgeesx.c +4 -4
  787. data/ext/sgeev.c +3 -3
  788. data/ext/sgeevx.c +5 -5
  789. data/ext/sgegs.c +2 -2
  790. data/ext/sgegv.c +3 -3
  791. data/ext/sgehd2.c +1 -1
  792. data/ext/sgehrd.c +2 -2
  793. data/ext/sgejsv.c +16 -16
  794. data/ext/sgelqf.c +6 -6
  795. data/ext/sgels.c +2 -2
  796. data/ext/sgelsd.c +7 -7
  797. data/ext/sgelss.c +2 -2
  798. data/ext/sgelsx.c +12 -12
  799. data/ext/sgelsy.c +12 -12
  800. data/ext/sgeql2.c +1 -1
  801. data/ext/sgeqlf.c +1 -1
  802. data/ext/sgeqp3.c +11 -11
  803. data/ext/sgeqpf.c +11 -11
  804. data/ext/sgeqr2.c +1 -1
  805. data/ext/sgeqr2p.c +1 -1
  806. data/ext/sgeqrf.c +1 -1
  807. data/ext/sgeqrfp.c +1 -1
  808. data/ext/sgerfs.c +31 -31
  809. data/ext/sgerfsx.c +25 -25
  810. data/ext/sgerqf.c +6 -6
  811. data/ext/sgesc2.c +13 -13
  812. data/ext/sgesdd.c +3 -3
  813. data/ext/sgesvd.c +4 -4
  814. data/ext/sgesvj.c +15 -15
  815. data/ext/sgesvx.c +32 -32
  816. data/ext/sgesvxx.c +26 -26
  817. data/ext/sgetf2.c +1 -1
  818. data/ext/sgetrf.c +1 -1
  819. data/ext/sgetri.c +10 -10
  820. data/ext/sgetrs.c +10 -10
  821. data/ext/sggbak.c +11 -11
  822. data/ext/sggbal.c +11 -11
  823. data/ext/sgges.c +15 -15
  824. data/ext/sggesx.c +6 -6
  825. data/ext/sggev.c +3 -3
  826. data/ext/sggevx.c +4 -4
  827. data/ext/sgghrd.c +14 -14
  828. data/ext/sggqrf.c +9 -9
  829. data/ext/sggrqf.c +1 -1
  830. data/ext/sggsvd.c +3 -3
  831. data/ext/sggsvp.c +4 -4
  832. data/ext/sgsvj0.c +20 -20
  833. data/ext/sgsvj1.c +26 -26
  834. data/ext/sgtcon.c +20 -20
  835. data/ext/sgtrfs.c +48 -48
  836. data/ext/sgtsv.c +8 -8
  837. data/ext/sgtsvx.c +55 -55
  838. data/ext/sgttrs.c +19 -19
  839. data/ext/sgtts2.c +20 -20
  840. data/ext/shgeqz.c +27 -27
  841. data/ext/shsein.c +42 -42
  842. data/ext/shseqr.c +4 -4
  843. data/ext/sla_gbamv.c +16 -16
  844. data/ext/sla_gbrcond.c +25 -25
  845. data/ext/sla_gbrfsx_extended.c +66 -66
  846. data/ext/sla_gbrpvgrw.c +13 -13
  847. data/ext/sla_geamv.c +4 -4
  848. data/ext/sla_gercond.c +31 -31
  849. data/ext/sla_gerfsx_extended.c +82 -82
  850. data/ext/sla_lin_berr.c +14 -14
  851. data/ext/sla_porcond.c +15 -15
  852. data/ext/sla_porfsx_extended.c +74 -74
  853. data/ext/sla_porpvgrw.c +2 -2
  854. data/ext/sla_rpvgrw.c +12 -12
  855. data/ext/sla_syamv.c +12 -12
  856. data/ext/sla_syrcond.c +31 -31
  857. data/ext/sla_syrfsx_extended.c +82 -82
  858. data/ext/sla_syrpvgrw.c +14 -14
  859. data/ext/sla_wwaddw.c +11 -11
  860. data/ext/slabad.c +1 -1
  861. data/ext/slabrd.c +2 -2
  862. data/ext/slacn2.c +2 -2
  863. data/ext/slacpy.c +1 -1
  864. data/ext/slaebz.c +43 -43
  865. data/ext/slaed0.c +2 -2
  866. data/ext/slaed1.c +20 -20
  867. data/ext/slaed2.c +21 -21
  868. data/ext/slaed3.c +30 -30
  869. data/ext/slaed4.c +12 -12
  870. data/ext/slaed5.c +11 -11
  871. data/ext/slaed6.c +12 -12
  872. data/ext/slaed7.c +35 -35
  873. data/ext/slaed8.c +16 -16
  874. data/ext/slaed9.c +14 -14
  875. data/ext/slaeda.c +31 -31
  876. data/ext/slaein.c +13 -13
  877. data/ext/slaexc.c +14 -14
  878. data/ext/slags2.c +4 -4
  879. data/ext/slagtf.c +10 -10
  880. data/ext/slagtm.c +21 -21
  881. data/ext/slagts.c +13 -13
  882. data/ext/slahqr.c +6 -6
  883. data/ext/slahr2.c +1 -1
  884. data/ext/slahrd.c +3 -3
  885. data/ext/slaic1.c +12 -12
  886. data/ext/slaln2.c +16 -16
  887. data/ext/slals0.c +37 -37
  888. data/ext/slalsa.c +72 -72
  889. data/ext/slalsd.c +4 -4
  890. data/ext/slamrg.c +2 -2
  891. data/ext/slaneg.c +1 -1
  892. data/ext/slangb.c +3 -3
  893. data/ext/slange.c +1 -1
  894. data/ext/slangt.c +10 -10
  895. data/ext/slanhs.c +1 -1
  896. data/ext/slansb.c +2 -2
  897. data/ext/slansf.c +3 -3
  898. data/ext/slansp.c +3 -3
  899. data/ext/slanst.c +1 -1
  900. data/ext/slansy.c +2 -2
  901. data/ext/slantb.c +2 -2
  902. data/ext/slantp.c +2 -2
  903. data/ext/slantr.c +3 -3
  904. data/ext/slapll.c +10 -10
  905. data/ext/slapmr.c +1 -1
  906. data/ext/slapmt.c +11 -11
  907. data/ext/slaqgb.c +2 -2
  908. data/ext/slaqge.c +10 -10
  909. data/ext/slaqp2.c +10 -10
  910. data/ext/slaqps.c +20 -20
  911. data/ext/slaqr0.c +3 -3
  912. data/ext/slaqr1.c +2 -2
  913. data/ext/slaqr2.c +18 -18
  914. data/ext/slaqr3.c +18 -18
  915. data/ext/slaqr4.c +3 -3
  916. data/ext/slaqr5.c +9 -9
  917. data/ext/slaqsb.c +13 -13
  918. data/ext/slaqsp.c +2 -2
  919. data/ext/slaqsy.c +12 -12
  920. data/ext/slaqtr.c +12 -12
  921. data/ext/slar1v.c +15 -15
  922. data/ext/slar2v.c +19 -19
  923. data/ext/slarf.c +2 -2
  924. data/ext/slarfb.c +16 -16
  925. data/ext/slarfg.c +1 -1
  926. data/ext/slarfgp.c +1 -1
  927. data/ext/slarft.c +2 -2
  928. data/ext/slarfx.c +2 -2
  929. data/ext/slargv.c +2 -2
  930. data/ext/slarnv.c +1 -1
  931. data/ext/slarra.c +20 -20
  932. data/ext/slarrb.c +22 -22
  933. data/ext/slarrc.c +13 -13
  934. data/ext/slarrd.c +25 -25
  935. data/ext/slarre.c +17 -17
  936. data/ext/slarrf.c +21 -21
  937. data/ext/slarrj.c +23 -23
  938. data/ext/slarrk.c +3 -3
  939. data/ext/slarrv.c +40 -40
  940. data/ext/slarscl2.c +8 -8
  941. data/ext/slartv.c +20 -20
  942. data/ext/slaruv.c +1 -1
  943. data/ext/slarz.c +11 -11
  944. data/ext/slarzb.c +14 -14
  945. data/ext/slarzt.c +2 -2
  946. data/ext/slascl.c +4 -4
  947. data/ext/slascl2.c +8 -8
  948. data/ext/slasd0.c +3 -3
  949. data/ext/slasd1.c +12 -12
  950. data/ext/slasd2.c +18 -18
  951. data/ext/slasd3.c +15 -15
  952. data/ext/slasd4.c +12 -12
  953. data/ext/slasd5.c +11 -11
  954. data/ext/slasd6.c +14 -14
  955. data/ext/slasd7.c +25 -25
  956. data/ext/slasd8.c +27 -27
  957. data/ext/slasda.c +5 -5
  958. data/ext/slasdq.c +20 -20
  959. data/ext/slaset.c +3 -3
  960. data/ext/slasq3.c +8 -8
  961. data/ext/slasq4.c +5 -5
  962. data/ext/slasq5.c +3 -3
  963. data/ext/slasq6.c +1 -1
  964. data/ext/slasr.c +2 -2
  965. data/ext/slasrt.c +1 -1
  966. data/ext/slassq.c +2 -2
  967. data/ext/slaswp.c +2 -2
  968. data/ext/slasy2.c +24 -24
  969. data/ext/slasyf.c +1 -1
  970. data/ext/slatbs.c +14 -14
  971. data/ext/slatdf.c +21 -21
  972. data/ext/slatps.c +12 -12
  973. data/ext/slatrd.c +1 -1
  974. data/ext/slatrs.c +15 -15
  975. data/ext/slatrz.c +1 -1
  976. data/ext/slatzm.c +2 -2
  977. data/ext/slauu2.c +1 -1
  978. data/ext/slauum.c +1 -1
  979. data/ext/sopgtr.c +8 -8
  980. data/ext/sopmtr.c +2 -2
  981. data/ext/sorbdb.c +15 -15
  982. data/ext/sorcsd.c +13 -13
  983. data/ext/sorg2l.c +9 -9
  984. data/ext/sorg2r.c +9 -9
  985. data/ext/sorgbr.c +1 -1
  986. data/ext/sorghr.c +7 -7
  987. data/ext/sorgl2.c +1 -1
  988. data/ext/sorglq.c +9 -9
  989. data/ext/sorgql.c +9 -9
  990. data/ext/sorgqr.c +9 -9
  991. data/ext/sorgr2.c +1 -1
  992. data/ext/sorgrq.c +9 -9
  993. data/ext/sorgtr.c +6 -6
  994. data/ext/sorm2l.c +12 -12
  995. data/ext/sorm2r.c +12 -12
  996. data/ext/sormbr.c +3 -3
  997. data/ext/sormhr.c +12 -12
  998. data/ext/sorml2.c +1 -1
  999. data/ext/sormlq.c +7 -7
  1000. data/ext/sormql.c +12 -12
  1001. data/ext/sormqr.c +12 -12
  1002. data/ext/sormr2.c +1 -1
  1003. data/ext/sormr3.c +10 -10
  1004. data/ext/sormrq.c +7 -7
  1005. data/ext/sormrz.c +10 -10
  1006. data/ext/sormtr.c +17 -17
  1007. data/ext/spbcon.c +3 -3
  1008. data/ext/spbequ.c +1 -1
  1009. data/ext/spbrfs.c +12 -12
  1010. data/ext/spbstf.c +1 -1
  1011. data/ext/spbsv.c +1 -1
  1012. data/ext/spbsvx.c +23 -23
  1013. data/ext/spbtf2.c +1 -1
  1014. data/ext/spbtrf.c +1 -1
  1015. data/ext/spbtrs.c +1 -1
  1016. data/ext/spftrf.c +2 -2
  1017. data/ext/spftri.c +2 -2
  1018. data/ext/spftrs.c +2 -2
  1019. data/ext/spocon.c +1 -1
  1020. data/ext/sporfs.c +23 -23
  1021. data/ext/sporfsx.c +22 -22
  1022. data/ext/sposv.c +9 -9
  1023. data/ext/sposvx.c +12 -12
  1024. data/ext/sposvxx.c +20 -20
  1025. data/ext/spotf2.c +1 -1
  1026. data/ext/spotrf.c +1 -1
  1027. data/ext/spotri.c +1 -1
  1028. data/ext/spotrs.c +9 -9
  1029. data/ext/sppcon.c +1 -1
  1030. data/ext/sppequ.c +1 -1
  1031. data/ext/spprfs.c +20 -20
  1032. data/ext/sppsv.c +1 -1
  1033. data/ext/sppsvx.c +12 -12
  1034. data/ext/spptrf.c +1 -1
  1035. data/ext/spptri.c +1 -1
  1036. data/ext/spptrs.c +1 -1
  1037. data/ext/spstf2.c +2 -2
  1038. data/ext/spstrf.c +2 -2
  1039. data/ext/sptcon.c +1 -1
  1040. data/ext/spteqr.c +10 -10
  1041. data/ext/sptrfs.c +30 -30
  1042. data/ext/sptsv.c +8 -8
  1043. data/ext/sptsvx.c +19 -19
  1044. data/ext/spttrs.c +8 -8
  1045. data/ext/sptts2.c +8 -8
  1046. data/ext/srscl.c +2 -2
  1047. data/ext/ssbev.c +3 -3
  1048. data/ext/ssbevd.c +9 -9
  1049. data/ext/ssbevx.c +7 -7
  1050. data/ext/ssbgst.c +15 -15
  1051. data/ext/ssbgv.c +15 -15
  1052. data/ext/ssbgvd.c +20 -20
  1053. data/ext/ssbgvx.c +10 -10
  1054. data/ext/ssbtrd.c +13 -13
  1055. data/ext/ssfrk.c +5 -5
  1056. data/ext/sspcon.c +1 -1
  1057. data/ext/sspev.c +2 -2
  1058. data/ext/sspevd.c +7 -7
  1059. data/ext/sspevx.c +7 -7
  1060. data/ext/sspgst.c +10 -10
  1061. data/ext/sspgv.c +2 -2
  1062. data/ext/sspgvd.c +7 -7
  1063. data/ext/sspgvx.c +8 -8
  1064. data/ext/ssprfs.c +10 -10
  1065. data/ext/sspsv.c +1 -1
  1066. data/ext/sspsvx.c +20 -20
  1067. data/ext/ssptrd.c +1 -1
  1068. data/ext/ssptrf.c +1 -1
  1069. data/ext/ssptri.c +1 -1
  1070. data/ext/ssptrs.c +1 -1
  1071. data/ext/sstebz.c +5 -5
  1072. data/ext/sstedc.c +5 -5
  1073. data/ext/sstegr.c +18 -18
  1074. data/ext/sstein.c +14 -14
  1075. data/ext/sstemr.c +22 -22
  1076. data/ext/ssteqr.c +10 -10
  1077. data/ext/sstev.c +1 -1
  1078. data/ext/sstevd.c +7 -7
  1079. data/ext/sstevr.c +16 -16
  1080. data/ext/sstevx.c +6 -6
  1081. data/ext/ssycon.c +12 -12
  1082. data/ext/ssyconv.c +12 -12
  1083. data/ext/ssyequb.c +1 -1
  1084. data/ext/ssyev.c +2 -2
  1085. data/ext/ssyevd.c +1 -1
  1086. data/ext/ssyevr.c +6 -6
  1087. data/ext/ssyevx.c +7 -7
  1088. data/ext/ssygs2.c +2 -2
  1089. data/ext/ssygst.c +2 -2
  1090. data/ext/ssygv.c +13 -13
  1091. data/ext/ssygvd.c +18 -18
  1092. data/ext/ssygvx.c +22 -22
  1093. data/ext/ssyrfs.c +31 -31
  1094. data/ext/ssyrfsx.c +43 -43
  1095. data/ext/ssysv.c +10 -10
  1096. data/ext/ssysvx.c +15 -15
  1097. data/ext/ssysvxx.c +41 -41
  1098. data/ext/ssyswapr.c +2 -2
  1099. data/ext/ssytd2.c +1 -1
  1100. data/ext/ssytf2.c +1 -1
  1101. data/ext/ssytrd.c +2 -2
  1102. data/ext/ssytrf.c +2 -2
  1103. data/ext/ssytri.c +1 -1
  1104. data/ext/ssytri2.c +11 -11
  1105. data/ext/ssytri2x.c +2 -2
  1106. data/ext/ssytrs.c +10 -10
  1107. data/ext/ssytrs2.c +10 -10
  1108. data/ext/stbcon.c +3 -3
  1109. data/ext/stbrfs.c +14 -14
  1110. data/ext/stbtrs.c +2 -2
  1111. data/ext/stfsm.c +13 -13
  1112. data/ext/stftri.c +1 -1
  1113. data/ext/stfttp.c +1 -1
  1114. data/ext/stfttr.c +1 -1
  1115. data/ext/stgevc.c +32 -32
  1116. data/ext/stgex2.c +16 -16
  1117. data/ext/stgexc.c +26 -26
  1118. data/ext/stgsen.c +37 -37
  1119. data/ext/stgsja.c +26 -26
  1120. data/ext/stgsna.c +24 -24
  1121. data/ext/stgsy2.c +22 -22
  1122. data/ext/stgsyl.c +42 -42
  1123. data/ext/stpcon.c +2 -2
  1124. data/ext/stprfs.c +13 -13
  1125. data/ext/stptri.c +1 -1
  1126. data/ext/stptrs.c +3 -3
  1127. data/ext/stpttf.c +1 -1
  1128. data/ext/stpttr.c +1 -1
  1129. data/ext/strcon.c +3 -3
  1130. data/ext/strevc.c +12 -12
  1131. data/ext/strexc.c +1 -1
  1132. data/ext/strrfs.c +11 -11
  1133. data/ext/strsen.c +13 -13
  1134. data/ext/strsna.c +20 -20
  1135. data/ext/strsyl.c +11 -11
  1136. data/ext/strti2.c +1 -1
  1137. data/ext/strtri.c +1 -1
  1138. data/ext/strtrs.c +10 -10
  1139. data/ext/strttf.c +1 -1
  1140. data/ext/strttp.c +1 -1
  1141. data/ext/xerbla_array.c +1 -1
  1142. data/ext/zbbcsd.c +34 -34
  1143. data/ext/zbdsqr.c +20 -20
  1144. data/ext/zcposv.c +10 -10
  1145. data/ext/zdrscl.c +2 -2
  1146. data/ext/zgbbrd.c +12 -12
  1147. data/ext/zgbcon.c +13 -13
  1148. data/ext/zgbequ.c +3 -3
  1149. data/ext/zgbequb.c +2 -2
  1150. data/ext/zgbrfs.c +22 -22
  1151. data/ext/zgbrfsx.c +43 -43
  1152. data/ext/zgbsv.c +2 -2
  1153. data/ext/zgbsvx.c +25 -25
  1154. data/ext/zgbsvxx.c +36 -36
  1155. data/ext/zgbtf2.c +3 -3
  1156. data/ext/zgbtrf.c +3 -3
  1157. data/ext/zgbtrs.c +11 -11
  1158. data/ext/zgebak.c +11 -11
  1159. data/ext/zgebal.c +1 -1
  1160. data/ext/zgebd2.c +1 -1
  1161. data/ext/zgebrd.c +1 -1
  1162. data/ext/zgecon.c +1 -1
  1163. data/ext/zgees.c +3 -3
  1164. data/ext/zgeesx.c +4 -4
  1165. data/ext/zgeev.c +4 -4
  1166. data/ext/zgeevx.c +5 -5
  1167. data/ext/zgegs.c +2 -2
  1168. data/ext/zgegv.c +3 -3
  1169. data/ext/zgehd2.c +1 -1
  1170. data/ext/zgehrd.c +2 -2
  1171. data/ext/zgelqf.c +6 -6
  1172. data/ext/zgels.c +2 -2
  1173. data/ext/zgelsd.c +9 -9
  1174. data/ext/zgelss.c +2 -2
  1175. data/ext/zgelsx.c +12 -12
  1176. data/ext/zgelsy.c +12 -12
  1177. data/ext/zgeql2.c +1 -1
  1178. data/ext/zgeqlf.c +1 -1
  1179. data/ext/zgeqp3.c +11 -11
  1180. data/ext/zgeqpf.c +11 -11
  1181. data/ext/zgeqr2.c +1 -1
  1182. data/ext/zgeqr2p.c +1 -1
  1183. data/ext/zgeqrf.c +1 -1
  1184. data/ext/zgeqrfp.c +1 -1
  1185. data/ext/zgerfs.c +31 -31
  1186. data/ext/zgerfsx.c +25 -25
  1187. data/ext/zgerqf.c +6 -6
  1188. data/ext/zgesc2.c +13 -13
  1189. data/ext/zgesdd.c +3 -3
  1190. data/ext/zgesvd.c +4 -4
  1191. data/ext/zgesvx.c +32 -32
  1192. data/ext/zgesvxx.c +26 -26
  1193. data/ext/zgetf2.c +1 -1
  1194. data/ext/zgetrf.c +1 -1
  1195. data/ext/zgetri.c +10 -10
  1196. data/ext/zgetrs.c +10 -10
  1197. data/ext/zggbak.c +11 -11
  1198. data/ext/zggbal.c +11 -11
  1199. data/ext/zgges.c +15 -15
  1200. data/ext/zggesx.c +6 -6
  1201. data/ext/zggev.c +3 -3
  1202. data/ext/zggevx.c +5 -5
  1203. data/ext/zgghrd.c +14 -14
  1204. data/ext/zggqrf.c +9 -9
  1205. data/ext/zggrqf.c +1 -1
  1206. data/ext/zggsvd.c +3 -3
  1207. data/ext/zggsvp.c +4 -4
  1208. data/ext/zgtcon.c +20 -20
  1209. data/ext/zgtrfs.c +48 -48
  1210. data/ext/zgtsv.c +8 -8
  1211. data/ext/zgtsvx.c +55 -55
  1212. data/ext/zgttrs.c +19 -19
  1213. data/ext/zgtts2.c +20 -20
  1214. data/ext/zhbev.c +3 -3
  1215. data/ext/zhbevd.c +9 -9
  1216. data/ext/zhbevx.c +7 -7
  1217. data/ext/zhbgst.c +15 -15
  1218. data/ext/zhbgv.c +15 -15
  1219. data/ext/zhbgvd.c +20 -20
  1220. data/ext/zhbgvx.c +9 -9
  1221. data/ext/zhbtrd.c +13 -13
  1222. data/ext/zhecon.c +12 -12
  1223. data/ext/zheequb.c +1 -1
  1224. data/ext/zheev.c +2 -2
  1225. data/ext/zheevd.c +7 -7
  1226. data/ext/zheevr.c +12 -12
  1227. data/ext/zheevx.c +7 -7
  1228. data/ext/zhegs2.c +2 -2
  1229. data/ext/zhegst.c +2 -2
  1230. data/ext/zhegv.c +13 -13
  1231. data/ext/zhegvd.c +18 -18
  1232. data/ext/zhegvx.c +19 -19
  1233. data/ext/zherfs.c +31 -31
  1234. data/ext/zherfsx.c +43 -43
  1235. data/ext/zhesv.c +10 -10
  1236. data/ext/zhesvx.c +15 -15
  1237. data/ext/zhesvxx.c +41 -41
  1238. data/ext/zhetd2.c +1 -1
  1239. data/ext/zhetf2.c +1 -1
  1240. data/ext/zhetrd.c +2 -2
  1241. data/ext/zhetrf.c +2 -2
  1242. data/ext/zhetri.c +1 -1
  1243. data/ext/zhetrs.c +10 -10
  1244. data/ext/zhetrs2.c +10 -10
  1245. data/ext/zhfrk.c +6 -6
  1246. data/ext/zhgeqz.c +27 -27
  1247. data/ext/zhpcon.c +1 -1
  1248. data/ext/zhpev.c +2 -2
  1249. data/ext/zhpevd.c +2 -2
  1250. data/ext/zhpevx.c +7 -7
  1251. data/ext/zhpgst.c +10 -10
  1252. data/ext/zhpgv.c +2 -2
  1253. data/ext/zhpgvd.c +11 -11
  1254. data/ext/zhpgvx.c +8 -8
  1255. data/ext/zhprfs.c +10 -10
  1256. data/ext/zhpsv.c +1 -1
  1257. data/ext/zhpsvx.c +20 -20
  1258. data/ext/zhptrd.c +1 -1
  1259. data/ext/zhptrf.c +1 -1
  1260. data/ext/zhptri.c +1 -1
  1261. data/ext/zhptrs.c +1 -1
  1262. data/ext/zhsein.c +21 -21
  1263. data/ext/zhseqr.c +4 -4
  1264. data/ext/zla_gbamv.c +14 -14
  1265. data/ext/zla_gbrcond_c.c +33 -33
  1266. data/ext/zla_gbrcond_x.c +32 -32
  1267. data/ext/zla_gbrfsx_extended.c +78 -78
  1268. data/ext/zla_gbrpvgrw.c +13 -13
  1269. data/ext/zla_geamv.c +4 -4
  1270. data/ext/zla_gercond_c.c +31 -31
  1271. data/ext/zla_gercond_x.c +30 -30
  1272. data/ext/zla_gerfsx_extended.c +70 -70
  1273. data/ext/zla_heamv.c +12 -12
  1274. data/ext/zla_hercond_c.c +31 -31
  1275. data/ext/zla_hercond_x.c +30 -30
  1276. data/ext/zla_herfsx_extended.c +82 -82
  1277. data/ext/zla_herpvgrw.c +14 -14
  1278. data/ext/zla_lin_berr.c +14 -14
  1279. data/ext/zla_porcond_c.c +23 -23
  1280. data/ext/zla_porcond_x.c +22 -22
  1281. data/ext/zla_porfsx_extended.c +74 -74
  1282. data/ext/zla_porpvgrw.c +2 -2
  1283. data/ext/zla_rpvgrw.c +12 -12
  1284. data/ext/zla_syamv.c +12 -12
  1285. data/ext/zla_syrcond_c.c +31 -31
  1286. data/ext/zla_syrcond_x.c +30 -30
  1287. data/ext/zla_syrfsx_extended.c +82 -82
  1288. data/ext/zla_syrpvgrw.c +14 -14
  1289. data/ext/zla_wwaddw.c +11 -11
  1290. data/ext/zlabrd.c +2 -2
  1291. data/ext/zlacn2.c +2 -2
  1292. data/ext/zlacp2.c +1 -1
  1293. data/ext/zlacpy.c +1 -1
  1294. data/ext/zlacrm.c +11 -11
  1295. data/ext/zlacrt.c +12 -12
  1296. data/ext/zlaed7.c +42 -42
  1297. data/ext/zlaed8.c +27 -27
  1298. data/ext/zlaein.c +14 -14
  1299. data/ext/zlag2c.c +2 -2
  1300. data/ext/zlags2.c +5 -5
  1301. data/ext/zlagtm.c +21 -21
  1302. data/ext/zlahef.c +1 -1
  1303. data/ext/zlahqr.c +6 -6
  1304. data/ext/zlahr2.c +1 -1
  1305. data/ext/zlahrd.c +1 -1
  1306. data/ext/zlaic1.c +12 -12
  1307. data/ext/zlals0.c +37 -37
  1308. data/ext/zlalsa.c +72 -72
  1309. data/ext/zlalsd.c +4 -4
  1310. data/ext/zlangb.c +3 -3
  1311. data/ext/zlange.c +1 -1
  1312. data/ext/zlangt.c +10 -10
  1313. data/ext/zlanhb.c +2 -2
  1314. data/ext/zlanhe.c +2 -2
  1315. data/ext/zlanhf.c +3 -3
  1316. data/ext/zlanhp.c +3 -3
  1317. data/ext/zlanhs.c +1 -1
  1318. data/ext/zlanht.c +1 -1
  1319. data/ext/zlansb.c +2 -2
  1320. data/ext/zlansp.c +3 -3
  1321. data/ext/zlansy.c +2 -2
  1322. data/ext/zlantb.c +2 -2
  1323. data/ext/zlantp.c +2 -2
  1324. data/ext/zlantr.c +3 -3
  1325. data/ext/zlapll.c +10 -10
  1326. data/ext/zlapmr.c +1 -1
  1327. data/ext/zlapmt.c +11 -11
  1328. data/ext/zlaqgb.c +2 -2
  1329. data/ext/zlaqge.c +10 -10
  1330. data/ext/zlaqhb.c +2 -2
  1331. data/ext/zlaqhe.c +12 -12
  1332. data/ext/zlaqhp.c +2 -2
  1333. data/ext/zlaqp2.c +10 -10
  1334. data/ext/zlaqps.c +20 -20
  1335. data/ext/zlaqr0.c +17 -17
  1336. data/ext/zlaqr1.c +4 -4
  1337. data/ext/zlaqr2.c +18 -18
  1338. data/ext/zlaqr3.c +18 -18
  1339. data/ext/zlaqr4.c +7 -7
  1340. data/ext/zlaqr5.c +21 -21
  1341. data/ext/zlaqsb.c +13 -13
  1342. data/ext/zlaqsp.c +2 -2
  1343. data/ext/zlaqsy.c +12 -12
  1344. data/ext/zlar1v.c +15 -15
  1345. data/ext/zlar2v.c +19 -19
  1346. data/ext/zlarf.c +2 -2
  1347. data/ext/zlarfb.c +16 -16
  1348. data/ext/zlarfg.c +1 -1
  1349. data/ext/zlarfgp.c +1 -1
  1350. data/ext/zlarft.c +2 -2
  1351. data/ext/zlarfx.c +3 -3
  1352. data/ext/zlargv.c +2 -2
  1353. data/ext/zlarnv.c +1 -1
  1354. data/ext/zlarrv.c +40 -40
  1355. data/ext/zlarscl2.c +8 -8
  1356. data/ext/zlartv.c +20 -20
  1357. data/ext/zlarz.c +11 -11
  1358. data/ext/zlarzb.c +14 -14
  1359. data/ext/zlarzt.c +2 -2
  1360. data/ext/zlascl.c +4 -4
  1361. data/ext/zlascl2.c +8 -8
  1362. data/ext/zlaset.c +4 -4
  1363. data/ext/zlasr.c +2 -2
  1364. data/ext/zlassq.c +2 -2
  1365. data/ext/zlaswp.c +2 -2
  1366. data/ext/zlasyf.c +1 -1
  1367. data/ext/zlat2c.c +1 -1
  1368. data/ext/zlatbs.c +14 -14
  1369. data/ext/zlatdf.c +21 -21
  1370. data/ext/zlatps.c +12 -12
  1371. data/ext/zlatrd.c +1 -1
  1372. data/ext/zlatrs.c +15 -15
  1373. data/ext/zlatrz.c +1 -1
  1374. data/ext/zlatzm.c +3 -3
  1375. data/ext/zlauu2.c +1 -1
  1376. data/ext/zlauum.c +1 -1
  1377. data/ext/zpbcon.c +3 -3
  1378. data/ext/zpbequ.c +1 -1
  1379. data/ext/zpbrfs.c +12 -12
  1380. data/ext/zpbstf.c +1 -1
  1381. data/ext/zpbsv.c +1 -1
  1382. data/ext/zpbsvx.c +23 -23
  1383. data/ext/zpbtf2.c +1 -1
  1384. data/ext/zpbtrf.c +1 -1
  1385. data/ext/zpbtrs.c +1 -1
  1386. data/ext/zpftrf.c +2 -2
  1387. data/ext/zpftri.c +2 -2
  1388. data/ext/zpftrs.c +2 -2
  1389. data/ext/zpocon.c +1 -1
  1390. data/ext/zporfs.c +23 -23
  1391. data/ext/zporfsx.c +22 -22
  1392. data/ext/zposv.c +9 -9
  1393. data/ext/zposvx.c +12 -12
  1394. data/ext/zposvxx.c +20 -20
  1395. data/ext/zpotf2.c +1 -1
  1396. data/ext/zpotrf.c +1 -1
  1397. data/ext/zpotri.c +1 -1
  1398. data/ext/zpotrs.c +9 -9
  1399. data/ext/zppcon.c +1 -1
  1400. data/ext/zppequ.c +1 -1
  1401. data/ext/zpprfs.c +20 -20
  1402. data/ext/zppsv.c +1 -1
  1403. data/ext/zppsvx.c +12 -12
  1404. data/ext/zpptrf.c +1 -1
  1405. data/ext/zpptri.c +1 -1
  1406. data/ext/zpptrs.c +1 -1
  1407. data/ext/zpstf2.c +2 -2
  1408. data/ext/zpstrf.c +2 -2
  1409. data/ext/zptcon.c +1 -1
  1410. data/ext/zpteqr.c +10 -10
  1411. data/ext/zptrfs.c +12 -12
  1412. data/ext/zptsv.c +1 -1
  1413. data/ext/zptsvx.c +19 -19
  1414. data/ext/zpttrs.c +1 -1
  1415. data/ext/zptts2.c +1 -1
  1416. data/ext/zrot.c +11 -11
  1417. data/ext/zspcon.c +1 -1
  1418. data/ext/zspmv.c +15 -15
  1419. data/ext/zspr.c +11 -11
  1420. data/ext/zsprfs.c +10 -10
  1421. data/ext/zspsv.c +1 -1
  1422. data/ext/zspsvx.c +20 -20
  1423. data/ext/zsptrf.c +1 -1
  1424. data/ext/zsptri.c +1 -1
  1425. data/ext/zsptrs.c +1 -1
  1426. data/ext/zstedc.c +10 -10
  1427. data/ext/zstegr.c +18 -18
  1428. data/ext/zstein.c +14 -14
  1429. data/ext/zstemr.c +22 -22
  1430. data/ext/zsteqr.c +10 -10
  1431. data/ext/zsycon.c +12 -12
  1432. data/ext/zsyconv.c +12 -12
  1433. data/ext/zsyequb.c +1 -1
  1434. data/ext/zsymv.c +13 -13
  1435. data/ext/zsyr.c +4 -4
  1436. data/ext/zsyrfs.c +31 -31
  1437. data/ext/zsyrfsx.c +43 -43
  1438. data/ext/zsysv.c +10 -10
  1439. data/ext/zsysvx.c +15 -15
  1440. data/ext/zsysvxx.c +41 -41
  1441. data/ext/zsyswapr.c +2 -2
  1442. data/ext/zsytf2.c +1 -1
  1443. data/ext/zsytrf.c +2 -2
  1444. data/ext/zsytri.c +1 -1
  1445. data/ext/zsytri2.c +3 -3
  1446. data/ext/zsytri2x.c +2 -2
  1447. data/ext/zsytrs.c +10 -10
  1448. data/ext/zsytrs2.c +10 -10
  1449. data/ext/ztbcon.c +3 -3
  1450. data/ext/ztbrfs.c +14 -14
  1451. data/ext/ztbtrs.c +2 -2
  1452. data/ext/ztfsm.c +5 -5
  1453. data/ext/ztftri.c +1 -1
  1454. data/ext/ztfttp.c +1 -1
  1455. data/ext/ztfttr.c +1 -1
  1456. data/ext/ztgevc.c +32 -32
  1457. data/ext/ztgex2.c +14 -14
  1458. data/ext/ztgexc.c +25 -25
  1459. data/ext/ztgsen.c +37 -37
  1460. data/ext/ztgsja.c +26 -26
  1461. data/ext/ztgsna.c +24 -24
  1462. data/ext/ztgsy2.c +22 -22
  1463. data/ext/ztgsyl.c +42 -42
  1464. data/ext/ztpcon.c +2 -2
  1465. data/ext/ztprfs.c +13 -13
  1466. data/ext/ztptri.c +1 -1
  1467. data/ext/ztptrs.c +3 -3
  1468. data/ext/ztpttf.c +1 -1
  1469. data/ext/ztpttr.c +1 -1
  1470. data/ext/ztrcon.c +3 -3
  1471. data/ext/ztrevc.c +12 -12
  1472. data/ext/ztrexc.c +1 -1
  1473. data/ext/ztrrfs.c +11 -11
  1474. data/ext/ztrsen.c +13 -13
  1475. data/ext/ztrsna.c +20 -20
  1476. data/ext/ztrsyl.c +11 -11
  1477. data/ext/ztrti2.c +1 -1
  1478. data/ext/ztrtri.c +1 -1
  1479. data/ext/ztrtrs.c +10 -10
  1480. data/ext/ztrttf.c +1 -1
  1481. data/ext/ztrttp.c +1 -1
  1482. data/ext/zunbdb.c +15 -15
  1483. data/ext/zuncsd.c +27 -27
  1484. data/ext/zung2l.c +9 -9
  1485. data/ext/zung2r.c +9 -9
  1486. data/ext/zungbr.c +1 -1
  1487. data/ext/zunghr.c +7 -7
  1488. data/ext/zungl2.c +1 -1
  1489. data/ext/zunglq.c +9 -9
  1490. data/ext/zungql.c +9 -9
  1491. data/ext/zungqr.c +9 -9
  1492. data/ext/zungr2.c +1 -1
  1493. data/ext/zungrq.c +9 -9
  1494. data/ext/zungtr.c +6 -6
  1495. data/ext/zunm2l.c +12 -12
  1496. data/ext/zunm2r.c +12 -12
  1497. data/ext/zunmbr.c +3 -3
  1498. data/ext/zunmhr.c +12 -12
  1499. data/ext/zunml2.c +1 -1
  1500. data/ext/zunmlq.c +7 -7
  1501. data/ext/zunmql.c +12 -12
  1502. data/ext/zunmqr.c +12 -12
  1503. data/ext/zunmr2.c +1 -1
  1504. data/ext/zunmr3.c +10 -10
  1505. data/ext/zunmrq.c +7 -7
  1506. data/ext/zunmrz.c +10 -10
  1507. data/ext/zunmtr.c +17 -17
  1508. data/ext/zupgtr.c +8 -8
  1509. data/ext/zupmtr.c +2 -2
  1510. metadata +3183 -3329
  1511. data/doc/bd.html +0 -16
  1512. data/doc/c.html +0 -36
  1513. data/doc/cbd.html +0 -161
  1514. data/doc/cgb.html +0 -1865
  1515. data/doc/cge.html +0 -5261
  1516. data/doc/cgg.html +0 -2027
  1517. data/doc/cgt.html +0 -711
  1518. data/doc/chb.html +0 -1031
  1519. data/doc/che.html +0 -3165
  1520. data/doc/chg.html +0 -201
  1521. data/doc/chp.html +0 -1696
  1522. data/doc/chs.html +0 -386
  1523. data/doc/cpb.html +0 -994
  1524. data/doc/cpo.html +0 -1520
  1525. data/doc/cpp.html +0 -770
  1526. data/doc/cpt.html +0 -706
  1527. data/doc/csp.html +0 -905
  1528. data/doc/cst.html +0 -742
  1529. data/doc/csy.html +0 -2194
  1530. data/doc/ctb.html +0 -284
  1531. data/doc/ctg.html +0 -1544
  1532. data/doc/ctp.html +0 -553
  1533. data/doc/ctr.html +0 -1281
  1534. data/doc/ctz.html +0 -211
  1535. data/doc/cun.html +0 -2553
  1536. data/doc/cup.html +0 -166
  1537. data/doc/d.html +0 -35
  1538. data/doc/dbd.html +0 -304
  1539. data/doc/ddi.html +0 -87
  1540. data/doc/dgb.html +0 -1857
  1541. data/doc/dge.html +0 -7267
  1542. data/doc/dgg.html +0 -2102
  1543. data/doc/dgt.html +0 -713
  1544. data/doc/dhg.html +0 -225
  1545. data/doc/dhs.html +0 -414
  1546. data/doc/di.html +0 -14
  1547. data/doc/dop.html +0 -166
  1548. data/doc/dor.html +0 -2540
  1549. data/doc/dpb.html +0 -992
  1550. data/doc/dpo.html +0 -1517
  1551. data/doc/dpp.html +0 -770
  1552. data/doc/dpt.html +0 -675
  1553. data/doc/dsb.html +0 -995
  1554. data/doc/dsp.html +0 -1777
  1555. data/doc/dst.html +0 -1422
  1556. data/doc/dsy.html +0 -3433
  1557. data/doc/dtb.html +0 -284
  1558. data/doc/dtg.html +0 -1730
  1559. data/doc/dtp.html +0 -532
  1560. data/doc/dtr.html +0 -1346
  1561. data/doc/dtz.html +0 -211
  1562. data/doc/gb.html +0 -16
  1563. data/doc/ge.html +0 -16
  1564. data/doc/gg.html +0 -16
  1565. data/doc/gt.html +0 -16
  1566. data/doc/hb.html +0 -14
  1567. data/doc/he.html +0 -14
  1568. data/doc/hg.html +0 -16
  1569. data/doc/hp.html +0 -14
  1570. data/doc/hs.html +0 -16
  1571. data/doc/index.html +0 -53
  1572. data/doc/op.html +0 -14
  1573. data/doc/or.html +0 -14
  1574. data/doc/others.html +0 -1142
  1575. data/doc/pb.html +0 -16
  1576. data/doc/po.html +0 -16
  1577. data/doc/pp.html +0 -16
  1578. data/doc/pt.html +0 -16
  1579. data/doc/s.html +0 -35
  1580. data/doc/sb.html +0 -14
  1581. data/doc/sbd.html +0 -303
  1582. data/doc/sdi.html +0 -87
  1583. data/doc/sgb.html +0 -1863
  1584. data/doc/sge.html +0 -7263
  1585. data/doc/sgg.html +0 -2102
  1586. data/doc/sgt.html +0 -713
  1587. data/doc/shg.html +0 -225
  1588. data/doc/shs.html +0 -414
  1589. data/doc/sop.html +0 -166
  1590. data/doc/sor.html +0 -2540
  1591. data/doc/sp.html +0 -16
  1592. data/doc/spb.html +0 -992
  1593. data/doc/spo.html +0 -1520
  1594. data/doc/spp.html +0 -770
  1595. data/doc/spt.html +0 -675
  1596. data/doc/ssb.html +0 -995
  1597. data/doc/ssp.html +0 -1647
  1598. data/doc/sst.html +0 -1423
  1599. data/doc/ssy.html +0 -3438
  1600. data/doc/st.html +0 -16
  1601. data/doc/stb.html +0 -284
  1602. data/doc/stg.html +0 -1729
  1603. data/doc/stp.html +0 -532
  1604. data/doc/str.html +0 -1346
  1605. data/doc/stz.html +0 -211
  1606. data/doc/sy.html +0 -16
  1607. data/doc/tb.html +0 -16
  1608. data/doc/tg.html +0 -16
  1609. data/doc/tp.html +0 -16
  1610. data/doc/tr.html +0 -16
  1611. data/doc/tz.html +0 -16
  1612. data/doc/un.html +0 -14
  1613. data/doc/up.html +0 -14
  1614. data/doc/z.html +0 -36
  1615. data/doc/zbd.html +0 -161
  1616. data/doc/zgb.html +0 -1862
  1617. data/doc/zge.html +0 -5258
  1618. data/doc/zgg.html +0 -2027
  1619. data/doc/zgt.html +0 -711
  1620. data/doc/zhb.html +0 -1031
  1621. data/doc/zhe.html +0 -3162
  1622. data/doc/zhg.html +0 -201
  1623. data/doc/zhp.html +0 -1697
  1624. data/doc/zhs.html +0 -386
  1625. data/doc/zpb.html +0 -994
  1626. data/doc/zpo.html +0 -1517
  1627. data/doc/zpp.html +0 -770
  1628. data/doc/zpt.html +0 -706
  1629. data/doc/zsp.html +0 -905
  1630. data/doc/zst.html +0 -743
  1631. data/doc/zsy.html +0 -2191
  1632. data/doc/ztb.html +0 -284
  1633. data/doc/ztg.html +0 -1544
  1634. data/doc/ztp.html +0 -553
  1635. data/doc/ztr.html +0 -1281
  1636. data/doc/ztz.html +0 -211
  1637. data/doc/zun.html +0 -2553
  1638. data/doc/zup.html +0 -166
data/ext/zggbal.c CHANGED
@@ -55,26 +55,26 @@ rblapack_zggbal(int argc, VALUE *argv, VALUE self){
55
55
  } else {
56
56
  }
57
57
 
58
- if (!NA_IsNArray(rblapack_a))
59
- rb_raise(rb_eArgError, "a (2th argument) must be NArray");
60
- if (NA_RANK(rblapack_a) != 2)
61
- rb_raise(rb_eArgError, "rank of a (2th argument) must be %d", 2);
62
- lda = NA_SHAPE0(rblapack_a);
63
- n = NA_SHAPE1(rblapack_a);
64
- if (NA_TYPE(rblapack_a) != NA_DCOMPLEX)
65
- rblapack_a = na_change_type(rblapack_a, NA_DCOMPLEX);
66
- a = NA_PTR_TYPE(rblapack_a, doublecomplex*);
67
58
  job = StringValueCStr(rblapack_job)[0];
68
59
  if (!NA_IsNArray(rblapack_b))
69
60
  rb_raise(rb_eArgError, "b (3th argument) must be NArray");
70
61
  if (NA_RANK(rblapack_b) != 2)
71
62
  rb_raise(rb_eArgError, "rank of b (3th argument) must be %d", 2);
72
63
  ldb = NA_SHAPE0(rblapack_b);
73
- if (NA_SHAPE1(rblapack_b) != n)
74
- rb_raise(rb_eRuntimeError, "shape 1 of b must be the same as shape 1 of a");
64
+ n = NA_SHAPE1(rblapack_b);
75
65
  if (NA_TYPE(rblapack_b) != NA_DCOMPLEX)
76
66
  rblapack_b = na_change_type(rblapack_b, NA_DCOMPLEX);
77
67
  b = NA_PTR_TYPE(rblapack_b, doublecomplex*);
68
+ if (!NA_IsNArray(rblapack_a))
69
+ rb_raise(rb_eArgError, "a (2th argument) must be NArray");
70
+ if (NA_RANK(rblapack_a) != 2)
71
+ rb_raise(rb_eArgError, "rank of a (2th argument) must be %d", 2);
72
+ lda = NA_SHAPE0(rblapack_a);
73
+ if (NA_SHAPE1(rblapack_a) != n)
74
+ rb_raise(rb_eRuntimeError, "shape 1 of a must be the same as shape 1 of b");
75
+ if (NA_TYPE(rblapack_a) != NA_DCOMPLEX)
76
+ rblapack_a = na_change_type(rblapack_a, NA_DCOMPLEX);
77
+ a = NA_PTR_TYPE(rblapack_a, doublecomplex*);
78
78
  {
79
79
  int shape[1];
80
80
  shape[0] = n;
data/ext/zgges.c CHANGED
@@ -89,35 +89,35 @@ rblapack_zgges(int argc, VALUE *argv, VALUE self){
89
89
  rblapack_lwork = Qnil;
90
90
  }
91
91
 
92
- if (!NA_IsNArray(rblapack_a))
93
- rb_raise(rb_eArgError, "a (4th argument) must be NArray");
94
- if (NA_RANK(rblapack_a) != 2)
95
- rb_raise(rb_eArgError, "rank of a (4th argument) must be %d", 2);
96
- lda = NA_SHAPE0(rblapack_a);
97
- n = NA_SHAPE1(rblapack_a);
98
- if (NA_TYPE(rblapack_a) != NA_DCOMPLEX)
99
- rblapack_a = na_change_type(rblapack_a, NA_DCOMPLEX);
100
- a = NA_PTR_TYPE(rblapack_a, doublecomplex*);
101
- jobvsr = StringValueCStr(rblapack_jobvsr)[0];
92
+ jobvsl = StringValueCStr(rblapack_jobvsl)[0];
102
93
  sort = StringValueCStr(rblapack_sort)[0];
103
94
  if (!NA_IsNArray(rblapack_b))
104
95
  rb_raise(rb_eArgError, "b (5th argument) must be NArray");
105
96
  if (NA_RANK(rblapack_b) != 2)
106
97
  rb_raise(rb_eArgError, "rank of b (5th argument) must be %d", 2);
107
98
  ldb = NA_SHAPE0(rblapack_b);
108
- if (NA_SHAPE1(rblapack_b) != n)
109
- rb_raise(rb_eRuntimeError, "shape 1 of b must be the same as shape 1 of a");
99
+ n = NA_SHAPE1(rblapack_b);
110
100
  if (NA_TYPE(rblapack_b) != NA_DCOMPLEX)
111
101
  rblapack_b = na_change_type(rblapack_b, NA_DCOMPLEX);
112
102
  b = NA_PTR_TYPE(rblapack_b, doublecomplex*);
113
- ldvsr = lsame_(&jobvsr,"V") ? n : 1;
103
+ jobvsr = StringValueCStr(rblapack_jobvsr)[0];
104
+ if (!NA_IsNArray(rblapack_a))
105
+ rb_raise(rb_eArgError, "a (4th argument) must be NArray");
106
+ if (NA_RANK(rblapack_a) != 2)
107
+ rb_raise(rb_eArgError, "rank of a (4th argument) must be %d", 2);
108
+ lda = NA_SHAPE0(rblapack_a);
109
+ if (NA_SHAPE1(rblapack_a) != n)
110
+ rb_raise(rb_eRuntimeError, "shape 1 of a must be the same as shape 1 of b");
111
+ if (NA_TYPE(rblapack_a) != NA_DCOMPLEX)
112
+ rblapack_a = na_change_type(rblapack_a, NA_DCOMPLEX);
113
+ a = NA_PTR_TYPE(rblapack_a, doublecomplex*);
114
+ ldvsl = lsame_(&jobvsl,"V") ? n : 1;
114
115
  if (rblapack_lwork == Qnil)
115
116
  lwork = 2*n;
116
117
  else {
117
118
  lwork = NUM2INT(rblapack_lwork);
118
119
  }
119
- jobvsl = StringValueCStr(rblapack_jobvsl)[0];
120
- ldvsl = lsame_(&jobvsl,"V") ? n : 1;
120
+ ldvsr = lsame_(&jobvsr,"V") ? n : 1;
121
121
  {
122
122
  int shape[1];
123
123
  shape[0] = n;
data/ext/zggesx.c CHANGED
@@ -103,6 +103,8 @@ rblapack_zggesx(int argc, VALUE *argv, VALUE self){
103
103
  rblapack_liwork = Qnil;
104
104
  }
105
105
 
106
+ jobvsl = StringValueCStr(rblapack_jobvsl)[0];
107
+ sort = StringValueCStr(rblapack_sort)[0];
106
108
  if (!NA_IsNArray(rblapack_a))
107
109
  rb_raise(rb_eArgError, "a (5th argument) must be NArray");
108
110
  if (NA_RANK(rblapack_a) != 2)
@@ -112,8 +114,7 @@ rblapack_zggesx(int argc, VALUE *argv, VALUE self){
112
114
  if (NA_TYPE(rblapack_a) != NA_DCOMPLEX)
113
115
  rblapack_a = na_change_type(rblapack_a, NA_DCOMPLEX);
114
116
  a = NA_PTR_TYPE(rblapack_a, doublecomplex*);
115
- sense = StringValueCStr(rblapack_sense)[0];
116
- sort = StringValueCStr(rblapack_sort)[0];
117
+ jobvsr = StringValueCStr(rblapack_jobvsr)[0];
117
118
  if (!NA_IsNArray(rblapack_b))
118
119
  rb_raise(rb_eArgError, "b (6th argument) must be NArray");
119
120
  if (NA_RANK(rblapack_b) != 2)
@@ -124,20 +125,19 @@ rblapack_zggesx(int argc, VALUE *argv, VALUE self){
124
125
  if (NA_TYPE(rblapack_b) != NA_DCOMPLEX)
125
126
  rblapack_b = na_change_type(rblapack_b, NA_DCOMPLEX);
126
127
  b = NA_PTR_TYPE(rblapack_b, doublecomplex*);
127
- jobvsr = StringValueCStr(rblapack_jobvsr)[0];
128
- ldvsr = lsame_(&jobvsr,"V") ? n : 1;
128
+ ldvsl = lsame_(&jobvsl,"V") ? n : 1;
129
+ sense = StringValueCStr(rblapack_sense)[0];
129
130
  if (rblapack_liwork == Qnil)
130
131
  liwork = (lsame_(&sense,"N")||n==0) ? 1 : n+2;
131
132
  else {
132
133
  liwork = NUM2INT(rblapack_liwork);
133
134
  }
134
- jobvsl = StringValueCStr(rblapack_jobvsl)[0];
135
- ldvsl = lsame_(&jobvsl,"V") ? n : 1;
136
135
  if (rblapack_lwork == Qnil)
137
136
  lwork = n==0 ? 1 : (lsame_(&sense,"E")||lsame_(&sense,"V")||lsame_(&sense,"B")) ? MAX(2*n,n*n/2) : 2*n;
138
137
  else {
139
138
  lwork = NUM2INT(rblapack_lwork);
140
139
  }
140
+ ldvsr = lsame_(&jobvsr,"V") ? n : 1;
141
141
  {
142
142
  int shape[1];
143
143
  shape[0] = n;
data/ext/zggev.c CHANGED
@@ -68,6 +68,7 @@ rblapack_zggev(int argc, VALUE *argv, VALUE self){
68
68
  rblapack_lwork = Qnil;
69
69
  }
70
70
 
71
+ jobvl = StringValueCStr(rblapack_jobvl)[0];
71
72
  if (!NA_IsNArray(rblapack_a))
72
73
  rb_raise(rb_eArgError, "a (3th argument) must be NArray");
73
74
  if (NA_RANK(rblapack_a) != 2)
@@ -77,6 +78,7 @@ rblapack_zggev(int argc, VALUE *argv, VALUE self){
77
78
  if (NA_TYPE(rblapack_a) != NA_DCOMPLEX)
78
79
  rblapack_a = na_change_type(rblapack_a, NA_DCOMPLEX);
79
80
  a = NA_PTR_TYPE(rblapack_a, doublecomplex*);
81
+ jobvr = StringValueCStr(rblapack_jobvr)[0];
80
82
  if (!NA_IsNArray(rblapack_b))
81
83
  rb_raise(rb_eArgError, "b (4th argument) must be NArray");
82
84
  if (NA_RANK(rblapack_b) != 2)
@@ -87,14 +89,12 @@ rblapack_zggev(int argc, VALUE *argv, VALUE self){
87
89
  if (NA_TYPE(rblapack_b) != NA_DCOMPLEX)
88
90
  rblapack_b = na_change_type(rblapack_b, NA_DCOMPLEX);
89
91
  b = NA_PTR_TYPE(rblapack_b, doublecomplex*);
90
- jobvl = StringValueCStr(rblapack_jobvl)[0];
91
- jobvr = StringValueCStr(rblapack_jobvr)[0];
92
+ ldvr = lsame_(&jobvr,"V") ? n : 1;
92
93
  if (rblapack_lwork == Qnil)
93
94
  lwork = MAX(1,2*n);
94
95
  else {
95
96
  lwork = NUM2INT(rblapack_lwork);
96
97
  }
97
- ldvr = lsame_(&jobvr,"V") ? n : 1;
98
98
  ldvl = lsame_(&jobvl,"V") ? n : 1;
99
99
  {
100
100
  int shape[1];
data/ext/zggevx.c CHANGED
@@ -92,6 +92,8 @@ rblapack_zggevx(int argc, VALUE *argv, VALUE self){
92
92
  rblapack_lwork = Qnil;
93
93
  }
94
94
 
95
+ balanc = StringValueCStr(rblapack_balanc)[0];
96
+ jobvr = StringValueCStr(rblapack_jobvr)[0];
95
97
  if (!NA_IsNArray(rblapack_a))
96
98
  rb_raise(rb_eArgError, "a (5th argument) must be NArray");
97
99
  if (NA_RANK(rblapack_a) != 2)
@@ -101,6 +103,7 @@ rblapack_zggevx(int argc, VALUE *argv, VALUE self){
101
103
  if (NA_TYPE(rblapack_a) != NA_DCOMPLEX)
102
104
  rblapack_a = na_change_type(rblapack_a, NA_DCOMPLEX);
103
105
  a = NA_PTR_TYPE(rblapack_a, doublecomplex*);
106
+ jobvl = StringValueCStr(rblapack_jobvl)[0];
104
107
  if (!NA_IsNArray(rblapack_b))
105
108
  rb_raise(rb_eArgError, "b (6th argument) must be NArray");
106
109
  if (NA_RANK(rblapack_b) != 2)
@@ -111,13 +114,10 @@ rblapack_zggevx(int argc, VALUE *argv, VALUE self){
111
114
  if (NA_TYPE(rblapack_b) != NA_DCOMPLEX)
112
115
  rblapack_b = na_change_type(rblapack_b, NA_DCOMPLEX);
113
116
  b = NA_PTR_TYPE(rblapack_b, doublecomplex*);
117
+ ldvr = lsame_(&jobvr,"V") ? n : 1;
118
+ ldvl = lsame_(&jobvl,"V") ? n : 1;
114
119
  sense = StringValueCStr(rblapack_sense)[0];
115
- jobvl = StringValueCStr(rblapack_jobvl)[0];
116
- balanc = StringValueCStr(rblapack_balanc)[0];
117
- jobvr = StringValueCStr(rblapack_jobvr)[0];
118
120
  lrwork = ((lsame_(&balanc,"S")) || (lsame_(&balanc,"B"))) ? MAX(1,6*n) : MAX(1,2*n);
119
- ldvl = lsame_(&jobvl,"V") ? n : 1;
120
- ldvr = lsame_(&jobvr,"V") ? n : 1;
121
121
  if (rblapack_lwork == Qnil)
122
122
  lwork = lsame_(&sense,"E") ? 4*n : (lsame_(&sense,"V")||lsame_(&sense,"B")) ? 2*n*n+2*n : 2*n;
123
123
  else {
data/ext/zgghrd.c CHANGED
@@ -67,6 +67,8 @@ rblapack_zgghrd(int argc, VALUE *argv, VALUE self){
67
67
  } else {
68
68
  }
69
69
 
70
+ compq = StringValueCStr(rblapack_compq)[0];
71
+ ilo = NUM2INT(rblapack_ilo);
70
72
  if (!NA_IsNArray(rblapack_a))
71
73
  rb_raise(rb_eArgError, "a (5th argument) must be NArray");
72
74
  if (NA_RANK(rblapack_a) != 2)
@@ -76,6 +78,17 @@ rblapack_zgghrd(int argc, VALUE *argv, VALUE self){
76
78
  if (NA_TYPE(rblapack_a) != NA_DCOMPLEX)
77
79
  rblapack_a = na_change_type(rblapack_a, NA_DCOMPLEX);
78
80
  a = NA_PTR_TYPE(rblapack_a, doublecomplex*);
81
+ if (!NA_IsNArray(rblapack_q))
82
+ rb_raise(rb_eArgError, "q (7th argument) must be NArray");
83
+ if (NA_RANK(rblapack_q) != 2)
84
+ rb_raise(rb_eArgError, "rank of q (7th argument) must be %d", 2);
85
+ ldq = NA_SHAPE0(rblapack_q);
86
+ if (NA_SHAPE1(rblapack_q) != n)
87
+ rb_raise(rb_eRuntimeError, "shape 1 of q must be the same as shape 1 of a");
88
+ if (NA_TYPE(rblapack_q) != NA_DCOMPLEX)
89
+ rblapack_q = na_change_type(rblapack_q, NA_DCOMPLEX);
90
+ q = NA_PTR_TYPE(rblapack_q, doublecomplex*);
91
+ compz = StringValueCStr(rblapack_compz)[0];
79
92
  if (!NA_IsNArray(rblapack_b))
80
93
  rb_raise(rb_eArgError, "b (6th argument) must be NArray");
81
94
  if (NA_RANK(rblapack_b) != 2)
@@ -86,6 +99,7 @@ rblapack_zgghrd(int argc, VALUE *argv, VALUE self){
86
99
  if (NA_TYPE(rblapack_b) != NA_DCOMPLEX)
87
100
  rblapack_b = na_change_type(rblapack_b, NA_DCOMPLEX);
88
101
  b = NA_PTR_TYPE(rblapack_b, doublecomplex*);
102
+ ihi = NUM2INT(rblapack_ihi);
89
103
  if (!NA_IsNArray(rblapack_z))
90
104
  rb_raise(rb_eArgError, "z (8th argument) must be NArray");
91
105
  if (NA_RANK(rblapack_z) != 2)
@@ -96,20 +110,6 @@ rblapack_zgghrd(int argc, VALUE *argv, VALUE self){
96
110
  if (NA_TYPE(rblapack_z) != NA_DCOMPLEX)
97
111
  rblapack_z = na_change_type(rblapack_z, NA_DCOMPLEX);
98
112
  z = NA_PTR_TYPE(rblapack_z, doublecomplex*);
99
- if (!NA_IsNArray(rblapack_q))
100
- rb_raise(rb_eArgError, "q (7th argument) must be NArray");
101
- if (NA_RANK(rblapack_q) != 2)
102
- rb_raise(rb_eArgError, "rank of q (7th argument) must be %d", 2);
103
- ldq = NA_SHAPE0(rblapack_q);
104
- if (NA_SHAPE1(rblapack_q) != n)
105
- rb_raise(rb_eRuntimeError, "shape 1 of q must be the same as shape 1 of a");
106
- if (NA_TYPE(rblapack_q) != NA_DCOMPLEX)
107
- rblapack_q = na_change_type(rblapack_q, NA_DCOMPLEX);
108
- q = NA_PTR_TYPE(rblapack_q, doublecomplex*);
109
- ilo = NUM2INT(rblapack_ilo);
110
- compq = StringValueCStr(rblapack_compq)[0];
111
- compz = StringValueCStr(rblapack_compz)[0];
112
- ihi = NUM2INT(rblapack_ihi);
113
113
  {
114
114
  int shape[2];
115
115
  shape[0] = lda;
data/ext/zggqrf.c CHANGED
@@ -58,15 +58,6 @@ rblapack_zggqrf(int argc, VALUE *argv, VALUE self){
58
58
  rblapack_lwork = Qnil;
59
59
  }
60
60
 
61
- if (!NA_IsNArray(rblapack_a))
62
- rb_raise(rb_eArgError, "a (2th argument) must be NArray");
63
- if (NA_RANK(rblapack_a) != 2)
64
- rb_raise(rb_eArgError, "rank of a (2th argument) must be %d", 2);
65
- lda = NA_SHAPE0(rblapack_a);
66
- m = NA_SHAPE1(rblapack_a);
67
- if (NA_TYPE(rblapack_a) != NA_DCOMPLEX)
68
- rblapack_a = na_change_type(rblapack_a, NA_DCOMPLEX);
69
- a = NA_PTR_TYPE(rblapack_a, doublecomplex*);
70
61
  n = NUM2INT(rblapack_n);
71
62
  if (!NA_IsNArray(rblapack_b))
72
63
  rb_raise(rb_eArgError, "b (3th argument) must be NArray");
@@ -77,6 +68,15 @@ rblapack_zggqrf(int argc, VALUE *argv, VALUE self){
77
68
  if (NA_TYPE(rblapack_b) != NA_DCOMPLEX)
78
69
  rblapack_b = na_change_type(rblapack_b, NA_DCOMPLEX);
79
70
  b = NA_PTR_TYPE(rblapack_b, doublecomplex*);
71
+ if (!NA_IsNArray(rblapack_a))
72
+ rb_raise(rb_eArgError, "a (2th argument) must be NArray");
73
+ if (NA_RANK(rblapack_a) != 2)
74
+ rb_raise(rb_eArgError, "rank of a (2th argument) must be %d", 2);
75
+ lda = NA_SHAPE0(rblapack_a);
76
+ m = NA_SHAPE1(rblapack_a);
77
+ if (NA_TYPE(rblapack_a) != NA_DCOMPLEX)
78
+ rblapack_a = na_change_type(rblapack_a, NA_DCOMPLEX);
79
+ a = NA_PTR_TYPE(rblapack_a, doublecomplex*);
80
80
  if (rblapack_lwork == Qnil)
81
81
  lwork = MAX(MAX(n,m),p);
82
82
  else {
data/ext/zggrqf.c CHANGED
@@ -60,6 +60,7 @@ rblapack_zggrqf(int argc, VALUE *argv, VALUE self){
60
60
  rblapack_lwork = Qnil;
61
61
  }
62
62
 
63
+ m = NUM2INT(rblapack_m);
63
64
  if (!NA_IsNArray(rblapack_a))
64
65
  rb_raise(rb_eArgError, "a (3th argument) must be NArray");
65
66
  if (NA_RANK(rblapack_a) != 2)
@@ -69,7 +70,6 @@ rblapack_zggrqf(int argc, VALUE *argv, VALUE self){
69
70
  if (NA_TYPE(rblapack_a) != NA_DCOMPLEX)
70
71
  rblapack_a = na_change_type(rblapack_a, NA_DCOMPLEX);
71
72
  a = NA_PTR_TYPE(rblapack_a, doublecomplex*);
72
- m = NUM2INT(rblapack_m);
73
73
  p = NUM2INT(rblapack_p);
74
74
  if (!NA_IsNArray(rblapack_b))
75
75
  rb_raise(rb_eArgError, "b (4th argument) must be NArray");
data/ext/zggsvd.c CHANGED
@@ -75,6 +75,7 @@ rblapack_zggsvd(int argc, VALUE *argv, VALUE self){
75
75
  } else {
76
76
  }
77
77
 
78
+ jobu = StringValueCStr(rblapack_jobu)[0];
78
79
  jobq = StringValueCStr(rblapack_jobq)[0];
79
80
  if (!NA_IsNArray(rblapack_b))
80
81
  rb_raise(rb_eArgError, "b (5th argument) must be NArray");
@@ -85,8 +86,9 @@ rblapack_zggsvd(int argc, VALUE *argv, VALUE self){
85
86
  if (NA_TYPE(rblapack_b) != NA_DCOMPLEX)
86
87
  rblapack_b = na_change_type(rblapack_b, NA_DCOMPLEX);
87
88
  b = NA_PTR_TYPE(rblapack_b, doublecomplex*);
88
- jobu = StringValueCStr(rblapack_jobu)[0];
89
+ p = ldb;
89
90
  jobv = StringValueCStr(rblapack_jobv)[0];
91
+ ldv = lsame_(&jobv,"V") ? MAX(1,p) : 1;
90
92
  if (!NA_IsNArray(rblapack_a))
91
93
  rb_raise(rb_eArgError, "a (4th argument) must be NArray");
92
94
  if (NA_RANK(rblapack_a) != 2)
@@ -100,8 +102,6 @@ rblapack_zggsvd(int argc, VALUE *argv, VALUE self){
100
102
  ldq = lsame_(&jobq,"Q") ? MAX(1,n) : 1;
101
103
  m = lda;
102
104
  ldu = lsame_(&jobu,"U") ? MAX(1,m) : 1;
103
- p = ldb;
104
- ldv = lsame_(&jobv,"V") ? MAX(1,p) : 1;
105
105
  {
106
106
  int shape[1];
107
107
  shape[0] = n;
data/ext/zggsvp.c CHANGED
@@ -77,6 +77,7 @@ rblapack_zggsvp(int argc, VALUE *argv, VALUE self){
77
77
  } else {
78
78
  }
79
79
 
80
+ jobu = StringValueCStr(rblapack_jobu)[0];
80
81
  jobq = StringValueCStr(rblapack_jobq)[0];
81
82
  if (!NA_IsNArray(rblapack_b))
82
83
  rb_raise(rb_eArgError, "b (5th argument) must be NArray");
@@ -87,10 +88,11 @@ rblapack_zggsvp(int argc, VALUE *argv, VALUE self){
87
88
  if (NA_TYPE(rblapack_b) != NA_DCOMPLEX)
88
89
  rblapack_b = na_change_type(rblapack_b, NA_DCOMPLEX);
89
90
  b = NA_PTR_TYPE(rblapack_b, doublecomplex*);
90
- jobu = StringValueCStr(rblapack_jobu)[0];
91
+ tolb = NUM2DBL(rblapack_tolb);
92
+ p = ldb;
91
93
  jobv = StringValueCStr(rblapack_jobv)[0];
92
94
  tola = NUM2DBL(rblapack_tola);
93
- tolb = NUM2DBL(rblapack_tolb);
95
+ ldv = lsame_(&jobv,"V") ? MAX(1,p) : 1;
94
96
  if (!NA_IsNArray(rblapack_a))
95
97
  rb_raise(rb_eArgError, "a (4th argument) must be NArray");
96
98
  if (NA_RANK(rblapack_a) != 2)
@@ -104,8 +106,6 @@ rblapack_zggsvp(int argc, VALUE *argv, VALUE self){
104
106
  ldq = lsame_(&jobq,"Q") ? MAX(1,n) : 1;
105
107
  m = lda;
106
108
  ldu = lsame_(&jobu,"U") ? MAX(1,m) : 1;
107
- p = ldb;
108
- ldv = lsame_(&jobv,"V") ? MAX(1,p) : 1;
109
109
  {
110
110
  int shape[2];
111
111
  shape[0] = ldu;
data/ext/zgtcon.c CHANGED
@@ -55,7 +55,7 @@ rblapack_zgtcon(int argc, VALUE *argv, VALUE self){
55
55
  } else {
56
56
  }
57
57
 
58
- anorm = NUM2DBL(rblapack_anorm);
58
+ norm = StringValueCStr(rblapack_norm)[0];
59
59
  if (!NA_IsNArray(rblapack_d))
60
60
  rb_raise(rb_eArgError, "d (3th argument) must be NArray");
61
61
  if (NA_RANK(rblapack_d) != 1)
@@ -64,7 +64,6 @@ rblapack_zgtcon(int argc, VALUE *argv, VALUE self){
64
64
  if (NA_TYPE(rblapack_d) != NA_DCOMPLEX)
65
65
  rblapack_d = na_change_type(rblapack_d, NA_DCOMPLEX);
66
66
  d = NA_PTR_TYPE(rblapack_d, doublecomplex*);
67
- norm = StringValueCStr(rblapack_norm)[0];
68
67
  if (!NA_IsNArray(rblapack_ipiv))
69
68
  rb_raise(rb_eArgError, "ipiv (6th argument) must be NArray");
70
69
  if (NA_RANK(rblapack_ipiv) != 1)
@@ -74,24 +73,6 @@ rblapack_zgtcon(int argc, VALUE *argv, VALUE self){
74
73
  if (NA_TYPE(rblapack_ipiv) != NA_LINT)
75
74
  rblapack_ipiv = na_change_type(rblapack_ipiv, NA_LINT);
76
75
  ipiv = NA_PTR_TYPE(rblapack_ipiv, integer*);
77
- if (!NA_IsNArray(rblapack_du))
78
- rb_raise(rb_eArgError, "du (4th argument) must be NArray");
79
- if (NA_RANK(rblapack_du) != 1)
80
- rb_raise(rb_eArgError, "rank of du (4th argument) must be %d", 1);
81
- if (NA_SHAPE0(rblapack_du) != (n-1))
82
- rb_raise(rb_eRuntimeError, "shape 0 of du must be %d", n-1);
83
- if (NA_TYPE(rblapack_du) != NA_DCOMPLEX)
84
- rblapack_du = na_change_type(rblapack_du, NA_DCOMPLEX);
85
- du = NA_PTR_TYPE(rblapack_du, doublecomplex*);
86
- if (!NA_IsNArray(rblapack_du2))
87
- rb_raise(rb_eArgError, "du2 (5th argument) must be NArray");
88
- if (NA_RANK(rblapack_du2) != 1)
89
- rb_raise(rb_eArgError, "rank of du2 (5th argument) must be %d", 1);
90
- if (NA_SHAPE0(rblapack_du2) != (n-2))
91
- rb_raise(rb_eRuntimeError, "shape 0 of du2 must be %d", n-2);
92
- if (NA_TYPE(rblapack_du2) != NA_DCOMPLEX)
93
- rblapack_du2 = na_change_type(rblapack_du2, NA_DCOMPLEX);
94
- du2 = NA_PTR_TYPE(rblapack_du2, doublecomplex*);
95
76
  if (!NA_IsNArray(rblapack_dl))
96
77
  rb_raise(rb_eArgError, "dl (2th argument) must be NArray");
97
78
  if (NA_RANK(rblapack_dl) != 1)
@@ -101,6 +82,25 @@ rblapack_zgtcon(int argc, VALUE *argv, VALUE self){
101
82
  if (NA_TYPE(rblapack_dl) != NA_DCOMPLEX)
102
83
  rblapack_dl = na_change_type(rblapack_dl, NA_DCOMPLEX);
103
84
  dl = NA_PTR_TYPE(rblapack_dl, doublecomplex*);
85
+ if (!NA_IsNArray(rblapack_du2))
86
+ rb_raise(rb_eArgError, "du2 (5th argument) must be NArray");
87
+ if (NA_RANK(rblapack_du2) != 1)
88
+ rb_raise(rb_eArgError, "rank of du2 (5th argument) must be %d", 1);
89
+ if (NA_SHAPE0(rblapack_du2) != (n-2))
90
+ rb_raise(rb_eRuntimeError, "shape 0 of du2 must be %d", n-2);
91
+ if (NA_TYPE(rblapack_du2) != NA_DCOMPLEX)
92
+ rblapack_du2 = na_change_type(rblapack_du2, NA_DCOMPLEX);
93
+ du2 = NA_PTR_TYPE(rblapack_du2, doublecomplex*);
94
+ if (!NA_IsNArray(rblapack_du))
95
+ rb_raise(rb_eArgError, "du (4th argument) must be NArray");
96
+ if (NA_RANK(rblapack_du) != 1)
97
+ rb_raise(rb_eArgError, "rank of du (4th argument) must be %d", 1);
98
+ if (NA_SHAPE0(rblapack_du) != (n-1))
99
+ rb_raise(rb_eRuntimeError, "shape 0 of du must be %d", n-1);
100
+ if (NA_TYPE(rblapack_du) != NA_DCOMPLEX)
101
+ rblapack_du = na_change_type(rblapack_du, NA_DCOMPLEX);
102
+ du = NA_PTR_TYPE(rblapack_du, doublecomplex*);
103
+ anorm = NUM2DBL(rblapack_anorm);
104
104
  work = ALLOC_N(doublecomplex, (2*n));
105
105
 
106
106
  zgtcon_(&norm, &n, dl, d, du, du2, ipiv, &anorm, &rcond, work, &info);
data/ext/zgtrfs.c CHANGED
@@ -75,11 +75,30 @@ rblapack_zgtrfs(int argc, VALUE *argv, VALUE self){
75
75
  } else {
76
76
  }
77
77
 
78
+ trans = StringValueCStr(rblapack_trans)[0];
79
+ if (!NA_IsNArray(rblapack_d))
80
+ rb_raise(rb_eArgError, "d (3th argument) must be NArray");
81
+ if (NA_RANK(rblapack_d) != 1)
82
+ rb_raise(rb_eArgError, "rank of d (3th argument) must be %d", 1);
83
+ n = NA_SHAPE0(rblapack_d);
84
+ if (NA_TYPE(rblapack_d) != NA_DCOMPLEX)
85
+ rblapack_d = na_change_type(rblapack_d, NA_DCOMPLEX);
86
+ d = NA_PTR_TYPE(rblapack_d, doublecomplex*);
87
+ if (!NA_IsNArray(rblapack_df))
88
+ rb_raise(rb_eArgError, "df (6th argument) must be NArray");
89
+ if (NA_RANK(rblapack_df) != 1)
90
+ rb_raise(rb_eArgError, "rank of df (6th argument) must be %d", 1);
91
+ if (NA_SHAPE0(rblapack_df) != n)
92
+ rb_raise(rb_eRuntimeError, "shape 0 of df must be the same as shape 0 of d");
93
+ if (NA_TYPE(rblapack_df) != NA_DCOMPLEX)
94
+ rblapack_df = na_change_type(rblapack_df, NA_DCOMPLEX);
95
+ df = NA_PTR_TYPE(rblapack_df, doublecomplex*);
78
96
  if (!NA_IsNArray(rblapack_ipiv))
79
97
  rb_raise(rb_eArgError, "ipiv (9th argument) must be NArray");
80
98
  if (NA_RANK(rblapack_ipiv) != 1)
81
99
  rb_raise(rb_eArgError, "rank of ipiv (9th argument) must be %d", 1);
82
- n = NA_SHAPE0(rblapack_ipiv);
100
+ if (NA_SHAPE0(rblapack_ipiv) != n)
101
+ rb_raise(rb_eRuntimeError, "shape 0 of ipiv must be the same as shape 0 of d");
83
102
  if (NA_TYPE(rblapack_ipiv) != NA_LINT)
84
103
  rblapack_ipiv = na_change_type(rblapack_ipiv, NA_LINT);
85
104
  ipiv = NA_PTR_TYPE(rblapack_ipiv, integer*);
@@ -92,35 +111,15 @@ rblapack_zgtrfs(int argc, VALUE *argv, VALUE self){
92
111
  if (NA_TYPE(rblapack_x) != NA_DCOMPLEX)
93
112
  rblapack_x = na_change_type(rblapack_x, NA_DCOMPLEX);
94
113
  x = NA_PTR_TYPE(rblapack_x, doublecomplex*);
95
- if (!NA_IsNArray(rblapack_df))
96
- rb_raise(rb_eArgError, "df (6th argument) must be NArray");
97
- if (NA_RANK(rblapack_df) != 1)
98
- rb_raise(rb_eArgError, "rank of df (6th argument) must be %d", 1);
99
- if (NA_SHAPE0(rblapack_df) != n)
100
- rb_raise(rb_eRuntimeError, "shape 0 of df must be the same as shape 0 of ipiv");
101
- if (NA_TYPE(rblapack_df) != NA_DCOMPLEX)
102
- rblapack_df = na_change_type(rblapack_df, NA_DCOMPLEX);
103
- df = NA_PTR_TYPE(rblapack_df, doublecomplex*);
104
- trans = StringValueCStr(rblapack_trans)[0];
105
- if (!NA_IsNArray(rblapack_b))
106
- rb_raise(rb_eArgError, "b (10th argument) must be NArray");
107
- if (NA_RANK(rblapack_b) != 2)
108
- rb_raise(rb_eArgError, "rank of b (10th argument) must be %d", 2);
109
- ldb = NA_SHAPE0(rblapack_b);
110
- if (NA_SHAPE1(rblapack_b) != nrhs)
111
- rb_raise(rb_eRuntimeError, "shape 1 of b must be the same as shape 1 of x");
112
- if (NA_TYPE(rblapack_b) != NA_DCOMPLEX)
113
- rblapack_b = na_change_type(rblapack_b, NA_DCOMPLEX);
114
- b = NA_PTR_TYPE(rblapack_b, doublecomplex*);
115
- if (!NA_IsNArray(rblapack_d))
116
- rb_raise(rb_eArgError, "d (3th argument) must be NArray");
117
- if (NA_RANK(rblapack_d) != 1)
118
- rb_raise(rb_eArgError, "rank of d (3th argument) must be %d", 1);
119
- if (NA_SHAPE0(rblapack_d) != n)
120
- rb_raise(rb_eRuntimeError, "shape 0 of d must be the same as shape 0 of ipiv");
121
- if (NA_TYPE(rblapack_d) != NA_DCOMPLEX)
122
- rblapack_d = na_change_type(rblapack_d, NA_DCOMPLEX);
123
- d = NA_PTR_TYPE(rblapack_d, doublecomplex*);
114
+ if (!NA_IsNArray(rblapack_dl))
115
+ rb_raise(rb_eArgError, "dl (2th argument) must be NArray");
116
+ if (NA_RANK(rblapack_dl) != 1)
117
+ rb_raise(rb_eArgError, "rank of dl (2th argument) must be %d", 1);
118
+ if (NA_SHAPE0(rblapack_dl) != (n-1))
119
+ rb_raise(rb_eRuntimeError, "shape 0 of dl must be %d", n-1);
120
+ if (NA_TYPE(rblapack_dl) != NA_DCOMPLEX)
121
+ rblapack_dl = na_change_type(rblapack_dl, NA_DCOMPLEX);
122
+ dl = NA_PTR_TYPE(rblapack_dl, doublecomplex*);
124
123
  if (!NA_IsNArray(rblapack_dlf))
125
124
  rb_raise(rb_eArgError, "dlf (5th argument) must be NArray");
126
125
  if (NA_RANK(rblapack_dlf) != 1)
@@ -130,15 +129,6 @@ rblapack_zgtrfs(int argc, VALUE *argv, VALUE self){
130
129
  if (NA_TYPE(rblapack_dlf) != NA_DCOMPLEX)
131
130
  rblapack_dlf = na_change_type(rblapack_dlf, NA_DCOMPLEX);
132
131
  dlf = NA_PTR_TYPE(rblapack_dlf, doublecomplex*);
133
- if (!NA_IsNArray(rblapack_duf))
134
- rb_raise(rb_eArgError, "duf (7th argument) must be NArray");
135
- if (NA_RANK(rblapack_duf) != 1)
136
- rb_raise(rb_eArgError, "rank of duf (7th argument) must be %d", 1);
137
- if (NA_SHAPE0(rblapack_duf) != (n-1))
138
- rb_raise(rb_eRuntimeError, "shape 0 of duf must be %d", n-1);
139
- if (NA_TYPE(rblapack_duf) != NA_DCOMPLEX)
140
- rblapack_duf = na_change_type(rblapack_duf, NA_DCOMPLEX);
141
- duf = NA_PTR_TYPE(rblapack_duf, doublecomplex*);
142
132
  if (!NA_IsNArray(rblapack_du2))
143
133
  rb_raise(rb_eArgError, "du2 (8th argument) must be NArray");
144
134
  if (NA_RANK(rblapack_du2) != 1)
@@ -148,15 +138,6 @@ rblapack_zgtrfs(int argc, VALUE *argv, VALUE self){
148
138
  if (NA_TYPE(rblapack_du2) != NA_DCOMPLEX)
149
139
  rblapack_du2 = na_change_type(rblapack_du2, NA_DCOMPLEX);
150
140
  du2 = NA_PTR_TYPE(rblapack_du2, doublecomplex*);
151
- if (!NA_IsNArray(rblapack_dl))
152
- rb_raise(rb_eArgError, "dl (2th argument) must be NArray");
153
- if (NA_RANK(rblapack_dl) != 1)
154
- rb_raise(rb_eArgError, "rank of dl (2th argument) must be %d", 1);
155
- if (NA_SHAPE0(rblapack_dl) != (n-1))
156
- rb_raise(rb_eRuntimeError, "shape 0 of dl must be %d", n-1);
157
- if (NA_TYPE(rblapack_dl) != NA_DCOMPLEX)
158
- rblapack_dl = na_change_type(rblapack_dl, NA_DCOMPLEX);
159
- dl = NA_PTR_TYPE(rblapack_dl, doublecomplex*);
160
141
  if (!NA_IsNArray(rblapack_du))
161
142
  rb_raise(rb_eArgError, "du (4th argument) must be NArray");
162
143
  if (NA_RANK(rblapack_du) != 1)
@@ -166,6 +147,25 @@ rblapack_zgtrfs(int argc, VALUE *argv, VALUE self){
166
147
  if (NA_TYPE(rblapack_du) != NA_DCOMPLEX)
167
148
  rblapack_du = na_change_type(rblapack_du, NA_DCOMPLEX);
168
149
  du = NA_PTR_TYPE(rblapack_du, doublecomplex*);
150
+ if (!NA_IsNArray(rblapack_b))
151
+ rb_raise(rb_eArgError, "b (10th argument) must be NArray");
152
+ if (NA_RANK(rblapack_b) != 2)
153
+ rb_raise(rb_eArgError, "rank of b (10th argument) must be %d", 2);
154
+ ldb = NA_SHAPE0(rblapack_b);
155
+ if (NA_SHAPE1(rblapack_b) != nrhs)
156
+ rb_raise(rb_eRuntimeError, "shape 1 of b must be the same as shape 1 of x");
157
+ if (NA_TYPE(rblapack_b) != NA_DCOMPLEX)
158
+ rblapack_b = na_change_type(rblapack_b, NA_DCOMPLEX);
159
+ b = NA_PTR_TYPE(rblapack_b, doublecomplex*);
160
+ if (!NA_IsNArray(rblapack_duf))
161
+ rb_raise(rb_eArgError, "duf (7th argument) must be NArray");
162
+ if (NA_RANK(rblapack_duf) != 1)
163
+ rb_raise(rb_eArgError, "rank of duf (7th argument) must be %d", 1);
164
+ if (NA_SHAPE0(rblapack_duf) != (n-1))
165
+ rb_raise(rb_eRuntimeError, "shape 0 of duf must be %d", n-1);
166
+ if (NA_TYPE(rblapack_duf) != NA_DCOMPLEX)
167
+ rblapack_duf = na_change_type(rblapack_duf, NA_DCOMPLEX);
168
+ duf = NA_PTR_TYPE(rblapack_duf, doublecomplex*);
169
169
  {
170
170
  int shape[1];
171
171
  shape[0] = nrhs;