ruby-lapack 1.3
Sign up to get free protection for your applications and to get access to all the features.
- data/COPYING +56 -0
- data/GPL +340 -0
- data/README.rdoc +61 -0
- data/Rakefile +115 -0
- data/dev/common.rb +9 -0
- data/dev/defs/cbbcsd +297 -0
- data/dev/defs/cbdsqr +196 -0
- data/dev/defs/cgbbrd +174 -0
- data/dev/defs/cgbcon +114 -0
- data/dev/defs/cgbequ +121 -0
- data/dev/defs/cgbequb +128 -0
- data/dev/defs/cgbrfs +182 -0
- data/dev/defs/cgbrfsx +418 -0
- data/dev/defs/cgbsv +134 -0
- data/dev/defs/cgbsvx +356 -0
- data/dev/defs/cgbsvxx +539 -0
- data/dev/defs/cgbtf2 +110 -0
- data/dev/defs/cgbtrf +109 -0
- data/dev/defs/cgbtrs +106 -0
- data/dev/defs/cgebak +95 -0
- data/dev/defs/cgebal +125 -0
- data/dev/defs/cgebd2 +162 -0
- data/dev/defs/cgebrd +178 -0
- data/dev/defs/cgecon +90 -0
- data/dev/defs/cgeequ +107 -0
- data/dev/defs/cgeequb +114 -0
- data/dev/defs/cgees +169 -0
- data/dev/defs/cgeesx +209 -0
- data/dev/defs/cgeev +154 -0
- data/dev/defs/cgeevx +263 -0
- data/dev/defs/cgegs +204 -0
- data/dev/defs/cgegv +261 -0
- data/dev/defs/cgehd2 +115 -0
- data/dev/defs/cgehrd +136 -0
- data/dev/defs/cgelq2 +89 -0
- data/dev/defs/cgelqf +113 -0
- data/dev/defs/cgels +157 -0
- data/dev/defs/cgelsd +211 -0
- data/dev/defs/cgelss +156 -0
- data/dev/defs/cgelsx +155 -0
- data/dev/defs/cgelsy +188 -0
- data/dev/defs/cgeql2 +91 -0
- data/dev/defs/cgeqlf +116 -0
- data/dev/defs/cgeqp3 +127 -0
- data/dev/defs/cgeqpf +118 -0
- data/dev/defs/cgeqr2 +89 -0
- data/dev/defs/cgeqr2p +89 -0
- data/dev/defs/cgeqrf +114 -0
- data/dev/defs/cgeqrfp +114 -0
- data/dev/defs/cgerfs +164 -0
- data/dev/defs/cgerfsx +394 -0
- data/dev/defs/cgerq2 +91 -0
- data/dev/defs/cgerqf +116 -0
- data/dev/defs/cgesc2 +87 -0
- data/dev/defs/cgesdd +203 -0
- data/dev/defs/cgesv +97 -0
- data/dev/defs/cgesvd +195 -0
- data/dev/defs/cgesvx +333 -0
- data/dev/defs/cgesvxx +519 -0
- data/dev/defs/cgetc2 +82 -0
- data/dev/defs/cgetf2 +76 -0
- data/dev/defs/cgetrf +76 -0
- data/dev/defs/cgetri +86 -0
- data/dev/defs/cgetrs +91 -0
- data/dev/defs/cggbak +119 -0
- data/dev/defs/cggbal +144 -0
- data/dev/defs/cgges +247 -0
- data/dev/defs/cggesx +311 -0
- data/dev/defs/cggev +197 -0
- data/dev/defs/cggevx +353 -0
- data/dev/defs/cggglm +160 -0
- data/dev/defs/cgghrd +171 -0
- data/dev/defs/cgglse +157 -0
- data/dev/defs/cggqrf +195 -0
- data/dev/defs/cggrqf +194 -0
- data/dev/defs/cggsvd +324 -0
- data/dev/defs/cggsvp +240 -0
- data/dev/defs/cgtcon +112 -0
- data/dev/defs/cgtrfs +193 -0
- data/dev/defs/cgtsv +97 -0
- data/dev/defs/cgtsvx +275 -0
- data/dev/defs/cgttrf +97 -0
- data/dev/defs/cgttrs +119 -0
- data/dev/defs/cgtts2 +108 -0
- data/dev/defs/chbev +124 -0
- data/dev/defs/chbevd +194 -0
- data/dev/defs/chbevx +234 -0
- data/dev/defs/chbgst +137 -0
- data/dev/defs/chbgv +163 -0
- data/dev/defs/chbgvd +231 -0
- data/dev/defs/chbgvx +265 -0
- data/dev/defs/chbtrd +132 -0
- data/dev/defs/checon +91 -0
- data/dev/defs/cheequb +87 -0
- data/dev/defs/cheev +111 -0
- data/dev/defs/cheevd +178 -0
- data/dev/defs/cheevr +325 -0
- data/dev/defs/cheevx +225 -0
- data/dev/defs/chegs2 +96 -0
- data/dev/defs/chegst +96 -0
- data/dev/defs/chegv +155 -0
- data/dev/defs/chegvd +222 -0
- data/dev/defs/chegvx +270 -0
- data/dev/defs/cherfs +170 -0
- data/dev/defs/cherfsx +380 -0
- data/dev/defs/chesv +147 -0
- data/dev/defs/chesvx +261 -0
- data/dev/defs/chesvxx +481 -0
- data/dev/defs/chetd2 +143 -0
- data/dev/defs/chetf2 +141 -0
- data/dev/defs/chetrd +162 -0
- data/dev/defs/chetrf +151 -0
- data/dev/defs/chetri +83 -0
- data/dev/defs/chetrs +90 -0
- data/dev/defs/chetrs2 +97 -0
- data/dev/defs/chfrk +138 -0
- data/dev/defs/chgeqz +258 -0
- data/dev/defs/chla_transtype +32 -0
- data/dev/defs/chpcon +85 -0
- data/dev/defs/chpev +110 -0
- data/dev/defs/chpevd +179 -0
- data/dev/defs/chpevx +204 -0
- data/dev/defs/chpgst +80 -0
- data/dev/defs/chpgv +145 -0
- data/dev/defs/chpgvd +221 -0
- data/dev/defs/chpgvx +247 -0
- data/dev/defs/chprfs +156 -0
- data/dev/defs/chpsv +134 -0
- data/dev/defs/chpsvx +248 -0
- data/dev/defs/chptrd +118 -0
- data/dev/defs/chptrf +120 -0
- data/dev/defs/chptri +77 -0
- data/dev/defs/chptrs +84 -0
- data/dev/defs/chsein +217 -0
- data/dev/defs/chseqr +263 -0
- data/dev/defs/cla_gbamv +154 -0
- data/dev/defs/cla_gbrcond_c +146 -0
- data/dev/defs/cla_gbrcond_x +140 -0
- data/dev/defs/cla_gbrfsx_extended +391 -0
- data/dev/defs/cla_gbrpvgrw +94 -0
- data/dev/defs/cla_geamv +142 -0
- data/dev/defs/cla_gercond_c +128 -0
- data/dev/defs/cla_gercond_x +122 -0
- data/dev/defs/cla_gerfsx_extended +376 -0
- data/dev/defs/cla_heamv +142 -0
- data/dev/defs/cla_hercond_c +125 -0
- data/dev/defs/cla_hercond_x +119 -0
- data/dev/defs/cla_herfsx_extended +375 -0
- data/dev/defs/cla_herpvgrw +105 -0
- data/dev/defs/cla_lin_berr +79 -0
- data/dev/defs/cla_porcond_c +116 -0
- data/dev/defs/cla_porcond_x +110 -0
- data/dev/defs/cla_porfsx_extended +366 -0
- data/dev/defs/cla_porpvgrw +85 -0
- data/dev/defs/cla_rpvgrw +76 -0
- data/dev/defs/cla_syamv +142 -0
- data/dev/defs/cla_syrcond_c +125 -0
- data/dev/defs/cla_syrcond_x +119 -0
- data/dev/defs/cla_syrfsx_extended +375 -0
- data/dev/defs/cla_syrpvgrw +105 -0
- data/dev/defs/cla_wwaddw +53 -0
- data/dev/defs/clabrd +187 -0
- data/dev/defs/clacgv +44 -0
- data/dev/defs/clacn2 +91 -0
- data/dev/defs/clacon +75 -0
- data/dev/defs/clacp2 +78 -0
- data/dev/defs/clacpy +78 -0
- data/dev/defs/clacrm +88 -0
- data/dev/defs/clacrt +73 -0
- data/dev/defs/cladiv +37 -0
- data/dev/defs/claed0 +121 -0
- data/dev/defs/claed7 +237 -0
- data/dev/defs/claed8 +211 -0
- data/dev/defs/claein +117 -0
- data/dev/defs/claesy +81 -0
- data/dev/defs/claev2 +83 -0
- data/dev/defs/clag2z +73 -0
- data/dev/defs/clags2 +116 -0
- data/dev/defs/clagtm +115 -0
- data/dev/defs/clahef +127 -0
- data/dev/defs/clahqr +159 -0
- data/dev/defs/clahr2 +153 -0
- data/dev/defs/clahrd +141 -0
- data/dev/defs/claic1 +101 -0
- data/dev/defs/clals0 +251 -0
- data/dev/defs/clalsa +267 -0
- data/dev/defs/clalsd +160 -0
- data/dev/defs/clangb +92 -0
- data/dev/defs/clange +84 -0
- data/dev/defs/clangt +77 -0
- data/dev/defs/clanhb +99 -0
- data/dev/defs/clanhe +93 -0
- data/dev/defs/clanhf +211 -0
- data/dev/defs/clanhp +85 -0
- data/dev/defs/clanhs +78 -0
- data/dev/defs/clanht +69 -0
- data/dev/defs/clansb +97 -0
- data/dev/defs/clansp +83 -0
- data/dev/defs/clansy +92 -0
- data/dev/defs/clantb +108 -0
- data/dev/defs/clantp +93 -0
- data/dev/defs/clantr +109 -0
- data/dev/defs/clapll +67 -0
- data/dev/defs/clapmr +73 -0
- data/dev/defs/clapmt +73 -0
- data/dev/defs/claqgb +124 -0
- data/dev/defs/claqge +107 -0
- data/dev/defs/claqhb +105 -0
- data/dev/defs/claqhe +98 -0
- data/dev/defs/claqhp +89 -0
- data/dev/defs/claqp2 +115 -0
- data/dev/defs/claqps +146 -0
- data/dev/defs/claqr0 +203 -0
- data/dev/defs/claqr1 +66 -0
- data/dev/defs/claqr2 +243 -0
- data/dev/defs/claqr3 +238 -0
- data/dev/defs/claqr4 +203 -0
- data/dev/defs/claqr5 +221 -0
- data/dev/defs/claqsb +105 -0
- data/dev/defs/claqsp +89 -0
- data/dev/defs/claqsy +98 -0
- data/dev/defs/clar1v +199 -0
- data/dev/defs/clar2v +88 -0
- data/dev/defs/clarcm +88 -0
- data/dev/defs/clarf +97 -0
- data/dev/defs/clarfb +139 -0
- data/dev/defs/clarfg +71 -0
- data/dev/defs/clarfgp +69 -0
- data/dev/defs/clarft +133 -0
- data/dev/defs/clarfx +88 -0
- data/dev/defs/clargv +88 -0
- data/dev/defs/clarnv +63 -0
- data/dev/defs/clarrv +259 -0
- data/dev/defs/clarscl2 +61 -0
- data/dev/defs/clartg +66 -0
- data/dev/defs/clartv +82 -0
- data/dev/defs/clarz +111 -0
- data/dev/defs/clarzb +150 -0
- data/dev/defs/clarzt +151 -0
- data/dev/defs/clascl +102 -0
- data/dev/defs/clascl2 +61 -0
- data/dev/defs/claset +77 -0
- data/dev/defs/clasr +169 -0
- data/dev/defs/classq +71 -0
- data/dev/defs/claswp +81 -0
- data/dev/defs/clasyf +127 -0
- data/dev/defs/clatbs +206 -0
- data/dev/defs/clatdf +133 -0
- data/dev/defs/clatps +193 -0
- data/dev/defs/clatrd +168 -0
- data/dev/defs/clatrs +202 -0
- data/dev/defs/clatrz +106 -0
- data/dev/defs/clatzm +124 -0
- data/dev/defs/clauu2 +68 -0
- data/dev/defs/clauum +68 -0
- data/dev/defs/cpbcon +99 -0
- data/dev/defs/cpbequ +96 -0
- data/dev/defs/cpbrfs +166 -0
- data/dev/defs/cpbstf +116 -0
- data/dev/defs/cpbsv +136 -0
- data/dev/defs/cpbsvx +314 -0
- data/dev/defs/cpbtf2 +105 -0
- data/dev/defs/cpbtrf +103 -0
- data/dev/defs/cpbtrs +98 -0
- data/dev/defs/cpftrf +183 -0
- data/dev/defs/cpftri +175 -0
- data/dev/defs/cpftrs +185 -0
- data/dev/defs/cpocon +87 -0
- data/dev/defs/cpoequ +80 -0
- data/dev/defs/cpoequb +80 -0
- data/dev/defs/cporfs +160 -0
- data/dev/defs/cporfsx +371 -0
- data/dev/defs/cposv +105 -0
- data/dev/defs/cposvx +281 -0
- data/dev/defs/cposvxx +471 -0
- data/dev/defs/cpotf2 +75 -0
- data/dev/defs/cpotrf +73 -0
- data/dev/defs/cpotri +67 -0
- data/dev/defs/cpotrs +79 -0
- data/dev/defs/cppcon +85 -0
- data/dev/defs/cppequ +82 -0
- data/dev/defs/cpprfs +146 -0
- data/dev/defs/cppsv +115 -0
- data/dev/defs/cppsvx +283 -0
- data/dev/defs/cpptrf +81 -0
- data/dev/defs/cpptri +58 -0
- data/dev/defs/cpptrs +84 -0
- data/dev/defs/cpstf2 +108 -0
- data/dev/defs/cpstrf +108 -0
- data/dev/defs/cptcon +84 -0
- data/dev/defs/cpteqr +116 -0
- data/dev/defs/cptrfs +161 -0
- data/dev/defs/cptsv +89 -0
- data/dev/defs/cptsvx +210 -0
- data/dev/defs/cpttrf +59 -0
- data/dev/defs/cpttrs +98 -0
- data/dev/defs/cptts2 +89 -0
- data/dev/defs/crot +72 -0
- data/dev/defs/cspcon +85 -0
- data/dev/defs/cspmv +121 -0
- data/dev/defs/cspr +98 -0
- data/dev/defs/csprfs +156 -0
- data/dev/defs/cspsv +134 -0
- data/dev/defs/cspsvx +248 -0
- data/dev/defs/csptrf +121 -0
- data/dev/defs/csptri +77 -0
- data/dev/defs/csptrs +84 -0
- data/dev/defs/csrscl +49 -0
- data/dev/defs/cstedc +191 -0
- data/dev/defs/cstegr +233 -0
- data/dev/defs/cstein +159 -0
- data/dev/defs/cstemr +302 -0
- data/dev/defs/csteqr +103 -0
- data/dev/defs/csycon +91 -0
- data/dev/defs/csyconv +90 -0
- data/dev/defs/csyequb +104 -0
- data/dev/defs/csymv +126 -0
- data/dev/defs/csyr +102 -0
- data/dev/defs/csyrfs +170 -0
- data/dev/defs/csyrfsx +380 -0
- data/dev/defs/csysv +149 -0
- data/dev/defs/csysvx +261 -0
- data/dev/defs/csysvxx +485 -0
- data/dev/defs/csyswapr +70 -0
- data/dev/defs/csytf2 +140 -0
- data/dev/defs/csytrf +156 -0
- data/dev/defs/csytri +83 -0
- data/dev/defs/csytri2 +110 -0
- data/dev/defs/csytri2x +90 -0
- data/dev/defs/csytrs +90 -0
- data/dev/defs/csytrs2 +97 -0
- data/dev/defs/ctbcon +109 -0
- data/dev/defs/ctbrfs +164 -0
- data/dev/defs/ctbtrs +113 -0
- data/dev/defs/ctfsm +259 -0
- data/dev/defs/ctftri +183 -0
- data/dev/defs/ctfttp +172 -0
- data/dev/defs/ctfttr +182 -0
- data/dev/defs/ctgevc +194 -0
- data/dev/defs/ctgex2 +158 -0
- data/dev/defs/ctgexc +176 -0
- data/dev/defs/ctgsen +406 -0
- data/dev/defs/ctgsja +344 -0
- data/dev/defs/ctgsna +282 -0
- data/dev/defs/ctgsy2 +235 -0
- data/dev/defs/ctgsyl +273 -0
- data/dev/defs/ctpcon +95 -0
- data/dev/defs/ctprfs +150 -0
- data/dev/defs/ctptri +79 -0
- data/dev/defs/ctptrs +98 -0
- data/dev/defs/ctpttf +172 -0
- data/dev/defs/ctpttr +73 -0
- data/dev/defs/ctrcon +103 -0
- data/dev/defs/ctrevc +188 -0
- data/dev/defs/ctrexc +99 -0
- data/dev/defs/ctrrfs +158 -0
- data/dev/defs/ctrsen +234 -0
- data/dev/defs/ctrsna +223 -0
- data/dev/defs/ctrsyl +126 -0
- data/dev/defs/ctrti2 +76 -0
- data/dev/defs/ctrtri +75 -0
- data/dev/defs/ctrtrs +107 -0
- data/dev/defs/ctrttf +181 -0
- data/dev/defs/ctrttp +72 -0
- data/dev/defs/ctzrqf +104 -0
- data/dev/defs/ctzrzf +128 -0
- data/dev/defs/cunbdb +270 -0
- data/dev/defs/cuncsd +283 -0
- data/dev/defs/cung2l +85 -0
- data/dev/defs/cung2r +85 -0
- data/dev/defs/cungbr +129 -0
- data/dev/defs/cunghr +97 -0
- data/dev/defs/cungl2 +84 -0
- data/dev/defs/cunglq +100 -0
- data/dev/defs/cungql +101 -0
- data/dev/defs/cungqr +101 -0
- data/dev/defs/cungr2 +85 -0
- data/dev/defs/cungrq +101 -0
- data/dev/defs/cungtr +95 -0
- data/dev/defs/cunm2l +130 -0
- data/dev/defs/cunm2r +130 -0
- data/dev/defs/cunmbr +179 -0
- data/dev/defs/cunmhr +157 -0
- data/dev/defs/cunml2 +130 -0
- data/dev/defs/cunmlq +143 -0
- data/dev/defs/cunmql +143 -0
- data/dev/defs/cunmqr +143 -0
- data/dev/defs/cunmr2 +130 -0
- data/dev/defs/cunmr3 +152 -0
- data/dev/defs/cunmrq +143 -0
- data/dev/defs/cunmrz +157 -0
- data/dev/defs/cunmtr +152 -0
- data/dev/defs/cupgtr +87 -0
- data/dev/defs/cupmtr +120 -0
- data/dev/defs/dbbcsd +297 -0
- data/dev/defs/dbdsdc +194 -0
- data/dev/defs/dbdsqr +203 -0
- data/dev/defs/ddisna +84 -0
- data/dev/defs/dgbbrd +167 -0
- data/dev/defs/dgbcon +114 -0
- data/dev/defs/dgbequ +121 -0
- data/dev/defs/dgbequb +128 -0
- data/dev/defs/dgbrfs +182 -0
- data/dev/defs/dgbrfsx +418 -0
- data/dev/defs/dgbsv +134 -0
- data/dev/defs/dgbsvx +353 -0
- data/dev/defs/dgbsvxx +536 -0
- data/dev/defs/dgbtf2 +110 -0
- data/dev/defs/dgbtrf +109 -0
- data/dev/defs/dgbtrs +106 -0
- data/dev/defs/dgebak +95 -0
- data/dev/defs/dgebal +125 -0
- data/dev/defs/dgebd2 +162 -0
- data/dev/defs/dgebrd +178 -0
- data/dev/defs/dgecon +90 -0
- data/dev/defs/dgeequ +107 -0
- data/dev/defs/dgeequb +114 -0
- data/dev/defs/dgees +188 -0
- data/dev/defs/dgeesx +251 -0
- data/dev/defs/dgeev +166 -0
- data/dev/defs/dgeevx +282 -0
- data/dev/defs/dgegs +207 -0
- data/dev/defs/dgegv +286 -0
- data/dev/defs/dgehd2 +115 -0
- data/dev/defs/dgehrd +136 -0
- data/dev/defs/dgejsv +862 -0
- data/dev/defs/dgelq2 +89 -0
- data/dev/defs/dgelqf +113 -0
- data/dev/defs/dgels +158 -0
- data/dev/defs/dgelsd +193 -0
- data/dev/defs/dgelss +149 -0
- data/dev/defs/dgelsx +148 -0
- data/dev/defs/dgelsy +181 -0
- data/dev/defs/dgeql2 +91 -0
- data/dev/defs/dgeqlf +116 -0
- data/dev/defs/dgeqp3 +120 -0
- data/dev/defs/dgeqpf +111 -0
- data/dev/defs/dgeqr2 +89 -0
- data/dev/defs/dgeqr2p +89 -0
- data/dev/defs/dgeqrf +114 -0
- data/dev/defs/dgeqrfp +114 -0
- data/dev/defs/dgerfs +164 -0
- data/dev/defs/dgerfsx +394 -0
- data/dev/defs/dgerq2 +91 -0
- data/dev/defs/dgerqf +116 -0
- data/dev/defs/dgesc2 +86 -0
- data/dev/defs/dgesdd +197 -0
- data/dev/defs/dgesv +97 -0
- data/dev/defs/dgesvd +188 -0
- data/dev/defs/dgesvj +308 -0
- data/dev/defs/dgesvx +333 -0
- data/dev/defs/dgesvxx +516 -0
- data/dev/defs/dgetc2 +82 -0
- data/dev/defs/dgetf2 +76 -0
- data/dev/defs/dgetrf +76 -0
- data/dev/defs/dgetri +86 -0
- data/dev/defs/dgetrs +91 -0
- data/dev/defs/dggbak +119 -0
- data/dev/defs/dggbal +145 -0
- data/dev/defs/dgges +261 -0
- data/dev/defs/dggesx +342 -0
- data/dev/defs/dggev +206 -0
- data/dev/defs/dggevx +371 -0
- data/dev/defs/dggglm +160 -0
- data/dev/defs/dgghrd +174 -0
- data/dev/defs/dgglse +157 -0
- data/dev/defs/dggqrf +195 -0
- data/dev/defs/dggrqf +194 -0
- data/dev/defs/dggsvd +319 -0
- data/dev/defs/dggsvp +233 -0
- data/dev/defs/dgsvj0 +200 -0
- data/dev/defs/dgsvj1 +220 -0
- data/dev/defs/dgtcon +119 -0
- data/dev/defs/dgtrfs +193 -0
- data/dev/defs/dgtsv +100 -0
- data/dev/defs/dgtsvx +275 -0
- data/dev/defs/dgttrf +97 -0
- data/dev/defs/dgttrs +119 -0
- data/dev/defs/dgtts2 +106 -0
- data/dev/defs/dhgeqz +282 -0
- data/dev/defs/dhsein +234 -0
- data/dev/defs/dhseqr +279 -0
- data/dev/defs/disnan +29 -0
- data/dev/defs/dla_gbamv +152 -0
- data/dev/defs/dla_gbrcond +152 -0
- data/dev/defs/dla_gbrfsx_extended +393 -0
- data/dev/defs/dla_gbrpvgrw +90 -0
- data/dev/defs/dla_geamv +142 -0
- data/dev/defs/dla_gercond +134 -0
- data/dev/defs/dla_gerfsx_extended +379 -0
- data/dev/defs/dla_lin_berr +78 -0
- data/dev/defs/dla_porcond +122 -0
- data/dev/defs/dla_porfsx_extended +366 -0
- data/dev/defs/dla_porpvgrw +81 -0
- data/dev/defs/dla_rpvgrw +72 -0
- data/dev/defs/dla_syamv +142 -0
- data/dev/defs/dla_syrcond +131 -0
- data/dev/defs/dla_syrfsx_extended +375 -0
- data/dev/defs/dla_syrpvgrw +101 -0
- data/dev/defs/dla_wwaddw +53 -0
- data/dev/defs/dlabad +43 -0
- data/dev/defs/dlabrd +186 -0
- data/dev/defs/dlacn2 +96 -0
- data/dev/defs/dlacon +80 -0
- data/dev/defs/dlacpy +78 -0
- data/dev/defs/dladiv +57 -0
- data/dev/defs/dlae2 +66 -0
- data/dev/defs/dlaebz +292 -0
- data/dev/defs/dlaed0 +147 -0
- data/dev/defs/dlaed1 +141 -0
- data/dev/defs/dlaed2 +194 -0
- data/dev/defs/dlaed3 +167 -0
- data/dev/defs/dlaed4 +113 -0
- data/dev/defs/dlaed5 +78 -0
- data/dev/defs/dlaed6 +101 -0
- data/dev/defs/dlaed7 +241 -0
- data/dev/defs/dlaed8 +227 -0
- data/dev/defs/dlaed9 +137 -0
- data/dev/defs/dlaeda +147 -0
- data/dev/defs/dlaein +141 -0
- data/dev/defs/dlaev2 +83 -0
- data/dev/defs/dlaexc +107 -0
- data/dev/defs/dlag2 +123 -0
- data/dev/defs/dlag2s +81 -0
- data/dev/defs/dlags2 +108 -0
- data/dev/defs/dlagtf +128 -0
- data/dev/defs/dlagtm +115 -0
- data/dev/defs/dlagts +135 -0
- data/dev/defs/dlagv2 +128 -0
- data/dev/defs/dlahqr +172 -0
- data/dev/defs/dlahr2 +153 -0
- data/dev/defs/dlahrd +141 -0
- data/dev/defs/dlaic1 +101 -0
- data/dev/defs/dlaln2 +187 -0
- data/dev/defs/dlals0 +250 -0
- data/dev/defs/dlalsa +268 -0
- data/dev/defs/dlalsd +152 -0
- data/dev/defs/dlamrg +66 -0
- data/dev/defs/dlaneg +87 -0
- data/dev/defs/dlangb +93 -0
- data/dev/defs/dlange +84 -0
- data/dev/defs/dlangt +77 -0
- data/dev/defs/dlanhs +78 -0
- data/dev/defs/dlansb +97 -0
- data/dev/defs/dlansf +178 -0
- data/dev/defs/dlansp +83 -0
- data/dev/defs/dlanst +69 -0
- data/dev/defs/dlansy +92 -0
- data/dev/defs/dlantb +108 -0
- data/dev/defs/dlantp +93 -0
- data/dev/defs/dlantr +109 -0
- data/dev/defs/dlanv2 +84 -0
- data/dev/defs/dlapll +69 -0
- data/dev/defs/dlapmr +73 -0
- data/dev/defs/dlapmt +73 -0
- data/dev/defs/dlapy2 +30 -0
- data/dev/defs/dlapy3 +34 -0
- data/dev/defs/dlaqgb +124 -0
- data/dev/defs/dlaqge +107 -0
- data/dev/defs/dlaqp2 +115 -0
- data/dev/defs/dlaqps +146 -0
- data/dev/defs/dlaqr0 +225 -0
- data/dev/defs/dlaqr1 +79 -0
- data/dev/defs/dlaqr2 +252 -0
- data/dev/defs/dlaqr3 +247 -0
- data/dev/defs/dlaqr4 +225 -0
- data/dev/defs/dlaqr5 +230 -0
- data/dev/defs/dlaqsb +105 -0
- data/dev/defs/dlaqsp +89 -0
- data/dev/defs/dlaqsy +98 -0
- data/dev/defs/dlaqtr +134 -0
- data/dev/defs/dlar1v +199 -0
- data/dev/defs/dlar2v +86 -0
- data/dev/defs/dlarf +93 -0
- data/dev/defs/dlarfb +139 -0
- data/dev/defs/dlarfg +71 -0
- data/dev/defs/dlarfgp +69 -0
- data/dev/defs/dlarft +133 -0
- data/dev/defs/dlarfx +89 -0
- data/dev/defs/dlargv +74 -0
- data/dev/defs/dlarnv +61 -0
- data/dev/defs/dlarra +106 -0
- data/dev/defs/dlarrb +167 -0
- data/dev/defs/dlarrc +99 -0
- data/dev/defs/dlarrd +290 -0
- data/dev/defs/dlarre +265 -0
- data/dev/defs/dlarrf +168 -0
- data/dev/defs/dlarrj +138 -0
- data/dev/defs/dlarrk +108 -0
- data/dev/defs/dlarrr +62 -0
- data/dev/defs/dlarrv +259 -0
- data/dev/defs/dlarscl2 +61 -0
- data/dev/defs/dlartg +64 -0
- data/dev/defs/dlartgp +62 -0
- data/dev/defs/dlartgs +57 -0
- data/dev/defs/dlartv +82 -0
- data/dev/defs/dlaruv +59 -0
- data/dev/defs/dlarz +109 -0
- data/dev/defs/dlarzb +150 -0
- data/dev/defs/dlarzt +151 -0
- data/dev/defs/dlas2 +71 -0
- data/dev/defs/dlascl +102 -0
- data/dev/defs/dlascl2 +61 -0
- data/dev/defs/dlasd0 +133 -0
- data/dev/defs/dlasd1 +180 -0
- data/dev/defs/dlasd2 +254 -0
- data/dev/defs/dlasd3 +213 -0
- data/dev/defs/dlasd4 +123 -0
- data/dev/defs/dlasd5 +88 -0
- data/dev/defs/dlasd6 +300 -0
- data/dev/defs/dlasd7 +264 -0
- data/dev/defs/dlasd8 +144 -0
- data/dev/defs/dlasda +276 -0
- data/dev/defs/dlasdq +187 -0
- data/dev/defs/dlasdt +76 -0
- data/dev/defs/dlaset +81 -0
- data/dev/defs/dlasq1 +75 -0
- data/dev/defs/dlasq2 +73 -0
- data/dev/defs/dlasq3 +141 -0
- data/dev/defs/dlasq4 +107 -0
- data/dev/defs/dlasq5 +100 -0
- data/dev/defs/dlasq6 +90 -0
- data/dev/defs/dlasr +169 -0
- data/dev/defs/dlasrt +53 -0
- data/dev/defs/dlassq +68 -0
- data/dev/defs/dlasv2 +100 -0
- data/dev/defs/dlaswp +81 -0
- data/dev/defs/dlasy2 +145 -0
- data/dev/defs/dlasyf +126 -0
- data/dev/defs/dlat2s +83 -0
- data/dev/defs/dlatbs +206 -0
- data/dev/defs/dlatdf +131 -0
- data/dev/defs/dlatps +192 -0
- data/dev/defs/dlatrd +168 -0
- data/dev/defs/dlatrs +202 -0
- data/dev/defs/dlatrz +106 -0
- data/dev/defs/dlatzm +123 -0
- data/dev/defs/dlauu2 +68 -0
- data/dev/defs/dlauum +68 -0
- data/dev/defs/dopgtr +87 -0
- data/dev/defs/dopmtr +120 -0
- data/dev/defs/dorbdb +270 -0
- data/dev/defs/dorcsd +264 -0
- data/dev/defs/dorg2l +85 -0
- data/dev/defs/dorg2r +85 -0
- data/dev/defs/dorgbr +129 -0
- data/dev/defs/dorghr +97 -0
- data/dev/defs/dorgl2 +84 -0
- data/dev/defs/dorglq +100 -0
- data/dev/defs/dorgql +101 -0
- data/dev/defs/dorgqr +101 -0
- data/dev/defs/dorgr2 +85 -0
- data/dev/defs/dorgrq +101 -0
- data/dev/defs/dorgtr +95 -0
- data/dev/defs/dorm2l +130 -0
- data/dev/defs/dorm2r +130 -0
- data/dev/defs/dormbr +176 -0
- data/dev/defs/dormhr +157 -0
- data/dev/defs/dorml2 +130 -0
- data/dev/defs/dormlq +143 -0
- data/dev/defs/dormql +143 -0
- data/dev/defs/dormqr +143 -0
- data/dev/defs/dormr2 +130 -0
- data/dev/defs/dormr3 +152 -0
- data/dev/defs/dormrq +143 -0
- data/dev/defs/dormrz +157 -0
- data/dev/defs/dormtr +152 -0
- data/dev/defs/dpbcon +98 -0
- data/dev/defs/dpbequ +96 -0
- data/dev/defs/dpbrfs +166 -0
- data/dev/defs/dpbstf +115 -0
- data/dev/defs/dpbsv +136 -0
- data/dev/defs/dpbsvx +314 -0
- data/dev/defs/dpbtf2 +105 -0
- data/dev/defs/dpbtrf +103 -0
- data/dev/defs/dpbtrs +98 -0
- data/dev/defs/dpftrf +161 -0
- data/dev/defs/dpftri +154 -0
- data/dev/defs/dpftrs +164 -0
- data/dev/defs/dpocon +87 -0
- data/dev/defs/dpoequ +80 -0
- data/dev/defs/dpoequb +80 -0
- data/dev/defs/dporfs +160 -0
- data/dev/defs/dporfsx +370 -0
- data/dev/defs/dposv +105 -0
- data/dev/defs/dposvx +281 -0
- data/dev/defs/dposvxx +468 -0
- data/dev/defs/dpotf2 +75 -0
- data/dev/defs/dpotrf +73 -0
- data/dev/defs/dpotri +67 -0
- data/dev/defs/dpotrs +79 -0
- data/dev/defs/dppcon +85 -0
- data/dev/defs/dppequ +82 -0
- data/dev/defs/dpprfs +146 -0
- data/dev/defs/dppsv +115 -0
- data/dev/defs/dppsvx +283 -0
- data/dev/defs/dpptrf +81 -0
- data/dev/defs/dpptri +58 -0
- data/dev/defs/dpptrs +84 -0
- data/dev/defs/dpstf2 +108 -0
- data/dev/defs/dpstrf +108 -0
- data/dev/defs/dptcon +84 -0
- data/dev/defs/dpteqr +117 -0
- data/dev/defs/dptrfs +141 -0
- data/dev/defs/dptsv +89 -0
- data/dev/defs/dptsvx +203 -0
- data/dev/defs/dpttrf +59 -0
- data/dev/defs/dpttrs +88 -0
- data/dev/defs/dptts2 +77 -0
- data/dev/defs/drscl +49 -0
- data/dev/defs/dsbev +117 -0
- data/dev/defs/dsbevd +169 -0
- data/dev/defs/dsbevx +231 -0
- data/dev/defs/dsbgst +130 -0
- data/dev/defs/dsbgv +156 -0
- data/dev/defs/dsbgvd +206 -0
- data/dev/defs/dsbgvx +259 -0
- data/dev/defs/dsbtrd +132 -0
- data/dev/defs/dsfrk +134 -0
- data/dev/defs/dsgesv +170 -0
- data/dev/defs/dspcon +92 -0
- data/dev/defs/dspev +103 -0
- data/dev/defs/dspevd +155 -0
- data/dev/defs/dspevx +197 -0
- data/dev/defs/dspgst +80 -0
- data/dev/defs/dspgv +139 -0
- data/dev/defs/dspgvd +188 -0
- data/dev/defs/dspgvx +241 -0
- data/dev/defs/dsposv +173 -0
- data/dev/defs/dsprfs +156 -0
- data/dev/defs/dspsv +134 -0
- data/dev/defs/dspsvx +249 -0
- data/dev/defs/dsptrd +118 -0
- data/dev/defs/dsptrf +120 -0
- data/dev/defs/dsptri +77 -0
- data/dev/defs/dsptrs +84 -0
- data/dev/defs/dstebz +229 -0
- data/dev/defs/dstedc +165 -0
- data/dev/defs/dstegr +233 -0
- data/dev/defs/dstein +152 -0
- data/dev/defs/dstemr +285 -0
- data/dev/defs/dsteqr +103 -0
- data/dev/defs/dsterf +54 -0
- data/dev/defs/dstev +88 -0
- data/dev/defs/dstevd +138 -0
- data/dev/defs/dstevr +273 -0
- data/dev/defs/dstevx +193 -0
- data/dev/defs/dsycon +98 -0
- data/dev/defs/dsyconv +90 -0
- data/dev/defs/dsyequb +104 -0
- data/dev/defs/dsyev +104 -0
- data/dev/defs/dsyevd +157 -0
- data/dev/defs/dsyevr +300 -0
- data/dev/defs/dsyevx +218 -0
- data/dev/defs/dsygs2 +96 -0
- data/dev/defs/dsygst +96 -0
- data/dev/defs/dsygv +148 -0
- data/dev/defs/dsygvd +197 -0
- data/dev/defs/dsygvx +263 -0
- data/dev/defs/dsyrfs +170 -0
- data/dev/defs/dsyrfsx +380 -0
- data/dev/defs/dsysv +149 -0
- data/dev/defs/dsysvx +261 -0
- data/dev/defs/dsysvxx +481 -0
- data/dev/defs/dsyswapr +70 -0
- data/dev/defs/dsytd2 +142 -0
- data/dev/defs/dsytf2 +143 -0
- data/dev/defs/dsytrd +162 -0
- data/dev/defs/dsytrf +156 -0
- data/dev/defs/dsytri +83 -0
- data/dev/defs/dsytri2 +110 -0
- data/dev/defs/dsytri2x +90 -0
- data/dev/defs/dsytrs +90 -0
- data/dev/defs/dsytrs2 +97 -0
- data/dev/defs/dtbcon +109 -0
- data/dev/defs/dtbrfs +164 -0
- data/dev/defs/dtbtrs +113 -0
- data/dev/defs/dtfsm +243 -0
- data/dev/defs/dtftri +163 -0
- data/dev/defs/dtfttp +151 -0
- data/dev/defs/dtfttr +176 -0
- data/dev/defs/dtgevc +265 -0
- data/dev/defs/dtgex2 +191 -0
- data/dev/defs/dtgexc +190 -0
- data/dev/defs/dtgsen +422 -0
- data/dev/defs/dtgsja +343 -0
- data/dev/defs/dtgsna +354 -0
- data/dev/defs/dtgsy2 +252 -0
- data/dev/defs/dtgsyl +274 -0
- data/dev/defs/dtpcon +95 -0
- data/dev/defs/dtprfs +150 -0
- data/dev/defs/dtptri +79 -0
- data/dev/defs/dtptrs +98 -0
- data/dev/defs/dtpttf +151 -0
- data/dev/defs/dtpttr +73 -0
- data/dev/defs/dtrcon +103 -0
- data/dev/defs/dtrevc +191 -0
- data/dev/defs/dtrexc +113 -0
- data/dev/defs/dtrrfs +158 -0
- data/dev/defs/dtrsen +284 -0
- data/dev/defs/dtrsna +239 -0
- data/dev/defs/dtrsyl +133 -0
- data/dev/defs/dtrti2 +76 -0
- data/dev/defs/dtrtri +75 -0
- data/dev/defs/dtrtrs +107 -0
- data/dev/defs/dtrttf +171 -0
- data/dev/defs/dtrttp +72 -0
- data/dev/defs/dtzrqf +104 -0
- data/dev/defs/dtzrzf +128 -0
- data/dev/defs/dzsum1 +49 -0
- data/dev/defs/icmax1 +55 -0
- data/dev/defs/ieeeck +49 -0
- data/dev/defs/ilaclc +46 -0
- data/dev/defs/ilaclr +46 -0
- data/dev/defs/iladiag +30 -0
- data/dev/defs/iladlc +46 -0
- data/dev/defs/iladlr +46 -0
- data/dev/defs/ilaenv +133 -0
- data/dev/defs/ilaprec +33 -0
- data/dev/defs/ilaslc +46 -0
- data/dev/defs/ilaslr +46 -0
- data/dev/defs/ilatrans +32 -0
- data/dev/defs/ilauplo +30 -0
- data/dev/defs/ilaver +35 -0
- data/dev/defs/ilazlc +46 -0
- data/dev/defs/ilazlr +46 -0
- data/dev/defs/iparmq +177 -0
- data/dev/defs/izmax1 +55 -0
- data/dev/defs/lsamen +50 -0
- data/dev/defs/sbbcsd +297 -0
- data/dev/defs/sbdsdc +192 -0
- data/dev/defs/sbdsqr +203 -0
- data/dev/defs/scsum1 +49 -0
- data/dev/defs/sdisna +84 -0
- data/dev/defs/sgbbrd +167 -0
- data/dev/defs/sgbcon +114 -0
- data/dev/defs/sgbequ +121 -0
- data/dev/defs/sgbequb +128 -0
- data/dev/defs/sgbrfs +182 -0
- data/dev/defs/sgbrfsx +419 -0
- data/dev/defs/sgbsv +134 -0
- data/dev/defs/sgbsvx +356 -0
- data/dev/defs/sgbsvxx +539 -0
- data/dev/defs/sgbtf2 +110 -0
- data/dev/defs/sgbtrf +109 -0
- data/dev/defs/sgbtrs +106 -0
- data/dev/defs/sgebak +95 -0
- data/dev/defs/sgebal +125 -0
- data/dev/defs/sgebd2 +162 -0
- data/dev/defs/sgebrd +178 -0
- data/dev/defs/sgecon +90 -0
- data/dev/defs/sgeequ +107 -0
- data/dev/defs/sgeequb +114 -0
- data/dev/defs/sgees +188 -0
- data/dev/defs/sgeesx +251 -0
- data/dev/defs/sgeev +166 -0
- data/dev/defs/sgeevx +282 -0
- data/dev/defs/sgegs +207 -0
- data/dev/defs/sgegv +286 -0
- data/dev/defs/sgehd2 +115 -0
- data/dev/defs/sgehrd +136 -0
- data/dev/defs/sgejsv +860 -0
- data/dev/defs/sgelq2 +89 -0
- data/dev/defs/sgelqf +113 -0
- data/dev/defs/sgels +158 -0
- data/dev/defs/sgelsd +194 -0
- data/dev/defs/sgelss +149 -0
- data/dev/defs/sgelsx +148 -0
- data/dev/defs/sgelsy +181 -0
- data/dev/defs/sgeql2 +91 -0
- data/dev/defs/sgeqlf +116 -0
- data/dev/defs/sgeqp3 +120 -0
- data/dev/defs/sgeqpf +111 -0
- data/dev/defs/sgeqr2 +89 -0
- data/dev/defs/sgeqr2p +89 -0
- data/dev/defs/sgeqrf +114 -0
- data/dev/defs/sgeqrfp +114 -0
- data/dev/defs/sgerfs +164 -0
- data/dev/defs/sgerfsx +394 -0
- data/dev/defs/sgerq2 +91 -0
- data/dev/defs/sgerqf +116 -0
- data/dev/defs/sgesc2 +86 -0
- data/dev/defs/sgesdd +197 -0
- data/dev/defs/sgesv +97 -0
- data/dev/defs/sgesvd +188 -0
- data/dev/defs/sgesvj +304 -0
- data/dev/defs/sgesvx +333 -0
- data/dev/defs/sgesvxx +519 -0
- data/dev/defs/sgetc2 +82 -0
- data/dev/defs/sgetf2 +76 -0
- data/dev/defs/sgetrf +76 -0
- data/dev/defs/sgetri +86 -0
- data/dev/defs/sgetrs +91 -0
- data/dev/defs/sggbak +119 -0
- data/dev/defs/sggbal +144 -0
- data/dev/defs/sgges +261 -0
- data/dev/defs/sggesx +342 -0
- data/dev/defs/sggev +206 -0
- data/dev/defs/sggevx +371 -0
- data/dev/defs/sggglm +160 -0
- data/dev/defs/sgghrd +174 -0
- data/dev/defs/sgglse +157 -0
- data/dev/defs/sggqrf +195 -0
- data/dev/defs/sggrqf +194 -0
- data/dev/defs/sggsvd +319 -0
- data/dev/defs/sggsvp +233 -0
- data/dev/defs/sgsvj0 +200 -0
- data/dev/defs/sgsvj1 +220 -0
- data/dev/defs/sgtcon +119 -0
- data/dev/defs/sgtrfs +193 -0
- data/dev/defs/sgtsv +100 -0
- data/dev/defs/sgtsvx +275 -0
- data/dev/defs/sgttrf +97 -0
- data/dev/defs/sgttrs +119 -0
- data/dev/defs/sgtts2 +106 -0
- data/dev/defs/shgeqz +282 -0
- data/dev/defs/shsein +234 -0
- data/dev/defs/shseqr +279 -0
- data/dev/defs/sisnan +29 -0
- data/dev/defs/sla_gbamv +152 -0
- data/dev/defs/sla_gbrcond +152 -0
- data/dev/defs/sla_gbrfsx_extended +391 -0
- data/dev/defs/sla_gbrpvgrw +90 -0
- data/dev/defs/sla_geamv +142 -0
- data/dev/defs/sla_gercond +134 -0
- data/dev/defs/sla_gerfsx_extended +376 -0
- data/dev/defs/sla_lin_berr +78 -0
- data/dev/defs/sla_porcond +122 -0
- data/dev/defs/sla_porfsx_extended +363 -0
- data/dev/defs/sla_porpvgrw +81 -0
- data/dev/defs/sla_rpvgrw +72 -0
- data/dev/defs/sla_syamv +142 -0
- data/dev/defs/sla_syrcond +131 -0
- data/dev/defs/sla_syrfsx_extended +372 -0
- data/dev/defs/sla_syrpvgrw +101 -0
- data/dev/defs/sla_wwaddw +53 -0
- data/dev/defs/slabad +43 -0
- data/dev/defs/slabrd +186 -0
- data/dev/defs/slacn2 +96 -0
- data/dev/defs/slacon +80 -0
- data/dev/defs/slacpy +78 -0
- data/dev/defs/sladiv +57 -0
- data/dev/defs/slae2 +66 -0
- data/dev/defs/slaebz +292 -0
- data/dev/defs/slaed0 +147 -0
- data/dev/defs/slaed1 +141 -0
- data/dev/defs/slaed2 +194 -0
- data/dev/defs/slaed3 +167 -0
- data/dev/defs/slaed4 +113 -0
- data/dev/defs/slaed5 +78 -0
- data/dev/defs/slaed6 +101 -0
- data/dev/defs/slaed7 +241 -0
- data/dev/defs/slaed8 +227 -0
- data/dev/defs/slaed9 +137 -0
- data/dev/defs/slaeda +147 -0
- data/dev/defs/slaein +141 -0
- data/dev/defs/slaev2 +83 -0
- data/dev/defs/slaexc +107 -0
- data/dev/defs/slag2 +123 -0
- data/dev/defs/slag2d +74 -0
- data/dev/defs/slags2 +108 -0
- data/dev/defs/slagtf +128 -0
- data/dev/defs/slagtm +115 -0
- data/dev/defs/slagts +135 -0
- data/dev/defs/slagv2 +128 -0
- data/dev/defs/slahqr +172 -0
- data/dev/defs/slahr2 +153 -0
- data/dev/defs/slahrd +142 -0
- data/dev/defs/slaic1 +101 -0
- data/dev/defs/slaln2 +187 -0
- data/dev/defs/slals0 +250 -0
- data/dev/defs/slalsa +268 -0
- data/dev/defs/slalsd +150 -0
- data/dev/defs/slamrg +66 -0
- data/dev/defs/slaneg +87 -0
- data/dev/defs/slangb +93 -0
- data/dev/defs/slange +84 -0
- data/dev/defs/slangt +77 -0
- data/dev/defs/slanhs +78 -0
- data/dev/defs/slansb +97 -0
- data/dev/defs/slansf +179 -0
- data/dev/defs/slansp +83 -0
- data/dev/defs/slanst +69 -0
- data/dev/defs/slansy +92 -0
- data/dev/defs/slantb +108 -0
- data/dev/defs/slantp +93 -0
- data/dev/defs/slantr +109 -0
- data/dev/defs/slanv2 +84 -0
- data/dev/defs/slapll +69 -0
- data/dev/defs/slapmr +73 -0
- data/dev/defs/slapmt +73 -0
- data/dev/defs/slapy2 +30 -0
- data/dev/defs/slapy3 +34 -0
- data/dev/defs/slaqgb +124 -0
- data/dev/defs/slaqge +107 -0
- data/dev/defs/slaqp2 +115 -0
- data/dev/defs/slaqps +146 -0
- data/dev/defs/slaqr0 +225 -0
- data/dev/defs/slaqr1 +79 -0
- data/dev/defs/slaqr2 +252 -0
- data/dev/defs/slaqr3 +247 -0
- data/dev/defs/slaqr4 +225 -0
- data/dev/defs/slaqr5 +230 -0
- data/dev/defs/slaqsb +105 -0
- data/dev/defs/slaqsp +89 -0
- data/dev/defs/slaqsy +98 -0
- data/dev/defs/slaqtr +134 -0
- data/dev/defs/slar1v +199 -0
- data/dev/defs/slar2v +86 -0
- data/dev/defs/slarf +93 -0
- data/dev/defs/slarfb +139 -0
- data/dev/defs/slarfg +71 -0
- data/dev/defs/slarfgp +69 -0
- data/dev/defs/slarft +133 -0
- data/dev/defs/slarfx +89 -0
- data/dev/defs/slargv +74 -0
- data/dev/defs/slarnv +61 -0
- data/dev/defs/slarra +106 -0
- data/dev/defs/slarrb +167 -0
- data/dev/defs/slarrc +99 -0
- data/dev/defs/slarrd +290 -0
- data/dev/defs/slarre +265 -0
- data/dev/defs/slarrf +165 -0
- data/dev/defs/slarrj +138 -0
- data/dev/defs/slarrk +108 -0
- data/dev/defs/slarrr +62 -0
- data/dev/defs/slarrv +259 -0
- data/dev/defs/slarscl2 +61 -0
- data/dev/defs/slartg +64 -0
- data/dev/defs/slartgp +62 -0
- data/dev/defs/slartgs +57 -0
- data/dev/defs/slartv +82 -0
- data/dev/defs/slaruv +59 -0
- data/dev/defs/slarz +109 -0
- data/dev/defs/slarzb +150 -0
- data/dev/defs/slarzt +151 -0
- data/dev/defs/slas2 +71 -0
- data/dev/defs/slascl +102 -0
- data/dev/defs/slascl2 +61 -0
- data/dev/defs/slasd0 +131 -0
- data/dev/defs/slasd1 +179 -0
- data/dev/defs/slasd2 +254 -0
- data/dev/defs/slasd3 +213 -0
- data/dev/defs/slasd4 +123 -0
- data/dev/defs/slasd5 +88 -0
- data/dev/defs/slasd6 +300 -0
- data/dev/defs/slasd7 +264 -0
- data/dev/defs/slasd8 +144 -0
- data/dev/defs/slasda +275 -0
- data/dev/defs/slasdq +187 -0
- data/dev/defs/slasdt +76 -0
- data/dev/defs/slaset +81 -0
- data/dev/defs/slasq1 +75 -0
- data/dev/defs/slasq2 +73 -0
- data/dev/defs/slasq3 +141 -0
- data/dev/defs/slasq4 +107 -0
- data/dev/defs/slasq5 +100 -0
- data/dev/defs/slasq6 +90 -0
- data/dev/defs/slasr +169 -0
- data/dev/defs/slasrt +53 -0
- data/dev/defs/slassq +68 -0
- data/dev/defs/slasv2 +100 -0
- data/dev/defs/slaswp +81 -0
- data/dev/defs/slasy2 +145 -0
- data/dev/defs/slasyf +126 -0
- data/dev/defs/slatbs +206 -0
- data/dev/defs/slatdf +131 -0
- data/dev/defs/slatps +192 -0
- data/dev/defs/slatrd +168 -0
- data/dev/defs/slatrs +202 -0
- data/dev/defs/slatrz +106 -0
- data/dev/defs/slatzm +123 -0
- data/dev/defs/slauu2 +68 -0
- data/dev/defs/slauum +68 -0
- data/dev/defs/sopgtr +87 -0
- data/dev/defs/sopmtr +120 -0
- data/dev/defs/sorbdb +270 -0
- data/dev/defs/sorcsd +264 -0
- data/dev/defs/sorg2l +85 -0
- data/dev/defs/sorg2r +85 -0
- data/dev/defs/sorgbr +129 -0
- data/dev/defs/sorghr +97 -0
- data/dev/defs/sorgl2 +84 -0
- data/dev/defs/sorglq +100 -0
- data/dev/defs/sorgql +101 -0
- data/dev/defs/sorgqr +101 -0
- data/dev/defs/sorgr2 +85 -0
- data/dev/defs/sorgrq +101 -0
- data/dev/defs/sorgtr +95 -0
- data/dev/defs/sorm2l +130 -0
- data/dev/defs/sorm2r +130 -0
- data/dev/defs/sormbr +176 -0
- data/dev/defs/sormhr +157 -0
- data/dev/defs/sorml2 +130 -0
- data/dev/defs/sormlq +143 -0
- data/dev/defs/sormql +143 -0
- data/dev/defs/sormqr +143 -0
- data/dev/defs/sormr2 +130 -0
- data/dev/defs/sormr3 +152 -0
- data/dev/defs/sormrq +143 -0
- data/dev/defs/sormrz +157 -0
- data/dev/defs/sormtr +152 -0
- data/dev/defs/spbcon +98 -0
- data/dev/defs/spbequ +96 -0
- data/dev/defs/spbrfs +166 -0
- data/dev/defs/spbstf +115 -0
- data/dev/defs/spbsv +136 -0
- data/dev/defs/spbsvx +314 -0
- data/dev/defs/spbtf2 +105 -0
- data/dev/defs/spbtrf +103 -0
- data/dev/defs/spbtrs +98 -0
- data/dev/defs/spftrf +161 -0
- data/dev/defs/spftri +154 -0
- data/dev/defs/spftrs +164 -0
- data/dev/defs/spocon +87 -0
- data/dev/defs/spoequ +80 -0
- data/dev/defs/spoequb +80 -0
- data/dev/defs/sporfs +160 -0
- data/dev/defs/sporfsx +370 -0
- data/dev/defs/sposv +105 -0
- data/dev/defs/sposvx +281 -0
- data/dev/defs/sposvxx +471 -0
- data/dev/defs/spotf2 +75 -0
- data/dev/defs/spotrf +73 -0
- data/dev/defs/spotri +67 -0
- data/dev/defs/spotrs +79 -0
- data/dev/defs/sppcon +85 -0
- data/dev/defs/sppequ +82 -0
- data/dev/defs/spprfs +146 -0
- data/dev/defs/sppsv +115 -0
- data/dev/defs/sppsvx +283 -0
- data/dev/defs/spptrf +81 -0
- data/dev/defs/spptri +58 -0
- data/dev/defs/spptrs +84 -0
- data/dev/defs/spstf2 +108 -0
- data/dev/defs/spstrf +108 -0
- data/dev/defs/sptcon +84 -0
- data/dev/defs/spteqr +117 -0
- data/dev/defs/sptrfs +141 -0
- data/dev/defs/sptsv +89 -0
- data/dev/defs/sptsvx +203 -0
- data/dev/defs/spttrf +59 -0
- data/dev/defs/spttrs +88 -0
- data/dev/defs/sptts2 +77 -0
- data/dev/defs/srscl +49 -0
- data/dev/defs/ssbev +117 -0
- data/dev/defs/ssbevd +169 -0
- data/dev/defs/ssbevx +231 -0
- data/dev/defs/ssbgst +130 -0
- data/dev/defs/ssbgv +156 -0
- data/dev/defs/ssbgvd +206 -0
- data/dev/defs/ssbgvx +259 -0
- data/dev/defs/ssbtrd +132 -0
- data/dev/defs/ssfrk +134 -0
- data/dev/defs/sspcon +92 -0
- data/dev/defs/sspev +103 -0
- data/dev/defs/sspevd +154 -0
- data/dev/defs/sspevx +197 -0
- data/dev/defs/sspgst +80 -0
- data/dev/defs/sspgv +139 -0
- data/dev/defs/sspgvd +188 -0
- data/dev/defs/sspgvx +241 -0
- data/dev/defs/ssprfs +156 -0
- data/dev/defs/sspsv +134 -0
- data/dev/defs/sspsvx +249 -0
- data/dev/defs/ssptrd +118 -0
- data/dev/defs/ssptrf +120 -0
- data/dev/defs/ssptri +77 -0
- data/dev/defs/ssptrs +84 -0
- data/dev/defs/sstebz +229 -0
- data/dev/defs/sstedc +164 -0
- data/dev/defs/sstegr +233 -0
- data/dev/defs/sstein +152 -0
- data/dev/defs/sstemr +285 -0
- data/dev/defs/ssteqr +103 -0
- data/dev/defs/ssterf +54 -0
- data/dev/defs/sstev +88 -0
- data/dev/defs/sstevd +138 -0
- data/dev/defs/sstevr +275 -0
- data/dev/defs/sstevx +193 -0
- data/dev/defs/ssycon +98 -0
- data/dev/defs/ssyconv +90 -0
- data/dev/defs/ssyequb +104 -0
- data/dev/defs/ssyev +104 -0
- data/dev/defs/ssyevd +157 -0
- data/dev/defs/ssyevr +302 -0
- data/dev/defs/ssyevx +218 -0
- data/dev/defs/ssygs2 +96 -0
- data/dev/defs/ssygst +96 -0
- data/dev/defs/ssygv +148 -0
- data/dev/defs/ssygvd +197 -0
- data/dev/defs/ssygvx +263 -0
- data/dev/defs/ssyrfs +170 -0
- data/dev/defs/ssyrfsx +380 -0
- data/dev/defs/ssysv +149 -0
- data/dev/defs/ssysvx +261 -0
- data/dev/defs/ssysvxx +484 -0
- data/dev/defs/ssyswapr +70 -0
- data/dev/defs/ssytd2 +142 -0
- data/dev/defs/ssytf2 +143 -0
- data/dev/defs/ssytrd +162 -0
- data/dev/defs/ssytrf +156 -0
- data/dev/defs/ssytri +83 -0
- data/dev/defs/ssytri2 +110 -0
- data/dev/defs/ssytri2x +90 -0
- data/dev/defs/ssytrs +90 -0
- data/dev/defs/ssytrs2 +97 -0
- data/dev/defs/stbcon +109 -0
- data/dev/defs/stbrfs +164 -0
- data/dev/defs/stbtrs +113 -0
- data/dev/defs/stfsm +243 -0
- data/dev/defs/stftri +163 -0
- data/dev/defs/stfttp +151 -0
- data/dev/defs/stfttr +174 -0
- data/dev/defs/stgevc +265 -0
- data/dev/defs/stgex2 +191 -0
- data/dev/defs/stgexc +190 -0
- data/dev/defs/stgsen +421 -0
- data/dev/defs/stgsja +343 -0
- data/dev/defs/stgsna +354 -0
- data/dev/defs/stgsy2 +252 -0
- data/dev/defs/stgsyl +274 -0
- data/dev/defs/stpcon +95 -0
- data/dev/defs/stprfs +150 -0
- data/dev/defs/stptri +79 -0
- data/dev/defs/stptrs +98 -0
- data/dev/defs/stpttf +151 -0
- data/dev/defs/stpttr +73 -0
- data/dev/defs/strcon +103 -0
- data/dev/defs/strevc +191 -0
- data/dev/defs/strexc +113 -0
- data/dev/defs/strrfs +158 -0
- data/dev/defs/strsen +284 -0
- data/dev/defs/strsna +239 -0
- data/dev/defs/strsyl +133 -0
- data/dev/defs/strti2 +76 -0
- data/dev/defs/strtri +75 -0
- data/dev/defs/strtrs +107 -0
- data/dev/defs/strttf +171 -0
- data/dev/defs/strttp +72 -0
- data/dev/defs/stzrqf +104 -0
- data/dev/defs/stzrzf +128 -0
- data/dev/defs/xerbla +40 -0
- data/dev/defs/xerbla_array +65 -0
- data/dev/defs/zbbcsd +297 -0
- data/dev/defs/zbdsqr +196 -0
- data/dev/defs/zcgesv +176 -0
- data/dev/defs/zcposv +182 -0
- data/dev/defs/zdrscl +49 -0
- data/dev/defs/zgbbrd +174 -0
- data/dev/defs/zgbcon +114 -0
- data/dev/defs/zgbequ +121 -0
- data/dev/defs/zgbequb +128 -0
- data/dev/defs/zgbrfs +182 -0
- data/dev/defs/zgbrfsx +418 -0
- data/dev/defs/zgbsv +134 -0
- data/dev/defs/zgbsvx +356 -0
- data/dev/defs/zgbsvxx +536 -0
- data/dev/defs/zgbtf2 +110 -0
- data/dev/defs/zgbtrf +109 -0
- data/dev/defs/zgbtrs +106 -0
- data/dev/defs/zgebak +95 -0
- data/dev/defs/zgebal +125 -0
- data/dev/defs/zgebd2 +162 -0
- data/dev/defs/zgebrd +178 -0
- data/dev/defs/zgecon +90 -0
- data/dev/defs/zgeequ +107 -0
- data/dev/defs/zgeequb +114 -0
- data/dev/defs/zgees +170 -0
- data/dev/defs/zgeesx +209 -0
- data/dev/defs/zgeev +154 -0
- data/dev/defs/zgeevx +263 -0
- data/dev/defs/zgegs +205 -0
- data/dev/defs/zgegv +261 -0
- data/dev/defs/zgehd2 +115 -0
- data/dev/defs/zgehrd +136 -0
- data/dev/defs/zgelq2 +89 -0
- data/dev/defs/zgelqf +113 -0
- data/dev/defs/zgels +157 -0
- data/dev/defs/zgelsd +211 -0
- data/dev/defs/zgelss +156 -0
- data/dev/defs/zgelsx +155 -0
- data/dev/defs/zgelsy +188 -0
- data/dev/defs/zgeql2 +91 -0
- data/dev/defs/zgeqlf +116 -0
- data/dev/defs/zgeqp3 +127 -0
- data/dev/defs/zgeqpf +118 -0
- data/dev/defs/zgeqr2 +89 -0
- data/dev/defs/zgeqr2p +89 -0
- data/dev/defs/zgeqrf +114 -0
- data/dev/defs/zgeqrfp +114 -0
- data/dev/defs/zgerfs +164 -0
- data/dev/defs/zgerfsx +394 -0
- data/dev/defs/zgerq2 +91 -0
- data/dev/defs/zgerqf +116 -0
- data/dev/defs/zgesc2 +87 -0
- data/dev/defs/zgesdd +203 -0
- data/dev/defs/zgesv +97 -0
- data/dev/defs/zgesvd +195 -0
- data/dev/defs/zgesvx +333 -0
- data/dev/defs/zgesvxx +516 -0
- data/dev/defs/zgetc2 +82 -0
- data/dev/defs/zgetf2 +76 -0
- data/dev/defs/zgetrf +76 -0
- data/dev/defs/zgetri +86 -0
- data/dev/defs/zgetrs +91 -0
- data/dev/defs/zggbak +119 -0
- data/dev/defs/zggbal +144 -0
- data/dev/defs/zgges +247 -0
- data/dev/defs/zggesx +311 -0
- data/dev/defs/zggev +197 -0
- data/dev/defs/zggevx +353 -0
- data/dev/defs/zggglm +160 -0
- data/dev/defs/zgghrd +171 -0
- data/dev/defs/zgglse +157 -0
- data/dev/defs/zggqrf +195 -0
- data/dev/defs/zggrqf +194 -0
- data/dev/defs/zggsvd +324 -0
- data/dev/defs/zggsvp +240 -0
- data/dev/defs/zgtcon +112 -0
- data/dev/defs/zgtrfs +193 -0
- data/dev/defs/zgtsv +97 -0
- data/dev/defs/zgtsvx +275 -0
- data/dev/defs/zgttrf +97 -0
- data/dev/defs/zgttrs +119 -0
- data/dev/defs/zgtts2 +108 -0
- data/dev/defs/zhbev +124 -0
- data/dev/defs/zhbevd +194 -0
- data/dev/defs/zhbevx +234 -0
- data/dev/defs/zhbgst +137 -0
- data/dev/defs/zhbgv +163 -0
- data/dev/defs/zhbgvd +231 -0
- data/dev/defs/zhbgvx +265 -0
- data/dev/defs/zhbtrd +132 -0
- data/dev/defs/zhecon +91 -0
- data/dev/defs/zheequb +87 -0
- data/dev/defs/zheev +111 -0
- data/dev/defs/zheevd +178 -0
- data/dev/defs/zheevr +325 -0
- data/dev/defs/zheevx +225 -0
- data/dev/defs/zhegs2 +96 -0
- data/dev/defs/zhegst +96 -0
- data/dev/defs/zhegv +155 -0
- data/dev/defs/zhegvd +222 -0
- data/dev/defs/zhegvx +270 -0
- data/dev/defs/zherfs +170 -0
- data/dev/defs/zherfsx +380 -0
- data/dev/defs/zhesv +147 -0
- data/dev/defs/zhesvx +261 -0
- data/dev/defs/zhesvxx +478 -0
- data/dev/defs/zhetd2 +143 -0
- data/dev/defs/zhetf2 +141 -0
- data/dev/defs/zhetrd +162 -0
- data/dev/defs/zhetrf +151 -0
- data/dev/defs/zhetri +83 -0
- data/dev/defs/zhetrs +90 -0
- data/dev/defs/zhetrs2 +97 -0
- data/dev/defs/zhfrk +138 -0
- data/dev/defs/zhgeqz +258 -0
- data/dev/defs/zhpcon +85 -0
- data/dev/defs/zhpev +110 -0
- data/dev/defs/zhpevd +180 -0
- data/dev/defs/zhpevx +204 -0
- data/dev/defs/zhpgst +80 -0
- data/dev/defs/zhpgv +145 -0
- data/dev/defs/zhpgvd +221 -0
- data/dev/defs/zhpgvx +247 -0
- data/dev/defs/zhprfs +156 -0
- data/dev/defs/zhpsv +134 -0
- data/dev/defs/zhpsvx +248 -0
- data/dev/defs/zhptrd +118 -0
- data/dev/defs/zhptrf +120 -0
- data/dev/defs/zhptri +77 -0
- data/dev/defs/zhptrs +84 -0
- data/dev/defs/zhsein +217 -0
- data/dev/defs/zhseqr +263 -0
- data/dev/defs/zla_gbamv +154 -0
- data/dev/defs/zla_gbrcond_c +146 -0
- data/dev/defs/zla_gbrcond_x +140 -0
- data/dev/defs/zla_gbrfsx_extended +391 -0
- data/dev/defs/zla_gbrpvgrw +94 -0
- data/dev/defs/zla_geamv +142 -0
- data/dev/defs/zla_gercond_c +128 -0
- data/dev/defs/zla_gercond_x +122 -0
- data/dev/defs/zla_gerfsx_extended +378 -0
- data/dev/defs/zla_heamv +142 -0
- data/dev/defs/zla_hercond_c +125 -0
- data/dev/defs/zla_hercond_x +119 -0
- data/dev/defs/zla_herfsx_extended +375 -0
- data/dev/defs/zla_herpvgrw +105 -0
- data/dev/defs/zla_lin_berr +79 -0
- data/dev/defs/zla_porcond_c +116 -0
- data/dev/defs/zla_porcond_x +110 -0
- data/dev/defs/zla_porfsx_extended +366 -0
- data/dev/defs/zla_porpvgrw +85 -0
- data/dev/defs/zla_rpvgrw +76 -0
- data/dev/defs/zla_syamv +142 -0
- data/dev/defs/zla_syrcond_c +125 -0
- data/dev/defs/zla_syrcond_x +119 -0
- data/dev/defs/zla_syrfsx_extended +375 -0
- data/dev/defs/zla_syrpvgrw +105 -0
- data/dev/defs/zla_wwaddw +53 -0
- data/dev/defs/zlabrd +187 -0
- data/dev/defs/zlacgv +44 -0
- data/dev/defs/zlacn2 +91 -0
- data/dev/defs/zlacon +75 -0
- data/dev/defs/zlacp2 +78 -0
- data/dev/defs/zlacpy +78 -0
- data/dev/defs/zlacrm +88 -0
- data/dev/defs/zlacrt +73 -0
- data/dev/defs/zladiv +37 -0
- data/dev/defs/zlaed0 +121 -0
- data/dev/defs/zlaed7 +237 -0
- data/dev/defs/zlaed8 +211 -0
- data/dev/defs/zlaein +117 -0
- data/dev/defs/zlaesy +81 -0
- data/dev/defs/zlaev2 +83 -0
- data/dev/defs/zlag2c +82 -0
- data/dev/defs/zlags2 +116 -0
- data/dev/defs/zlagtm +115 -0
- data/dev/defs/zlahef +127 -0
- data/dev/defs/zlahqr +159 -0
- data/dev/defs/zlahr2 +153 -0
- data/dev/defs/zlahrd +141 -0
- data/dev/defs/zlaic1 +101 -0
- data/dev/defs/zlals0 +251 -0
- data/dev/defs/zlalsa +267 -0
- data/dev/defs/zlalsd +160 -0
- data/dev/defs/zlangb +92 -0
- data/dev/defs/zlange +84 -0
- data/dev/defs/zlangt +77 -0
- data/dev/defs/zlanhb +99 -0
- data/dev/defs/zlanhe +93 -0
- data/dev/defs/zlanhf +211 -0
- data/dev/defs/zlanhp +85 -0
- data/dev/defs/zlanhs +78 -0
- data/dev/defs/zlanht +69 -0
- data/dev/defs/zlansb +97 -0
- data/dev/defs/zlansp +83 -0
- data/dev/defs/zlansy +92 -0
- data/dev/defs/zlantb +108 -0
- data/dev/defs/zlantp +93 -0
- data/dev/defs/zlantr +109 -0
- data/dev/defs/zlapll +67 -0
- data/dev/defs/zlapmr +73 -0
- data/dev/defs/zlapmt +73 -0
- data/dev/defs/zlaqgb +124 -0
- data/dev/defs/zlaqge +107 -0
- data/dev/defs/zlaqhb +105 -0
- data/dev/defs/zlaqhe +98 -0
- data/dev/defs/zlaqhp +89 -0
- data/dev/defs/zlaqp2 +115 -0
- data/dev/defs/zlaqps +141 -0
- data/dev/defs/zlaqr0 +203 -0
- data/dev/defs/zlaqr1 +66 -0
- data/dev/defs/zlaqr2 +243 -0
- data/dev/defs/zlaqr3 +238 -0
- data/dev/defs/zlaqr4 +203 -0
- data/dev/defs/zlaqr5 +221 -0
- data/dev/defs/zlaqsb +105 -0
- data/dev/defs/zlaqsp +89 -0
- data/dev/defs/zlaqsy +98 -0
- data/dev/defs/zlar1v +199 -0
- data/dev/defs/zlar2v +88 -0
- data/dev/defs/zlarcm +88 -0
- data/dev/defs/zlarf +97 -0
- data/dev/defs/zlarfb +139 -0
- data/dev/defs/zlarfg +71 -0
- data/dev/defs/zlarfgp +69 -0
- data/dev/defs/zlarft +133 -0
- data/dev/defs/zlarfx +88 -0
- data/dev/defs/zlargv +88 -0
- data/dev/defs/zlarnv +63 -0
- data/dev/defs/zlarrv +259 -0
- data/dev/defs/zlarscl2 +61 -0
- data/dev/defs/zlartg +66 -0
- data/dev/defs/zlartv +82 -0
- data/dev/defs/zlarz +111 -0
- data/dev/defs/zlarzb +150 -0
- data/dev/defs/zlarzt +151 -0
- data/dev/defs/zlascl +102 -0
- data/dev/defs/zlascl2 +61 -0
- data/dev/defs/zlaset +77 -0
- data/dev/defs/zlasr +169 -0
- data/dev/defs/zlassq +71 -0
- data/dev/defs/zlaswp +81 -0
- data/dev/defs/zlasyf +127 -0
- data/dev/defs/zlat2c +85 -0
- data/dev/defs/zlatbs +206 -0
- data/dev/defs/zlatdf +133 -0
- data/dev/defs/zlatps +193 -0
- data/dev/defs/zlatrd +168 -0
- data/dev/defs/zlatrs +202 -0
- data/dev/defs/zlatrz +106 -0
- data/dev/defs/zlatzm +124 -0
- data/dev/defs/zlauu2 +68 -0
- data/dev/defs/zlauum +68 -0
- data/dev/defs/zpbcon +99 -0
- data/dev/defs/zpbequ +96 -0
- data/dev/defs/zpbrfs +166 -0
- data/dev/defs/zpbstf +116 -0
- data/dev/defs/zpbsv +136 -0
- data/dev/defs/zpbsvx +314 -0
- data/dev/defs/zpbtf2 +105 -0
- data/dev/defs/zpbtrf +103 -0
- data/dev/defs/zpbtrs +98 -0
- data/dev/defs/zpftrf +182 -0
- data/dev/defs/zpftri +175 -0
- data/dev/defs/zpftrs +185 -0
- data/dev/defs/zpocon +87 -0
- data/dev/defs/zpoequ +80 -0
- data/dev/defs/zpoequb +80 -0
- data/dev/defs/zporfs +160 -0
- data/dev/defs/zporfsx +370 -0
- data/dev/defs/zposv +105 -0
- data/dev/defs/zposvx +281 -0
- data/dev/defs/zposvxx +468 -0
- data/dev/defs/zpotf2 +75 -0
- data/dev/defs/zpotrf +73 -0
- data/dev/defs/zpotri +67 -0
- data/dev/defs/zpotrs +79 -0
- data/dev/defs/zppcon +85 -0
- data/dev/defs/zppequ +82 -0
- data/dev/defs/zpprfs +146 -0
- data/dev/defs/zppsv +115 -0
- data/dev/defs/zppsvx +283 -0
- data/dev/defs/zpptrf +81 -0
- data/dev/defs/zpptri +58 -0
- data/dev/defs/zpptrs +84 -0
- data/dev/defs/zpstf2 +108 -0
- data/dev/defs/zpstrf +108 -0
- data/dev/defs/zptcon +84 -0
- data/dev/defs/zpteqr +116 -0
- data/dev/defs/zptrfs +161 -0
- data/dev/defs/zptsv +89 -0
- data/dev/defs/zptsvx +210 -0
- data/dev/defs/zpttrf +59 -0
- data/dev/defs/zpttrs +98 -0
- data/dev/defs/zptts2 +89 -0
- data/dev/defs/zrot +72 -0
- data/dev/defs/zspcon +85 -0
- data/dev/defs/zspmv +119 -0
- data/dev/defs/zspr +98 -0
- data/dev/defs/zsprfs +156 -0
- data/dev/defs/zspsv +134 -0
- data/dev/defs/zspsvx +248 -0
- data/dev/defs/zsptrf +121 -0
- data/dev/defs/zsptri +77 -0
- data/dev/defs/zsptrs +84 -0
- data/dev/defs/zstedc +192 -0
- data/dev/defs/zstegr +233 -0
- data/dev/defs/zstein +159 -0
- data/dev/defs/zstemr +302 -0
- data/dev/defs/zsteqr +103 -0
- data/dev/defs/zsycon +91 -0
- data/dev/defs/zsyconv +90 -0
- data/dev/defs/zsyequb +104 -0
- data/dev/defs/zsymv +126 -0
- data/dev/defs/zsyr +102 -0
- data/dev/defs/zsyrfs +170 -0
- data/dev/defs/zsyrfsx +380 -0
- data/dev/defs/zsysv +149 -0
- data/dev/defs/zsysvx +261 -0
- data/dev/defs/zsysvxx +482 -0
- data/dev/defs/zsyswapr +70 -0
- data/dev/defs/zsytf2 +140 -0
- data/dev/defs/zsytrf +156 -0
- data/dev/defs/zsytri +83 -0
- data/dev/defs/zsytri2 +111 -0
- data/dev/defs/zsytri2x +90 -0
- data/dev/defs/zsytrs +90 -0
- data/dev/defs/zsytrs2 +97 -0
- data/dev/defs/ztbcon +109 -0
- data/dev/defs/ztbrfs +164 -0
- data/dev/defs/ztbtrs +113 -0
- data/dev/defs/ztfsm +259 -0
- data/dev/defs/ztftri +183 -0
- data/dev/defs/ztfttp +172 -0
- data/dev/defs/ztfttr +182 -0
- data/dev/defs/ztgevc +194 -0
- data/dev/defs/ztgex2 +158 -0
- data/dev/defs/ztgexc +176 -0
- data/dev/defs/ztgsen +406 -0
- data/dev/defs/ztgsja +344 -0
- data/dev/defs/ztgsna +282 -0
- data/dev/defs/ztgsy2 +235 -0
- data/dev/defs/ztgsyl +273 -0
- data/dev/defs/ztpcon +95 -0
- data/dev/defs/ztprfs +150 -0
- data/dev/defs/ztptri +79 -0
- data/dev/defs/ztptrs +98 -0
- data/dev/defs/ztpttf +172 -0
- data/dev/defs/ztpttr +73 -0
- data/dev/defs/ztrcon +103 -0
- data/dev/defs/ztrevc +188 -0
- data/dev/defs/ztrexc +99 -0
- data/dev/defs/ztrrfs +158 -0
- data/dev/defs/ztrsen +234 -0
- data/dev/defs/ztrsna +223 -0
- data/dev/defs/ztrsyl +126 -0
- data/dev/defs/ztrti2 +76 -0
- data/dev/defs/ztrtri +75 -0
- data/dev/defs/ztrtrs +107 -0
- data/dev/defs/ztrttf +181 -0
- data/dev/defs/ztrttp +72 -0
- data/dev/defs/ztzrqf +104 -0
- data/dev/defs/ztzrzf +128 -0
- data/dev/defs/zunbdb +270 -0
- data/dev/defs/zuncsd +283 -0
- data/dev/defs/zung2l +85 -0
- data/dev/defs/zung2r +85 -0
- data/dev/defs/zungbr +129 -0
- data/dev/defs/zunghr +97 -0
- data/dev/defs/zungl2 +84 -0
- data/dev/defs/zunglq +100 -0
- data/dev/defs/zungql +101 -0
- data/dev/defs/zungqr +101 -0
- data/dev/defs/zungr2 +85 -0
- data/dev/defs/zungrq +101 -0
- data/dev/defs/zungtr +95 -0
- data/dev/defs/zunm2l +130 -0
- data/dev/defs/zunm2r +130 -0
- data/dev/defs/zunmbr +177 -0
- data/dev/defs/zunmhr +157 -0
- data/dev/defs/zunml2 +130 -0
- data/dev/defs/zunmlq +143 -0
- data/dev/defs/zunmql +143 -0
- data/dev/defs/zunmqr +143 -0
- data/dev/defs/zunmr2 +130 -0
- data/dev/defs/zunmr3 +152 -0
- data/dev/defs/zunmrq +143 -0
- data/dev/defs/zunmrz +157 -0
- data/dev/defs/zunmtr +152 -0
- data/dev/defs/zupgtr +87 -0
- data/dev/defs/zupmtr +120 -0
- data/dev/make_csrc.rb +857 -0
- data/dev/mkdoc.rb +265 -0
- data/dev/parse.rb +1972 -0
- data/doc/bd.html +16 -0
- data/doc/c.html +36 -0
- data/doc/cbd.html +161 -0
- data/doc/cgb.html +1865 -0
- data/doc/cge.html +5261 -0
- data/doc/cgg.html +2027 -0
- data/doc/cgt.html +711 -0
- data/doc/chb.html +1031 -0
- data/doc/che.html +3165 -0
- data/doc/chg.html +201 -0
- data/doc/chp.html +1696 -0
- data/doc/chs.html +386 -0
- data/doc/cpb.html +994 -0
- data/doc/cpo.html +1520 -0
- data/doc/cpp.html +770 -0
- data/doc/cpt.html +706 -0
- data/doc/csp.html +905 -0
- data/doc/cst.html +742 -0
- data/doc/csy.html +2194 -0
- data/doc/ctb.html +284 -0
- data/doc/ctg.html +1544 -0
- data/doc/ctp.html +553 -0
- data/doc/ctr.html +1281 -0
- data/doc/ctz.html +211 -0
- data/doc/cun.html +2553 -0
- data/doc/cup.html +166 -0
- data/doc/d.html +35 -0
- data/doc/dbd.html +304 -0
- data/doc/ddi.html +87 -0
- data/doc/dgb.html +1857 -0
- data/doc/dge.html +7267 -0
- data/doc/dgg.html +2102 -0
- data/doc/dgt.html +713 -0
- data/doc/dhg.html +225 -0
- data/doc/dhs.html +414 -0
- data/doc/di.html +14 -0
- data/doc/dop.html +166 -0
- data/doc/dor.html +2540 -0
- data/doc/dpb.html +992 -0
- data/doc/dpo.html +1517 -0
- data/doc/dpp.html +770 -0
- data/doc/dpt.html +675 -0
- data/doc/dsb.html +995 -0
- data/doc/dsp.html +1777 -0
- data/doc/dst.html +1422 -0
- data/doc/dsy.html +3433 -0
- data/doc/dtb.html +284 -0
- data/doc/dtg.html +1730 -0
- data/doc/dtp.html +532 -0
- data/doc/dtr.html +1346 -0
- data/doc/dtz.html +211 -0
- data/doc/gb.html +16 -0
- data/doc/ge.html +16 -0
- data/doc/gg.html +16 -0
- data/doc/gt.html +16 -0
- data/doc/hb.html +14 -0
- data/doc/he.html +14 -0
- data/doc/hg.html +16 -0
- data/doc/hp.html +14 -0
- data/doc/hs.html +16 -0
- data/doc/index.html +53 -0
- data/doc/op.html +14 -0
- data/doc/or.html +14 -0
- data/doc/others.html +1142 -0
- data/doc/pb.html +16 -0
- data/doc/po.html +16 -0
- data/doc/pp.html +16 -0
- data/doc/pt.html +16 -0
- data/doc/s.html +35 -0
- data/doc/sb.html +14 -0
- data/doc/sbd.html +303 -0
- data/doc/sdi.html +87 -0
- data/doc/sgb.html +1863 -0
- data/doc/sge.html +7263 -0
- data/doc/sgg.html +2102 -0
- data/doc/sgt.html +713 -0
- data/doc/shg.html +225 -0
- data/doc/shs.html +414 -0
- data/doc/sop.html +166 -0
- data/doc/sor.html +2540 -0
- data/doc/sp.html +16 -0
- data/doc/spb.html +992 -0
- data/doc/spo.html +1520 -0
- data/doc/spp.html +770 -0
- data/doc/spt.html +675 -0
- data/doc/ssb.html +995 -0
- data/doc/ssp.html +1647 -0
- data/doc/sst.html +1423 -0
- data/doc/ssy.html +3438 -0
- data/doc/st.html +16 -0
- data/doc/stb.html +284 -0
- data/doc/stg.html +1729 -0
- data/doc/stp.html +532 -0
- data/doc/str.html +1346 -0
- data/doc/stz.html +211 -0
- data/doc/sy.html +16 -0
- data/doc/tb.html +16 -0
- data/doc/tg.html +16 -0
- data/doc/tp.html +16 -0
- data/doc/tr.html +16 -0
- data/doc/tz.html +16 -0
- data/doc/un.html +14 -0
- data/doc/up.html +14 -0
- data/doc/z.html +36 -0
- data/doc/zbd.html +161 -0
- data/doc/zgb.html +1862 -0
- data/doc/zge.html +5258 -0
- data/doc/zgg.html +2027 -0
- data/doc/zgt.html +711 -0
- data/doc/zhb.html +1031 -0
- data/doc/zhe.html +3162 -0
- data/doc/zhg.html +201 -0
- data/doc/zhp.html +1697 -0
- data/doc/zhs.html +386 -0
- data/doc/zpb.html +994 -0
- data/doc/zpo.html +1517 -0
- data/doc/zpp.html +770 -0
- data/doc/zpt.html +706 -0
- data/doc/zsp.html +905 -0
- data/doc/zst.html +743 -0
- data/doc/zsy.html +2191 -0
- data/doc/ztb.html +284 -0
- data/doc/ztg.html +1544 -0
- data/doc/ztp.html +553 -0
- data/doc/ztr.html +1281 -0
- data/doc/ztz.html +211 -0
- data/doc/zun.html +2553 -0
- data/doc/zup.html +166 -0
- data/ext/cbbcsd.c +279 -0
- data/ext/cbdsqr.c +178 -0
- data/ext/cgbbrd.c +153 -0
- data/ext/cgbcon.c +94 -0
- data/ext/cgbequ.c +94 -0
- data/ext/cgbequb.c +92 -0
- data/ext/cgbrfs.c +157 -0
- data/ext/cgbrfsx.c +245 -0
- data/ext/cgbsv.c +111 -0
- data/ext/cgbsvx.c +282 -0
- data/ext/cgbsvxx.c +285 -0
- data/ext/cgbtf2.c +89 -0
- data/ext/cgbtrf.c +89 -0
- data/ext/cgbtrs.c +107 -0
- data/ext/cgebak.c +97 -0
- data/ext/cgebal.c +87 -0
- data/ext/cgebd2.c +108 -0
- data/ext/cgebrd.c +123 -0
- data/ext/cgecon.c +74 -0
- data/ext/cgeequ.c +84 -0
- data/ext/cgeequb.c +84 -0
- data/ext/cgees.c +138 -0
- data/ext/cgeesx.c +148 -0
- data/ext/cgeev.c +128 -0
- data/ext/cgeevx.c +169 -0
- data/ext/cgegs.c +162 -0
- data/ext/cgegv.c +167 -0
- data/ext/cgehd2.c +88 -0
- data/ext/cgehrd.c +103 -0
- data/ext/cgelq2.c +82 -0
- data/ext/cgelqf.c +99 -0
- data/ext/cgels.c +133 -0
- data/ext/cgelsd.c +150 -0
- data/ext/cgelss.c +147 -0
- data/ext/cgelsx.c +135 -0
- data/ext/cgelsy.c +162 -0
- data/ext/cgeql2.c +84 -0
- data/ext/cgeqlf.c +99 -0
- data/ext/cgeqp3.c +125 -0
- data/ext/cgeqpf.c +110 -0
- data/ext/cgeqr2.c +84 -0
- data/ext/cgeqr2p.c +84 -0
- data/ext/cgeqrf.c +99 -0
- data/ext/cgeqrfp.c +99 -0
- data/ext/cgerfs.c +149 -0
- data/ext/cgerfsx.c +215 -0
- data/ext/cgerq2.c +82 -0
- data/ext/cgerqf.c +99 -0
- data/ext/cgesc2.c +104 -0
- data/ext/cgesdd.c +131 -0
- data/ext/cgesv.c +103 -0
- data/ext/cgesvd.c +142 -0
- data/ext/cgesvx.c +274 -0
- data/ext/cgesvxx.c +277 -0
- data/ext/cgetc2.c +85 -0
- data/ext/cgetf2.c +81 -0
- data/ext/cgetrf.c +81 -0
- data/ext/cgetri.c +99 -0
- data/ext/cgetrs.c +99 -0
- data/ext/cggbak.c +109 -0
- data/ext/cggbal.c +124 -0
- data/ext/cgges.c +188 -0
- data/ext/cggesx.c +226 -0
- data/ext/cggev.c +167 -0
- data/ext/cggevx.c +222 -0
- data/ext/cggglm.c +152 -0
- data/ext/cgghrd.c +163 -0
- data/ext/cgglse.c +167 -0
- data/ext/cggqrf.c +133 -0
- data/ext/cggrqf.c +137 -0
- data/ext/cggsvd.c +180 -0
- data/ext/cggsvp.c +170 -0
- data/ext/cgtcon.c +117 -0
- data/ext/cgtrfs.c +205 -0
- data/ext/cgtsv.c +138 -0
- data/ext/cgtsvx.c +252 -0
- data/ext/cgttrf.c +128 -0
- data/ext/cgttrs.c +133 -0
- data/ext/cgtts2.c +130 -0
- data/ext/chbev.c +106 -0
- data/ext/chbevd.c +154 -0
- data/ext/chbevx.c +156 -0
- data/ext/chbgst.c +116 -0
- data/ext/chbgv.c +136 -0
- data/ext/chbgvd.c +184 -0
- data/ext/chbgvx.c +185 -0
- data/ext/chbtrd.c +126 -0
- data/ext/checon.c +83 -0
- data/ext/cheequb.c +78 -0
- data/ext/cheev.c +106 -0
- data/ext/cheevd.c +139 -0
- data/ext/cheevr.c +186 -0
- data/ext/cheevx.c +156 -0
- data/ext/chegs2.c +91 -0
- data/ext/chegst.c +91 -0
- data/ext/chegv.c +136 -0
- data/ext/chegvd.c +169 -0
- data/ext/chegvx.c +186 -0
- data/ext/cherfs.c +149 -0
- data/ext/cherfsx.c +214 -0
- data/ext/chesv.c +119 -0
- data/ext/chesvx.c +179 -0
- data/ext/chesvxx.c +254 -0
- data/ext/chetd2.c +97 -0
- data/ext/chetf2.c +81 -0
- data/ext/chetrd.c +109 -0
- data/ext/chetrf.c +93 -0
- data/ext/chetri.c +88 -0
- data/ext/chetrs.c +99 -0
- data/ext/chetrs2.c +102 -0
- data/ext/chfrk.c +105 -0
- data/ext/chgeqz.c +204 -0
- data/ext/chla_transtype.c +47 -0
- data/ext/chpcon.c +81 -0
- data/ext/chpev.c +101 -0
- data/ext/chpevd.c +149 -0
- data/ext/chpevx.c +140 -0
- data/ext/chpgst.c +90 -0
- data/ext/chpgv.c +128 -0
- data/ext/chpgvd.c +166 -0
- data/ext/chpgvx.c +166 -0
- data/ext/chprfs.c +145 -0
- data/ext/chpsv.c +106 -0
- data/ext/chpsvx.c +159 -0
- data/ext/chptrd.c +96 -0
- data/ext/chptrf.c +80 -0
- data/ext/chptri.c +85 -0
- data/ext/chptrs.c +97 -0
- data/ext/chsein.c +181 -0
- data/ext/chseqr.c +141 -0
- data/ext/cla_gbamv.c +123 -0
- data/ext/cla_gbrcond_c.c +138 -0
- data/ext/cla_gbrcond_x.c +134 -0
- data/ext/cla_gbrfsx_extended.c +291 -0
- data/ext/cla_gbrpvgrw.c +83 -0
- data/ext/cla_geamv.c +113 -0
- data/ext/cla_gercond_c.c +130 -0
- data/ext/cla_gercond_x.c +126 -0
- data/ext/cla_gerfsx_extended.c +277 -0
- data/ext/cla_heamv.c +112 -0
- data/ext/cla_hercond_c.c +130 -0
- data/ext/cla_hercond_x.c +126 -0
- data/ext/cla_herfsx_extended.c +279 -0
- data/ext/cla_herpvgrw.c +103 -0
- data/ext/cla_lin_berr.c +80 -0
- data/ext/cla_porcond_c.c +118 -0
- data/ext/cla_porcond_x.c +114 -0
- data/ext/cla_porfsx_extended.c +267 -0
- data/ext/cla_porpvgrw.c +91 -0
- data/ext/cla_rpvgrw.c +75 -0
- data/ext/cla_syamv.c +111 -0
- data/ext/cla_syrcond_c.c +130 -0
- data/ext/cla_syrcond_x.c +126 -0
- data/ext/cla_syrfsx_extended.c +279 -0
- data/ext/cla_syrpvgrw.c +103 -0
- data/ext/cla_wwaddw.c +98 -0
- data/ext/clabrd.c +128 -0
- data/ext/clacgv.c +71 -0
- data/ext/clacn2.c +99 -0
- data/ext/clacon.c +76 -0
- data/ext/clacp2.c +73 -0
- data/ext/clacpy.c +73 -0
- data/ext/clacrm.c +86 -0
- data/ext/clacrt.c +104 -0
- data/ext/cladiv.c +53 -0
- data/ext/claed0.c +130 -0
- data/ext/claed7.c +243 -0
- data/ext/claed8.c +194 -0
- data/ext/claein.c +109 -0
- data/ext/claesy.c +70 -0
- data/ext/claev2.c +67 -0
- data/ext/clag2z.c +72 -0
- data/ext/clags2.c +88 -0
- data/ext/clagtm.c +128 -0
- data/ext/clahef.c +93 -0
- data/ext/clahqr.c +131 -0
- data/ext/clahr2.c +108 -0
- data/ext/clahrd.c +108 -0
- data/ext/claic1.c +86 -0
- data/ext/clals0.c +197 -0
- data/ext/clalsa.c +266 -0
- data/ext/clalsd.c +141 -0
- data/ext/clangb.c +72 -0
- data/ext/clange.c +70 -0
- data/ext/clangt.c +83 -0
- data/ext/clanhb.c +74 -0
- data/ext/clanhe.c +68 -0
- data/ext/clanhf.c +76 -0
- data/ext/clanhp.c +70 -0
- data/ext/clanhs.c +66 -0
- data/ext/clanht.c +71 -0
- data/ext/clansb.c +74 -0
- data/ext/clansp.c +70 -0
- data/ext/clansy.c +68 -0
- data/ext/clantb.c +76 -0
- data/ext/clantp.c +76 -0
- data/ext/clantr.c +78 -0
- data/ext/clapll.c +101 -0
- data/ext/clapmr.c +93 -0
- data/ext/clapmt.c +97 -0
- data/ext/claqgb.c +113 -0
- data/ext/claqge.c +105 -0
- data/ext/claqhb.c +93 -0
- data/ext/claqhe.c +93 -0
- data/ext/claqhp.c +90 -0
- data/ext/claqp2.c +154 -0
- data/ext/claqps.c +204 -0
- data/ext/claqr0.c +141 -0
- data/ext/claqr1.c +72 -0
- data/ext/claqr2.c +170 -0
- data/ext/claqr3.c +170 -0
- data/ext/claqr4.c +141 -0
- data/ext/claqr5.c +175 -0
- data/ext/claqsb.c +97 -0
- data/ext/claqsp.c +90 -0
- data/ext/claqsy.c +93 -0
- data/ext/clar1v.c +169 -0
- data/ext/clar2v.c +145 -0
- data/ext/clarcm.c +82 -0
- data/ext/clarf.c +98 -0
- data/ext/clarfb.c +119 -0
- data/ext/clarfg.c +80 -0
- data/ext/clarfgp.c +80 -0
- data/ext/clarft.c +101 -0
- data/ext/clarfx.c +90 -0
- data/ext/clargv.c +110 -0
- data/ext/clarnv.c +79 -0
- data/ext/clarrv.c +267 -0
- data/ext/clarscl2.c +78 -0
- data/ext/clartg.c +59 -0
- data/ext/clartv.c +126 -0
- data/ext/clarz.c +102 -0
- data/ext/clarzb.c +123 -0
- data/ext/clarzt.c +101 -0
- data/ext/clascl.c +93 -0
- data/ext/clascl2.c +78 -0
- data/ext/claset.c +84 -0
- data/ext/clasr.c +106 -0
- data/ext/classq.c +66 -0
- data/ext/claswp.c +90 -0
- data/ext/clasyf.c +93 -0
- data/ext/clatbs.c +126 -0
- data/ext/clatdf.c +115 -0
- data/ext/clatps.c +120 -0
- data/ext/clatrd.c +101 -0
- data/ext/clatrs.c +122 -0
- data/ext/clatrz.c +83 -0
- data/ext/clatzm.c +128 -0
- data/ext/clauu2.c +73 -0
- data/ext/clauum.c +73 -0
- data/ext/cpbcon.c +78 -0
- data/ext/cpbequ.c +79 -0
- data/ext/cpbrfs.c +141 -0
- data/ext/cpbstf.c +77 -0
- data/ext/cpbsv.c +103 -0
- data/ext/cpbsvx.c +197 -0
- data/ext/cpbtf2.c +77 -0
- data/ext/cpbtrf.c +77 -0
- data/ext/cpbtrs.c +91 -0
- data/ext/cpftrf.c +78 -0
- data/ext/cpftri.c +78 -0
- data/ext/cpftrs.c +93 -0
- data/ext/cpocon.c +74 -0
- data/ext/cpoequ.c +71 -0
- data/ext/cpoequb.c +71 -0
- data/ext/cporfs.c +137 -0
- data/ext/cporfsx.c +202 -0
- data/ext/cposv.c +99 -0
- data/ext/cposvx.c +193 -0
- data/ext/cposvxx.c +231 -0
- data/ext/cpotf2.c +73 -0
- data/ext/cpotrf.c +73 -0
- data/ext/cpotri.c +73 -0
- data/ext/cpotrs.c +87 -0
- data/ext/cppcon.c +74 -0
- data/ext/cppequ.c +75 -0
- data/ext/cpprfs.c +135 -0
- data/ext/cppsv.c +100 -0
- data/ext/cppsvx.c +187 -0
- data/ext/cpptrf.c +74 -0
- data/ext/cpptri.c +74 -0
- data/ext/cpptrs.c +89 -0
- data/ext/cpstf2.c +91 -0
- data/ext/cpstrf.c +91 -0
- data/ext/cptcon.c +77 -0
- data/ext/cpteqr.c +122 -0
- data/ext/cptrfs.c +157 -0
- data/ext/cptsv.c +115 -0
- data/ext/cptsvx.c +167 -0
- data/ext/cpttrf.c +89 -0
- data/ext/cpttrs.c +97 -0
- data/ext/cptts2.c +94 -0
- data/ext/crot.c +103 -0
- data/ext/cspcon.c +81 -0
- data/ext/cspmv.c +111 -0
- data/ext/cspr.c +92 -0
- data/ext/csprfs.c +145 -0
- data/ext/cspsv.c +106 -0
- data/ext/cspsvx.c +159 -0
- data/ext/csptrf.c +80 -0
- data/ext/csptri.c +85 -0
- data/ext/csptrs.c +97 -0
- data/ext/csrscl.c +75 -0
- data/ext/cstedc.c +173 -0
- data/ext/cstegr.c +184 -0
- data/ext/cstein.c +130 -0
- data/ext/cstemr.c +189 -0
- data/ext/csteqr.c +122 -0
- data/ext/csycon.c +83 -0
- data/ext/csyconv.c +80 -0
- data/ext/csyequb.c +78 -0
- data/ext/csymv.c +111 -0
- data/ext/csyr.c +91 -0
- data/ext/csyrfs.c +149 -0
- data/ext/csyrfsx.c +214 -0
- data/ext/csysv.c +125 -0
- data/ext/csysvx.c +179 -0
- data/ext/csysvxx.c +254 -0
- data/ext/csyswapr.c +78 -0
- data/ext/csytf2.c +81 -0
- data/ext/csytrf.c +93 -0
- data/ext/csytri.c +88 -0
- data/ext/csytri2.c +104 -0
- data/ext/csytri2x.c +92 -0
- data/ext/csytrs.c +99 -0
- data/ext/csytrs2.c +102 -0
- data/ext/ctbcon.c +82 -0
- data/ext/ctbrfs.c +123 -0
- data/ext/ctbtrs.c +99 -0
- data/ext/ctfsm.c +107 -0
- data/ext/ctftri.c +82 -0
- data/ext/ctfttp.c +75 -0
- data/ext/ctfttr.c +76 -0
- data/ext/ctgevc.c +152 -0
- data/ext/ctgex2.c +167 -0
- data/ext/ctgexc.c +168 -0
- data/ext/ctgsen.c +240 -0
- data/ext/ctgsja.c +223 -0
- data/ext/ctgsna.c +160 -0
- data/ext/ctgsy2.c +172 -0
- data/ext/ctgsyl.c +186 -0
- data/ext/ctpcon.c +78 -0
- data/ext/ctprfs.c +119 -0
- data/ext/ctptri.c +78 -0
- data/ext/ctptrs.c +97 -0
- data/ext/ctpttf.c +75 -0
- data/ext/ctpttr.c +72 -0
- data/ext/ctrcon.c +78 -0
- data/ext/ctrevc.c +150 -0
- data/ext/ctrexc.c +107 -0
- data/ext/ctrrfs.c +119 -0
- data/ext/ctrsen.c +150 -0
- data/ext/ctrsna.c +133 -0
- data/ext/ctrsyl.c +112 -0
- data/ext/ctrti2.c +77 -0
- data/ext/ctrtri.c +77 -0
- data/ext/ctrtrs.c +95 -0
- data/ext/ctrttf.c +73 -0
- data/ext/ctrttp.c +69 -0
- data/ext/ctzrqf.c +79 -0
- data/ext/ctzrzf.c +97 -0
- data/ext/cunbdb.c +228 -0
- data/ext/cuncsd.c +200 -0
- data/ext/cung2l.c +88 -0
- data/ext/cung2r.c +88 -0
- data/ext/cungbr.c +111 -0
- data/ext/cunghr.c +107 -0
- data/ext/cungl2.c +86 -0
- data/ext/cunglq.c +103 -0
- data/ext/cungql.c +103 -0
- data/ext/cungqr.c +103 -0
- data/ext/cungr2.c +86 -0
- data/ext/cungrq.c +103 -0
- data/ext/cungtr.c +103 -0
- data/ext/cunm2l.c +110 -0
- data/ext/cunm2r.c +110 -0
- data/ext/cunmbr.c +135 -0
- data/ext/cunmhr.c +129 -0
- data/ext/cunml2.c +106 -0
- data/ext/cunmlq.c +121 -0
- data/ext/cunmql.c +125 -0
- data/ext/cunmqr.c +125 -0
- data/ext/cunmr2.c +106 -0
- data/ext/cunmr3.c +110 -0
- data/ext/cunmrq.c +121 -0
- data/ext/cunmrz.c +125 -0
- data/ext/cunmtr.c +125 -0
- data/ext/cupgtr.c +87 -0
- data/ext/cupmtr.c +112 -0
- data/ext/dbbcsd.c +283 -0
- data/ext/dbdsdc.c +147 -0
- data/ext/dbdsqr.c +178 -0
- data/ext/ddisna.c +71 -0
- data/ext/dgbbrd.c +150 -0
- data/ext/dgbcon.c +94 -0
- data/ext/dgbequ.c +94 -0
- data/ext/dgbequb.c +92 -0
- data/ext/dgbrfs.c +157 -0
- data/ext/dgbrfsx.c +245 -0
- data/ext/dgbsv.c +111 -0
- data/ext/dgbsvx.c +282 -0
- data/ext/dgbsvxx.c +285 -0
- data/ext/dgbtf2.c +89 -0
- data/ext/dgbtrf.c +89 -0
- data/ext/dgbtrs.c +107 -0
- data/ext/dgebak.c +97 -0
- data/ext/dgebal.c +87 -0
- data/ext/dgebd2.c +108 -0
- data/ext/dgebrd.c +123 -0
- data/ext/dgecon.c +74 -0
- data/ext/dgeequ.c +84 -0
- data/ext/dgeequb.c +84 -0
- data/ext/dgees.c +144 -0
- data/ext/dgeesx.c +166 -0
- data/ext/dgeev.c +133 -0
- data/ext/dgeevx.c +177 -0
- data/ext/dgegs.c +167 -0
- data/ext/dgegv.c +167 -0
- data/ext/dgehd2.c +88 -0
- data/ext/dgehrd.c +103 -0
- data/ext/dgejsv.c +155 -0
- data/ext/dgelq2.c +82 -0
- data/ext/dgelqf.c +99 -0
- data/ext/dgels.c +133 -0
- data/ext/dgelsd.c +145 -0
- data/ext/dgelss.c +144 -0
- data/ext/dgelsx.c +132 -0
- data/ext/dgelsy.c +159 -0
- data/ext/dgeql2.c +84 -0
- data/ext/dgeqlf.c +99 -0
- data/ext/dgeqp3.c +122 -0
- data/ext/dgeqpf.c +107 -0
- data/ext/dgeqr2.c +84 -0
- data/ext/dgeqr2p.c +84 -0
- data/ext/dgeqrf.c +99 -0
- data/ext/dgeqrfp.c +99 -0
- data/ext/dgerfs.c +149 -0
- data/ext/dgerfsx.c +215 -0
- data/ext/dgerq2.c +82 -0
- data/ext/dgerqf.c +99 -0
- data/ext/dgesc2.c +104 -0
- data/ext/dgesdd.c +128 -0
- data/ext/dgesv.c +103 -0
- data/ext/dgesvd.c +139 -0
- data/ext/dgesvj.c +152 -0
- data/ext/dgesvx.c +274 -0
- data/ext/dgesvxx.c +277 -0
- data/ext/dgetc2.c +85 -0
- data/ext/dgetf2.c +81 -0
- data/ext/dgetrf.c +81 -0
- data/ext/dgetri.c +99 -0
- data/ext/dgetrs.c +99 -0
- data/ext/dggbak.c +109 -0
- data/ext/dggbal.c +124 -0
- data/ext/dgges.c +194 -0
- data/ext/dggesx.c +227 -0
- data/ext/dggev.c +167 -0
- data/ext/dggevx.c +225 -0
- data/ext/dggglm.c +152 -0
- data/ext/dgghrd.c +163 -0
- data/ext/dgglse.c +167 -0
- data/ext/dggqrf.c +133 -0
- data/ext/dggrqf.c +137 -0
- data/ext/dggsvd.c +177 -0
- data/ext/dggsvp.c +167 -0
- data/ext/dgsvj0.c +178 -0
- data/ext/dgsvj1.c +182 -0
- data/ext/dgtcon.c +120 -0
- data/ext/dgtrfs.c +205 -0
- data/ext/dgtsv.c +138 -0
- data/ext/dgtsvx.c +252 -0
- data/ext/dgttrf.c +128 -0
- data/ext/dgttrs.c +133 -0
- data/ext/dgtts2.c +130 -0
- data/ext/dhgeqz.c +209 -0
- data/ext/dhsein.c +201 -0
- data/ext/dhseqr.c +149 -0
- data/ext/disnan.c +47 -0
- data/ext/dla_gbamv.c +125 -0
- data/ext/dla_gbrcond.c +138 -0
- data/ext/dla_gbrfsx_extended.c +289 -0
- data/ext/dla_gbrpvgrw.c +83 -0
- data/ext/dla_geamv.c +115 -0
- data/ext/dla_gercond.c +130 -0
- data/ext/dla_gerfsx_extended.c +277 -0
- data/ext/dla_lin_berr.c +80 -0
- data/ext/dla_porcond.c +118 -0
- data/ext/dla_porfsx_extended.c +267 -0
- data/ext/dla_porpvgrw.c +91 -0
- data/ext/dla_rpvgrw.c +75 -0
- data/ext/dla_syamv.c +109 -0
- data/ext/dla_syrcond.c +130 -0
- data/ext/dla_syrfsx_extended.c +279 -0
- data/ext/dla_syrpvgrw.c +103 -0
- data/ext/dla_wwaddw.c +98 -0
- data/ext/dlabad.c +50 -0
- data/ext/dlabrd.c +128 -0
- data/ext/dlacn2.c +102 -0
- data/ext/dlacon.c +79 -0
- data/ext/dlacpy.c +73 -0
- data/ext/dladiv.c +62 -0
- data/ext/dlae2.c +58 -0
- data/ext/dlaebz.c +214 -0
- data/ext/dlaed0.c +123 -0
- data/ext/dlaed1.c +129 -0
- data/ext/dlaed2.c +185 -0
- data/ext/dlaed3.c +157 -0
- data/ext/dlaed4.c +86 -0
- data/ext/dlaed5.c +83 -0
- data/ext/dlaed6.c +86 -0
- data/ext/dlaed7.c +244 -0
- data/ext/dlaed8.c +202 -0
- data/ext/dlaed9.c +107 -0
- data/ext/dlaeda.c +156 -0
- data/ext/dlaein.c +139 -0
- data/ext/dlaev2.c +64 -0
- data/ext/dlaexc.c +114 -0
- data/ext/dlag2.c +87 -0
- data/ext/dlag2s.c +72 -0
- data/ext/dlags2.c +86 -0
- data/ext/dlagtf.c +136 -0
- data/ext/dlagtm.c +128 -0
- data/ext/dlagts.c +135 -0
- data/ext/dlagv2.c +128 -0
- data/ext/dlahqr.c +139 -0
- data/ext/dlahr2.c +108 -0
- data/ext/dlahrd.c +108 -0
- data/ext/dlaic1.c +85 -0
- data/ext/dlaln2.c +116 -0
- data/ext/dlals0.c +197 -0
- data/ext/dlalsa.c +266 -0
- data/ext/dlalsd.c +138 -0
- data/ext/dlamrg.c +76 -0
- data/ext/dlaneg.c +79 -0
- data/ext/dlangb.c +74 -0
- data/ext/dlange.c +70 -0
- data/ext/dlangt.c +83 -0
- data/ext/dlanhs.c +66 -0
- data/ext/dlansb.c +74 -0
- data/ext/dlansf.c +76 -0
- data/ext/dlansp.c +72 -0
- data/ext/dlanst.c +71 -0
- data/ext/dlansy.c +70 -0
- data/ext/dlantb.c +78 -0
- data/ext/dlantp.c +76 -0
- data/ext/dlantr.c +78 -0
- data/ext/dlanv2.c +78 -0
- data/ext/dlapll.c +101 -0
- data/ext/dlapmr.c +93 -0
- data/ext/dlapmt.c +97 -0
- data/ext/dlapy2.c +51 -0
- data/ext/dlapy3.c +55 -0
- data/ext/dlaqgb.c +113 -0
- data/ext/dlaqge.c +105 -0
- data/ext/dlaqp2.c +154 -0
- data/ext/dlaqps.c +204 -0
- data/ext/dlaqr0.c +149 -0
- data/ext/dlaqr1.c +78 -0
- data/ext/dlaqr2.c +178 -0
- data/ext/dlaqr3.c +178 -0
- data/ext/dlaqr4.c +149 -0
- data/ext/dlaqr5.c +196 -0
- data/ext/dlaqsb.c +97 -0
- data/ext/dlaqsp.c +90 -0
- data/ext/dlaqsy.c +93 -0
- data/ext/dlaqtr.c +110 -0
- data/ext/dlar1v.c +169 -0
- data/ext/dlar2v.c +145 -0
- data/ext/dlarf.c +97 -0
- data/ext/dlarfb.c +119 -0
- data/ext/dlarfg.c +79 -0
- data/ext/dlarfgp.c +79 -0
- data/ext/dlarft.c +101 -0
- data/ext/dlarfx.c +89 -0
- data/ext/dlargv.c +110 -0
- data/ext/dlarnv.c +79 -0
- data/ext/dlarra.c +120 -0
- data/ext/dlarrb.c +174 -0
- data/ext/dlarrc.c +92 -0
- data/ext/dlarrd.c +186 -0
- data/ext/dlarre.c +217 -0
- data/ext/dlarrf.c +172 -0
- data/ext/dlarrj.c +143 -0
- data/ext/dlarrk.c +93 -0
- data/ext/dlarrr.c +78 -0
- data/ext/dlarrv.c +267 -0
- data/ext/dlarscl2.c +78 -0
- data/ext/dlartg.c +57 -0
- data/ext/dlartgp.c +57 -0
- data/ext/dlartgs.c +58 -0
- data/ext/dlartv.c +126 -0
- data/ext/dlaruv.c +75 -0
- data/ext/dlarz.c +101 -0
- data/ext/dlarzb.c +123 -0
- data/ext/dlarzt.c +101 -0
- data/ext/dlas2.c +58 -0
- data/ext/dlascl.c +93 -0
- data/ext/dlascl2.c +78 -0
- data/ext/dlasd0.c +116 -0
- data/ext/dlasd1.c +158 -0
- data/ext/dlasd2.c +224 -0
- data/ext/dlasd3.c +198 -0
- data/ext/dlasd4.c +89 -0
- data/ext/dlasd5.c +86 -0
- data/ext/dlasd6.c +232 -0
- data/ext/dlasd7.c +221 -0
- data/ext/dlasd8.c +169 -0
- data/ext/dlasda.c +217 -0
- data/ext/dlasdq.c +182 -0
- data/ext/dlasdt.c +78 -0
- data/ext/dlaset.c +82 -0
- data/ext/dlasq1.c +92 -0
- data/ext/dlasq2.c +70 -0
- data/ext/dlasq3.c +134 -0
- data/ext/dlasq4.c +103 -0
- data/ext/dlasq5.c +90 -0
- data/ext/dlasq6.c +82 -0
- data/ext/dlasr.c +106 -0
- data/ext/dlasrt.c +70 -0
- data/ext/dlassq.c +66 -0
- data/ext/dlasv2.c +70 -0
- data/ext/dlaswp.c +90 -0
- data/ext/dlasy2.c +122 -0
- data/ext/dlasyf.c +93 -0
- data/ext/dlat2s.c +72 -0
- data/ext/dlatbs.c +126 -0
- data/ext/dlatdf.c +115 -0
- data/ext/dlatps.c +120 -0
- data/ext/dlatrd.c +101 -0
- data/ext/dlatrs.c +122 -0
- data/ext/dlatrz.c +83 -0
- data/ext/dlatzm.c +127 -0
- data/ext/dlauu2.c +73 -0
- data/ext/dlauum.c +73 -0
- data/ext/dopgtr.c +87 -0
- data/ext/dopmtr.c +112 -0
- data/ext/dorbdb.c +228 -0
- data/ext/dorcsd.c +193 -0
- data/ext/dorg2l.c +88 -0
- data/ext/dorg2r.c +88 -0
- data/ext/dorgbr.c +111 -0
- data/ext/dorghr.c +107 -0
- data/ext/dorgl2.c +86 -0
- data/ext/dorglq.c +103 -0
- data/ext/dorgql.c +103 -0
- data/ext/dorgqr.c +103 -0
- data/ext/dorgr2.c +86 -0
- data/ext/dorgrq.c +103 -0
- data/ext/dorgtr.c +103 -0
- data/ext/dorm2l.c +110 -0
- data/ext/dorm2r.c +110 -0
- data/ext/dormbr.c +135 -0
- data/ext/dormhr.c +129 -0
- data/ext/dorml2.c +106 -0
- data/ext/dormlq.c +121 -0
- data/ext/dormql.c +125 -0
- data/ext/dormqr.c +125 -0
- data/ext/dormr2.c +106 -0
- data/ext/dormr3.c +110 -0
- data/ext/dormrq.c +121 -0
- data/ext/dormrz.c +125 -0
- data/ext/dormtr.c +125 -0
- data/ext/dpbcon.c +78 -0
- data/ext/dpbequ.c +79 -0
- data/ext/dpbrfs.c +141 -0
- data/ext/dpbstf.c +77 -0
- data/ext/dpbsv.c +103 -0
- data/ext/dpbsvx.c +197 -0
- data/ext/dpbtf2.c +77 -0
- data/ext/dpbtrf.c +77 -0
- data/ext/dpbtrs.c +91 -0
- data/ext/dpftrf.c +78 -0
- data/ext/dpftri.c +78 -0
- data/ext/dpftrs.c +93 -0
- data/ext/dpocon.c +74 -0
- data/ext/dpoequ.c +71 -0
- data/ext/dpoequb.c +71 -0
- data/ext/dporfs.c +137 -0
- data/ext/dporfsx.c +202 -0
- data/ext/dposv.c +99 -0
- data/ext/dposvx.c +193 -0
- data/ext/dposvxx.c +231 -0
- data/ext/dpotf2.c +73 -0
- data/ext/dpotrf.c +73 -0
- data/ext/dpotri.c +73 -0
- data/ext/dpotrs.c +87 -0
- data/ext/dppcon.c +74 -0
- data/ext/dppequ.c +75 -0
- data/ext/dpprfs.c +135 -0
- data/ext/dppsv.c +100 -0
- data/ext/dppsvx.c +187 -0
- data/ext/dpptrf.c +74 -0
- data/ext/dpptri.c +74 -0
- data/ext/dpptrs.c +89 -0
- data/ext/dpstf2.c +91 -0
- data/ext/dpstrf.c +91 -0
- data/ext/dptcon.c +77 -0
- data/ext/dpteqr.c +122 -0
- data/ext/dptrfs.c +150 -0
- data/ext/dptsv.c +115 -0
- data/ext/dptsvx.c +164 -0
- data/ext/dpttrf.c +89 -0
- data/ext/dpttrs.c +93 -0
- data/ext/dptts2.c +90 -0
- data/ext/drscl.c +75 -0
- data/ext/dsbev.c +103 -0
- data/ext/dsbevd.c +136 -0
- data/ext/dsbevx.c +153 -0
- data/ext/dsbgst.c +113 -0
- data/ext/dsbgv.c +133 -0
- data/ext/dsbgvd.c +166 -0
- data/ext/dsbgvx.c +193 -0
- data/ext/dsbtrd.c +126 -0
- data/ext/dsfrk.c +105 -0
- data/ext/dsgesv.c +111 -0
- data/ext/dspcon.c +84 -0
- data/ext/dspev.c +98 -0
- data/ext/dspevd.c +131 -0
- data/ext/dspevx.c +137 -0
- data/ext/dspgst.c +90 -0
- data/ext/dspgv.c +125 -0
- data/ext/dspgvd.c +158 -0
- data/ext/dspgvx.c +164 -0
- data/ext/dsposv.c +107 -0
- data/ext/dsprfs.c +145 -0
- data/ext/dspsv.c +106 -0
- data/ext/dspsvx.c +159 -0
- data/ext/dsptrd.c +96 -0
- data/ext/dsptrf.c +80 -0
- data/ext/dsptri.c +85 -0
- data/ext/dsptrs.c +97 -0
- data/ext/dstebz.c +131 -0
- data/ext/dstedc.c +155 -0
- data/ext/dstegr.c +184 -0
- data/ext/dstein.c +130 -0
- data/ext/dstemr.c +189 -0
- data/ext/dsteqr.c +122 -0
- data/ext/dsterf.c +89 -0
- data/ext/dstev.c +107 -0
- data/ext/dstevd.c +140 -0
- data/ext/dstevr.c +184 -0
- data/ext/dstevx.c +154 -0
- data/ext/dsycon.c +86 -0
- data/ext/dsyconv.c +80 -0
- data/ext/dsyequb.c +78 -0
- data/ext/dsyev.c +103 -0
- data/ext/dsyevd.c +121 -0
- data/ext/dsyevr.c +168 -0
- data/ext/dsyevx.c +153 -0
- data/ext/dsygs2.c +91 -0
- data/ext/dsygst.c +91 -0
- data/ext/dsygv.c +133 -0
- data/ext/dsygvd.c +151 -0
- data/ext/dsygvx.c +183 -0
- data/ext/dsyrfs.c +149 -0
- data/ext/dsyrfsx.c +214 -0
- data/ext/dsysv.c +125 -0
- data/ext/dsysvx.c +179 -0
- data/ext/dsysvxx.c +254 -0
- data/ext/dsyswapr.c +78 -0
- data/ext/dsytd2.c +97 -0
- data/ext/dsytf2.c +81 -0
- data/ext/dsytrd.c +109 -0
- data/ext/dsytrf.c +93 -0
- data/ext/dsytri.c +88 -0
- data/ext/dsytri2.c +104 -0
- data/ext/dsytri2x.c +92 -0
- data/ext/dsytrs.c +99 -0
- data/ext/dsytrs2.c +102 -0
- data/ext/dtbcon.c +82 -0
- data/ext/dtbrfs.c +123 -0
- data/ext/dtbtrs.c +99 -0
- data/ext/dtfsm.c +106 -0
- data/ext/dtftri.c +82 -0
- data/ext/dtfttp.c +75 -0
- data/ext/dtfttr.c +76 -0
- data/ext/dtgevc.c +149 -0
- data/ext/dtgex2.c +176 -0
- data/ext/dtgexc.c +183 -0
- data/ext/dtgsen.c +248 -0
- data/ext/dtgsja.c +223 -0
- data/ext/dtgsna.c +160 -0
- data/ext/dtgsy2.c +178 -0
- data/ext/dtgsyl.c +186 -0
- data/ext/dtpcon.c +78 -0
- data/ext/dtprfs.c +119 -0
- data/ext/dtptri.c +78 -0
- data/ext/dtptrs.c +97 -0
- data/ext/dtpttf.c +75 -0
- data/ext/dtpttr.c +72 -0
- data/ext/dtrcon.c +78 -0
- data/ext/dtrevc.c +146 -0
- data/ext/dtrexc.c +112 -0
- data/ext/dtrrfs.c +119 -0
- data/ext/dtrsen.c +165 -0
- data/ext/dtrsna.c +133 -0
- data/ext/dtrsyl.c +112 -0
- data/ext/dtrti2.c +77 -0
- data/ext/dtrtri.c +77 -0
- data/ext/dtrtrs.c +95 -0
- data/ext/dtrttf.c +73 -0
- data/ext/dtrttp.c +69 -0
- data/ext/dtzrqf.c +79 -0
- data/ext/dtzrzf.c +97 -0
- data/ext/dzsum1.c +59 -0
- data/ext/extconf.rb +136 -0
- data/ext/f2c_minimal.h +36 -0
- data/ext/icmax1.c +59 -0
- data/ext/ieeeck.c +55 -0
- data/ext/ilaclc.c +61 -0
- data/ext/ilaclr.c +61 -0
- data/ext/iladiag.c +47 -0
- data/ext/iladlc.c +61 -0
- data/ext/iladlr.c +61 -0
- data/ext/ilaenv.c +71 -0
- data/ext/ilaprec.c +47 -0
- data/ext/ilaslc.c +61 -0
- data/ext/ilaslr.c +61 -0
- data/ext/ilatrans.c +47 -0
- data/ext/ilauplo.c +47 -0
- data/ext/ilaver.c +49 -0
- data/ext/ilazlc.c +61 -0
- data/ext/ilazlr.c +61 -0
- data/ext/iparmq.c +71 -0
- data/ext/izmax1.c +59 -0
- data/ext/lsamen.c +55 -0
- data/ext/rb_lapack.c +3279 -0
- data/ext/rb_lapack.h +18 -0
- data/ext/sbbcsd.c +283 -0
- data/ext/sbdsdc.c +153 -0
- data/ext/sbdsqr.c +178 -0
- data/ext/scsum1.c +59 -0
- data/ext/sdisna.c +71 -0
- data/ext/sgbbrd.c +150 -0
- data/ext/sgbcon.c +94 -0
- data/ext/sgbequ.c +94 -0
- data/ext/sgbequb.c +92 -0
- data/ext/sgbrfs.c +157 -0
- data/ext/sgbrfsx.c +245 -0
- data/ext/sgbsv.c +111 -0
- data/ext/sgbsvx.c +282 -0
- data/ext/sgbsvxx.c +285 -0
- data/ext/sgbtf2.c +89 -0
- data/ext/sgbtrf.c +89 -0
- data/ext/sgbtrs.c +107 -0
- data/ext/sgebak.c +97 -0
- data/ext/sgebal.c +87 -0
- data/ext/sgebd2.c +108 -0
- data/ext/sgebrd.c +123 -0
- data/ext/sgecon.c +74 -0
- data/ext/sgeequ.c +84 -0
- data/ext/sgeequb.c +84 -0
- data/ext/sgees.c +144 -0
- data/ext/sgeesx.c +166 -0
- data/ext/sgeev.c +133 -0
- data/ext/sgeevx.c +177 -0
- data/ext/sgegs.c +167 -0
- data/ext/sgegv.c +167 -0
- data/ext/sgehd2.c +88 -0
- data/ext/sgehrd.c +103 -0
- data/ext/sgejsv.c +155 -0
- data/ext/sgelq2.c +82 -0
- data/ext/sgelqf.c +99 -0
- data/ext/sgels.c +133 -0
- data/ext/sgelsd.c +145 -0
- data/ext/sgelss.c +144 -0
- data/ext/sgelsx.c +132 -0
- data/ext/sgelsy.c +159 -0
- data/ext/sgeql2.c +84 -0
- data/ext/sgeqlf.c +99 -0
- data/ext/sgeqp3.c +122 -0
- data/ext/sgeqpf.c +107 -0
- data/ext/sgeqr2.c +84 -0
- data/ext/sgeqr2p.c +84 -0
- data/ext/sgeqrf.c +99 -0
- data/ext/sgeqrfp.c +99 -0
- data/ext/sgerfs.c +149 -0
- data/ext/sgerfsx.c +215 -0
- data/ext/sgerq2.c +82 -0
- data/ext/sgerqf.c +99 -0
- data/ext/sgesc2.c +104 -0
- data/ext/sgesdd.c +128 -0
- data/ext/sgesv.c +103 -0
- data/ext/sgesvd.c +139 -0
- data/ext/sgesvj.c +152 -0
- data/ext/sgesvx.c +274 -0
- data/ext/sgesvxx.c +277 -0
- data/ext/sgetc2.c +85 -0
- data/ext/sgetf2.c +81 -0
- data/ext/sgetrf.c +81 -0
- data/ext/sgetri.c +99 -0
- data/ext/sgetrs.c +99 -0
- data/ext/sggbak.c +109 -0
- data/ext/sggbal.c +124 -0
- data/ext/sgges.c +194 -0
- data/ext/sggesx.c +227 -0
- data/ext/sggev.c +167 -0
- data/ext/sggevx.c +225 -0
- data/ext/sggglm.c +152 -0
- data/ext/sgghrd.c +163 -0
- data/ext/sgglse.c +167 -0
- data/ext/sggqrf.c +133 -0
- data/ext/sggrqf.c +137 -0
- data/ext/sggsvd.c +177 -0
- data/ext/sggsvp.c +167 -0
- data/ext/sgsvj0.c +178 -0
- data/ext/sgsvj1.c +182 -0
- data/ext/sgtcon.c +120 -0
- data/ext/sgtrfs.c +205 -0
- data/ext/sgtsv.c +138 -0
- data/ext/sgtsvx.c +252 -0
- data/ext/sgttrf.c +128 -0
- data/ext/sgttrs.c +133 -0
- data/ext/sgtts2.c +130 -0
- data/ext/shgeqz.c +209 -0
- data/ext/shsein.c +201 -0
- data/ext/shseqr.c +149 -0
- data/ext/sisnan.c +47 -0
- data/ext/sla_gbamv.c +125 -0
- data/ext/sla_gbrcond.c +138 -0
- data/ext/sla_gbrfsx_extended.c +287 -0
- data/ext/sla_gbrpvgrw.c +83 -0
- data/ext/sla_geamv.c +115 -0
- data/ext/sla_gercond.c +130 -0
- data/ext/sla_gerfsx_extended.c +279 -0
- data/ext/sla_lin_berr.c +80 -0
- data/ext/sla_porcond.c +118 -0
- data/ext/sla_porfsx_extended.c +267 -0
- data/ext/sla_porpvgrw.c +91 -0
- data/ext/sla_rpvgrw.c +75 -0
- data/ext/sla_syamv.c +112 -0
- data/ext/sla_syrcond.c +130 -0
- data/ext/sla_syrfsx_extended.c +279 -0
- data/ext/sla_syrpvgrw.c +103 -0
- data/ext/sla_wwaddw.c +98 -0
- data/ext/slabad.c +50 -0
- data/ext/slabrd.c +128 -0
- data/ext/slacn2.c +102 -0
- data/ext/slacon.c +79 -0
- data/ext/slacpy.c +73 -0
- data/ext/sladiv.c +62 -0
- data/ext/slae2.c +58 -0
- data/ext/slaebz.c +214 -0
- data/ext/slaed0.c +123 -0
- data/ext/slaed1.c +129 -0
- data/ext/slaed2.c +185 -0
- data/ext/slaed3.c +157 -0
- data/ext/slaed4.c +86 -0
- data/ext/slaed5.c +83 -0
- data/ext/slaed6.c +86 -0
- data/ext/slaed7.c +244 -0
- data/ext/slaed8.c +202 -0
- data/ext/slaed9.c +107 -0
- data/ext/slaeda.c +156 -0
- data/ext/slaein.c +139 -0
- data/ext/slaev2.c +64 -0
- data/ext/slaexc.c +114 -0
- data/ext/slag2.c +87 -0
- data/ext/slag2d.c +72 -0
- data/ext/slags2.c +86 -0
- data/ext/slagtf.c +136 -0
- data/ext/slagtm.c +128 -0
- data/ext/slagts.c +135 -0
- data/ext/slagv2.c +128 -0
- data/ext/slahqr.c +139 -0
- data/ext/slahr2.c +108 -0
- data/ext/slahrd.c +110 -0
- data/ext/slaic1.c +85 -0
- data/ext/slaln2.c +116 -0
- data/ext/slals0.c +197 -0
- data/ext/slalsa.c +266 -0
- data/ext/slalsd.c +138 -0
- data/ext/slamrg.c +76 -0
- data/ext/slaneg.c +79 -0
- data/ext/slangb.c +74 -0
- data/ext/slange.c +70 -0
- data/ext/slangt.c +83 -0
- data/ext/slanhs.c +66 -0
- data/ext/slansb.c +74 -0
- data/ext/slansf.c +74 -0
- data/ext/slansp.c +72 -0
- data/ext/slanst.c +71 -0
- data/ext/slansy.c +70 -0
- data/ext/slantb.c +78 -0
- data/ext/slantp.c +76 -0
- data/ext/slantr.c +78 -0
- data/ext/slanv2.c +78 -0
- data/ext/slapll.c +101 -0
- data/ext/slapmr.c +93 -0
- data/ext/slapmt.c +97 -0
- data/ext/slapy2.c +51 -0
- data/ext/slapy3.c +55 -0
- data/ext/slaqgb.c +113 -0
- data/ext/slaqge.c +105 -0
- data/ext/slaqp2.c +154 -0
- data/ext/slaqps.c +204 -0
- data/ext/slaqr0.c +149 -0
- data/ext/slaqr1.c +78 -0
- data/ext/slaqr2.c +178 -0
- data/ext/slaqr3.c +178 -0
- data/ext/slaqr4.c +149 -0
- data/ext/slaqr5.c +196 -0
- data/ext/slaqsb.c +97 -0
- data/ext/slaqsp.c +90 -0
- data/ext/slaqsy.c +93 -0
- data/ext/slaqtr.c +110 -0
- data/ext/slar1v.c +169 -0
- data/ext/slar2v.c +145 -0
- data/ext/slarf.c +97 -0
- data/ext/slarfb.c +119 -0
- data/ext/slarfg.c +79 -0
- data/ext/slarfgp.c +79 -0
- data/ext/slarft.c +101 -0
- data/ext/slarfx.c +89 -0
- data/ext/slargv.c +110 -0
- data/ext/slarnv.c +79 -0
- data/ext/slarra.c +120 -0
- data/ext/slarrb.c +174 -0
- data/ext/slarrc.c +92 -0
- data/ext/slarrd.c +186 -0
- data/ext/slarre.c +217 -0
- data/ext/slarrf.c +172 -0
- data/ext/slarrj.c +143 -0
- data/ext/slarrk.c +93 -0
- data/ext/slarrr.c +78 -0
- data/ext/slarrv.c +267 -0
- data/ext/slarscl2.c +78 -0
- data/ext/slartg.c +57 -0
- data/ext/slartgp.c +57 -0
- data/ext/slartgs.c +58 -0
- data/ext/slartv.c +126 -0
- data/ext/slaruv.c +75 -0
- data/ext/slarz.c +101 -0
- data/ext/slarzb.c +123 -0
- data/ext/slarzt.c +101 -0
- data/ext/slas2.c +58 -0
- data/ext/slascl.c +93 -0
- data/ext/slascl2.c +78 -0
- data/ext/slasd0.c +116 -0
- data/ext/slasd1.c +156 -0
- data/ext/slasd2.c +224 -0
- data/ext/slasd3.c +208 -0
- data/ext/slasd4.c +89 -0
- data/ext/slasd5.c +86 -0
- data/ext/slasd6.c +232 -0
- data/ext/slasd7.c +221 -0
- data/ext/slasd8.c +169 -0
- data/ext/slasda.c +217 -0
- data/ext/slasdq.c +182 -0
- data/ext/slasdt.c +78 -0
- data/ext/slaset.c +82 -0
- data/ext/slasq1.c +92 -0
- data/ext/slasq2.c +70 -0
- data/ext/slasq3.c +134 -0
- data/ext/slasq4.c +103 -0
- data/ext/slasq5.c +90 -0
- data/ext/slasq6.c +82 -0
- data/ext/slasr.c +106 -0
- data/ext/slasrt.c +70 -0
- data/ext/slassq.c +66 -0
- data/ext/slasv2.c +70 -0
- data/ext/slaswp.c +90 -0
- data/ext/slasy2.c +122 -0
- data/ext/slasyf.c +93 -0
- data/ext/slatbs.c +126 -0
- data/ext/slatdf.c +115 -0
- data/ext/slatps.c +120 -0
- data/ext/slatrd.c +101 -0
- data/ext/slatrs.c +122 -0
- data/ext/slatrz.c +83 -0
- data/ext/slatzm.c +127 -0
- data/ext/slauu2.c +73 -0
- data/ext/slauum.c +73 -0
- data/ext/sopgtr.c +87 -0
- data/ext/sopmtr.c +112 -0
- data/ext/sorbdb.c +228 -0
- data/ext/sorcsd.c +193 -0
- data/ext/sorg2l.c +88 -0
- data/ext/sorg2r.c +88 -0
- data/ext/sorgbr.c +111 -0
- data/ext/sorghr.c +107 -0
- data/ext/sorgl2.c +86 -0
- data/ext/sorglq.c +103 -0
- data/ext/sorgql.c +103 -0
- data/ext/sorgqr.c +103 -0
- data/ext/sorgr2.c +86 -0
- data/ext/sorgrq.c +103 -0
- data/ext/sorgtr.c +103 -0
- data/ext/sorm2l.c +110 -0
- data/ext/sorm2r.c +110 -0
- data/ext/sormbr.c +135 -0
- data/ext/sormhr.c +129 -0
- data/ext/sorml2.c +106 -0
- data/ext/sormlq.c +121 -0
- data/ext/sormql.c +125 -0
- data/ext/sormqr.c +125 -0
- data/ext/sormr2.c +106 -0
- data/ext/sormr3.c +110 -0
- data/ext/sormrq.c +121 -0
- data/ext/sormrz.c +125 -0
- data/ext/sormtr.c +125 -0
- data/ext/spbcon.c +78 -0
- data/ext/spbequ.c +79 -0
- data/ext/spbrfs.c +141 -0
- data/ext/spbstf.c +77 -0
- data/ext/spbsv.c +103 -0
- data/ext/spbsvx.c +197 -0
- data/ext/spbtf2.c +77 -0
- data/ext/spbtrf.c +77 -0
- data/ext/spbtrs.c +91 -0
- data/ext/spftrf.c +78 -0
- data/ext/spftri.c +78 -0
- data/ext/spftrs.c +93 -0
- data/ext/spocon.c +74 -0
- data/ext/spoequ.c +71 -0
- data/ext/spoequb.c +71 -0
- data/ext/sporfs.c +137 -0
- data/ext/sporfsx.c +202 -0
- data/ext/sposv.c +99 -0
- data/ext/sposvx.c +193 -0
- data/ext/sposvxx.c +231 -0
- data/ext/spotf2.c +73 -0
- data/ext/spotrf.c +73 -0
- data/ext/spotri.c +73 -0
- data/ext/spotrs.c +87 -0
- data/ext/sppcon.c +74 -0
- data/ext/sppequ.c +75 -0
- data/ext/spprfs.c +135 -0
- data/ext/sppsv.c +100 -0
- data/ext/sppsvx.c +187 -0
- data/ext/spptrf.c +74 -0
- data/ext/spptri.c +74 -0
- data/ext/spptrs.c +89 -0
- data/ext/spstf2.c +91 -0
- data/ext/spstrf.c +91 -0
- data/ext/sptcon.c +77 -0
- data/ext/spteqr.c +122 -0
- data/ext/sptrfs.c +150 -0
- data/ext/sptsv.c +115 -0
- data/ext/sptsvx.c +164 -0
- data/ext/spttrf.c +89 -0
- data/ext/spttrs.c +93 -0
- data/ext/sptts2.c +90 -0
- data/ext/srscl.c +75 -0
- data/ext/ssbev.c +103 -0
- data/ext/ssbevd.c +136 -0
- data/ext/ssbevx.c +153 -0
- data/ext/ssbgst.c +113 -0
- data/ext/ssbgv.c +133 -0
- data/ext/ssbgvd.c +166 -0
- data/ext/ssbgvx.c +193 -0
- data/ext/ssbtrd.c +126 -0
- data/ext/ssfrk.c +105 -0
- data/ext/sspcon.c +84 -0
- data/ext/sspev.c +98 -0
- data/ext/sspevd.c +131 -0
- data/ext/sspevx.c +137 -0
- data/ext/sspgst.c +90 -0
- data/ext/sspgv.c +125 -0
- data/ext/sspgvd.c +158 -0
- data/ext/sspgvx.c +164 -0
- data/ext/ssprfs.c +145 -0
- data/ext/sspsv.c +106 -0
- data/ext/sspsvx.c +159 -0
- data/ext/ssptrd.c +96 -0
- data/ext/ssptrf.c +80 -0
- data/ext/ssptri.c +85 -0
- data/ext/ssptrs.c +97 -0
- data/ext/sstebz.c +131 -0
- data/ext/sstedc.c +155 -0
- data/ext/sstegr.c +184 -0
- data/ext/sstein.c +130 -0
- data/ext/sstemr.c +189 -0
- data/ext/ssteqr.c +122 -0
- data/ext/ssterf.c +89 -0
- data/ext/sstev.c +107 -0
- data/ext/sstevd.c +140 -0
- data/ext/sstevr.c +184 -0
- data/ext/sstevx.c +154 -0
- data/ext/ssycon.c +86 -0
- data/ext/ssyconv.c +80 -0
- data/ext/ssyequb.c +78 -0
- data/ext/ssyev.c +103 -0
- data/ext/ssyevd.c +121 -0
- data/ext/ssyevr.c +168 -0
- data/ext/ssyevx.c +153 -0
- data/ext/ssygs2.c +91 -0
- data/ext/ssygst.c +91 -0
- data/ext/ssygv.c +133 -0
- data/ext/ssygvd.c +151 -0
- data/ext/ssygvx.c +187 -0
- data/ext/ssyrfs.c +149 -0
- data/ext/ssyrfsx.c +214 -0
- data/ext/ssysv.c +125 -0
- data/ext/ssysvx.c +179 -0
- data/ext/ssysvxx.c +254 -0
- data/ext/ssyswapr.c +78 -0
- data/ext/ssytd2.c +97 -0
- data/ext/ssytf2.c +81 -0
- data/ext/ssytrd.c +109 -0
- data/ext/ssytrf.c +93 -0
- data/ext/ssytri.c +88 -0
- data/ext/ssytri2.c +123 -0
- data/ext/ssytri2x.c +92 -0
- data/ext/ssytrs.c +99 -0
- data/ext/ssytrs2.c +102 -0
- data/ext/stbcon.c +82 -0
- data/ext/stbrfs.c +123 -0
- data/ext/stbtrs.c +99 -0
- data/ext/stfsm.c +108 -0
- data/ext/stftri.c +82 -0
- data/ext/stfttp.c +75 -0
- data/ext/stfttr.c +76 -0
- data/ext/stgevc.c +149 -0
- data/ext/stgex2.c +180 -0
- data/ext/stgexc.c +187 -0
- data/ext/stgsen.c +248 -0
- data/ext/stgsja.c +223 -0
- data/ext/stgsna.c +160 -0
- data/ext/stgsy2.c +178 -0
- data/ext/stgsyl.c +186 -0
- data/ext/stpcon.c +78 -0
- data/ext/stprfs.c +119 -0
- data/ext/stptri.c +78 -0
- data/ext/stptrs.c +97 -0
- data/ext/stpttf.c +75 -0
- data/ext/stpttr.c +72 -0
- data/ext/strcon.c +78 -0
- data/ext/strevc.c +146 -0
- data/ext/strexc.c +112 -0
- data/ext/strrfs.c +119 -0
- data/ext/strsen.c +165 -0
- data/ext/strsna.c +133 -0
- data/ext/strsyl.c +112 -0
- data/ext/strti2.c +77 -0
- data/ext/strtri.c +77 -0
- data/ext/strtrs.c +95 -0
- data/ext/strttf.c +73 -0
- data/ext/strttp.c +69 -0
- data/ext/stzrqf.c +79 -0
- data/ext/stzrzf.c +97 -0
- data/ext/xerbla.c +48 -0
- data/ext/xerbla_array.c +49 -0
- data/ext/zbbcsd.c +279 -0
- data/ext/zbdsqr.c +178 -0
- data/ext/zcgesv.c +114 -0
- data/ext/zcposv.c +110 -0
- data/ext/zdrscl.c +75 -0
- data/ext/zgbbrd.c +153 -0
- data/ext/zgbcon.c +94 -0
- data/ext/zgbequ.c +94 -0
- data/ext/zgbequb.c +92 -0
- data/ext/zgbrfs.c +157 -0
- data/ext/zgbrfsx.c +245 -0
- data/ext/zgbsv.c +111 -0
- data/ext/zgbsvx.c +282 -0
- data/ext/zgbsvxx.c +285 -0
- data/ext/zgbtf2.c +89 -0
- data/ext/zgbtrf.c +89 -0
- data/ext/zgbtrs.c +107 -0
- data/ext/zgebak.c +97 -0
- data/ext/zgebal.c +87 -0
- data/ext/zgebd2.c +108 -0
- data/ext/zgebrd.c +123 -0
- data/ext/zgecon.c +74 -0
- data/ext/zgeequ.c +84 -0
- data/ext/zgeequb.c +84 -0
- data/ext/zgees.c +138 -0
- data/ext/zgeesx.c +148 -0
- data/ext/zgeev.c +128 -0
- data/ext/zgeevx.c +169 -0
- data/ext/zgegs.c +162 -0
- data/ext/zgegv.c +167 -0
- data/ext/zgehd2.c +88 -0
- data/ext/zgehrd.c +103 -0
- data/ext/zgelq2.c +82 -0
- data/ext/zgelqf.c +99 -0
- data/ext/zgels.c +133 -0
- data/ext/zgelsd.c +150 -0
- data/ext/zgelss.c +147 -0
- data/ext/zgelsx.c +135 -0
- data/ext/zgelsy.c +162 -0
- data/ext/zgeql2.c +84 -0
- data/ext/zgeqlf.c +99 -0
- data/ext/zgeqp3.c +125 -0
- data/ext/zgeqpf.c +110 -0
- data/ext/zgeqr2.c +84 -0
- data/ext/zgeqr2p.c +84 -0
- data/ext/zgeqrf.c +99 -0
- data/ext/zgeqrfp.c +99 -0
- data/ext/zgerfs.c +149 -0
- data/ext/zgerfsx.c +215 -0
- data/ext/zgerq2.c +82 -0
- data/ext/zgerqf.c +99 -0
- data/ext/zgesc2.c +104 -0
- data/ext/zgesdd.c +131 -0
- data/ext/zgesv.c +103 -0
- data/ext/zgesvd.c +142 -0
- data/ext/zgesvx.c +274 -0
- data/ext/zgesvxx.c +277 -0
- data/ext/zgetc2.c +85 -0
- data/ext/zgetf2.c +81 -0
- data/ext/zgetrf.c +81 -0
- data/ext/zgetri.c +99 -0
- data/ext/zgetrs.c +99 -0
- data/ext/zggbak.c +109 -0
- data/ext/zggbal.c +124 -0
- data/ext/zgges.c +188 -0
- data/ext/zggesx.c +226 -0
- data/ext/zggev.c +167 -0
- data/ext/zggevx.c +222 -0
- data/ext/zggglm.c +152 -0
- data/ext/zgghrd.c +163 -0
- data/ext/zgglse.c +167 -0
- data/ext/zggqrf.c +133 -0
- data/ext/zggrqf.c +137 -0
- data/ext/zggsvd.c +180 -0
- data/ext/zggsvp.c +170 -0
- data/ext/zgtcon.c +117 -0
- data/ext/zgtrfs.c +205 -0
- data/ext/zgtsv.c +138 -0
- data/ext/zgtsvx.c +252 -0
- data/ext/zgttrf.c +128 -0
- data/ext/zgttrs.c +133 -0
- data/ext/zgtts2.c +130 -0
- data/ext/zhbev.c +106 -0
- data/ext/zhbevd.c +154 -0
- data/ext/zhbevx.c +156 -0
- data/ext/zhbgst.c +116 -0
- data/ext/zhbgv.c +136 -0
- data/ext/zhbgvd.c +184 -0
- data/ext/zhbgvx.c +185 -0
- data/ext/zhbtrd.c +126 -0
- data/ext/zhecon.c +83 -0
- data/ext/zheequb.c +78 -0
- data/ext/zheev.c +106 -0
- data/ext/zheevd.c +139 -0
- data/ext/zheevr.c +186 -0
- data/ext/zheevx.c +156 -0
- data/ext/zhegs2.c +91 -0
- data/ext/zhegst.c +91 -0
- data/ext/zhegv.c +136 -0
- data/ext/zhegvd.c +169 -0
- data/ext/zhegvx.c +186 -0
- data/ext/zherfs.c +149 -0
- data/ext/zherfsx.c +214 -0
- data/ext/zhesv.c +119 -0
- data/ext/zhesvx.c +179 -0
- data/ext/zhesvxx.c +254 -0
- data/ext/zhetd2.c +97 -0
- data/ext/zhetf2.c +81 -0
- data/ext/zhetrd.c +109 -0
- data/ext/zhetrf.c +93 -0
- data/ext/zhetri.c +88 -0
- data/ext/zhetrs.c +99 -0
- data/ext/zhetrs2.c +102 -0
- data/ext/zhfrk.c +105 -0
- data/ext/zhgeqz.c +204 -0
- data/ext/zhpcon.c +81 -0
- data/ext/zhpev.c +101 -0
- data/ext/zhpevd.c +149 -0
- data/ext/zhpevx.c +140 -0
- data/ext/zhpgst.c +90 -0
- data/ext/zhpgv.c +128 -0
- data/ext/zhpgvd.c +166 -0
- data/ext/zhpgvx.c +166 -0
- data/ext/zhprfs.c +145 -0
- data/ext/zhpsv.c +106 -0
- data/ext/zhpsvx.c +159 -0
- data/ext/zhptrd.c +96 -0
- data/ext/zhptrf.c +80 -0
- data/ext/zhptri.c +85 -0
- data/ext/zhptrs.c +97 -0
- data/ext/zhsein.c +181 -0
- data/ext/zhseqr.c +141 -0
- data/ext/zla_gbamv.c +123 -0
- data/ext/zla_gbrcond_c.c +138 -0
- data/ext/zla_gbrcond_x.c +134 -0
- data/ext/zla_gbrfsx_extended.c +291 -0
- data/ext/zla_gbrpvgrw.c +83 -0
- data/ext/zla_geamv.c +115 -0
- data/ext/zla_gercond_c.c +130 -0
- data/ext/zla_gercond_x.c +126 -0
- data/ext/zla_gerfsx_extended.c +277 -0
- data/ext/zla_heamv.c +112 -0
- data/ext/zla_hercond_c.c +130 -0
- data/ext/zla_hercond_x.c +126 -0
- data/ext/zla_herfsx_extended.c +279 -0
- data/ext/zla_herpvgrw.c +103 -0
- data/ext/zla_lin_berr.c +80 -0
- data/ext/zla_porcond_c.c +118 -0
- data/ext/zla_porcond_x.c +114 -0
- data/ext/zla_porfsx_extended.c +267 -0
- data/ext/zla_porpvgrw.c +91 -0
- data/ext/zla_rpvgrw.c +75 -0
- data/ext/zla_syamv.c +112 -0
- data/ext/zla_syrcond_c.c +130 -0
- data/ext/zla_syrcond_x.c +126 -0
- data/ext/zla_syrfsx_extended.c +279 -0
- data/ext/zla_syrpvgrw.c +103 -0
- data/ext/zla_wwaddw.c +98 -0
- data/ext/zlabrd.c +128 -0
- data/ext/zlacgv.c +71 -0
- data/ext/zlacn2.c +99 -0
- data/ext/zlacon.c +76 -0
- data/ext/zlacp2.c +73 -0
- data/ext/zlacpy.c +73 -0
- data/ext/zlacrm.c +86 -0
- data/ext/zlacrt.c +104 -0
- data/ext/zladiv.c +53 -0
- data/ext/zlaed0.c +130 -0
- data/ext/zlaed7.c +243 -0
- data/ext/zlaed8.c +194 -0
- data/ext/zlaein.c +109 -0
- data/ext/zlaesy.c +70 -0
- data/ext/zlaev2.c +67 -0
- data/ext/zlag2c.c +72 -0
- data/ext/zlags2.c +88 -0
- data/ext/zlagtm.c +128 -0
- data/ext/zlahef.c +93 -0
- data/ext/zlahqr.c +131 -0
- data/ext/zlahr2.c +108 -0
- data/ext/zlahrd.c +108 -0
- data/ext/zlaic1.c +86 -0
- data/ext/zlals0.c +197 -0
- data/ext/zlalsa.c +266 -0
- data/ext/zlalsd.c +141 -0
- data/ext/zlangb.c +72 -0
- data/ext/zlange.c +70 -0
- data/ext/zlangt.c +83 -0
- data/ext/zlanhb.c +74 -0
- data/ext/zlanhe.c +70 -0
- data/ext/zlanhf.c +76 -0
- data/ext/zlanhp.c +72 -0
- data/ext/zlanhs.c +66 -0
- data/ext/zlanht.c +71 -0
- data/ext/zlansb.c +74 -0
- data/ext/zlansp.c +72 -0
- data/ext/zlansy.c +70 -0
- data/ext/zlantb.c +78 -0
- data/ext/zlantp.c +76 -0
- data/ext/zlantr.c +78 -0
- data/ext/zlapll.c +101 -0
- data/ext/zlapmr.c +93 -0
- data/ext/zlapmt.c +97 -0
- data/ext/zlaqgb.c +113 -0
- data/ext/zlaqge.c +105 -0
- data/ext/zlaqhb.c +93 -0
- data/ext/zlaqhe.c +93 -0
- data/ext/zlaqhp.c +90 -0
- data/ext/zlaqp2.c +154 -0
- data/ext/zlaqps.c +204 -0
- data/ext/zlaqr0.c +149 -0
- data/ext/zlaqr1.c +72 -0
- data/ext/zlaqr2.c +170 -0
- data/ext/zlaqr3.c +170 -0
- data/ext/zlaqr4.c +143 -0
- data/ext/zlaqr5.c +175 -0
- data/ext/zlaqsb.c +97 -0
- data/ext/zlaqsp.c +90 -0
- data/ext/zlaqsy.c +93 -0
- data/ext/zlar1v.c +169 -0
- data/ext/zlar2v.c +145 -0
- data/ext/zlarcm.c +82 -0
- data/ext/zlarf.c +98 -0
- data/ext/zlarfb.c +119 -0
- data/ext/zlarfg.c +80 -0
- data/ext/zlarfgp.c +80 -0
- data/ext/zlarft.c +101 -0
- data/ext/zlarfx.c +90 -0
- data/ext/zlargv.c +110 -0
- data/ext/zlarnv.c +79 -0
- data/ext/zlarrv.c +267 -0
- data/ext/zlarscl2.c +78 -0
- data/ext/zlartg.c +59 -0
- data/ext/zlartv.c +126 -0
- data/ext/zlarz.c +102 -0
- data/ext/zlarzb.c +123 -0
- data/ext/zlarzt.c +101 -0
- data/ext/zlascl.c +93 -0
- data/ext/zlascl2.c +78 -0
- data/ext/zlaset.c +84 -0
- data/ext/zlasr.c +106 -0
- data/ext/zlassq.c +66 -0
- data/ext/zlaswp.c +90 -0
- data/ext/zlasyf.c +93 -0
- data/ext/zlat2c.c +72 -0
- data/ext/zlatbs.c +126 -0
- data/ext/zlatdf.c +115 -0
- data/ext/zlatps.c +120 -0
- data/ext/zlatrd.c +101 -0
- data/ext/zlatrs.c +122 -0
- data/ext/zlatrz.c +83 -0
- data/ext/zlatzm.c +128 -0
- data/ext/zlauu2.c +73 -0
- data/ext/zlauum.c +73 -0
- data/ext/zpbcon.c +78 -0
- data/ext/zpbequ.c +79 -0
- data/ext/zpbrfs.c +141 -0
- data/ext/zpbstf.c +77 -0
- data/ext/zpbsv.c +103 -0
- data/ext/zpbsvx.c +197 -0
- data/ext/zpbtf2.c +77 -0
- data/ext/zpbtrf.c +77 -0
- data/ext/zpbtrs.c +91 -0
- data/ext/zpftrf.c +78 -0
- data/ext/zpftri.c +78 -0
- data/ext/zpftrs.c +93 -0
- data/ext/zpocon.c +74 -0
- data/ext/zpoequ.c +71 -0
- data/ext/zpoequb.c +71 -0
- data/ext/zporfs.c +137 -0
- data/ext/zporfsx.c +202 -0
- data/ext/zposv.c +99 -0
- data/ext/zposvx.c +193 -0
- data/ext/zposvxx.c +231 -0
- data/ext/zpotf2.c +73 -0
- data/ext/zpotrf.c +73 -0
- data/ext/zpotri.c +73 -0
- data/ext/zpotrs.c +87 -0
- data/ext/zppcon.c +74 -0
- data/ext/zppequ.c +75 -0
- data/ext/zpprfs.c +135 -0
- data/ext/zppsv.c +100 -0
- data/ext/zppsvx.c +187 -0
- data/ext/zpptrf.c +74 -0
- data/ext/zpptri.c +74 -0
- data/ext/zpptrs.c +89 -0
- data/ext/zpstf2.c +91 -0
- data/ext/zpstrf.c +91 -0
- data/ext/zptcon.c +77 -0
- data/ext/zpteqr.c +122 -0
- data/ext/zptrfs.c +157 -0
- data/ext/zptsv.c +119 -0
- data/ext/zptsvx.c +167 -0
- data/ext/zpttrf.c +89 -0
- data/ext/zpttrs.c +97 -0
- data/ext/zptts2.c +94 -0
- data/ext/zrot.c +103 -0
- data/ext/zspcon.c +81 -0
- data/ext/zspmv.c +113 -0
- data/ext/zspr.c +92 -0
- data/ext/zsprfs.c +145 -0
- data/ext/zspsv.c +106 -0
- data/ext/zspsvx.c +159 -0
- data/ext/zsptrf.c +80 -0
- data/ext/zsptri.c +85 -0
- data/ext/zsptrs.c +97 -0
- data/ext/zstedc.c +173 -0
- data/ext/zstegr.c +184 -0
- data/ext/zstein.c +130 -0
- data/ext/zstemr.c +189 -0
- data/ext/zsteqr.c +122 -0
- data/ext/zsycon.c +83 -0
- data/ext/zsyconv.c +80 -0
- data/ext/zsyequb.c +78 -0
- data/ext/zsymv.c +111 -0
- data/ext/zsyr.c +91 -0
- data/ext/zsyrfs.c +149 -0
- data/ext/zsyrfsx.c +214 -0
- data/ext/zsysv.c +125 -0
- data/ext/zsysvx.c +179 -0
- data/ext/zsysvxx.c +254 -0
- data/ext/zsyswapr.c +78 -0
- data/ext/zsytf2.c +81 -0
- data/ext/zsytrf.c +93 -0
- data/ext/zsytri.c +88 -0
- data/ext/zsytri2.c +100 -0
- data/ext/zsytri2x.c +92 -0
- data/ext/zsytrs.c +99 -0
- data/ext/zsytrs2.c +102 -0
- data/ext/ztbcon.c +82 -0
- data/ext/ztbrfs.c +123 -0
- data/ext/ztbtrs.c +99 -0
- data/ext/ztfsm.c +107 -0
- data/ext/ztftri.c +82 -0
- data/ext/ztfttp.c +75 -0
- data/ext/ztfttr.c +76 -0
- data/ext/ztgevc.c +152 -0
- data/ext/ztgex2.c +167 -0
- data/ext/ztgexc.c +168 -0
- data/ext/ztgsen.c +240 -0
- data/ext/ztgsja.c +223 -0
- data/ext/ztgsna.c +160 -0
- data/ext/ztgsy2.c +172 -0
- data/ext/ztgsyl.c +186 -0
- data/ext/ztpcon.c +78 -0
- data/ext/ztprfs.c +119 -0
- data/ext/ztptri.c +78 -0
- data/ext/ztptrs.c +97 -0
- data/ext/ztpttf.c +75 -0
- data/ext/ztpttr.c +72 -0
- data/ext/ztrcon.c +78 -0
- data/ext/ztrevc.c +150 -0
- data/ext/ztrexc.c +107 -0
- data/ext/ztrrfs.c +119 -0
- data/ext/ztrsen.c +150 -0
- data/ext/ztrsna.c +133 -0
- data/ext/ztrsyl.c +112 -0
- data/ext/ztrti2.c +77 -0
- data/ext/ztrtri.c +77 -0
- data/ext/ztrtrs.c +95 -0
- data/ext/ztrttf.c +73 -0
- data/ext/ztrttp.c +69 -0
- data/ext/ztzrqf.c +79 -0
- data/ext/ztzrzf.c +97 -0
- data/ext/zunbdb.c +228 -0
- data/ext/zuncsd.c +200 -0
- data/ext/zung2l.c +88 -0
- data/ext/zung2r.c +88 -0
- data/ext/zungbr.c +111 -0
- data/ext/zunghr.c +107 -0
- data/ext/zungl2.c +86 -0
- data/ext/zunglq.c +103 -0
- data/ext/zungql.c +103 -0
- data/ext/zungqr.c +103 -0
- data/ext/zungr2.c +86 -0
- data/ext/zungrq.c +103 -0
- data/ext/zungtr.c +103 -0
- data/ext/zunm2l.c +110 -0
- data/ext/zunm2r.c +110 -0
- data/ext/zunmbr.c +135 -0
- data/ext/zunmhr.c +129 -0
- data/ext/zunml2.c +106 -0
- data/ext/zunmlq.c +121 -0
- data/ext/zunmql.c +125 -0
- data/ext/zunmqr.c +125 -0
- data/ext/zunmr2.c +106 -0
- data/ext/zunmr3.c +110 -0
- data/ext/zunmrq.c +121 -0
- data/ext/zunmrz.c +125 -0
- data/ext/zunmtr.c +125 -0
- data/ext/zupgtr.c +87 -0
- data/ext/zupmtr.c +112 -0
- data/lib/numru/lapack.rb +51 -0
- data/samples/dsyevr.rb +25 -0
- data/tests/eig/ge/test_gesdd.rb +90 -0
- data/tests/eig/ge/test_gesvd.rb +99 -0
- data/tests/eig/gg/test_ggev.rb +124 -0
- data/tests/eig/gg/test_ggsvd.rb +76 -0
- data/tests/eig/sb/test_sbev.rb +39 -0
- data/tests/lapack_test.rb +50 -0
- data/tests/lin/gb/test_gbsv.rb +46 -0
- data/tests/lin/gb/test_gbsvx.rb +56 -0
- data/tests/lin/ge/test_gels.rb +63 -0
- data/tests/lin/ge/test_gelsd.rb +54 -0
- data/tests/lin/ge/test_gelss.rb +73 -0
- data/tests/lin/ge/test_gelsy.rb +73 -0
- data/tests/lin/ge/test_gesv.rb +43 -0
- data/tests/lin/ge/test_gesvx.rb +52 -0
- data/tests/lin/gt/test_gtsv.rb +39 -0
- data/tests/test_all.rb +7 -0
- metadata +3513 -0
data/dev/mkdoc.rb
ADDED
@@ -0,0 +1,265 @@
|
|
1
|
+
DataTypes = [
|
2
|
+
["S", "REAL"],
|
3
|
+
["D", "DOUBLE PRECISION"],
|
4
|
+
["C", "COMPLEX"],
|
5
|
+
["Z", "COMPLEX*16 or DOUBLE COMPLEX"],
|
6
|
+
["DS", "Data type in double but solving problem using single precision"],
|
7
|
+
["ZC", "Data type in complex*16 but solving problem using complex precision"]
|
8
|
+
]
|
9
|
+
|
10
|
+
MatrixTypes = [
|
11
|
+
["BD", "bidiagonal"],
|
12
|
+
["DI", "diagonal"],
|
13
|
+
["GB", "general band"],
|
14
|
+
["GE", "general (i.e., unsymmetric, in some cases rectangular)"],
|
15
|
+
["GG", "general matrices, generalized problem (i.e., a pair of general matrices)"],
|
16
|
+
["GT", "general tridiagonal"],
|
17
|
+
["HB", "(complex) Hermitian band"],
|
18
|
+
["HE", "(complex) Hermitian"],
|
19
|
+
["HG", "upper Hessenberg matrix, generalized problem (i.e a Hessenberg and a triangular matrix)"],
|
20
|
+
["HP", "(complex) Hermitian, packed storage"],
|
21
|
+
["HS", "upper Hessenberg"],
|
22
|
+
["OP", "(real) orthogonal, packed storage"],
|
23
|
+
["OR", "(real) orthogonal"],
|
24
|
+
["PB", "symmetric or Hermitian positive definite band"],
|
25
|
+
["PO", "symmetric or Hermitian positive definite"],
|
26
|
+
["PP", "symmetric or Hermitian positive definite, packed storage"],
|
27
|
+
["PT", "symmetric or Hermitian positive definite tridiagonal"],
|
28
|
+
["SB", "(real) symmetric band"],
|
29
|
+
["SP", "symmetric, packed storage"],
|
30
|
+
["ST", "(real) symmetric tridiagonal"],
|
31
|
+
["SY", "symmetric"],
|
32
|
+
["TB", "triangular band"],
|
33
|
+
["TG", "triangular matrices, generalized problem (i.e., a pair of triangular matrices)"],
|
34
|
+
["TP", "triangular, packed storage"],
|
35
|
+
["TR", "triangular (or in some cases quasi-triangular)"],
|
36
|
+
["TZ", "trapezoidal"],
|
37
|
+
["UN", "(complex) unitary"],
|
38
|
+
["UP", "(complex) unitary, packed storageBDbidiagonal"]
|
39
|
+
]
|
40
|
+
|
41
|
+
|
42
|
+
require "numru/lapack"
|
43
|
+
include NumRu
|
44
|
+
|
45
|
+
prefix = File.dirname(__FILE__)+"/../doc"
|
46
|
+
|
47
|
+
desc = Hash.new
|
48
|
+
|
49
|
+
methods = Lapack.singleton_methods
|
50
|
+
dts = Hash.new
|
51
|
+
DataTypes.each{|cdt, dt|
|
52
|
+
cdt = cdt.downcase
|
53
|
+
dmethods = Array.new
|
54
|
+
methods.each{|m|
|
55
|
+
dmethods.push m if /^#{cdt}/ =~ m
|
56
|
+
}
|
57
|
+
dmethods.each do |m|
|
58
|
+
methods.delete m
|
59
|
+
end
|
60
|
+
mts = Array.new
|
61
|
+
MatrixTypes.each{|cmt, mt|
|
62
|
+
cmt = cmt.downcase
|
63
|
+
reg = /^#{cdt}#{cmt}/
|
64
|
+
ms = Array.new
|
65
|
+
dmethods.each{|m|
|
66
|
+
next unless reg =~ m
|
67
|
+
ms.push m
|
68
|
+
}
|
69
|
+
ms.sort!
|
70
|
+
unless ms.empty?
|
71
|
+
mts.push [cmt,mt]
|
72
|
+
dts[cmt] ||= Array.new
|
73
|
+
dts[cmt].push [cdt, dt]
|
74
|
+
File.open(File.join(prefix,"#{cdt}#{cmt}.html"),"w"){|file|
|
75
|
+
file.print <<"EOF"
|
76
|
+
<HTML>
|
77
|
+
<HEAD>
|
78
|
+
<TITLE>#{dt} routines for #{mt} matrix</TITLE>
|
79
|
+
</HEAD>
|
80
|
+
<BODY>
|
81
|
+
<A NAME="top"></A>
|
82
|
+
<H1>#{dt} routines for #{mt} matrix</H1>
|
83
|
+
<UL>
|
84
|
+
EOF
|
85
|
+
ms.each{|m|
|
86
|
+
file.print <<"EOF"
|
87
|
+
<LI><A HREF=\"##{m}\">#{m}</A></LI>
|
88
|
+
EOF
|
89
|
+
}
|
90
|
+
file.print <<"EOF"
|
91
|
+
</UL>
|
92
|
+
|
93
|
+
EOF
|
94
|
+
ms.each{|m|
|
95
|
+
file.print <<"EOF"
|
96
|
+
<A NAME="#{m}"></A>
|
97
|
+
<H2>#{m}</H2>
|
98
|
+
<PRE>
|
99
|
+
EOF
|
100
|
+
IO.popen("-") do |io|
|
101
|
+
if io # parent
|
102
|
+
file.print io.read
|
103
|
+
else # child
|
104
|
+
Lapack.send(m, :help => true)
|
105
|
+
end
|
106
|
+
end
|
107
|
+
file.print <<"EOF"
|
108
|
+
</PRE>
|
109
|
+
<A HREF="#top">go to the page top</A>
|
110
|
+
|
111
|
+
EOF
|
112
|
+
}
|
113
|
+
file.print <<"EOF"
|
114
|
+
<HR />
|
115
|
+
<A HREF="#{cdt}.html">back to matrix types</A><BR>
|
116
|
+
<A HREF="#{cdt}.html">back to data types</A>
|
117
|
+
</BODY>
|
118
|
+
</HTML>
|
119
|
+
EOF
|
120
|
+
}
|
121
|
+
end
|
122
|
+
}
|
123
|
+
|
124
|
+
unless mts.empty?
|
125
|
+
File.open(File.join(prefix,"#{cdt}.html"),"w"){|file|
|
126
|
+
file.print <<"EOF"
|
127
|
+
<HTML>
|
128
|
+
<HEAD>
|
129
|
+
<TITLE>#{dt} routines</TITLE>
|
130
|
+
</HEAD>
|
131
|
+
<BODY>
|
132
|
+
<H1>#{dt} routines</H1>
|
133
|
+
<UL>
|
134
|
+
EOF
|
135
|
+
mts.each{|cmt,mt|
|
136
|
+
file.print " <LI><A HREF=\"#{cdt}#{cmt}.html\">#{cmt.upcase}: #{mt}</A></LI>\n"
|
137
|
+
}
|
138
|
+
file.print <<"EOF"
|
139
|
+
</UL>
|
140
|
+
<HR />
|
141
|
+
<A HREF="index.html">back to index.html</A>
|
142
|
+
</BODY>
|
143
|
+
</HTML>
|
144
|
+
EOF
|
145
|
+
}
|
146
|
+
end
|
147
|
+
}
|
148
|
+
|
149
|
+
MatrixTypes.each do |cmt,mt|
|
150
|
+
cmt = cmt.downcase
|
151
|
+
if dts[cmt]
|
152
|
+
File.open(File.join(prefix,"#{cmt}.html"),"w") do |file|
|
153
|
+
file.print <<"EOF"
|
154
|
+
<HTML>
|
155
|
+
<HEAD>
|
156
|
+
<TITLE>#{mt} routines</TITLE>
|
157
|
+
</HEAD>
|
158
|
+
<BODY>
|
159
|
+
<H1>#{mt} routines</H1>
|
160
|
+
<UL>
|
161
|
+
EOF
|
162
|
+
dts[cmt].each{|cdt,dt|
|
163
|
+
file.print " <LI><A HREF=\"#{cdt}#{cmt}.html\">#{cdt.upcase}: #{dt}</A></LI>\n"
|
164
|
+
}
|
165
|
+
file.print <<"EOF"
|
166
|
+
</UL>
|
167
|
+
<HR />
|
168
|
+
<A HREF="index.html">back to index.html</A>
|
169
|
+
</BODY>
|
170
|
+
</HTML>
|
171
|
+
EOF
|
172
|
+
end
|
173
|
+
end
|
174
|
+
end
|
175
|
+
|
176
|
+
if methods.any?
|
177
|
+
File.open(File.join(prefix,"others.html"),"w") do |file|
|
178
|
+
file.print <<EOF
|
179
|
+
<HTML>
|
180
|
+
<HEAD>
|
181
|
+
<TITLE>other routines</TITLE>
|
182
|
+
</HEAD>
|
183
|
+
<BODY>
|
184
|
+
<A NAME="top"></A>
|
185
|
+
<H1>other routines</H1>
|
186
|
+
<UL>
|
187
|
+
EOF
|
188
|
+
methods.each do |m|
|
189
|
+
file.print <<EOF
|
190
|
+
<LI><A HREF=\"##{m}\">#{m}</A></LI>
|
191
|
+
EOF
|
192
|
+
end
|
193
|
+
file.print <<EOF
|
194
|
+
</UL>
|
195
|
+
|
196
|
+
EOF
|
197
|
+
methods.each do |m|
|
198
|
+
file.print <<EOF
|
199
|
+
<A NAME="#{m}"></A>
|
200
|
+
<H2>#{m}</H2>
|
201
|
+
<PRE>
|
202
|
+
EOF
|
203
|
+
IO.popen("-") do |io|
|
204
|
+
if io # parent
|
205
|
+
file.print io.read
|
206
|
+
else # child
|
207
|
+
Lapack.send(m, :help => true)
|
208
|
+
end
|
209
|
+
end
|
210
|
+
file.print <<EOF
|
211
|
+
</PRE>
|
212
|
+
<A HREF="#top">go to the page top</A>
|
213
|
+
|
214
|
+
EOF
|
215
|
+
end
|
216
|
+
file.print <<"EOF"
|
217
|
+
<HR />
|
218
|
+
<A HREF="index.html">back to index</A>
|
219
|
+
</BODY>
|
220
|
+
</HTML>
|
221
|
+
EOF
|
222
|
+
end
|
223
|
+
end
|
224
|
+
|
225
|
+
File.open(File.join(prefix,"index.html"),"w"){|file|
|
226
|
+
file.print <<"EOF"
|
227
|
+
<HTML>
|
228
|
+
<HEAD>
|
229
|
+
<TITLE>LAPACK routines</TITLE>
|
230
|
+
</HEAD>
|
231
|
+
<BODY>
|
232
|
+
<H1>Data types</H1>
|
233
|
+
<UL>
|
234
|
+
EOF
|
235
|
+
DataTypes.each{|cdt,dt|
|
236
|
+
file.print " <LI><A HREF=\"#{cdt.downcase}.html\">#{cdt}: #{dt}</A></LI>\n"
|
237
|
+
}
|
238
|
+
file.print <<"EOF"
|
239
|
+
</UL>
|
240
|
+
|
241
|
+
<H1>Matrix types</H1>
|
242
|
+
<UL>
|
243
|
+
EOF
|
244
|
+
MatrixTypes.each do |cmt,mt|
|
245
|
+
if dts[cmt.downcase]
|
246
|
+
file.print " <LI><A HREF=\"#{cmt.downcase}.html\">#{cmt}: #{mt}</A></LI>\n"
|
247
|
+
end
|
248
|
+
end
|
249
|
+
file.print <<"EOF"
|
250
|
+
</UL>
|
251
|
+
EOF
|
252
|
+
if methods.any?
|
253
|
+
file.print <<EOF
|
254
|
+
|
255
|
+
<H1>others</H1>
|
256
|
+
<UL>
|
257
|
+
<LI><A HREF=\"others.html\">others</A></LI>
|
258
|
+
</UL>
|
259
|
+
EOF
|
260
|
+
end
|
261
|
+
file.print <<"EOF"
|
262
|
+
</BODY>
|
263
|
+
</HTML>
|
264
|
+
EOF
|
265
|
+
}
|
data/dev/parse.rb
ADDED
@@ -0,0 +1,1972 @@
|
|
1
|
+
$:.unshift File.dirname(__FILE__)
|
2
|
+
|
3
|
+
require "yaml"
|
4
|
+
require "digest/md5"
|
5
|
+
require "pp"
|
6
|
+
require "common"
|
7
|
+
|
8
|
+
CTYPES = {
|
9
|
+
"INTEGER" => "integer",
|
10
|
+
"CHARACTER" => "char",
|
11
|
+
"REAL" => "real",
|
12
|
+
"DOUBLE PRECISION" => "doublereal",
|
13
|
+
"COMPLEX" => "complex",
|
14
|
+
"COMPLEX*16" => "doublecomplex",
|
15
|
+
"DOUBLE COMPLEX" => "doublecomplex",
|
16
|
+
"LOGICAL" => "logical"
|
17
|
+
}
|
18
|
+
|
19
|
+
ARGS = {
|
20
|
+
"csyequb" => {
|
21
|
+
"uplo" => {:intent => "input", :type => "char"},
|
22
|
+
"work" => {:intent => "input", :type => "real"}
|
23
|
+
},
|
24
|
+
"zsyequb" => {
|
25
|
+
"uplo" => {:intent => "input", :type => "char"},
|
26
|
+
"work" => {:intent => "input", :type => "doublereal"}
|
27
|
+
},
|
28
|
+
"zhfrk" => {
|
29
|
+
"uplo" => {:intent => "input", :type => "char"},
|
30
|
+
"trans" => {:intent => "input", :type => "char"},
|
31
|
+
"n" => {:intent => "input", :type => "integer"},
|
32
|
+
"k" => {:intent => "input", :type => "integer"},
|
33
|
+
"alpha" => {:intent => "input", :type => "doublereal"},
|
34
|
+
"beta" => {:intent => "input", :type => "doublereal"},
|
35
|
+
"a" => {:intent => "input", :type => "doublereal"},
|
36
|
+
"lda" => {:intent => "input", :type => "integer"},
|
37
|
+
"c" => {:intent => "input", :type => "doublereal"},
|
38
|
+
},
|
39
|
+
"zpstf2" => {
|
40
|
+
"work" => {:intent => "input", :type => "doublereal"}
|
41
|
+
},
|
42
|
+
"ssfrk" => {
|
43
|
+
"uplo" => {:intent => "input", :type => "char"},
|
44
|
+
"trans" => {:intent => "input", :type => "char"},
|
45
|
+
"n" => {:intent => "input", :type => "integer"},
|
46
|
+
"k" => {:intent => "input", :type => "integer"},
|
47
|
+
"alpha" => {:intent => "input", :type => "real"},
|
48
|
+
"beta" => {:intent => "input", :type => "real"},
|
49
|
+
"a" => {:intent => "input", :type => "real"},
|
50
|
+
"lda" => {:intent => "input", :type => "integer"},
|
51
|
+
"c" => {:intent => "input", :type => "real"},
|
52
|
+
},
|
53
|
+
"dsfrk" => {
|
54
|
+
"uplo" => {:intent => "input", :type => "char"},
|
55
|
+
"trans" => {:intent => "input", :type => "char"},
|
56
|
+
"n" => {:intent => "input", :type => "integer"},
|
57
|
+
"k" => {:intent => "input", :type => "integer"},
|
58
|
+
"alpha" => {:intent => "input", :type => "doublereal"},
|
59
|
+
"beta" => {:intent => "input", :type => "doublereal"},
|
60
|
+
"a" => {:intent => "input", :type => "doublereal"},
|
61
|
+
"lda" => {:intent => "input", :type => "integer"},
|
62
|
+
"c" => {:intent => "input", :type => "doublereal"},
|
63
|
+
},
|
64
|
+
"spstf2" => {
|
65
|
+
"work" => {:intent => "input", :type => "real"}
|
66
|
+
},
|
67
|
+
"slarrf" => {
|
68
|
+
"clgapl" => {:intent => "input", :type => "real"},
|
69
|
+
"clgapr" => {:intent => "input", :type => "real"},
|
70
|
+
},
|
71
|
+
"cheequb" => {
|
72
|
+
"uplo" => {:intent => "input", :type => "char"},
|
73
|
+
"work" => {:intent => "input", :type => "complex"}
|
74
|
+
},
|
75
|
+
"zheequb" => {
|
76
|
+
"uplo" => {:intent => "input", :type => "char"},
|
77
|
+
"work" => {:intent => "input", :type => "doublecomplex"}
|
78
|
+
},
|
79
|
+
"dsyequb" => {
|
80
|
+
"uplo" => {:intent => "input", :type => "char"},
|
81
|
+
"work" => {:intent => "input", :type => "doublereal"}
|
82
|
+
},
|
83
|
+
"chesvxx" => {
|
84
|
+
"uplo" => {:intent => "input", :type => "char"}
|
85
|
+
},
|
86
|
+
"zhesvxx" => {
|
87
|
+
"uplo" => {:intent => "input", :type => "char"}
|
88
|
+
},
|
89
|
+
"dgesvj" => {
|
90
|
+
"lwork" => {:intent => "input", :type => "integer"}
|
91
|
+
},
|
92
|
+
"dpstf2" => {
|
93
|
+
"work" => {:intent => "input", :type => "doublereal"}
|
94
|
+
},
|
95
|
+
"cpstf2" => {
|
96
|
+
"work" => {:intent => "input", :type => "real"}
|
97
|
+
},
|
98
|
+
"spstrf" => {
|
99
|
+
"work" => {:intent => "input", :type => "real"}
|
100
|
+
},
|
101
|
+
"dpstrf" => {
|
102
|
+
"work" => {:intent => "input", :type => "doublereal"}
|
103
|
+
},
|
104
|
+
"zpstrf" => {
|
105
|
+
"work" => {:intent => "input", :type => "doublereal"}
|
106
|
+
},
|
107
|
+
"cpstrf" => {
|
108
|
+
"work" => {:intent => "input", :type => "doublereal"}
|
109
|
+
},
|
110
|
+
"sgesvj" => {
|
111
|
+
"lwork" => {:intent => "input", :type => "integer"}
|
112
|
+
},
|
113
|
+
"sla_lin_berr" => {
|
114
|
+
"berr" => {:intent => "output", :type => "real"}
|
115
|
+
},
|
116
|
+
"dla_lin_berr" => {
|
117
|
+
"berr" => {:intent => "output", :type => "doublereal"}
|
118
|
+
},
|
119
|
+
"ssyequb" => {
|
120
|
+
"uplo" => {:intent => "input", :type => "char"},
|
121
|
+
"work" => {:intent => "input", :type => "real"},
|
122
|
+
},
|
123
|
+
"slasq4" => {
|
124
|
+
"n0in" => {:intent => "input", :type => "integer"},
|
125
|
+
},
|
126
|
+
"dlasq4" => {
|
127
|
+
"n0in" => {:intent => "input", :type => "integer"},
|
128
|
+
},
|
129
|
+
"slaqr1" => {
|
130
|
+
"si1" => {:intent => "input", :type => "real"},
|
131
|
+
"sr2" => {:intent => "input", :type => "real"},
|
132
|
+
"si2" => {:intent => "input", :type => "real"},
|
133
|
+
},
|
134
|
+
"dlaqr1" => {
|
135
|
+
"si1" => {:intent => "input", :type => "doublereal"},
|
136
|
+
"sr2" => {:intent => "input", :type => "doublereal"},
|
137
|
+
"si2" => {:intent => "input", :type => "doublereal"},
|
138
|
+
},
|
139
|
+
"claqr1" => {
|
140
|
+
"s2" => {:intent => "input", :type => "complex"},
|
141
|
+
},
|
142
|
+
"zlaqr1" => {
|
143
|
+
"s2" => {:intent => "input", :type => "doublecomplex"},
|
144
|
+
},
|
145
|
+
"slarrf" => {
|
146
|
+
"clgapl" => {:intent => "input", :type => "real"},
|
147
|
+
"clgapr" => {:intent => "input", :type => "real"},
|
148
|
+
"info" => {:intent => "output", :type => "integer"},
|
149
|
+
},
|
150
|
+
"dlarrf" => {
|
151
|
+
"clgapl" => {:intent => "input", :type => "doublereal"},
|
152
|
+
"clgapr" => {:intent => "input", :type => "doublereal"},
|
153
|
+
"info" => {:intent => "output", :type => "integer"},
|
154
|
+
}
|
155
|
+
}
|
156
|
+
|
157
|
+
DIMS = {
|
158
|
+
"strttp" => {
|
159
|
+
"ap" => ["n*(n+1)/2"]
|
160
|
+
},
|
161
|
+
"dtrttp" => {
|
162
|
+
"ap" => ["n*(n+1)/2"]
|
163
|
+
},
|
164
|
+
"stftri" => {
|
165
|
+
"a" => ["n*(n+1)/2"]
|
166
|
+
},
|
167
|
+
"dtftri" => {
|
168
|
+
"a" => ["n*(n+1)/2"]
|
169
|
+
},
|
170
|
+
"zpstrf" => {
|
171
|
+
"work" => ["2*n"]
|
172
|
+
},
|
173
|
+
"spftrf" => {
|
174
|
+
"a" => ["n*(n+1)/2"]
|
175
|
+
},
|
176
|
+
"cpftrf" => {
|
177
|
+
"a" => ["n*(n+1)/2"]
|
178
|
+
},
|
179
|
+
"cpftrs" => {
|
180
|
+
"a" => ["n*(n+1)/2"]
|
181
|
+
},
|
182
|
+
"zpftrs" => {
|
183
|
+
"a" => ["n*(n+1)/2"]
|
184
|
+
},
|
185
|
+
"strttf" => {
|
186
|
+
"arf" => ["n*(n+1)/2"]
|
187
|
+
},
|
188
|
+
"dtrttf" => {
|
189
|
+
"arf" => ["n*(n+1)/2"]
|
190
|
+
},
|
191
|
+
"sla_gbrfsx_extended" => {
|
192
|
+
"ab" => ["ldab", "n"]
|
193
|
+
},
|
194
|
+
"stgex2" => {
|
195
|
+
"work" => ["lwork"]
|
196
|
+
},
|
197
|
+
"dtgex2" => {
|
198
|
+
"work" => ["lwork"]
|
199
|
+
},
|
200
|
+
"dlasd1" => {
|
201
|
+
"d" => ["n"]
|
202
|
+
},
|
203
|
+
"slaruv" => {
|
204
|
+
"x" => ["MAX(1,n)"]
|
205
|
+
},
|
206
|
+
"dlaruv" => {
|
207
|
+
"x" => ["MAX(1,n)"]
|
208
|
+
},
|
209
|
+
"slasyf" => {
|
210
|
+
"w" => ["ldw","MAX(1,nb)"]
|
211
|
+
},
|
212
|
+
"dlasyf" => {
|
213
|
+
"w" => ["ldw","MAX(1,nb)"]
|
214
|
+
},
|
215
|
+
"clasyf" => {
|
216
|
+
"w" => ["ldw","MAX(1,nb)"]
|
217
|
+
},
|
218
|
+
"zlasyf" => {
|
219
|
+
"w" => ["ldw","MAX(1,nb)"]
|
220
|
+
},
|
221
|
+
"slaeda" => {
|
222
|
+
"qptr" => ["ldqptr"]
|
223
|
+
},
|
224
|
+
"dlaeda" => {
|
225
|
+
"qptr" => ["ldqptr"]
|
226
|
+
},
|
227
|
+
"slasdt" => {
|
228
|
+
"inode" => ["MAX(1,n)"],
|
229
|
+
"ndiml" => ["MAX(1,n)"],
|
230
|
+
"ndimr" => ["MAX(1,n)"],
|
231
|
+
},
|
232
|
+
"dlasdt" => {
|
233
|
+
"inode" => ["MAX(1,n)"],
|
234
|
+
"ndiml" => ["MAX(1,n)"],
|
235
|
+
"ndimr" => ["MAX(1,n)"],
|
236
|
+
},
|
237
|
+
"sgbequ" => {
|
238
|
+
"r" => ["MAX(1,m)"]
|
239
|
+
},
|
240
|
+
"dgbequ" => {
|
241
|
+
"r" => ["MAX(1,m)"]
|
242
|
+
},
|
243
|
+
"cgbequ" => {
|
244
|
+
"r" => ["MAX(1,m)"]
|
245
|
+
},
|
246
|
+
"zgbequ" => {
|
247
|
+
"r" => ["MAX(1,m)"]
|
248
|
+
},
|
249
|
+
"slaed9" => {
|
250
|
+
"d" => ["MAX(1,n)"],
|
251
|
+
"q" => ["ldq", "MAX(1,n)"]
|
252
|
+
},
|
253
|
+
"dlaed9" => {
|
254
|
+
"d" => ["MAX(1,n)"],
|
255
|
+
"q" => ["ldq", "MAX(1,n)"]
|
256
|
+
},
|
257
|
+
"slarnv" => {
|
258
|
+
"x" => ["MAX(1,n)"],
|
259
|
+
},
|
260
|
+
"dlarnv" => {
|
261
|
+
"x" => ["MAX(1,n)"],
|
262
|
+
},
|
263
|
+
"clarnv" => {
|
264
|
+
"x" => ["MAX(1,n)"],
|
265
|
+
},
|
266
|
+
"zlarnv" => {
|
267
|
+
"x" => ["MAX(1,n)"]
|
268
|
+
},
|
269
|
+
"slabrd" => {
|
270
|
+
"d" => ["MAX(1,nb)"],
|
271
|
+
"e" => ["MAX(1,nb)"],
|
272
|
+
"tauq" => ["MAX(1,nb)"],
|
273
|
+
"taup" => ["MAX(1,nb)"],
|
274
|
+
"x" => ["ldx", "MAX(1,nb)"],
|
275
|
+
"y" => ["ldy", "MAX(1,nb)"],
|
276
|
+
},
|
277
|
+
"dlabrd" => {
|
278
|
+
"d" => ["MAX(1,nb)"],
|
279
|
+
"e" => ["MAX(1,nb)"],
|
280
|
+
"tauq" => ["MAX(1,nb)"],
|
281
|
+
"taup" => ["MAX(1,nb)"],
|
282
|
+
"x" => ["ldx", "MAX(1,nb)"],
|
283
|
+
"y" => ["ldy", "MAX(1,nb)"],
|
284
|
+
},
|
285
|
+
"clabrd" => {
|
286
|
+
"d" => ["MAX(1,nb)"],
|
287
|
+
"e" => ["MAX(1,nb)"],
|
288
|
+
"tauq" => ["MAX(1,nb)"],
|
289
|
+
"taup" => ["MAX(1,nb)"],
|
290
|
+
"x" => ["ldx", "MAX(1,nb)"],
|
291
|
+
"y" => ["ldy", "MAX(1,nb)"],
|
292
|
+
},
|
293
|
+
"zlabrd" => {
|
294
|
+
"d" => ["MAX(1,nb)"],
|
295
|
+
"e" => ["MAX(1,nb)"],
|
296
|
+
"tauq" => ["MAX(1,nb)"],
|
297
|
+
"taup" => ["MAX(1,nb)"],
|
298
|
+
"x" => ["ldx", "MAX(1,nb)"],
|
299
|
+
"y" => ["ldy", "MAX(1,nb)"],
|
300
|
+
},
|
301
|
+
"slahr2" => {
|
302
|
+
"tau" => ["MAX(1,nb)"],
|
303
|
+
"t" => ["ldt","MAX(1,nb)"],
|
304
|
+
"y" => ["ldy","MAX(1,nb)"],
|
305
|
+
},
|
306
|
+
"dlahr2" => {
|
307
|
+
"tau" => ["MAX(1,nb)"],
|
308
|
+
"t" => ["ldt","MAX(1,nb)"],
|
309
|
+
"y" => ["ldy","MAX(1,nb)"],
|
310
|
+
},
|
311
|
+
"clahr2" => {
|
312
|
+
"tau" => ["MAX(1,nb)"],
|
313
|
+
"t" => ["ldt","MAX(1,nb)"],
|
314
|
+
"y" => ["ldy","MAX(1,nb)"],
|
315
|
+
},
|
316
|
+
"zlahr2" => {
|
317
|
+
"tau" => ["MAX(1,nb)"],
|
318
|
+
"t" => ["ldt","MAX(1,nb)"],
|
319
|
+
"y" => ["ldy","MAX(1,nb)"],
|
320
|
+
},
|
321
|
+
"slahrd" => {
|
322
|
+
"tau" => ["MAX(1,nb)"],
|
323
|
+
"t" => ["ldt","MAX(1,nb)"],
|
324
|
+
"y" => ["ldy","MAX(1,nb)"],
|
325
|
+
},
|
326
|
+
"dlahrd" => {
|
327
|
+
"tau" => ["MAX(1,nb)"],
|
328
|
+
"t" => ["ldt","MAX(1,nb)"],
|
329
|
+
"y" => ["ldy","MAX(1,nb)"],
|
330
|
+
},
|
331
|
+
"clahrd" => {
|
332
|
+
"tau" => ["MAX(1,nb)"],
|
333
|
+
"t" => ["ldt","MAX(1,nb)"],
|
334
|
+
"y" => ["ldy","MAX(1,nb)"],
|
335
|
+
},
|
336
|
+
"zlahrd" => {
|
337
|
+
"tau" => ["MAX(1,nb)"],
|
338
|
+
"t" => ["ldt","MAX(1,nb)"],
|
339
|
+
"y" => ["ldy","MAX(1,nb)"],
|
340
|
+
},
|
341
|
+
"slaqr2" => {
|
342
|
+
"sr" => ["MAX(1,kbot)"],
|
343
|
+
"si" => ["MAX(1,kbot)"],
|
344
|
+
"v" => ["ldv", "MAX(1,nw)"],
|
345
|
+
"t" => ["ldt", "MAX(1,nw)"],
|
346
|
+
"wv" => ["ldwv", "MAX(1,nw)"],
|
347
|
+
},
|
348
|
+
"dlaqr2" => {
|
349
|
+
"sr" => ["MAX(1,kbot)"],
|
350
|
+
"si" => ["MAX(1,kbot)"],
|
351
|
+
"v" => ["ldv", "MAX(1,nw)"],
|
352
|
+
"t" => ["ldt", "MAX(1,nw)"],
|
353
|
+
"wv" => ["ldwv", "MAX(1,nw)"],
|
354
|
+
},
|
355
|
+
"claqr2" => {
|
356
|
+
"sh" => ["MAX(1,kbot)"],
|
357
|
+
"v" => ["ldv", "MAX(1,nw)"],
|
358
|
+
"t" => ["ldv", "MAX(1,nw)"],
|
359
|
+
"wv" => ["ldv", "MAX(1,nw)"],
|
360
|
+
},
|
361
|
+
"zlaqr2" => {
|
362
|
+
"sh" => ["MAX(1,kbot)"],
|
363
|
+
"v" => ["ldv", "MAX(1,nw)"],
|
364
|
+
"t" => ["ldv", "MAX(1,nw)"],
|
365
|
+
"wv" => ["ldv", "MAX(1,nw)"],
|
366
|
+
},
|
367
|
+
"slaqr3" => {
|
368
|
+
"sr" => ["MAX(1,kbot)"],
|
369
|
+
"si" => ["MAX(1,kbot)"],
|
370
|
+
"v" => ["ldv", "MAX(1,nw)"],
|
371
|
+
"t" => ["ldt", "MAX(1,nw)"],
|
372
|
+
"wv" => ["ldwv", "MAX(1,nw)"],
|
373
|
+
},
|
374
|
+
"dlaqr3" => {
|
375
|
+
"sr" => ["MAX(1,kbot)"],
|
376
|
+
"si" => ["MAX(1,kbot)"],
|
377
|
+
"v" => ["ldv", "MAX(1,nw)"],
|
378
|
+
"t" => ["ldt", "MAX(1,nw)"],
|
379
|
+
"wv" => ["ldwv", "MAX(1,nw)"],
|
380
|
+
},
|
381
|
+
"claqr3" => {
|
382
|
+
"sh" => ["MAX(1,kbot)"],
|
383
|
+
"v" => ["ldv", "MAX(1,nw)"],
|
384
|
+
"t" => ["ldv", "MAX(1,nw)"],
|
385
|
+
"wv" => ["ldv", "MAX(1,nw)"],
|
386
|
+
},
|
387
|
+
"zlaqr3" => {
|
388
|
+
"sh" => ["MAX(1,kbot)"],
|
389
|
+
"v" => ["ldv", "MAX(1,nw)"],
|
390
|
+
"t" => ["ldv", "MAX(1,nw)"],
|
391
|
+
"wv" => ["ldv", "MAX(1,nw)"],
|
392
|
+
},
|
393
|
+
"slatrd" => {
|
394
|
+
"w" => ["ldw", "MAX(n,nb)"]
|
395
|
+
},
|
396
|
+
"dlatrd" => {
|
397
|
+
"w" => ["ldw", "MAX(n,nb)"]
|
398
|
+
},
|
399
|
+
"clatrd" => {
|
400
|
+
"w" => ["ldw", "MAX(n,nb)"]
|
401
|
+
},
|
402
|
+
"zlatrd" => {
|
403
|
+
"w" => ["ldw", "MAX(n,nb)"]
|
404
|
+
},
|
405
|
+
"clahef" => {
|
406
|
+
"w" => ["ldw", "MAX(n,nb)"]
|
407
|
+
},
|
408
|
+
"zlahef" => {
|
409
|
+
"w" => ["ldw", "MAX(n,nb)"]
|
410
|
+
},
|
411
|
+
"sopgtr" => {
|
412
|
+
"ap" => ["ldap"],
|
413
|
+
"tau" => ["ldtau"],
|
414
|
+
},
|
415
|
+
"dopgtr" => {
|
416
|
+
"ap" => ["ldap"],
|
417
|
+
"tau" => ["ldtau"],
|
418
|
+
},
|
419
|
+
"cupgtr" => {
|
420
|
+
"ap" => ["ldap"],
|
421
|
+
"tau" => ["ldtau"],
|
422
|
+
},
|
423
|
+
"zupgtr" => {
|
424
|
+
"ap" => ["ldap"],
|
425
|
+
"tau" => ["ldtau"],
|
426
|
+
},
|
427
|
+
"ssptrd" => {
|
428
|
+
"ap" => ["ldap"]
|
429
|
+
},
|
430
|
+
"dsptrd" => {
|
431
|
+
"ap" => ["ldap"]
|
432
|
+
},
|
433
|
+
"chptrd" => {
|
434
|
+
"ap" => ["ldap"]
|
435
|
+
},
|
436
|
+
"zhptrd" => {
|
437
|
+
"ap" => ["ldap"]
|
438
|
+
},
|
439
|
+
"sspgv" => {
|
440
|
+
"ap" => ["ldap"]
|
441
|
+
},
|
442
|
+
"chpev" => {
|
443
|
+
"ap" => ["ldap"],
|
444
|
+
},
|
445
|
+
"zhpev" => {
|
446
|
+
"ap" => ["ldap"],
|
447
|
+
},
|
448
|
+
"chpevx" => {
|
449
|
+
"ap" => ["ldap"],
|
450
|
+
},
|
451
|
+
"zhpevx" => {
|
452
|
+
"ap" => ["ldap"],
|
453
|
+
},
|
454
|
+
"dspgv" => {
|
455
|
+
"ap" => ["ldap"]
|
456
|
+
},
|
457
|
+
"sppequ" => {
|
458
|
+
"ap" => ["ldap"]
|
459
|
+
},
|
460
|
+
"dppequ" => {
|
461
|
+
"ap" => ["ldap"]
|
462
|
+
},
|
463
|
+
"cppequ" => {
|
464
|
+
"ap" => ["ldap"]
|
465
|
+
},
|
466
|
+
"zppequ" => {
|
467
|
+
"ap" => ["ldap"]
|
468
|
+
},
|
469
|
+
"sspgvd" => {
|
470
|
+
"ap" => ["ldap"]
|
471
|
+
},
|
472
|
+
"dspgvd" => {
|
473
|
+
"ap" => ["ldap"]
|
474
|
+
},
|
475
|
+
"stpcon" => {
|
476
|
+
"ap" => ["ldap"]
|
477
|
+
},
|
478
|
+
"dtpcon" => {
|
479
|
+
"ap" => ["ldap"]
|
480
|
+
},
|
481
|
+
"ctpcon" => {
|
482
|
+
"ap" => ["ldap"]
|
483
|
+
},
|
484
|
+
"ztpcon" => {
|
485
|
+
"ap" => ["ldap"]
|
486
|
+
},
|
487
|
+
"sspgvx" => {
|
488
|
+
"ap" => ["ldap"],
|
489
|
+
},
|
490
|
+
"dspgvx" => {
|
491
|
+
"ap" => ["ldap"],
|
492
|
+
},
|
493
|
+
"chpevd" => {
|
494
|
+
"ap" => ["ldap"],
|
495
|
+
},
|
496
|
+
"zhpevd" => {
|
497
|
+
"ap" => ["ldap"],
|
498
|
+
},
|
499
|
+
"sspev" => {
|
500
|
+
"ap" => ["ldap"],
|
501
|
+
},
|
502
|
+
"dspev" => {
|
503
|
+
"ap" => ["ldap"],
|
504
|
+
},
|
505
|
+
"sspevd" => {
|
506
|
+
"ap" => ["ldap"],
|
507
|
+
},
|
508
|
+
"dspevd" => {
|
509
|
+
"ap" => ["ldap"],
|
510
|
+
},
|
511
|
+
"sspevx" => {
|
512
|
+
"ap" => ["ldap"],
|
513
|
+
},
|
514
|
+
"dspevx" => {
|
515
|
+
"ap" => ["ldap"],
|
516
|
+
},
|
517
|
+
"sppcon" => {
|
518
|
+
"ap" => ["ldap"]
|
519
|
+
},
|
520
|
+
"dppcon" => {
|
521
|
+
"ap" => ["ldap"]
|
522
|
+
},
|
523
|
+
"cppcon" => {
|
524
|
+
"ap" => ["ldap"]
|
525
|
+
},
|
526
|
+
"zppcon" => {
|
527
|
+
"ap" => ["ldap"]
|
528
|
+
},
|
529
|
+
"chpgv" => {
|
530
|
+
"ap" => ["ldap"]
|
531
|
+
},
|
532
|
+
"zhpgv" => {
|
533
|
+
"ap" => ["ldap"]
|
534
|
+
},
|
535
|
+
"chpgvd" => {
|
536
|
+
"ap" => ["ldap"]
|
537
|
+
},
|
538
|
+
"zhpgvd" => {
|
539
|
+
"ap" => ["ldap"]
|
540
|
+
},
|
541
|
+
"chpgvx" => {
|
542
|
+
"ap" => ["ldap"]
|
543
|
+
},
|
544
|
+
"zhpgvx" => {
|
545
|
+
"ap" => ["ldap"]
|
546
|
+
},
|
547
|
+
"chptrf" => {
|
548
|
+
"ap" => ["ldap"]
|
549
|
+
},
|
550
|
+
"zhptrf" => {
|
551
|
+
"ap" => ["ldap"]
|
552
|
+
},
|
553
|
+
"ssptrf" => {
|
554
|
+
"ap" => ["ldap"]
|
555
|
+
},
|
556
|
+
"dsptrf" => {
|
557
|
+
"ap" => ["ldap"]
|
558
|
+
},
|
559
|
+
"csptrf" => {
|
560
|
+
"ap" => ["ldap"]
|
561
|
+
},
|
562
|
+
"zsptrf" => {
|
563
|
+
"ap" => ["ldap"]
|
564
|
+
},
|
565
|
+
"slaqr0" => {
|
566
|
+
"z" => ["ldz","ihi"]
|
567
|
+
},
|
568
|
+
"dlaqr0" => {
|
569
|
+
"z" => ["ldz","ihi"]
|
570
|
+
},
|
571
|
+
"claqr0" => {
|
572
|
+
"z" => ["ldz","ihi"],
|
573
|
+
"work" => ["MAX(1,lwork)"]
|
574
|
+
},
|
575
|
+
"zlaqr0" => {
|
576
|
+
"z" => ["wantz ? ldz : 0","wantz ? ihi : 0"],
|
577
|
+
"work" => ["MAX(1,lwork)"]
|
578
|
+
},
|
579
|
+
"slaqr4" => {
|
580
|
+
"z" => ["ldz","ihi"]
|
581
|
+
},
|
582
|
+
"dlaqr4" => {
|
583
|
+
"z" => ["ldz","ihi"]
|
584
|
+
},
|
585
|
+
"claqr4" => {
|
586
|
+
"z" => ["ldz","ihi"]
|
587
|
+
},
|
588
|
+
"zlaqr4" => {
|
589
|
+
"z" => ["ldz","ihi"]
|
590
|
+
},
|
591
|
+
"slaqr5" => {
|
592
|
+
"z" => ["wantz ? ldz : 0","wantz ? ihiz : 0"],
|
593
|
+
"wh" => ["ldwh", "MAX(1,nh)"]
|
594
|
+
},
|
595
|
+
"dlaqr5" => {
|
596
|
+
"z" => ["wantz ? ldz : 0","wantz ? ihiz : 0"],
|
597
|
+
"wh" => ["ldwh", "MAX(1,nh)"]
|
598
|
+
},
|
599
|
+
"claqr5" => {
|
600
|
+
"z" => ["wantz ? ldz : 0","wantz ? ihiz : 0"],
|
601
|
+
"wh" => ["ldwh", "MAX(1,nh)"]
|
602
|
+
},
|
603
|
+
"zlaqr5" => {
|
604
|
+
"z" => ["wantz ? ldz : 0","wantz ? ihiz : 0"],
|
605
|
+
"wh" => ["ldwh", "MAX(1,nh)"]
|
606
|
+
},
|
607
|
+
"slasd0" => {
|
608
|
+
"u" => ["ldu", "n"]
|
609
|
+
},
|
610
|
+
"dlasd0" => {
|
611
|
+
"u" => ["ldu", "n"]
|
612
|
+
},
|
613
|
+
"slasd4" => {
|
614
|
+
"delta" => ["n"],
|
615
|
+
"work" => ["n"]
|
616
|
+
},
|
617
|
+
"dlasd4" => {
|
618
|
+
"delta" => ["n"],
|
619
|
+
"work" => ["n"]
|
620
|
+
},
|
621
|
+
"slasdq" => {
|
622
|
+
"e" => ['sqre==0 ? n-1 : sqre==1 ? n : 0'],
|
623
|
+
"work" => ["4*n"]
|
624
|
+
},
|
625
|
+
"dlasdq" => {
|
626
|
+
"e" => ['sqre==0 ? n-1 : sqre==1 ? n : 0'],
|
627
|
+
"work" => ["4*n"]
|
628
|
+
},
|
629
|
+
"slaed3" => {
|
630
|
+
"q2" => ["n","n"]
|
631
|
+
},
|
632
|
+
"dlaed3" => {
|
633
|
+
"q2" => ["n","n"]
|
634
|
+
},
|
635
|
+
"slaed4" => {
|
636
|
+
"delta" => ["n"]
|
637
|
+
},
|
638
|
+
"dlaed4" => {
|
639
|
+
"delta" => ["n"]
|
640
|
+
},
|
641
|
+
"slaed8" => {
|
642
|
+
"q" => ['icompq==0 ? 0 : ldq', 'icompq==0 ? 0 : n'],
|
643
|
+
"q2" => ['icompq==0 ? 0 : ldq2', 'icompq==0 ? 0 : n']
|
644
|
+
},
|
645
|
+
"dlaed8" => {
|
646
|
+
"q" => ['icompq==0 ? 0 : ldq', 'icompq==0 ? 0 : n'],
|
647
|
+
"q2" => ['icompq==0 ? 0 : ldq2', 'icompq==0 ? 0 : n']
|
648
|
+
},
|
649
|
+
"claed8" => {
|
650
|
+
"q2" => ['ldq2', 'n']
|
651
|
+
},
|
652
|
+
"zlaed8" => {
|
653
|
+
"q2" => ['ldq2', 'n']
|
654
|
+
},
|
655
|
+
"slasq3" => {
|
656
|
+
"z" => ['4*n0']
|
657
|
+
},
|
658
|
+
"dlasq3" => {
|
659
|
+
"z" => ['4*n0']
|
660
|
+
},
|
661
|
+
"slasq4" => {
|
662
|
+
"z" => ['4*n0']
|
663
|
+
},
|
664
|
+
"dlasq4" => {
|
665
|
+
"z" => ['4*n0']
|
666
|
+
},
|
667
|
+
"slasq5" => {
|
668
|
+
"z" => ['4*n0']
|
669
|
+
},
|
670
|
+
"dlasq5" => {
|
671
|
+
"z" => ['4*n0']
|
672
|
+
},
|
673
|
+
"slasq6" => {
|
674
|
+
"z" => ['4*n0']
|
675
|
+
},
|
676
|
+
"dlasq6" => {
|
677
|
+
"z" => ['4*n0']
|
678
|
+
},
|
679
|
+
"slazq3" => {
|
680
|
+
"z" => ['4*n0']
|
681
|
+
},
|
682
|
+
"dlazq3" => {
|
683
|
+
"z" => ['4*n0']
|
684
|
+
},
|
685
|
+
"slazq4" => {
|
686
|
+
"z" => ['4*n0']
|
687
|
+
},
|
688
|
+
"dlazq4" => {
|
689
|
+
"z" => ['4*n0']
|
690
|
+
},
|
691
|
+
"slahqr" => {
|
692
|
+
"z" => ['wantz ? ldz : 0', 'wantz ? n : 0']
|
693
|
+
},
|
694
|
+
"dlahqr" => {
|
695
|
+
"z" => ['wantz ? ldz : 0', 'wantz ? n : 0']
|
696
|
+
},
|
697
|
+
"clahqr" => {
|
698
|
+
"z" => ['wantz ? ldz : 0', 'wantz ? n : 0']
|
699
|
+
},
|
700
|
+
"zlahqr" => {
|
701
|
+
"z" => ['wantz ? ldz : 0', 'wantz ? n : 0']
|
702
|
+
},
|
703
|
+
"cpbsvx" => {
|
704
|
+
"afb" => ["ldafb","n"]
|
705
|
+
},
|
706
|
+
"dgesdd" => {
|
707
|
+
"vt" => ["ldvt","n"]
|
708
|
+
},
|
709
|
+
"slasda" => {
|
710
|
+
"u" => ["ldu", "MAX(1,smlsiz)"],
|
711
|
+
"s" => ['icompq==1 ? n : icompq==0 ? 1 : 0']
|
712
|
+
},
|
713
|
+
"dlasda" => {
|
714
|
+
"u" => ["ldu", "MAX(1,smlsiz)"],
|
715
|
+
"s" => ['icompq==1 ? n : icompq==0 ? 1 : 0']
|
716
|
+
},
|
717
|
+
"clalsa" => {
|
718
|
+
"rwork" => ['MAX(n,(smlsiz+1)*nrhs*3)']
|
719
|
+
},
|
720
|
+
"zlalsa" => {
|
721
|
+
"rwork" => ['MAX(n,(smlsiz+1)*nrhs*3)']
|
722
|
+
},
|
723
|
+
"stgsen" => {
|
724
|
+
"iwork" => ['ijob==0 ? 0 : MAX(1,liwork)']
|
725
|
+
},
|
726
|
+
"dtgsen" => {
|
727
|
+
"iwork" => ['ijob==0 ? 0 : MAX(1,liwork)']
|
728
|
+
},
|
729
|
+
"ztgsen" => {
|
730
|
+
"work" => ['ijob==0 ? 0 : MAX(1,lwork)'],
|
731
|
+
"iwork" => ['ijob==0 ? 0 : MAX(1,liwork)']
|
732
|
+
},
|
733
|
+
"ctgsen" => {
|
734
|
+
"work" => ['ijob==0 ? 0 : MAX(1,lwork)'],
|
735
|
+
"iwork" => ['ijob==0 ? 0 : MAX(1,liwork)']
|
736
|
+
},
|
737
|
+
"slarfx" => {
|
738
|
+
"work" => ['lsame_(&side,"L") ? n : lsame_(&side,"R") ? m : 0']
|
739
|
+
},
|
740
|
+
"dlarfx" => {
|
741
|
+
"work" => ['lsame_(&side,"L") ? n : lsame_(&side,"R") ? m : 0']
|
742
|
+
},
|
743
|
+
"clarfx" => {
|
744
|
+
"work" => ['lsame_(&side,"L") ? n : lsame_(&side,"R") ? m : 0']
|
745
|
+
},
|
746
|
+
"zlarfx" => {
|
747
|
+
"work" => ['lsame_(&side,"L") ? n : lsame_(&side,"R") ? m : 0']
|
748
|
+
},
|
749
|
+
"slaebz" => {
|
750
|
+
"nval" => ['(ijob==1||ijob==2) ? 0 : ijob==3 ? minp : 0'],
|
751
|
+
"c" => ['ijob==1 ? 0 : (ijob==2||ijob==3) ? mmax : 0'],
|
752
|
+
"nab" => ['mmax', '2']
|
753
|
+
},
|
754
|
+
"dlaebz" => {
|
755
|
+
"nval" => ['(ijob==1||ijob==2) ? 0 : ijob==3 ? minp : 0'],
|
756
|
+
"c" => ['ijob==1 ? 0 : (ijob==2||ijob==3) ? mmax : 0'],
|
757
|
+
"nab" => ['mmax', '2']
|
758
|
+
},
|
759
|
+
"sbdsdc" => {
|
760
|
+
"u" => ['lsame_(&compq,"I") ? ldu : 0','lsame_(&compq,"I") ? n : 0'],
|
761
|
+
"vt" => ['lsame_(&compq,"I") ? ldvt : 0','lsame_(&compq,"I") ? n : 0'],
|
762
|
+
"q" => ['lsame_(&compq,"I") ? ldq : 0'],
|
763
|
+
"iq" => ['lsame_(&compq,"I") ? ldiq : 0'],
|
764
|
+
"work" => ['MAX(1,lwork)']
|
765
|
+
},
|
766
|
+
"dbdsdc" => {
|
767
|
+
"u" => ['lsame_(&compq,"I") ? ldu : 0','lsame_(&compq,"I") ? n : 0'],
|
768
|
+
"vt" => ['lsame_(&compq,"I") ? ldvt : 0','lsame_(&compq,"I") ? n : 0'],
|
769
|
+
"q" => ['lsame_(&compq,"I") ? ldq : 0'],
|
770
|
+
"iq" => ['lsame_(&compq,"I") ? ldiq : 0'],
|
771
|
+
"work" => ['MAX(1,lwork)']
|
772
|
+
},
|
773
|
+
"sgelsx" => {
|
774
|
+
"work" => ['MAX((MIN(m,n))+3*n,2*(MIN(m,n))*nrhs)']
|
775
|
+
},
|
776
|
+
"dgelsx" => {
|
777
|
+
"work" => ['MAX((MIN(m,n))+3*n,2*(MIN(m,n))*nrhs)']
|
778
|
+
},
|
779
|
+
"cgelsx" => {
|
780
|
+
"work" => ['MIN(m,n) + MAX(n,2*(MIN(m,n))+nrhs)']
|
781
|
+
},
|
782
|
+
"zgelsx" => {
|
783
|
+
"work" => ['MIN(m,n) + MAX(n,2*(MIN(m,n))+nrhs)']
|
784
|
+
},
|
785
|
+
"sgeevx" => {
|
786
|
+
"iwork" => ['(lsame_(&sense,"N")||lsame_(&sense,"E")) ? 0 : 2*n-2']
|
787
|
+
},
|
788
|
+
"dgeevx" => {
|
789
|
+
"iwork" => ['(lsame_(&sense,"N")||lsame_(&sense,"E")) ? 0 : 2*n-2']
|
790
|
+
},
|
791
|
+
"ctgex2" => {
|
792
|
+
"q" => ['wantq ? ldq : 0', 'wantq ? n : 0'],
|
793
|
+
"z" => ['wantq ? ldz : 0', 'wantq ? n : 0']
|
794
|
+
},
|
795
|
+
"ztgex2" => {
|
796
|
+
"q" => ['wantq ? ldq : 0', 'wantq ? n : 0'],
|
797
|
+
"z" => ['wantq ? ldz : 0', 'wantq ? n : 0']
|
798
|
+
},
|
799
|
+
"clalsd" => {
|
800
|
+
"rwork" => ['9*n+2*n*smlsiz+8*n*nlvl+3*smlsiz*nrhs+(smlsiz+1)*(smlsiz+1)']
|
801
|
+
},
|
802
|
+
"zlalsd" => {
|
803
|
+
"rwork" => ['9*n+2*n*smlsiz+8*n*nlvl+3*smlsiz*nrhs+(smlsiz+1)*(smlsiz+1)']
|
804
|
+
},
|
805
|
+
"ssbgvx" => {
|
806
|
+
"work" => ['7*n'],
|
807
|
+
"iwork" => ['5*n'],
|
808
|
+
}
|
809
|
+
}
|
810
|
+
|
811
|
+
|
812
|
+
TYPES = {
|
813
|
+
"slarrc" => {
|
814
|
+
"vl" => "real",
|
815
|
+
"vu" => "real",
|
816
|
+
"d" => "real",
|
817
|
+
"e" => "real",
|
818
|
+
"pivmin" => "real"
|
819
|
+
},
|
820
|
+
"slarrb" => {
|
821
|
+
"pivmin" => "real",
|
822
|
+
"spdiam" => "real"
|
823
|
+
},
|
824
|
+
"slarre" => {
|
825
|
+
"pivmin" => "real"
|
826
|
+
},
|
827
|
+
"slarrf" => {
|
828
|
+
"pivmin" => "real",
|
829
|
+
"spdiam" => "real"
|
830
|
+
},
|
831
|
+
"dlarrf" => {
|
832
|
+
"spdiam" => "doublereal"
|
833
|
+
},
|
834
|
+
"slarrj" => {
|
835
|
+
"pivmin" => "real",
|
836
|
+
"spdiam" => "real"
|
837
|
+
},
|
838
|
+
"slarrv" => {
|
839
|
+
"pivmin" => "real"
|
840
|
+
},
|
841
|
+
"clarrv" =>{
|
842
|
+
"pivmin" => "real"
|
843
|
+
},
|
844
|
+
"zggbal" => {
|
845
|
+
"work" => "doublereal"
|
846
|
+
},
|
847
|
+
"clarcm" => {
|
848
|
+
"b" => "complex"
|
849
|
+
},
|
850
|
+
"zlarcm" => {
|
851
|
+
"b" => "doublecomplex"
|
852
|
+
},
|
853
|
+
"clatdf" => {
|
854
|
+
"z" => "complex",
|
855
|
+
"rhs" => "complex",
|
856
|
+
},
|
857
|
+
"zlatdf" => {
|
858
|
+
"z" => "doublecomplex",
|
859
|
+
"rhs" => "doublecomplex",
|
860
|
+
},
|
861
|
+
"dggbal" => {
|
862
|
+
"work" => "doublereal"
|
863
|
+
},
|
864
|
+
"zggevx" => {
|
865
|
+
"rwork" => "doublereal"
|
866
|
+
},
|
867
|
+
"dlazq3" => {
|
868
|
+
"dmin1" => "doublereal",
|
869
|
+
"dmin2" => "doublereal",
|
870
|
+
"dn" => "doublereal",
|
871
|
+
"dn1" => "doublereal",
|
872
|
+
"dn2" => "doublereal",
|
873
|
+
"tau" => "doublereal",
|
874
|
+
},
|
875
|
+
"zlag2c" => {
|
876
|
+
"a" => "doublecomplex",
|
877
|
+
"sa" => "complex"
|
878
|
+
},
|
879
|
+
"clag2z" => {
|
880
|
+
"a" => "doublecomplex",
|
881
|
+
"sa" => "complex"
|
882
|
+
},
|
883
|
+
"cptts2" => {
|
884
|
+
"b" => "complex"
|
885
|
+
},
|
886
|
+
"zptts2" => {
|
887
|
+
"b" => "doublecomplex"
|
888
|
+
},
|
889
|
+
"cpttrs" => {
|
890
|
+
"b" => "complex"
|
891
|
+
},
|
892
|
+
"zpttrs" => {
|
893
|
+
"b" => "doublecomplex"
|
894
|
+
},
|
895
|
+
"zpbrfs" => {
|
896
|
+
"ab" => "doublecomplex"
|
897
|
+
}
|
898
|
+
}
|
899
|
+
|
900
|
+
|
901
|
+
|
902
|
+
SUBSTS = Hash.new
|
903
|
+
SUBSTS["dlasd1"] = {"n" => "nl+nr+1"}
|
904
|
+
%w(slaeda dlaeda).each{|n| SUBSTS[n] = {"n" => "ldqptr-2"}}
|
905
|
+
%w(sgbbrd dgbbrd cgbbrd zgbbrd).each{|n| SUBSTS[n] = {"m" => "ldab"}}
|
906
|
+
%w(sggsvp dggsvp cggsvp zggsvp sgeequ dgeequ cgeequ zgeequ cungr2 zungr2 cungl2 zungl2 sorgr2 dorgr2 sorgl2 dorgl2 stzrqf dtzrqf ctzrqf ztzrqf stzrzf dtzrzf ctzrzf ztzrzf sgerq2 dgerq2 cgerq2 zgerq2 sgelq2 dgelq2 cgelq2 zgelq2 slatrz dlatrz clatrz zlatrz).each{|n| SUBSTS[n] = {"m" => "lda"}}
|
907
|
+
%w(slaqps dlaqps claqps zlaqps).each{|n| SUBSTS[n] = {"kb" => "nb"}}
|
908
|
+
%w(sstevx dstevx sstein dstein cstein zstein).each{|n| SUBSTS[n] = {"m" => "n"}}
|
909
|
+
%w(sopgtr dopgtr cupgtr zupgtr).each{|n| SUBSTS[n] = {"n" => "ldtau+1"}}
|
910
|
+
%w(stgsna dtgsna ctgsna ztgsna strsna dtrsna ctrsna ztrsna).each{|n| SUBSTS[n] = {"mm" => "m"}}
|
911
|
+
%w(sggsvd dggsvd cggsvd zggsvd).each{|n| SUBSTS[n] = {"m" => "lda", "p" => "ldb"}}
|
912
|
+
SUBSTS["dlansp"] = {"lwork" => '(lsame_(&norm,"I") || lsame_(&norm,"1") || lsame_(&norm,"0")) ? n : 0'}
|
913
|
+
%w(ssptrd dsptrd chptrd zhptrd sppequ dppequ cppequ zppequ chpevd zhpevd sspev dspev sspevd dspevd chpev zhpev sspgv chpgvx zhpgvx dspgv sspgvd dspgvd chpgv zhpgv chpgvd zhpgvd chptrf zhptrf ssptrf dsptrf csptrf zsptrf stpcon dtpcon ctpcon ztpcon sppcon dppcon cppcon zppcon).each{|n| SUBSTS[n] = {"n" => '(int)(sqrt((double)8*ldap+1)-1)/2'}}
|
914
|
+
%w(sspgvx dspgvx sspevx dspevx chpevx zhpevx).each{|n| SUBSTS[n] = {"n" => '((int)sqrtf(ldap*8+1.0f)-1)/2', "m" => 'lsame_(&range,"A") ? n : lsame_(&range,"I") ? iu-il+1 : 0'}}
|
915
|
+
%w(sstevr dstevr ssyevr dsyevr dsyevx ssyevx).each{|n| SUBSTS[n] = {"m" => 'lsame_(&range,"I") ? iu-il+1 : n'}}
|
916
|
+
%w(ssygvx dsygvx cheevr zheevr chbevx zhbevx sstemr dstemr cstemr zstemr sstegr dstegr cstegr zstegr ssbevx dsbevx cheevx zheevx chegvx zhegvx ssbgvx dsbgvx).each{|n| SUBSTS[n] = {"m" => 'lsame_(&range,"A") ? n : lsame_(&range,"I") ? iu-il+1 : 0'}}
|
917
|
+
%w(stgex2 dtgex2).each{|n| SUBSTS[n] = {"lwork" => 'MAX(1,(MAX(n*(n2+n1),(n2+n1)*(n2+n1)*2)))'}}
|
918
|
+
%w(zlange zlanhs).each{|n| SUBSTS[n] = {"lwork" => 'lsame_(&norm,"I") ? n : 0'}}
|
919
|
+
%w(spprfs dpprfs cpprfs zpprfs chpsv zhpsv sspsv dspsv cspsv zspsv stprfs dtprfs ctprfs ztprfs).each{|n| SUBSTS[n] = {"n" => 'ldb'}}
|
920
|
+
SUBSTS["slasd0"] = {"m" => "sqre == 0 ? n : sqre == 1 ? n+1 : 0", "ldu" => "n", "ldvt" => "m"}
|
921
|
+
SUBSTS["dlasd0"] = {"m" => "sqre == 0 ? n : sqre == 1 ? n+1 : 0", "ldu" => "n", "ldu" => "n", "ldvt" => "n"}
|
922
|
+
SUBSTS["slasd3"] = {"ldu2" => "n", "n" => "nl + nr + 1", "ldvt2" => "n", "m" => "n+sqre"}
|
923
|
+
SUBSTS["dlasd3"] = {"ldu2" => "n", "n" => "nl + nr + 1", "ldvt2" => "n", "m" => "n + sqre"}
|
924
|
+
%w(slasda dlasda).each{|n| SUBSTS[n] = {"m" => "sqre == 0 ? n : sqre == 1 ? n+1 : 0", "ldu" => "n"}}
|
925
|
+
%w(slals0 dlals0 clals0 zlals0 slalsa dlalsa clalsa zlalsa).each{|n| SUBSTS[n] = {"ldbx" => "n"}}
|
926
|
+
%w(slasd2 dlasd2).each{|n| SUBSTS[n] = {"ldu2" => "n", "ldvt2" => "m"}}
|
927
|
+
%w(slasd6 dlasd6).each{|n| SUBSTS[n] = {"m" => "n + sqre", "n" => "nl + nr + 1"}}
|
928
|
+
SUBSTS["dgesdd"] = {"ldvt" => '(lsame_(&jobz,"A")||(lsame_(&jobz,"O")&&(m>=n))) ? n : lsame_(&jobz,"S") ? MIN(m,n) : 0'}
|
929
|
+
SUBSTS["zlaqr4"] = {"ldz" => 'wantz ? MAX(1,ihiz) : 1'}
|
930
|
+
%w(slaqr5 dlaqr5).each{|n| SUBSTS[n] = {"ldz" => 'n'}}
|
931
|
+
%w(sgelsd dgelsd).each{|n| SUBSTS[n] = {"c__0" => "0", "c__9" => "9", "smlsiz" => 'ilaenv_(&c__9,"'+n.upcase+'"," ",&c__0,&c__0,&c__0,&c__0)', "nlvl" => 'MAX(0,((int)(log(((double)(MIN(m,n)))/(smlsiz+1))/log(2.0))+1))', "liwork" => '3*(MIN(m,n))*nlvl+11*(MIN(m,n))'}}
|
932
|
+
%w(cgelsd zgelsd).each{|n| SUBSTS[n] = {"c__9" => "9", "c__0" => "0", "smlsiz" => 'ilaenv_(&c__9,"'+n.upcase+'"," ",&c__0,&c__0,&c__0,&c__0)', "nlvl" => 'MAX(0,(int)(log(1.0*MIN(m,n)/(smlsiz+1))/log(2.0)))', "lrwork" => 'm>=n ? 10*n+2*n*smlsiz+8*n*nlvl+3*smlsiz*nrhs+(smlsiz+1)*(smlsiz+1) : 10*m+2*m*smlsiz+8*m*nlvl+2*smlsiz*nrhs+(smlsiz+1)*(smlsiz+1)', "liwork" => 'MAX(1,3*(MIN(m,n))*nlvl+11*(MIN(m,n)))'}}
|
933
|
+
%w(sormbr dormbr cunmbr zunmbr).each{|n| SUBSTS[n] = {"nq" => 'lsame_(&side,"L") ? m : lsame_(&side,"R") ? n : 0'}}
|
934
|
+
%w(sbdsdc dbdsdc).each{|n| SUBSTS[n] = {"c__0" => "0", "c__9" => "9", "smlsiz" => 'ilaenv_(&c__9, "'+n.upcase+'", " ", &c__0, &c__0, &c__0, &c__0)', "ldq" => 'lsame_(&compq,"P") ? n*(11+2*smlsiz+8*(int)(log(((double)n)/(smlsiz+1))/log(2.0))) : 0', "ldiq" => 'lsame_(&compq,"P") ? n*(3+3*(int)(log(((double)n)/(smlsiz+1))/log(2.0))) : 0', "lwork" => 'lsame_(&compq,"N") ? 4*n : lsame_(&compq,"P") ? 6*n : lsame_(&compq,"I") ? 3*n*n+4*n : 0'}}
|
935
|
+
%w(clalsd zlalsd).each{|n| SUBSTS[n] = {"nlvl" => '( (int)( log(((double)n)/(smlsiz+1))/log(2.0) ) ) + 1'}}
|
936
|
+
%w(claed8 zlaed8).each{|n| SUBSTS[n] = {"ldq2" => "n"}}
|
937
|
+
|
938
|
+
|
939
|
+
|
940
|
+
|
941
|
+
|
942
|
+
def pow(str)
|
943
|
+
str = str.gsub(/([A-Z\d]+?)\*\*([A-Z\d]+)/, 'pow(\\1,\\2)')
|
944
|
+
str = str.gsub(/\(([^\)]+)\)\*\*([A-Z\d]+)/, 'pow(\\1,\\2)')
|
945
|
+
str.gsub!(/lg (\w+)/, 'LG(\\1)')
|
946
|
+
str.gsub!(/(\w) (LG\()/, '\\1*\\2')
|
947
|
+
return str
|
948
|
+
end
|
949
|
+
|
950
|
+
|
951
|
+
def get_vname(str)
|
952
|
+
v = pow(str).strip.downcase.gsub(/lg\(/,"LG(").gsub(/([^a-z])max/,'\\1MAX').gsub(/^max/,'MAX').gsub(/min/,"MIN")
|
953
|
+
if /if / =~ v || (/\,/ =~ v && /(MIN|MAX|pow)\(/ !~ v) || / the / =~ v
|
954
|
+
raise "vname is invalid #{v}"
|
955
|
+
end
|
956
|
+
v
|
957
|
+
end
|
958
|
+
|
959
|
+
|
960
|
+
def get_dims(str)
|
961
|
+
if /^\((.*)\)\.?$/ =~ str
|
962
|
+
str = $1.strip
|
963
|
+
end
|
964
|
+
if /(max|min)/i =~ str
|
965
|
+
dims = Array.new
|
966
|
+
while (str && str != "")
|
967
|
+
if /^((((MAX|MIN)\s*\([^\,]+\,)|[^\,])+)\,?(.*)$/i =~ str
|
968
|
+
dns = $1.strip
|
969
|
+
str = $5.strip
|
970
|
+
dims.push dns
|
971
|
+
next
|
972
|
+
else
|
973
|
+
/^([^\,]+)(\,.*)$/ =~ str
|
974
|
+
dims.push $1
|
975
|
+
str = $2.strip
|
976
|
+
end
|
977
|
+
if /^\,(.*)/ =~ str
|
978
|
+
str = $1.strip
|
979
|
+
end
|
980
|
+
end
|
981
|
+
else
|
982
|
+
dims = str.split(",").collect{|dim| dim.sub(/\.$/,"")}
|
983
|
+
end
|
984
|
+
dims.collect do |dim|
|
985
|
+
dim.sub!(/;\Z/,"")
|
986
|
+
if /\A\((.+)\)\Z/ =~ dim
|
987
|
+
dim = $1
|
988
|
+
end
|
989
|
+
get_vname(dim)
|
990
|
+
end
|
991
|
+
end
|
992
|
+
|
993
|
+
AO = {"and"=>"&&","or"=>"||"}
|
994
|
+
def get_cond(cond,v=nil)
|
995
|
+
cond.sub!(/\.$/,"")
|
996
|
+
if /^(.+?)\s*(and|or)\s*(.+)$/ =~ cond
|
997
|
+
c0 = $1.strip
|
998
|
+
ao = $2
|
999
|
+
c1 = $3.strip
|
1000
|
+
if /^([A-Z\d]+)\s*=/ =~ c0
|
1001
|
+
v = get_vname($1)
|
1002
|
+
else
|
1003
|
+
v = nil
|
1004
|
+
end
|
1005
|
+
cond = "((#{get_cond(c0,v)}) #{AO[ao]} (#{get_cond(c1,v)}))"
|
1006
|
+
elsif /^(.+?)\s*=\s*\'(.+)'$/ =~ cond
|
1007
|
+
cond = "lsame_(&#{$1.downcase},\"#{$2}\")"
|
1008
|
+
else
|
1009
|
+
if /=.*=/ =~ cond
|
1010
|
+
conds = cond.split("=").collect{|c| c.strip.downcase}
|
1011
|
+
cond = Array.new
|
1012
|
+
(conds.length-1).times{|i|
|
1013
|
+
cond.push "(#{conds[i]}==#{conds[i+1]})"
|
1014
|
+
}
|
1015
|
+
cond = cond.join("&&")
|
1016
|
+
elsif v && (/^\'(.+)\'$/ =~ cond)
|
1017
|
+
cond = "lsame_(&#{v},\"#{$1}\")"
|
1018
|
+
elsif v && (/^\d+$/ =~ cond)
|
1019
|
+
cond = "#{v} == #{cond}"
|
1020
|
+
else
|
1021
|
+
cond = cond.gsub(/=/,"==").downcase
|
1022
|
+
end
|
1023
|
+
end
|
1024
|
+
cond
|
1025
|
+
end
|
1026
|
+
|
1027
|
+
|
1028
|
+
|
1029
|
+
def read_file(fname)
|
1030
|
+
flag_sub = false
|
1031
|
+
subr = nil
|
1032
|
+
sub_type = nil
|
1033
|
+
flag_pur = false
|
1034
|
+
purpose = nil
|
1035
|
+
flag_arg = false
|
1036
|
+
args = nil
|
1037
|
+
flag_fd = false
|
1038
|
+
fd = nil
|
1039
|
+
File.foreach(fname){|line|
|
1040
|
+
|
1041
|
+
if /This routine is not for general use\./ =~ line
|
1042
|
+
return nil
|
1043
|
+
end
|
1044
|
+
if /^\*\s+\.\. Parameters \.\./ =~ line || /^\*\s+\.\. Executable Statements \.\./ =~ line
|
1045
|
+
break
|
1046
|
+
end
|
1047
|
+
|
1048
|
+
if flag_sub
|
1049
|
+
if (/^ \$\s* (.+)$/ =~ line) || (/^ \+\s* (.+)$/ =~ line) || (/^ \&\s* (.+)$/ =~ line)
|
1050
|
+
subr << " " << $1.chomp
|
1051
|
+
else
|
1052
|
+
flag_sub = false
|
1053
|
+
end
|
1054
|
+
next
|
1055
|
+
elsif /^ SUBROUTINE/ =~ line
|
1056
|
+
subr = line.chomp
|
1057
|
+
flag_sub = true
|
1058
|
+
next
|
1059
|
+
elsif /^ RECURSIVE SUBROUTINE/ =~ line
|
1060
|
+
subr = line.chomp
|
1061
|
+
flag_sub = true
|
1062
|
+
next
|
1063
|
+
elsif /^ ([A-Z\s\d\*]+)\s+FUNCTION/ =~ line
|
1064
|
+
subr = line.chomp
|
1065
|
+
flag_sub = true
|
1066
|
+
elsif /^ FUNCTION/ =~ line && /^[sd]laneg/ =~ File.basename(fname)
|
1067
|
+
subr = line.chomp
|
1068
|
+
flag_sub = true
|
1069
|
+
end
|
1070
|
+
|
1071
|
+
if flag_pur
|
1072
|
+
if /^\*\s+Arguments$/ =~ line
|
1073
|
+
flag_pur = false
|
1074
|
+
args = line
|
1075
|
+
flag_arg = true
|
1076
|
+
next
|
1077
|
+
else
|
1078
|
+
case File.basename(fname)
|
1079
|
+
when /^[cz]la_lin_berr/
|
1080
|
+
if /^\* N \(input\) INTEGER$/ =~ line
|
1081
|
+
flag_pur = false
|
1082
|
+
args = line
|
1083
|
+
flag_arg = true
|
1084
|
+
next
|
1085
|
+
end
|
1086
|
+
when /^[sdcz]laqr1/
|
1087
|
+
if /^\* N \(input\) integer$/ =~ line
|
1088
|
+
flag_pur = false
|
1089
|
+
args = line
|
1090
|
+
flag_arg = true
|
1091
|
+
next
|
1092
|
+
end
|
1093
|
+
when /^[sdcz]laqr2/, /^[sdcz]laqr3/
|
1094
|
+
if /^\* WANTT \(input\) LOGICAL$/ =~ line
|
1095
|
+
flag_pur = false
|
1096
|
+
args = line
|
1097
|
+
flag_arg = true
|
1098
|
+
next
|
1099
|
+
end
|
1100
|
+
when /^[sdcz]laqr5/
|
1101
|
+
if /^\* WANTT \(input\) logical scalar$/ =~ line
|
1102
|
+
flag_pur = false
|
1103
|
+
args = line
|
1104
|
+
flag_arg = true
|
1105
|
+
next
|
1106
|
+
end
|
1107
|
+
when /^[sd]lasq4/, /^[sd]lazq4/
|
1108
|
+
if /^\* I0 \(input\) INTEGER$/ =~ line
|
1109
|
+
flag_pur = false
|
1110
|
+
args = line
|
1111
|
+
flag_arg = true
|
1112
|
+
next
|
1113
|
+
end
|
1114
|
+
end
|
1115
|
+
purpose << line
|
1116
|
+
next
|
1117
|
+
end
|
1118
|
+
elsif /^\*\s+Purpose$/ =~ line
|
1119
|
+
purpose = line
|
1120
|
+
flag_pur = true
|
1121
|
+
next
|
1122
|
+
else
|
1123
|
+
case File.basename(fname)
|
1124
|
+
when /^[sdcz]laqr1/
|
1125
|
+
if /^\* Given a 2-by-2 or 3-by-3 matrix H, [SDCZ]LAQR1 sets v to a$/ =~ line
|
1126
|
+
purpose = line
|
1127
|
+
flag_pur = true
|
1128
|
+
end
|
1129
|
+
when /^[sdcz]laqr2/
|
1130
|
+
if /^\* This subroutine is identical to [SDCZ]LAQR3 except that it avoids$/ =~ line
|
1131
|
+
purpose = line
|
1132
|
+
flag_pur = true
|
1133
|
+
end
|
1134
|
+
when /^[sdcz]laqr3/
|
1135
|
+
if /^\* Aggressive early deflation:$/ =~ line
|
1136
|
+
purpose = line
|
1137
|
+
flag_pur = true
|
1138
|
+
end
|
1139
|
+
when /^[sdcz]laqr5/
|
1140
|
+
if /^\* This auxiliary subroutine called by [SDCZ]LAQR0 performs a$/ =~ line
|
1141
|
+
purpose = line
|
1142
|
+
flag_pur = true
|
1143
|
+
end
|
1144
|
+
end
|
1145
|
+
end
|
1146
|
+
|
1147
|
+
if flag_arg
|
1148
|
+
if /^\*\s+Further Details$/ =~ line || /^\*\s+={40,}$/ =~ line
|
1149
|
+
flag_arg = false
|
1150
|
+
fd = line
|
1151
|
+
flag_fd = true
|
1152
|
+
next
|
1153
|
+
else
|
1154
|
+
args << line
|
1155
|
+
next
|
1156
|
+
end
|
1157
|
+
end
|
1158
|
+
|
1159
|
+
if flag_fd
|
1160
|
+
fd << line
|
1161
|
+
next
|
1162
|
+
end
|
1163
|
+
}
|
1164
|
+
|
1165
|
+
unless subr
|
1166
|
+
raise "subr not found #{fname}"
|
1167
|
+
end
|
1168
|
+
unless purpose
|
1169
|
+
raise "purpose not found #{fname}"
|
1170
|
+
end
|
1171
|
+
unless args
|
1172
|
+
raise "args not found #{fname}"
|
1173
|
+
end
|
1174
|
+
|
1175
|
+
help = subr + "\n\n" + purpose + "\n" + args
|
1176
|
+
help << "\n" + fd if fd
|
1177
|
+
|
1178
|
+
return {:subr => subr, :purpose => purpose, :args => args, :help => help}
|
1179
|
+
end
|
1180
|
+
|
1181
|
+
def parse_file(fname)
|
1182
|
+
hash = read_file(fname)
|
1183
|
+
subr = hash[:subr]
|
1184
|
+
purpose = hash[:purpose]
|
1185
|
+
args = hash[:args]
|
1186
|
+
help = hash[:help]
|
1187
|
+
|
1188
|
+
if /^ (?:RECURSIVE )?SUBROUTINE\s+([A-Z\d_]+)\s*\(([^\)]+)\)/ =~ subr
|
1189
|
+
sub_name = $1.downcase
|
1190
|
+
arg_names = $2
|
1191
|
+
sub_type = :subroutine
|
1192
|
+
elsif /^ ([A-Z\s\*\d]+[A-Z\d])\s+FUNCTION\s+([A-Z\d_]+)\s*\(([^\)]+)\)/ =~ subr
|
1193
|
+
f_type = $1.strip
|
1194
|
+
sub_name = $2.downcase
|
1195
|
+
arg_names = $3
|
1196
|
+
sub_type = :function
|
1197
|
+
if f_type == "CHARACTER*1"
|
1198
|
+
f_type = "CHARACTER"
|
1199
|
+
end
|
1200
|
+
func_type = CTYPES[f_type]
|
1201
|
+
unless func_type
|
1202
|
+
raise "func_type #{f_type} is not defined"
|
1203
|
+
end
|
1204
|
+
elsif /^ FUNCTION\s+([A-Z\d]+)\(([^\)]+)\)/ =~ subr
|
1205
|
+
sub_name = $1.downcase
|
1206
|
+
arg_names = $2
|
1207
|
+
sub_type = :function
|
1208
|
+
case File.basename(fname)
|
1209
|
+
when /^[sd]laneg/
|
1210
|
+
func_type = "integer"
|
1211
|
+
else
|
1212
|
+
raise "function name is invalid #{subr}"
|
1213
|
+
end
|
1214
|
+
else
|
1215
|
+
raise "subroutine or function name is invalid #{subr}"
|
1216
|
+
end
|
1217
|
+
arg_names = arg_names.split(",").collect{|arg| arg.strip.downcase}
|
1218
|
+
unless arg_names
|
1219
|
+
raise "arg_names is nil #{fname}"
|
1220
|
+
end
|
1221
|
+
|
1222
|
+
if @@debug
|
1223
|
+
p sub_name
|
1224
|
+
p arg_names
|
1225
|
+
end
|
1226
|
+
|
1227
|
+
flag = false
|
1228
|
+
flag1 = false
|
1229
|
+
ary = Array.new
|
1230
|
+
args.each{|line|
|
1231
|
+
case line
|
1232
|
+
when /^\*\s*$/, /^\* Arguments$/, /^\* =========$/
|
1233
|
+
flag = false
|
1234
|
+
flag1 = false
|
1235
|
+
next
|
1236
|
+
end
|
1237
|
+
|
1238
|
+
if /^\*\s+([A-Z_\d,\s]+)\s+\((input|output|workspace|in|external procedure)[^\)]*\)\s+([A-Za-z]+)/ =~ line
|
1239
|
+
name = $1
|
1240
|
+
intent = $2
|
1241
|
+
type = $3
|
1242
|
+
name.strip!
|
1243
|
+
ary.push line.chomp
|
1244
|
+
if /array/i =~ line
|
1245
|
+
flag = true
|
1246
|
+
elsif (/^LD/=~name || /L.*WORK/=~name) && /input/=~intent && /INTEGER/i=~type
|
1247
|
+
flag1 = true
|
1248
|
+
end
|
1249
|
+
elsif flag
|
1250
|
+
line.sub!(/^\*\s*/,"")
|
1251
|
+
if /[Ii]f / =~ line || /where / =~ line || /^[a-z]/ =~ line || /[a-z]$/ =~ ary[-1] || /is not referenced/ =~ line || /dimension (of [A-Z\d]+ must be )?at least/ =~ ary[-1] || /^Otherwise, / =~ line
|
1252
|
+
if /^[^\s]+ is the/ =~ line || /^If [^\.]+ must contain/ =~ line || /where in / =~ line || /At each / =~ line || /^[^\.]+\, [A-Z\d]+ contains / =~ line || /[A-Z]+\(\d\) and [A-Z]+\(\d\) contain the/ =~ line
|
1253
|
+
flag = false
|
1254
|
+
next
|
1255
|
+
end
|
1256
|
+
if /^\( lg\(\s*\w?\s*\) = smallest integer \w$/ =~ line || /^such that 2\^\w \>= \w \)$/ =~ line
|
1257
|
+
next
|
1258
|
+
end
|
1259
|
+
while /^(.*)On exit/ =~ line || /^(.*?)[^\.]+ on exit/ =~ line || /^(.*)On entry/ =~ line || /^(.*)The/ =~ line || /^(.*?)[^\.]+ the [^d]/=~ line || /^(.*?)[^\.]+ is an /=~ line
|
1260
|
+
line = $1.strip
|
1261
|
+
flag = false
|
1262
|
+
end
|
1263
|
+
if line != ""
|
1264
|
+
if /^[A-Z]/ =~ line && /[\.\,;]$/ !~ ary[-1] && /if$/ !~ ary[-1]
|
1265
|
+
ary[-1] << ";"
|
1266
|
+
end
|
1267
|
+
if /\)$/ =~ ary[-1] && /^\(/ =~ line
|
1268
|
+
ary[-1] << ";"
|
1269
|
+
end
|
1270
|
+
ary[-1] << " " << line.chomp
|
1271
|
+
end
|
1272
|
+
elsif /^(?:The d|D)imension must be at least (.*)$/ =~ line
|
1273
|
+
dim = $1
|
1274
|
+
ary[-1].sub!(/\.$/," ")
|
1275
|
+
ary[-1] << "(#{dim})"
|
1276
|
+
flag = false
|
1277
|
+
else
|
1278
|
+
flag = false
|
1279
|
+
end
|
1280
|
+
elsif flag1
|
1281
|
+
line.sub!(/^\*\s*/,"")
|
1282
|
+
ary[-1] << " " << line.chomp
|
1283
|
+
else
|
1284
|
+
if /^\*\s+If L.?WORK = -1, .*a workspace query/ =~ line
|
1285
|
+
line.sub!(/^\*\s*/,"")
|
1286
|
+
ary[-1] << " " << line.chomp
|
1287
|
+
flag1 = true
|
1288
|
+
end
|
1289
|
+
end
|
1290
|
+
}
|
1291
|
+
|
1292
|
+
if @debug
|
1293
|
+
pp ary
|
1294
|
+
end
|
1295
|
+
|
1296
|
+
args = Hash.new
|
1297
|
+
subst = SUBSTS[sub_name] || Hash.new
|
1298
|
+
ary.each{|line|
|
1299
|
+
line.strip!
|
1300
|
+
/^\*\s+([A-Z\d_,\s]+)\s+\(([^\)]+)\)\s*(.*)$/ =~ line
|
1301
|
+
name = $1.downcase.strip
|
1302
|
+
intent = $2
|
1303
|
+
type = $3.sub(/\.$/,"")
|
1304
|
+
hash = Hash.new
|
1305
|
+
|
1306
|
+
intent = "input" if intent == "in"
|
1307
|
+
intent = "input or input/output" if intent == "input or input/ouptut"
|
1308
|
+
case sub_name
|
1309
|
+
when /^[cz]larcm$/
|
1310
|
+
case name
|
1311
|
+
when "c"
|
1312
|
+
intent = "output"
|
1313
|
+
end
|
1314
|
+
when /^[cz]lacrm$/
|
1315
|
+
case name
|
1316
|
+
when "c"
|
1317
|
+
intent = "output"
|
1318
|
+
end
|
1319
|
+
end
|
1320
|
+
hash[:intent] = intent
|
1321
|
+
if /^l.*work/ =~ name && (/The (dimension|length)? of (the )?(array|work|WORK)/ =~ type || /The amount of workspace available/ =~ type)
|
1322
|
+
if (/^(.*?) The (?:dimension|length)? of (?:the )?array\s+(?:WORK\.\s*)?(.+)/ =~ type) || (/^(.*?) The (?:dimension|length)? of (?:the )?(?:array|work|WORK)\.?\s+(.+)/ =~ type)
|
1323
|
+
type = $1.strip
|
1324
|
+
str = $2
|
1325
|
+
elsif /^(.+?) The amount of workspace available/ =~ type
|
1326
|
+
type = $1.strip
|
1327
|
+
str = nil
|
1328
|
+
else
|
1329
|
+
raise "invalid: #{type}, #{name}, #{sub_name}"
|
1330
|
+
end
|
1331
|
+
aname = name.sub(/^l/,"")
|
1332
|
+
fff = false
|
1333
|
+
if (/If #{name.upcase} = -1, (then )?.*a workspace query/ =~ str) || (/If #{name.upcase} = -1 .+? returns the optimal/ =~ str)
|
1334
|
+
fff = true
|
1335
|
+
elsif /^([cz]tgsna|[cz]hetrf)$/=~sub_name && name=="lwork"
|
1336
|
+
fff = true
|
1337
|
+
elsif str
|
1338
|
+
unless /^[sd]tgex2$/ =~ sub_name && name == "lwork"
|
1339
|
+
warn "invalid #{str} #{name} #{sub_name}"
|
1340
|
+
end
|
1341
|
+
end
|
1342
|
+
if fff
|
1343
|
+
unless ar = args[aname]
|
1344
|
+
raise "array not found #{aname} #{name} #{sub_name}"
|
1345
|
+
end
|
1346
|
+
d = ar[:dims]
|
1347
|
+
unless d.length == 1
|
1348
|
+
raise "array length is not 1 #{aname} #{name} #{sub_name}"
|
1349
|
+
end
|
1350
|
+
if /^[a-z\d_]+$/ =~ d[0]
|
1351
|
+
d[0] = "MAX(1,#{d[0]})"
|
1352
|
+
end
|
1353
|
+
end
|
1354
|
+
elsif /^ld/ =~ name && (/(leading|first) dimension of/ =~ type || /(Leading|First) dimension of/ =~ type)
|
1355
|
+
if /^([^,]+) T[Hh]e (?:leading|first) dimension of\s+(?:(?:the )?vector)?(?:the array(?:s)?)?\s*(.+)$/ =~ type || /^(.+?) LD[A-Z]+ is the leading dimension of\s+(.+)$/ =~ type || /^(.+?) On entry, (?:LD[A-Z]+\s+specifies the )?(?:leading|first) dimension of (.+)$/ =~ type || /^([^,]+) (?:[Ll]eading|First) dimension of\s+(.+)$/ =~ type
|
1356
|
+
type = $1.strip
|
1357
|
+
str = $2.strip
|
1358
|
+
elsif /^([^,]+)\,\s+(.+?)\s+The (?:leading|first) dimension of\s+(.+)$/ =~ type
|
1359
|
+
type = $1.strip
|
1360
|
+
str0 = $2.strip
|
1361
|
+
str1 = $3.strip
|
1362
|
+
str = str1 + ", " + str0
|
1363
|
+
else
|
1364
|
+
raise "invalid #{type}, #{name} #{sub_name}"
|
1365
|
+
end
|
1366
|
+
if /^(?:the )?arrays (.+?),? and ([A-Z\d_]+)[\,\.]?\s*(.*)$/ =~ str
|
1367
|
+
anames = $1.strip
|
1368
|
+
aname1 = $2
|
1369
|
+
str = $3.strip
|
1370
|
+
anames = anames.split(",")
|
1371
|
+
anames.push aname1
|
1372
|
+
anames.collect!{|an| an.downcase}
|
1373
|
+
elsif /^([A-Z\d_]+) and ([A-Z\d_]+)\, must be at least (.*)$/ =~ str
|
1374
|
+
anames = [$1.downcase, $2.downcase]
|
1375
|
+
str = $3.strip
|
1376
|
+
elsif /^(?:the )?(?:array |matrix )?([A-Z\d_]+)\.?\,?\s*(.*)$/ =~ str
|
1377
|
+
anames = [$1.strip.downcase]
|
1378
|
+
str = $2.strip
|
1379
|
+
case sub_name
|
1380
|
+
when /^[cz]laqr[23]$/, /^[sd]laqr3$/, /^[sd]laqr2$/
|
1381
|
+
case name
|
1382
|
+
when "ldwv"
|
1383
|
+
anames = ["wv"]
|
1384
|
+
end
|
1385
|
+
when /^[sdcz]pbsvx$/, /^[sdcz]gbbrd$/, /^[sdcz]pbequ$/
|
1386
|
+
case name
|
1387
|
+
when "ldab"
|
1388
|
+
anames = ["ab"]
|
1389
|
+
end
|
1390
|
+
end
|
1391
|
+
else
|
1392
|
+
raise "error #{str} #{name} #{sub_name}"
|
1393
|
+
end
|
1394
|
+
ff0 = false
|
1395
|
+
ff1 = true
|
1396
|
+
anames.each{|an|
|
1397
|
+
if (ar = args[an])
|
1398
|
+
ff0 = true
|
1399
|
+
if /input/ =~ ar[:intent]
|
1400
|
+
ff1 = false
|
1401
|
+
break
|
1402
|
+
end
|
1403
|
+
end
|
1404
|
+
}
|
1405
|
+
unless ff0
|
1406
|
+
warn "arg not found [#{anames.join(",")}], #{name}, #{sub_name}"
|
1407
|
+
end
|
1408
|
+
if ff1 && str != ""
|
1409
|
+
if anames.length == 1
|
1410
|
+
aname = anames[0]
|
1411
|
+
elsif anames.include?(name.sub(/^ld/,""))
|
1412
|
+
aname = name.sub(/^ld/,"")
|
1413
|
+
else
|
1414
|
+
case sub_name
|
1415
|
+
when /^[sd]lasda$/
|
1416
|
+
case name
|
1417
|
+
when "ldgcol"
|
1418
|
+
aname = "givcol"
|
1419
|
+
end
|
1420
|
+
when /^[sd]lasd6$/
|
1421
|
+
case name
|
1422
|
+
when "ldgnum"
|
1423
|
+
aname = "givnum"
|
1424
|
+
end
|
1425
|
+
end
|
1426
|
+
end
|
1427
|
+
unless aname
|
1428
|
+
raise "cannot select anames [#{anames.join(",")}], #{name}, #{sub_name}"
|
1429
|
+
end
|
1430
|
+
un = name.upcase
|
1431
|
+
str.sub!(/\.$/,"")
|
1432
|
+
str.gsub!(/\.GE\./,"=")
|
1433
|
+
str.gsub!(/>=/,"=")
|
1434
|
+
str.gsub!(/=\s*>/,"=")
|
1435
|
+
str.gsub!(/(It )?must be at least/, "")
|
1436
|
+
str.gsub!(/#{un}\s*=/," ")
|
1437
|
+
str.sub!(/(just )?as declared in the (in the )?calling (subroutine|procedure)\./,"")
|
1438
|
+
str.strip
|
1439
|
+
if /^([^;]+); if ([^,]+), ([^;]+); if ([^,]+), (.+)$/ =~ str
|
1440
|
+
if @@debug
|
1441
|
+
p 100
|
1442
|
+
end
|
1443
|
+
v = get_vname($1)
|
1444
|
+
cond0 = get_cond($2)
|
1445
|
+
v0 = get_vname($3)
|
1446
|
+
cond1 = get_cond($4)
|
1447
|
+
v1 = get_vname($5)
|
1448
|
+
str = "#{cond0} ? #{v0} : #{cond1} ? #{v1} : #{v}"
|
1449
|
+
elsif /^If ([^\,]+)\,\s+([^;]+); if ([^\,]+)\,\s+(.*)$/ =~ str || /^If ([^\,]+)\,\s+([^\.]+)\. If ([^\,]+)\,\s+(.*)$/ =~ str
|
1450
|
+
if @@debug
|
1451
|
+
p 110
|
1452
|
+
end
|
1453
|
+
v0 = get_vname($1)
|
1454
|
+
cond0 = get_cond($2)
|
1455
|
+
v1 = get_vname($3)
|
1456
|
+
cond1 = get_cond($4)
|
1457
|
+
str = "#{cond0} ? #{v0} : #{cond1} ? #{v1} : 0"
|
1458
|
+
elsif /^([^\,]+)\, and if ([^\,]+)\, (?:then )?(.*)$/ =~ str || /^([^;]+); if ([^\,]+)\, (?:then )?(.*)$/ =~ str
|
1459
|
+
if @@debug
|
1460
|
+
p 120
|
1461
|
+
end
|
1462
|
+
v0 = get_vname($1)
|
1463
|
+
cond1 = get_cond($2)
|
1464
|
+
v1 = get_vname($3)
|
1465
|
+
str = "#{cond1} ? #{v1} : #{v0}"
|
1466
|
+
elsif /^(.+?) if ([^;]+); (.+?) otherwise$/ =~ str
|
1467
|
+
if @@debug
|
1468
|
+
p 130
|
1469
|
+
end
|
1470
|
+
v0 = get_vname($1)
|
1471
|
+
cond0 = get_cond($2)
|
1472
|
+
v = get_vname($3)
|
1473
|
+
str = "#{cond0} ? #{v0} : #{v}"
|
1474
|
+
elsif /^If ([^,]+), then\s+(.+?)\.\s+In any case, (.+)$/ =~ str
|
1475
|
+
if @@debug
|
1476
|
+
p 140
|
1477
|
+
end
|
1478
|
+
cond0 = get_cond($1)
|
1479
|
+
v0 = get_vname($2)
|
1480
|
+
v = get_vname($3)
|
1481
|
+
str = "#{cond0} ? #{v0} : #{v}"
|
1482
|
+
elsif /^([^;]+); and if ([^,]+), (.+)$/ =~ str
|
1483
|
+
if @@debug
|
1484
|
+
p 150
|
1485
|
+
end
|
1486
|
+
v = get_vname($1)
|
1487
|
+
cond0 = get_cond($2)
|
1488
|
+
v0 = get_vname($3)
|
1489
|
+
str = "#{cond0} ? #{v0} : #{v}"
|
1490
|
+
elsif /^(.+?) \.LE\. #{un}$/ =~ str
|
1491
|
+
if @@debug
|
1492
|
+
p 160
|
1493
|
+
end
|
1494
|
+
str = get_vname($1)
|
1495
|
+
elsif /^If ([^,]+), then\s+(.+)$/ =~ str
|
1496
|
+
if @@debug
|
1497
|
+
p 170
|
1498
|
+
end
|
1499
|
+
cond0 = get_cond($1)
|
1500
|
+
v0 = get_vname($2)
|
1501
|
+
str = "#{cond0} ? #{v0} : 0"
|
1502
|
+
elsif (/^[sd]bdsdc$/ =~ sub_name && /^ld(u|vt)$/ =~ name)
|
1503
|
+
if @@debug
|
1504
|
+
p 180
|
1505
|
+
end
|
1506
|
+
str = 'lsame_(&compq,"I") ? MAX(1,n) : 0'
|
1507
|
+
else
|
1508
|
+
if @@debug
|
1509
|
+
p 190
|
1510
|
+
end
|
1511
|
+
if /^[sdcz]laqr[23]$/ =~ sub_name && name == "ldwv"
|
1512
|
+
str = "nw"
|
1513
|
+
end
|
1514
|
+
begin
|
1515
|
+
str = get_vname(str)
|
1516
|
+
rescue
|
1517
|
+
warn "error #{str}, #{name}, #{sub_name}"
|
1518
|
+
end
|
1519
|
+
end
|
1520
|
+
if /^[sdcz]larrv$/ =~ sub_name && name == "ldz"
|
1521
|
+
str = "n"
|
1522
|
+
end
|
1523
|
+
subst[name] = str
|
1524
|
+
end
|
1525
|
+
elsif /^(.*?) array of size (.*)$/ =~ type || /^(.*?) arrays?,?(.*)$/i =~ type
|
1526
|
+
type = $1.strip
|
1527
|
+
str = $2.strip
|
1528
|
+
if /^([A-Z\s]+) work$/ =~ type
|
1529
|
+
type = $1.strip
|
1530
|
+
end
|
1531
|
+
if "CHARACTER(1)" == type
|
1532
|
+
type = "CHARACTER"
|
1533
|
+
end
|
1534
|
+
if /\Alength (.*)\z/ =~ str
|
1535
|
+
str = $1
|
1536
|
+
end
|
1537
|
+
d = DIMS[sub_name]
|
1538
|
+
dims = d[name] if d
|
1539
|
+
|
1540
|
+
unless dims
|
1541
|
+
str.gsub!(/(#{name}) must be at least\s+/,'\\1 = ')
|
1542
|
+
str.gsub!(/must be at least\s+/,"")
|
1543
|
+
str.gsub!(/at least\s*/,"")
|
1544
|
+
str.gsub!(/dimension ([^\(]+) if/, '(\\1) if')
|
1545
|
+
str.gsub!(/dimension \>= /,"")
|
1546
|
+
str.gsub!(/the dimension of #{name.upcase}/,"")
|
1547
|
+
str.gsub!(/.?\s+dimension is/,"")
|
1548
|
+
str.gsub!(/(of )?dimensions?/,"")
|
1549
|
+
str.gsub!(/\.GE\.?/,">=")
|
1550
|
+
str.gsub!(/\.GT\.?/,">")
|
1551
|
+
str.gsub!(/\.LE\.?/,"<=")
|
1552
|
+
str.gsub!(/\.LT\.?/,"<")
|
1553
|
+
str.gsub!(/\.TRUE\.?/,"TRUE")
|
1554
|
+
str.gsub!(/\.FALSE\.?/,"FALSE")
|
1555
|
+
str.gsub!(/log_2\s*\(/,"1.0/log(2.0)*log((double)")
|
1556
|
+
str.gsub!(/INT\s*\(/,"(int)\(")
|
1557
|
+
|
1558
|
+
str.strip!
|
1559
|
+
if intent == "input"
|
1560
|
+
str.sub!(/\s*if .*$/i, "")
|
1561
|
+
end
|
1562
|
+
if /(...rfsx|...svxx)/ =~ sub_name && name == "params"
|
1563
|
+
str = ""
|
1564
|
+
end
|
1565
|
+
if /[Ii]f/ =~ str || /where/ =~ str || /when/ =~ str
|
1566
|
+
dims = Array.new
|
1567
|
+
flag = true
|
1568
|
+
str.sub!(/;$/,"")
|
1569
|
+
if /^\([^;]+\); (\(.+?\) if [A-Z\d]+ = .+? or \(.+?\) if [A-Z\d]+ = .+)$/ =~ str
|
1570
|
+
str = $1
|
1571
|
+
end
|
1572
|
+
if @@debug
|
1573
|
+
p name
|
1574
|
+
p str
|
1575
|
+
end
|
1576
|
+
while (str && str!="")
|
1577
|
+
if (/^(?:and )?\((.*?)\)\s+if\s+([^\,\;]+)[\,\;]\s+(.*)$/ =~ str) && (dim = $1.strip) && (cond = $2.strip) && (str_tmp = $3.strip) && (/ if .* if / !~ cond) && (/\([^\)]+$/ !~ cond) && (/=/ !~ dim)
|
1578
|
+
if @@debug
|
1579
|
+
p 1
|
1580
|
+
end
|
1581
|
+
str = str_tmp
|
1582
|
+
elsif (/^\(([^;]+?)\)\s+if\s+(.+?)\s+(?:or|and)\s+(\(.*\) if.*)$/ =~ str) || (/^\(([^;]+?)\)\s+if\s+(.+?)\s+(\(.*\)\s+if.*)$/ =~ str)
|
1583
|
+
if @@debug
|
1584
|
+
p 2
|
1585
|
+
end
|
1586
|
+
dim = $1
|
1587
|
+
cond = $2.strip
|
1588
|
+
str = $3.strip
|
1589
|
+
elsif /^If ([^\,]+)\,\s+([^;\.]+)[;\.]?(.*)$/ =~ str
|
1590
|
+
if @@debug
|
1591
|
+
p 2.5
|
1592
|
+
end
|
1593
|
+
cond = $1.strip
|
1594
|
+
dim = $2
|
1595
|
+
str = $3.strip
|
1596
|
+
elsif /^\((.*?)\)\s+if\s+([^\,]+)\, (\(.*\) otherwise)$/ =~ str
|
1597
|
+
if @@debug
|
1598
|
+
p 3
|
1599
|
+
end
|
1600
|
+
dim = $1.strip
|
1601
|
+
cond = $2.strip
|
1602
|
+
str = $3.strip
|
1603
|
+
elsif (/^(?:and )?\((.+?)\)\s+if\s+(.*)$/ =~ str) && (dim = $1.strip) && (cond = $2.strip) && (/if/ !~ dim) && (/ if /i !~ cond) && (/^[^\(]+\)/ !~ dim)
|
1604
|
+
if @@debug
|
1605
|
+
p 4
|
1606
|
+
end
|
1607
|
+
str = nil
|
1608
|
+
elsif /\A\((.*)\) when (.*) and/ =~ str
|
1609
|
+
dim = $1
|
1610
|
+
cond = $2
|
1611
|
+
str = $'
|
1612
|
+
elsif /^(.*?)\s+otherwise$/ =~ str && (dim = $1.strip) && (/ if / !~ dim)
|
1613
|
+
if @@debug
|
1614
|
+
p 5
|
1615
|
+
end
|
1616
|
+
if cond == "not referenced"
|
1617
|
+
dims = dims.collect{|d| d + "0"}
|
1618
|
+
else
|
1619
|
+
get_dims(dim).each_with_index{|d,i|
|
1620
|
+
dims[i] = dims[i] + d
|
1621
|
+
}
|
1622
|
+
end
|
1623
|
+
flag = false
|
1624
|
+
break
|
1625
|
+
elsif /^\((.+?)\);?\s+If ([A-Z_\d]+ = [^\,]+)\, (then )?#{name.upcase} is not referenced.?$/ =~ str
|
1626
|
+
if @@debug
|
1627
|
+
p 6
|
1628
|
+
end
|
1629
|
+
dims = get_dims($1)
|
1630
|
+
cond = get_cond($2)
|
1631
|
+
dims = dims.collect{|dim|
|
1632
|
+
"#{cond} ? 0 : #{dim}"
|
1633
|
+
}
|
1634
|
+
flag = false
|
1635
|
+
break
|
1636
|
+
elsif /^\((.+?)\); Not referenced if (.*)$/ =~ str
|
1637
|
+
if @@debug
|
1638
|
+
p 6.5
|
1639
|
+
end
|
1640
|
+
v0 = get_vname($1)
|
1641
|
+
cond0 = get_cond($2)
|
1642
|
+
dims = ["#{cond0} ? 0 : #{v0}"]
|
1643
|
+
flag = false
|
1644
|
+
break
|
1645
|
+
elsif /\((.+?)\)\, where ([A-Z\d]+) >= ([A-Z\d]+) when ([^;]+); otherwise, #{name.upcase} is not referenced\.?$/ =~ str
|
1646
|
+
if @@debug
|
1647
|
+
p 7
|
1648
|
+
end
|
1649
|
+
dims = get_dims($1)
|
1650
|
+
c0 = $2
|
1651
|
+
c1 = $3
|
1652
|
+
cond = get_cond($4)
|
1653
|
+
subst[get_vname(c0)] = "#{cond} ? #{get_vname(c1)} : 0"
|
1654
|
+
flag = false
|
1655
|
+
break
|
1656
|
+
elsif /\((.+)\)[\.\,] where ([A-Z\d]+) = (.+)\.?$/ =~ str
|
1657
|
+
if @@debug
|
1658
|
+
p 8
|
1659
|
+
end
|
1660
|
+
dims = get_dims($1)
|
1661
|
+
c0 = $2
|
1662
|
+
c1 = $3
|
1663
|
+
subst[get_vname(c0)] = get_vname(c1)
|
1664
|
+
flag = false
|
1665
|
+
break
|
1666
|
+
elsif /^(?:and )?(not referenced) if (.+).?$/ =~ str
|
1667
|
+
if @@debug
|
1668
|
+
p 9
|
1669
|
+
end
|
1670
|
+
dim = $1
|
1671
|
+
cond = $2
|
1672
|
+
str = nil
|
1673
|
+
elsif (/^\((.+?)\) where ([A-Z\d_]+) = (.*)$/ =~ str) && (dim = $1) && (c0 = $2) && (c1 = $3) && /=/ !~ c1
|
1674
|
+
dims = get_dims(dim)
|
1675
|
+
subst[get_vname(c0)] = get_vname(c1)
|
1676
|
+
flag = false
|
1677
|
+
break
|
1678
|
+
else
|
1679
|
+
if /^\((.+?)\) (.+?) = (.+?) (?:when|if) ([^,]+), and (.+?) when (.+)$/ =~ str
|
1680
|
+
if @@debug
|
1681
|
+
p 10
|
1682
|
+
end
|
1683
|
+
dim = $1
|
1684
|
+
dim1 = $2
|
1685
|
+
unless dim == dim1
|
1686
|
+
raise "error #{name} #{sub_name}"
|
1687
|
+
end
|
1688
|
+
c0 = $3
|
1689
|
+
cond0 = get_cond($4)
|
1690
|
+
c1 = $5
|
1691
|
+
cond1 = get_cond($6)
|
1692
|
+
dims = get_dims($1)
|
1693
|
+
subst[get_vname(dim)] = "#{cond0} ? #{get_vname(c0)} : #{cond1} ? #{get_vname(c1)} : 0"
|
1694
|
+
flag = false
|
1695
|
+
break
|
1696
|
+
elsif /^\((.+?)\) (.+?) = (.+?) (?:when|if) ([^,]+), and (.+?) otherwise.?$/ =~ str
|
1697
|
+
if @@debug
|
1698
|
+
p 11
|
1699
|
+
end
|
1700
|
+
dim = $1
|
1701
|
+
dim1 = $2
|
1702
|
+
unless dim == dim1
|
1703
|
+
raise "error #{name} #{sub_name}"
|
1704
|
+
end
|
1705
|
+
c0 = $3
|
1706
|
+
cond0 = get_cond($4)
|
1707
|
+
c1 = $5
|
1708
|
+
dims = get_dims(dim)
|
1709
|
+
subst[get_vname(dim)] = "#{cond0} ? #{get_vname(c0)} : #{get_vname(c1)}"
|
1710
|
+
flag = false
|
1711
|
+
break
|
1712
|
+
elsif /^\((.+?)\);\s+[Ii]f ([A-Z_\d]+ = [^\,]+)\, ([A-Z_\d]+) \>?= ([^\.]+)\.\s+Otherwise\, ([A-Z_\d]+) \>?= (.*)$/ =~ str
|
1713
|
+
if @@debug
|
1714
|
+
p 14
|
1715
|
+
end
|
1716
|
+
dim = $1
|
1717
|
+
cond0 = $2
|
1718
|
+
c00 = $3.downcase
|
1719
|
+
c01 = $4.downcase
|
1720
|
+
c10 = $5.downcase
|
1721
|
+
c11 = $6.downcase
|
1722
|
+
unless c00==c10
|
1723
|
+
raise "error #{name} #{sub_name}"
|
1724
|
+
end
|
1725
|
+
dims = get_dims(dim)
|
1726
|
+
cond0 = get_cond(cond0)
|
1727
|
+
subst[get_vname(c00)] = "#{cond0} ? #{get_vname(c01)} : #{get_vname(c11)}"
|
1728
|
+
flag = false
|
1729
|
+
break
|
1730
|
+
end
|
1731
|
+
if /^\((.+?)\)\.\s+[Ii]f ([A-Z_\d]+ = [^\,]+)\, ([A-Z_\d]+) = ([A-Z_\d]+); if ([A-Z_\d]+ = [^\,]+), ([A-Z_\d]+) = ([A-Z_\d]+)$/ =~ str
|
1732
|
+
if @@debug
|
1733
|
+
p 13
|
1734
|
+
end
|
1735
|
+
dim = $1
|
1736
|
+
cond0 = $2
|
1737
|
+
c00 = $3.downcase
|
1738
|
+
c01 = $4.downcase
|
1739
|
+
cond1 = $5
|
1740
|
+
c10 = $6.downcase
|
1741
|
+
c11 = $7.downcase
|
1742
|
+
elsif /\((.+?)\);? ([A-Z_\d]+) = (.+?) if ([^;]+); ([A-Z_\d]+) = (.+?) if (.+)$/ =~ str
|
1743
|
+
if @@debug
|
1744
|
+
p 13
|
1745
|
+
end
|
1746
|
+
dim = $1
|
1747
|
+
c00 = $2.downcase
|
1748
|
+
c01 = $3.downcase
|
1749
|
+
cond0 = $4
|
1750
|
+
c10 = $5.downcase
|
1751
|
+
c11 = $6.downcase
|
1752
|
+
cond1 = $7
|
1753
|
+
else
|
1754
|
+
# raise "error '#{str}' in #{name} (#{fname})"
|
1755
|
+
warn "'#{str}' in #{name} (#{fname})"
|
1756
|
+
dim = "dummy_" + str
|
1757
|
+
end
|
1758
|
+
if /dummy_/ =~ dim
|
1759
|
+
dims = dim
|
1760
|
+
else
|
1761
|
+
dims = get_dims(dim)
|
1762
|
+
cond0 = get_cond(cond0)
|
1763
|
+
cond1 = get_cond(cond1)
|
1764
|
+
if c00 == c10
|
1765
|
+
subst[get_vname(c00)] = "#{cond0} ? #{get_vname(c01)} : #{cond1} ? #{get_vname(c11)} : 0"
|
1766
|
+
else
|
1767
|
+
raise "error #{name} #{sub_name}"
|
1768
|
+
end
|
1769
|
+
end
|
1770
|
+
flag = false
|
1771
|
+
break
|
1772
|
+
end
|
1773
|
+
if flag
|
1774
|
+
cond = get_cond(cond)
|
1775
|
+
if dim == "not referenced"
|
1776
|
+
dims = dims.collect{|d| d + cond + " ? 0 : "}
|
1777
|
+
else
|
1778
|
+
ds = get_dims(dim)
|
1779
|
+
ds.each_with_index{|d,i|
|
1780
|
+
dims[i] ||= ""
|
1781
|
+
dims[i] << cond + " ? " + d + " : "
|
1782
|
+
}
|
1783
|
+
end
|
1784
|
+
end
|
1785
|
+
end
|
1786
|
+
dims = dims.collect{|d| d + "0"} if flag
|
1787
|
+
else
|
1788
|
+
dims = get_dims(str)
|
1789
|
+
end
|
1790
|
+
|
1791
|
+
dims.each_with_index{|dim,i|
|
1792
|
+
if /\?/ =~ dim
|
1793
|
+
str = dim
|
1794
|
+
aa = Array.new
|
1795
|
+
while( /^[^\?]+ \? ([^:]+) : (.+)$/ =~ str )
|
1796
|
+
aa.push $1
|
1797
|
+
str = $2
|
1798
|
+
end
|
1799
|
+
aa.push str
|
1800
|
+
if aa.length > 2
|
1801
|
+
aa = aa.uniq
|
1802
|
+
if aa.length == 1 || (aa.length == 2 && aa[-1] == "0")
|
1803
|
+
dims[i] = aa[0]
|
1804
|
+
end
|
1805
|
+
elsif aa.length == 2
|
1806
|
+
if aa.uniq.length == 1
|
1807
|
+
dims[i] = aa[0]
|
1808
|
+
end
|
1809
|
+
else
|
1810
|
+
raise "error [#{aa.join(",")}] #{dim} #{name} #{sub_name}"
|
1811
|
+
end
|
1812
|
+
end
|
1813
|
+
}
|
1814
|
+
end
|
1815
|
+
if /^[sd]lasda$/ =~ sub_name && name == "difl"
|
1816
|
+
subst["nlvl"].sub!(/\)$/,"")
|
1817
|
+
end
|
1818
|
+
hash[:dims] = dims
|
1819
|
+
elsif (/^(.+) work array$/ =~ type) || (/^(.+) array$/ =~ type)
|
1820
|
+
type = $1.strip
|
1821
|
+
dims = DIMS[sub_name] && DIMS[sub_name][name]
|
1822
|
+
unless dims
|
1823
|
+
raise "dimension is not defined (#{name} in #{fname})"
|
1824
|
+
end
|
1825
|
+
elsif /^CHARACTER\*\s*(\d+)$/ =~ type || /^CHARACTER\*?\((\d+)\)$/ =~ type || /^character string/ =~ type
|
1826
|
+
type = "CHARACTER"
|
1827
|
+
if $1 && $1 != "1"
|
1828
|
+
hash[:dims] = [$1]
|
1829
|
+
end
|
1830
|
+
elsif /^CHARACTER\*\(\*\)$/ =~ type
|
1831
|
+
type = "CHARACTER"
|
1832
|
+
hash[:dims] = ["*"]
|
1833
|
+
elsif /^(.*)\,\s*#{name}\s*=\s*>/i =~ type
|
1834
|
+
type = $1.strip
|
1835
|
+
elsif /^(.+?)\s+scalar$/ =~ type
|
1836
|
+
type = $1
|
1837
|
+
elsif /^(.+?)\s+with value/ =~ type
|
1838
|
+
type = $1
|
1839
|
+
end
|
1840
|
+
if (t = TYPES[sub_name]) && (t = t[name])
|
1841
|
+
hash[:type] = t
|
1842
|
+
else
|
1843
|
+
type.sub!(/ scalar/,"")
|
1844
|
+
if /^(.+?) FUNCTION of ([^\s]+) (.+?) arguments?$/ =~ type
|
1845
|
+
hash[:block_type] = CTYPES[$1] || raise("error block type is invalid #{$1} #{name} #{sub_name}")
|
1846
|
+
hash[:block_arg_num] = {"one"=>1,"two"=>2,"three"=>3}[$2] || raise("error #{$2}")
|
1847
|
+
hash[:block_arg_type] = CTYPES[$3] || raise("error block arg type is invalid #{$3} #{name} #{sub_name}")
|
1848
|
+
else
|
1849
|
+
hash[:type] = CTYPES[type.upcase]
|
1850
|
+
unless hash[:type]
|
1851
|
+
warn("type (#{type}) is not defined in #{name} (#{fname})")
|
1852
|
+
end
|
1853
|
+
end
|
1854
|
+
end
|
1855
|
+
if /,/ =~ name
|
1856
|
+
name.split(",").each{|n1|
|
1857
|
+
args[n1.strip] = hash.dup
|
1858
|
+
}
|
1859
|
+
else
|
1860
|
+
args[name] = hash
|
1861
|
+
end
|
1862
|
+
}
|
1863
|
+
case sub_name
|
1864
|
+
when /^[cz]laqr[04]$/
|
1865
|
+
args["iloz"] = {:type => "integer", :intent => "input"}
|
1866
|
+
args["ihiz"] = {:type => "integer", :intent => "input"}
|
1867
|
+
end
|
1868
|
+
if @@debug
|
1869
|
+
pp args
|
1870
|
+
end
|
1871
|
+
|
1872
|
+
return {:name => sub_name, :category => sub_type, :type => func_type, :argument_names => arg_names, :arguments => args, :fortran_help => help, :md5sum => get_md5sum(help), :substitutions => subst}
|
1873
|
+
|
1874
|
+
|
1875
|
+
end
|
1876
|
+
|
1877
|
+
|
1878
|
+
def create_hash(fname)
|
1879
|
+
hash = parse_file(fname)
|
1880
|
+
if hash.nil?
|
1881
|
+
warn "skip #{fname}"
|
1882
|
+
return nil
|
1883
|
+
end
|
1884
|
+
sub_name = hash[:name]
|
1885
|
+
arg_names = hash.delete(:argument_names)
|
1886
|
+
args = hash.delete(:arguments)
|
1887
|
+
|
1888
|
+
args.each do |k,v|
|
1889
|
+
case v[:intent]
|
1890
|
+
when "input or output", "input or input/output", "input / output", "input/workspace/output", "input/workspace"
|
1891
|
+
v[:intent] = "input/output"
|
1892
|
+
when "workspace/output"
|
1893
|
+
v[:intent] = "output"
|
1894
|
+
end
|
1895
|
+
end
|
1896
|
+
|
1897
|
+
|
1898
|
+
unless sub_name
|
1899
|
+
warn "this has no subroutine (#{fname})"
|
1900
|
+
return nil
|
1901
|
+
end
|
1902
|
+
unless arg_names
|
1903
|
+
raise "no arg_names (#{fname})"
|
1904
|
+
end
|
1905
|
+
unless args && !args.empty?
|
1906
|
+
raise "no args (#{fname})"
|
1907
|
+
end
|
1908
|
+
|
1909
|
+
hash[:arguments] = arg_names.map{|name| {name => args[name]} }
|
1910
|
+
|
1911
|
+
return hash
|
1912
|
+
end
|
1913
|
+
|
1914
|
+
def generate_code(fnames)
|
1915
|
+
nfnames = fnames.length
|
1916
|
+
sub_names = Array.new
|
1917
|
+
fnames.each_with_index{|fname,i|
|
1918
|
+
print "#{i+1}/#{nfnames}\n" if (i+1)%100==0
|
1919
|
+
hash = read_file(fname)
|
1920
|
+
next if hash.nil?
|
1921
|
+
help = hash[:help]
|
1922
|
+
basename = File.basename(fname, ".f")
|
1923
|
+
def_dir = File.join(File.dirname(__FILE__), "defs")
|
1924
|
+
def_fname = File.join(def_dir, basename)
|
1925
|
+
if File.exists?(def_fname)
|
1926
|
+
hash = nil
|
1927
|
+
File.open(def_fname){|file| hash = YAML.load(file.read) }
|
1928
|
+
md5sum = hash[:md5sum]
|
1929
|
+
next if get_md5sum(help) == md5sum && !@@force
|
1930
|
+
end
|
1931
|
+
|
1932
|
+
hash = create_hash(fname)
|
1933
|
+
def hash.each
|
1934
|
+
[:name, :md5sum, :category].each do |k|
|
1935
|
+
yield(k, self[k])
|
1936
|
+
end
|
1937
|
+
if self[:category] == :function
|
1938
|
+
yield(:type, self[k])
|
1939
|
+
end
|
1940
|
+
[:arguments, :substitutions, :fortran_help].each do |k|
|
1941
|
+
yield(k, self[k])
|
1942
|
+
end
|
1943
|
+
end
|
1944
|
+
p "write #{hash[:name]}" if @@debug
|
1945
|
+
File.open(def_fname, "w") do |file|
|
1946
|
+
file.write hash.to_yaml
|
1947
|
+
end
|
1948
|
+
}
|
1949
|
+
end
|
1950
|
+
|
1951
|
+
def get_md5sum(src)
|
1952
|
+
Digest::MD5.hexdigest(src.sub(/LAPACK routine \(version \d.\d\) --/,""))
|
1953
|
+
end
|
1954
|
+
|
1955
|
+
|
1956
|
+
|
1957
|
+
|
1958
|
+
|
1959
|
+
@@debug = ARGV.delete("--debug")
|
1960
|
+
@@force = ARGV.delete("--force")
|
1961
|
+
|
1962
|
+
dname = ARGV[0] || raise("Usage: ruby #$0 path_to_lapack_src")
|
1963
|
+
if File.directory?(dname)
|
1964
|
+
fnames = Dir[ File.join(dname,"*.f") ]
|
1965
|
+
elsif File.file?(dname)
|
1966
|
+
fnames = [dname]
|
1967
|
+
# @@debug = true
|
1968
|
+
end
|
1969
|
+
|
1970
|
+
generate_code(fnames)
|
1971
|
+
|
1972
|
+
|