1 // 2 // Copyright (c) 2003--2009 3 // Toon Knapen, Karl Meerbergen, Kresimir Fresl, 4 // Thomas Klimpel and Rutger ter Borg 5 // 6 // Distributed under the Boost Software License, Version 1.0. 7 // (See accompanying file LICENSE_1_0.txt or copy at 8 // http://www.boost.org/LICENSE_1_0.txt) 9 // 10 // THIS FILE IS AUTOMATICALLY GENERATED 11 // PLEASE DO NOT EDIT! 12 // 13 14 #ifndef BOOST_NUMERIC_BINDINGS_LAPACK_DETAIL_LAPACK_NAMES_H 15 #define BOOST_NUMERIC_BINDINGS_LAPACK_DETAIL_LAPACK_NAMES_H 16 17 #include <boost/numeric/bindings/detail/config/fortran.hpp> 18 19 // 20 // LAPACK computational routines 21 // 22 23 // Value-type variants of hbgst 24 #define LAPACK_CHBGST FORTRAN_ID2( chbgst, CHBGST ) 25 #define LAPACK_ZHBGST FORTRAN_ID2( zhbgst, ZHBGST ) 26 27 // Value-type variants of hegst 28 #define LAPACK_CHEGST FORTRAN_ID2( chegst, CHEGST ) 29 #define LAPACK_ZHEGST FORTRAN_ID2( zhegst, ZHEGST ) 30 31 // Value-type variants of pbstf 32 #define LAPACK_SPBSTF FORTRAN_ID2( spbstf, SPBSTF ) 33 #define LAPACK_DPBSTF FORTRAN_ID2( dpbstf, DPBSTF ) 34 #define LAPACK_CPBSTF FORTRAN_ID2( cpbstf, CPBSTF ) 35 #define LAPACK_ZPBSTF FORTRAN_ID2( zpbstf, ZPBSTF ) 36 37 // Value-type variants of sbgst 38 #define LAPACK_SSBGST FORTRAN_ID2( ssbgst, SSBGST ) 39 #define LAPACK_DSBGST FORTRAN_ID2( dsbgst, DSBGST ) 40 41 // Value-type variants of sygst 42 #define LAPACK_SSYGST FORTRAN_ID2( ssygst, SSYGST ) 43 #define LAPACK_DSYGST FORTRAN_ID2( dsygst, DSYGST ) 44 45 // Value-type variants of ggqrf 46 #define LAPACK_SGGQRF FORTRAN_ID2( sggqrf, SGGQRF ) 47 #define LAPACK_DGGQRF FORTRAN_ID2( dggqrf, DGGQRF ) 48 #define LAPACK_CGGQRF FORTRAN_ID2( cggqrf, CGGQRF ) 49 #define LAPACK_ZGGQRF FORTRAN_ID2( zggqrf, ZGGQRF ) 50 51 // Value-type variants of ggrqf 52 #define LAPACK_SGGRQF FORTRAN_ID2( sggrqf, SGGRQF ) 53 #define LAPACK_DGGRQF FORTRAN_ID2( dggrqf, DGGRQF ) 54 #define LAPACK_CGGRQF FORTRAN_ID2( cggrqf, CGGRQF ) 55 #define LAPACK_ZGGRQF FORTRAN_ID2( zggrqf, ZGGRQF ) 56 57 // Value-type variants of gelqf 58 #define LAPACK_SGELQF FORTRAN_ID2( sgelqf, SGELQF ) 59 #define LAPACK_DGELQF FORTRAN_ID2( dgelqf, DGELQF ) 60 #define LAPACK_CGELQF FORTRAN_ID2( cgelqf, CGELQF ) 61 #define LAPACK_ZGELQF FORTRAN_ID2( zgelqf, ZGELQF ) 62 63 // Value-type variants of geqlf 64 #define LAPACK_SGEQLF FORTRAN_ID2( sgeqlf, SGEQLF ) 65 #define LAPACK_DGEQLF FORTRAN_ID2( dgeqlf, DGEQLF ) 66 #define LAPACK_CGEQLF FORTRAN_ID2( cgeqlf, CGEQLF ) 67 #define LAPACK_ZGEQLF FORTRAN_ID2( zgeqlf, ZGEQLF ) 68 69 // Value-type variants of geqp3 70 #define LAPACK_SGEQP3 FORTRAN_ID2( sgeqp3, SGEQP3 ) 71 #define LAPACK_DGEQP3 FORTRAN_ID2( dgeqp3, DGEQP3 ) 72 #define LAPACK_CGEQP3 FORTRAN_ID2( cgeqp3, CGEQP3 ) 73 #define LAPACK_ZGEQP3 FORTRAN_ID2( zgeqp3, ZGEQP3 ) 74 75 // Value-type variants of geqrf 76 #define LAPACK_SGEQRF FORTRAN_ID2( sgeqrf, SGEQRF ) 77 #define LAPACK_DGEQRF FORTRAN_ID2( dgeqrf, DGEQRF ) 78 #define LAPACK_CGEQRF FORTRAN_ID2( cgeqrf, CGEQRF ) 79 #define LAPACK_ZGEQRF FORTRAN_ID2( zgeqrf, ZGEQRF ) 80 81 // Value-type variants of gerqf 82 #define LAPACK_SGERQF FORTRAN_ID2( sgerqf, SGERQF ) 83 #define LAPACK_DGERQF FORTRAN_ID2( dgerqf, DGERQF ) 84 #define LAPACK_CGERQF FORTRAN_ID2( cgerqf, CGERQF ) 85 #define LAPACK_ZGERQF FORTRAN_ID2( zgerqf, ZGERQF ) 86 87 // Value-type variants of orglq 88 #define LAPACK_SORGLQ FORTRAN_ID2( sorglq, SORGLQ ) 89 #define LAPACK_DORGLQ FORTRAN_ID2( dorglq, DORGLQ ) 90 91 // Value-type variants of orgql 92 #define LAPACK_SORGQL FORTRAN_ID2( sorgql, SORGQL ) 93 #define LAPACK_DORGQL FORTRAN_ID2( dorgql, DORGQL ) 94 95 // Value-type variants of orgqr 96 #define LAPACK_SORGQR FORTRAN_ID2( sorgqr, SORGQR ) 97 #define LAPACK_DORGQR FORTRAN_ID2( dorgqr, DORGQR ) 98 99 // Value-type variants of orgrq 100 #define LAPACK_SORGRQ FORTRAN_ID2( sorgrq, SORGRQ ) 101 #define LAPACK_DORGRQ FORTRAN_ID2( dorgrq, DORGRQ ) 102 103 // Value-type variants of ormlq 104 #define LAPACK_SORMLQ FORTRAN_ID2( sormlq, SORMLQ ) 105 #define LAPACK_DORMLQ FORTRAN_ID2( dormlq, DORMLQ ) 106 107 // Value-type variants of ormql 108 #define LAPACK_SORMQL FORTRAN_ID2( sormql, SORMQL ) 109 #define LAPACK_DORMQL FORTRAN_ID2( dormql, DORMQL ) 110 111 // Value-type variants of ormqr 112 #define LAPACK_SORMQR FORTRAN_ID2( sormqr, SORMQR ) 113 #define LAPACK_DORMQR FORTRAN_ID2( dormqr, DORMQR ) 114 115 // Value-type variants of ormrq 116 #define LAPACK_SORMRQ FORTRAN_ID2( sormrq, SORMRQ ) 117 #define LAPACK_DORMRQ FORTRAN_ID2( dormrq, DORMRQ ) 118 119 // Value-type variants of ormrz 120 #define LAPACK_SORMRZ FORTRAN_ID2( sormrz, SORMRZ ) 121 #define LAPACK_DORMRZ FORTRAN_ID2( dormrz, DORMRZ ) 122 123 // Value-type variants of tzrzf 124 #define LAPACK_STZRZF FORTRAN_ID2( stzrzf, STZRZF ) 125 #define LAPACK_DTZRZF FORTRAN_ID2( dtzrzf, DTZRZF ) 126 #define LAPACK_CTZRZF FORTRAN_ID2( ctzrzf, CTZRZF ) 127 #define LAPACK_ZTZRZF FORTRAN_ID2( ztzrzf, ZTZRZF ) 128 129 // Value-type variants of unglq 130 #define LAPACK_CUNGLQ FORTRAN_ID2( cunglq, CUNGLQ ) 131 #define LAPACK_ZUNGLQ FORTRAN_ID2( zunglq, ZUNGLQ ) 132 133 // Value-type variants of ungql 134 #define LAPACK_CUNGQL FORTRAN_ID2( cungql, CUNGQL ) 135 #define LAPACK_ZUNGQL FORTRAN_ID2( zungql, ZUNGQL ) 136 137 // Value-type variants of ungqr 138 #define LAPACK_CUNGQR FORTRAN_ID2( cungqr, CUNGQR ) 139 #define LAPACK_ZUNGQR FORTRAN_ID2( zungqr, ZUNGQR ) 140 141 // Value-type variants of ungrq 142 #define LAPACK_CUNGRQ FORTRAN_ID2( cungrq, CUNGRQ ) 143 #define LAPACK_ZUNGRQ FORTRAN_ID2( zungrq, ZUNGRQ ) 144 145 // Value-type variants of unmlq 146 #define LAPACK_CUNMLQ FORTRAN_ID2( cunmlq, CUNMLQ ) 147 #define LAPACK_ZUNMLQ FORTRAN_ID2( zunmlq, ZUNMLQ ) 148 149 // Value-type variants of unmql 150 #define LAPACK_CUNMQL FORTRAN_ID2( cunmql, CUNMQL ) 151 #define LAPACK_ZUNMQL FORTRAN_ID2( zunmql, ZUNMQL ) 152 153 // Value-type variants of unmqr 154 #define LAPACK_CUNMQR FORTRAN_ID2( cunmqr, CUNMQR ) 155 #define LAPACK_ZUNMQR FORTRAN_ID2( zunmqr, ZUNMQR ) 156 157 // Value-type variants of unmrq 158 #define LAPACK_CUNMRQ FORTRAN_ID2( cunmrq, CUNMRQ ) 159 #define LAPACK_ZUNMRQ FORTRAN_ID2( zunmrq, ZUNMRQ ) 160 161 // Value-type variants of unmrz 162 #define LAPACK_CUNMRZ FORTRAN_ID2( cunmrz, CUNMRZ ) 163 #define LAPACK_ZUNMRZ FORTRAN_ID2( zunmrz, ZUNMRZ ) 164 165 // Value-type variants of bdsdc 166 #define LAPACK_SBDSDC FORTRAN_ID2( sbdsdc, SBDSDC ) 167 #define LAPACK_DBDSDC FORTRAN_ID2( dbdsdc, DBDSDC ) 168 169 // Value-type variants of bdsqr 170 #define LAPACK_SBDSQR FORTRAN_ID2( sbdsqr, SBDSQR ) 171 #define LAPACK_DBDSQR FORTRAN_ID2( dbdsqr, DBDSQR ) 172 #define LAPACK_CBDSQR FORTRAN_ID2( cbdsqr, CBDSQR ) 173 #define LAPACK_ZBDSQR FORTRAN_ID2( zbdsqr, ZBDSQR ) 174 175 // Value-type variants of gbbrd 176 #define LAPACK_SGBBRD FORTRAN_ID2( sgbbrd, SGBBRD ) 177 #define LAPACK_DGBBRD FORTRAN_ID2( dgbbrd, DGBBRD ) 178 #define LAPACK_CGBBRD FORTRAN_ID2( cgbbrd, CGBBRD ) 179 #define LAPACK_ZGBBRD FORTRAN_ID2( zgbbrd, ZGBBRD ) 180 181 // Value-type variants of gebrd 182 #define LAPACK_SGEBRD FORTRAN_ID2( sgebrd, SGEBRD ) 183 #define LAPACK_DGEBRD FORTRAN_ID2( dgebrd, DGEBRD ) 184 #define LAPACK_CGEBRD FORTRAN_ID2( cgebrd, CGEBRD ) 185 #define LAPACK_ZGEBRD FORTRAN_ID2( zgebrd, ZGEBRD ) 186 187 // Value-type variants of orgbr 188 #define LAPACK_SORGBR FORTRAN_ID2( sorgbr, SORGBR ) 189 #define LAPACK_DORGBR FORTRAN_ID2( dorgbr, DORGBR ) 190 191 // Value-type variants of ormbr 192 #define LAPACK_SORMBR FORTRAN_ID2( sormbr, SORMBR ) 193 #define LAPACK_DORMBR FORTRAN_ID2( dormbr, DORMBR ) 194 195 // Value-type variants of ungbr 196 #define LAPACK_CUNGBR FORTRAN_ID2( cungbr, CUNGBR ) 197 #define LAPACK_ZUNGBR FORTRAN_ID2( zungbr, ZUNGBR ) 198 199 // Value-type variants of unmbr 200 #define LAPACK_CUNMBR FORTRAN_ID2( cunmbr, CUNMBR ) 201 #define LAPACK_ZUNMBR FORTRAN_ID2( zunmbr, ZUNMBR ) 202 203 // Value-type variants of gebak 204 #define LAPACK_SGEBAK FORTRAN_ID2( sgebak, SGEBAK ) 205 #define LAPACK_DGEBAK FORTRAN_ID2( dgebak, DGEBAK ) 206 #define LAPACK_CGEBAK FORTRAN_ID2( cgebak, CGEBAK ) 207 #define LAPACK_ZGEBAK FORTRAN_ID2( zgebak, ZGEBAK ) 208 209 // Value-type variants of gebal 210 #define LAPACK_SGEBAL FORTRAN_ID2( sgebal, SGEBAL ) 211 #define LAPACK_DGEBAL FORTRAN_ID2( dgebal, DGEBAL ) 212 #define LAPACK_CGEBAL FORTRAN_ID2( cgebal, CGEBAL ) 213 #define LAPACK_ZGEBAL FORTRAN_ID2( zgebal, ZGEBAL ) 214 215 // Value-type variants of gehrd 216 #define LAPACK_SGEHRD FORTRAN_ID2( sgehrd, SGEHRD ) 217 #define LAPACK_DGEHRD FORTRAN_ID2( dgehrd, DGEHRD ) 218 #define LAPACK_CGEHRD FORTRAN_ID2( cgehrd, CGEHRD ) 219 #define LAPACK_ZGEHRD FORTRAN_ID2( zgehrd, ZGEHRD ) 220 221 // Value-type variants of hsein 222 #define LAPACK_SHSEIN FORTRAN_ID2( shsein, SHSEIN ) 223 #define LAPACK_DHSEIN FORTRAN_ID2( dhsein, DHSEIN ) 224 #define LAPACK_CHSEIN FORTRAN_ID2( chsein, CHSEIN ) 225 #define LAPACK_ZHSEIN FORTRAN_ID2( zhsein, ZHSEIN ) 226 227 // Value-type variants of hseqr 228 #define LAPACK_SHSEQR FORTRAN_ID2( shseqr, SHSEQR ) 229 #define LAPACK_DHSEQR FORTRAN_ID2( dhseqr, DHSEQR ) 230 #define LAPACK_CHSEQR FORTRAN_ID2( chseqr, CHSEQR ) 231 #define LAPACK_ZHSEQR FORTRAN_ID2( zhseqr, ZHSEQR ) 232 233 // Value-type variants of orghr 234 #define LAPACK_SORGHR FORTRAN_ID2( sorghr, SORGHR ) 235 #define LAPACK_DORGHR FORTRAN_ID2( dorghr, DORGHR ) 236 237 // Value-type variants of ormhr 238 #define LAPACK_SORMHR FORTRAN_ID2( sormhr, SORMHR ) 239 #define LAPACK_DORMHR FORTRAN_ID2( dormhr, DORMHR ) 240 241 // Value-type variants of trevc 242 #define LAPACK_STREVC FORTRAN_ID2( strevc, STREVC ) 243 #define LAPACK_DTREVC FORTRAN_ID2( dtrevc, DTREVC ) 244 #define LAPACK_CTREVC FORTRAN_ID2( ctrevc, CTREVC ) 245 #define LAPACK_ZTREVC FORTRAN_ID2( ztrevc, ZTREVC ) 246 247 // Value-type variants of trexc 248 #define LAPACK_STREXC FORTRAN_ID2( strexc, STREXC ) 249 #define LAPACK_DTREXC FORTRAN_ID2( dtrexc, DTREXC ) 250 #define LAPACK_CTREXC FORTRAN_ID2( ctrexc, CTREXC ) 251 #define LAPACK_ZTREXC FORTRAN_ID2( ztrexc, ZTREXC ) 252 253 // Value-type variants of trsen 254 #define LAPACK_CTRSEN FORTRAN_ID2( ctrsen, CTRSEN ) 255 #define LAPACK_ZTRSEN FORTRAN_ID2( ztrsen, ZTRSEN ) 256 257 // Value-type variants of trsna 258 #define LAPACK_STRSNA FORTRAN_ID2( strsna, STRSNA ) 259 #define LAPACK_DTRSNA FORTRAN_ID2( dtrsna, DTRSNA ) 260 #define LAPACK_CTRSNA FORTRAN_ID2( ctrsna, CTRSNA ) 261 #define LAPACK_ZTRSNA FORTRAN_ID2( ztrsna, ZTRSNA ) 262 263 // Value-type variants of trsyl 264 #define LAPACK_STRSYL FORTRAN_ID2( strsyl, STRSYL ) 265 #define LAPACK_DTRSYL FORTRAN_ID2( dtrsyl, DTRSYL ) 266 #define LAPACK_CTRSYL FORTRAN_ID2( ctrsyl, CTRSYL ) 267 #define LAPACK_ZTRSYL FORTRAN_ID2( ztrsyl, ZTRSYL ) 268 269 // Value-type variants of unghr 270 #define LAPACK_CUNGHR FORTRAN_ID2( cunghr, CUNGHR ) 271 #define LAPACK_ZUNGHR FORTRAN_ID2( zunghr, ZUNGHR ) 272 273 // Value-type variants of unmhr 274 #define LAPACK_CUNMHR FORTRAN_ID2( cunmhr, CUNMHR ) 275 #define LAPACK_ZUNMHR FORTRAN_ID2( zunmhr, ZUNMHR ) 276 277 // Value-type variants of gbcon 278 #define LAPACK_SGBCON FORTRAN_ID2( sgbcon, SGBCON ) 279 #define LAPACK_DGBCON FORTRAN_ID2( dgbcon, DGBCON ) 280 #define LAPACK_CGBCON FORTRAN_ID2( cgbcon, CGBCON ) 281 #define LAPACK_ZGBCON FORTRAN_ID2( zgbcon, ZGBCON ) 282 283 // Value-type variants of gbequ 284 #define LAPACK_SGBEQU FORTRAN_ID2( sgbequ, SGBEQU ) 285 #define LAPACK_DGBEQU FORTRAN_ID2( dgbequ, DGBEQU ) 286 #define LAPACK_CGBEQU FORTRAN_ID2( cgbequ, CGBEQU ) 287 #define LAPACK_ZGBEQU FORTRAN_ID2( zgbequ, ZGBEQU ) 288 289 // Value-type variants of gbrfs 290 #define LAPACK_SGBRFS FORTRAN_ID2( sgbrfs, SGBRFS ) 291 #define LAPACK_DGBRFS FORTRAN_ID2( dgbrfs, DGBRFS ) 292 #define LAPACK_CGBRFS FORTRAN_ID2( cgbrfs, CGBRFS ) 293 #define LAPACK_ZGBRFS FORTRAN_ID2( zgbrfs, ZGBRFS ) 294 295 // Value-type variants of gbtrf 296 #define LAPACK_SGBTRF FORTRAN_ID2( sgbtrf, SGBTRF ) 297 #define LAPACK_DGBTRF FORTRAN_ID2( dgbtrf, DGBTRF ) 298 #define LAPACK_CGBTRF FORTRAN_ID2( cgbtrf, CGBTRF ) 299 #define LAPACK_ZGBTRF FORTRAN_ID2( zgbtrf, ZGBTRF ) 300 301 // Value-type variants of gbtrs 302 #define LAPACK_SGBTRS FORTRAN_ID2( sgbtrs, SGBTRS ) 303 #define LAPACK_DGBTRS FORTRAN_ID2( dgbtrs, DGBTRS ) 304 #define LAPACK_CGBTRS FORTRAN_ID2( cgbtrs, CGBTRS ) 305 #define LAPACK_ZGBTRS FORTRAN_ID2( zgbtrs, ZGBTRS ) 306 307 // Value-type variants of gecon 308 #define LAPACK_SGECON FORTRAN_ID2( sgecon, SGECON ) 309 #define LAPACK_DGECON FORTRAN_ID2( dgecon, DGECON ) 310 #define LAPACK_CGECON FORTRAN_ID2( cgecon, CGECON ) 311 #define LAPACK_ZGECON FORTRAN_ID2( zgecon, ZGECON ) 312 313 // Value-type variants of geequ 314 #define LAPACK_SGEEQU FORTRAN_ID2( sgeequ, SGEEQU ) 315 #define LAPACK_DGEEQU FORTRAN_ID2( dgeequ, DGEEQU ) 316 #define LAPACK_CGEEQU FORTRAN_ID2( cgeequ, CGEEQU ) 317 #define LAPACK_ZGEEQU FORTRAN_ID2( zgeequ, ZGEEQU ) 318 319 // Value-type variants of gerfs 320 #define LAPACK_SGERFS FORTRAN_ID2( sgerfs, SGERFS ) 321 #define LAPACK_DGERFS FORTRAN_ID2( dgerfs, DGERFS ) 322 #define LAPACK_CGERFS FORTRAN_ID2( cgerfs, CGERFS ) 323 #define LAPACK_ZGERFS FORTRAN_ID2( zgerfs, ZGERFS ) 324 325 // Value-type variants of getrf 326 #define LAPACK_SGETRF FORTRAN_ID2( sgetrf, SGETRF ) 327 #define LAPACK_DGETRF FORTRAN_ID2( dgetrf, DGETRF ) 328 #define LAPACK_CGETRF FORTRAN_ID2( cgetrf, CGETRF ) 329 #define LAPACK_ZGETRF FORTRAN_ID2( zgetrf, ZGETRF ) 330 331 // Value-type variants of getri 332 #define LAPACK_SGETRI FORTRAN_ID2( sgetri, SGETRI ) 333 #define LAPACK_DGETRI FORTRAN_ID2( dgetri, DGETRI ) 334 #define LAPACK_CGETRI FORTRAN_ID2( cgetri, CGETRI ) 335 #define LAPACK_ZGETRI FORTRAN_ID2( zgetri, ZGETRI ) 336 337 // Value-type variants of getrs 338 #define LAPACK_SGETRS FORTRAN_ID2( sgetrs, SGETRS ) 339 #define LAPACK_DGETRS FORTRAN_ID2( dgetrs, DGETRS ) 340 #define LAPACK_CGETRS FORTRAN_ID2( cgetrs, CGETRS ) 341 #define LAPACK_ZGETRS FORTRAN_ID2( zgetrs, ZGETRS ) 342 343 // Value-type variants of gtrfs 344 #define LAPACK_SGTRFS FORTRAN_ID2( sgtrfs, SGTRFS ) 345 #define LAPACK_DGTRFS FORTRAN_ID2( dgtrfs, DGTRFS ) 346 #define LAPACK_CGTRFS FORTRAN_ID2( cgtrfs, CGTRFS ) 347 #define LAPACK_ZGTRFS FORTRAN_ID2( zgtrfs, ZGTRFS ) 348 349 // Value-type variants of gttrs 350 #define LAPACK_SGTTRS FORTRAN_ID2( sgttrs, SGTTRS ) 351 #define LAPACK_DGTTRS FORTRAN_ID2( dgttrs, DGTTRS ) 352 #define LAPACK_CGTTRS FORTRAN_ID2( cgttrs, CGTTRS ) 353 #define LAPACK_ZGTTRS FORTRAN_ID2( zgttrs, ZGTTRS ) 354 355 // Value-type variants of hecon 356 #define LAPACK_CHECON FORTRAN_ID2( checon, CHECON ) 357 #define LAPACK_ZHECON FORTRAN_ID2( zhecon, ZHECON ) 358 359 // Value-type variants of herfs 360 #define LAPACK_CHERFS FORTRAN_ID2( cherfs, CHERFS ) 361 #define LAPACK_ZHERFS FORTRAN_ID2( zherfs, ZHERFS ) 362 363 // Value-type variants of hetrf 364 #define LAPACK_CHETRF FORTRAN_ID2( chetrf, CHETRF ) 365 #define LAPACK_ZHETRF FORTRAN_ID2( zhetrf, ZHETRF ) 366 367 // Value-type variants of hetri 368 #define LAPACK_CHETRI FORTRAN_ID2( chetri, CHETRI ) 369 #define LAPACK_ZHETRI FORTRAN_ID2( zhetri, ZHETRI ) 370 371 // Value-type variants of hetrs 372 #define LAPACK_CHETRS FORTRAN_ID2( chetrs, CHETRS ) 373 #define LAPACK_ZHETRS FORTRAN_ID2( zhetrs, ZHETRS ) 374 375 // Value-type variants of hpcon 376 #define LAPACK_CHPCON FORTRAN_ID2( chpcon, CHPCON ) 377 #define LAPACK_ZHPCON FORTRAN_ID2( zhpcon, ZHPCON ) 378 379 // Value-type variants of hprfs 380 #define LAPACK_CHPRFS FORTRAN_ID2( chprfs, CHPRFS ) 381 #define LAPACK_ZHPRFS FORTRAN_ID2( zhprfs, ZHPRFS ) 382 383 // Value-type variants of hptrf 384 #define LAPACK_CHPTRF FORTRAN_ID2( chptrf, CHPTRF ) 385 #define LAPACK_ZHPTRF FORTRAN_ID2( zhptrf, ZHPTRF ) 386 387 // Value-type variants of hptri 388 #define LAPACK_CHPTRI FORTRAN_ID2( chptri, CHPTRI ) 389 #define LAPACK_ZHPTRI FORTRAN_ID2( zhptri, ZHPTRI ) 390 391 // Value-type variants of hptrs 392 #define LAPACK_CHPTRS FORTRAN_ID2( chptrs, CHPTRS ) 393 #define LAPACK_ZHPTRS FORTRAN_ID2( zhptrs, ZHPTRS ) 394 395 // Value-type variants of pbcon 396 #define LAPACK_SPBCON FORTRAN_ID2( spbcon, SPBCON ) 397 #define LAPACK_DPBCON FORTRAN_ID2( dpbcon, DPBCON ) 398 #define LAPACK_CPBCON FORTRAN_ID2( cpbcon, CPBCON ) 399 #define LAPACK_ZPBCON FORTRAN_ID2( zpbcon, ZPBCON ) 400 401 // Value-type variants of pbequ 402 #define LAPACK_SPBEQU FORTRAN_ID2( spbequ, SPBEQU ) 403 #define LAPACK_DPBEQU FORTRAN_ID2( dpbequ, DPBEQU ) 404 #define LAPACK_CPBEQU FORTRAN_ID2( cpbequ, CPBEQU ) 405 #define LAPACK_ZPBEQU FORTRAN_ID2( zpbequ, ZPBEQU ) 406 407 // Value-type variants of pbrfs 408 #define LAPACK_SPBRFS FORTRAN_ID2( spbrfs, SPBRFS ) 409 #define LAPACK_DPBRFS FORTRAN_ID2( dpbrfs, DPBRFS ) 410 #define LAPACK_CPBRFS FORTRAN_ID2( cpbrfs, CPBRFS ) 411 #define LAPACK_ZPBRFS FORTRAN_ID2( zpbrfs, ZPBRFS ) 412 413 // Value-type variants of pbtrf 414 #define LAPACK_SPBTRF FORTRAN_ID2( spbtrf, SPBTRF ) 415 #define LAPACK_DPBTRF FORTRAN_ID2( dpbtrf, DPBTRF ) 416 #define LAPACK_CPBTRF FORTRAN_ID2( cpbtrf, CPBTRF ) 417 #define LAPACK_ZPBTRF FORTRAN_ID2( zpbtrf, ZPBTRF ) 418 419 // Value-type variants of pbtrs 420 #define LAPACK_SPBTRS FORTRAN_ID2( spbtrs, SPBTRS ) 421 #define LAPACK_DPBTRS FORTRAN_ID2( dpbtrs, DPBTRS ) 422 #define LAPACK_CPBTRS FORTRAN_ID2( cpbtrs, CPBTRS ) 423 #define LAPACK_ZPBTRS FORTRAN_ID2( zpbtrs, ZPBTRS ) 424 425 // Value-type variants of pftrf 426 #define LAPACK_SPFTRF FORTRAN_ID2( spftrf, SPFTRF ) 427 #define LAPACK_DPFTRF FORTRAN_ID2( dpftrf, DPFTRF ) 428 #define LAPACK_CPFTRF FORTRAN_ID2( cpftrf, CPFTRF ) 429 #define LAPACK_ZPFTRF FORTRAN_ID2( zpftrf, ZPFTRF ) 430 431 // Value-type variants of pftri 432 #define LAPACK_SPFTRI FORTRAN_ID2( spftri, SPFTRI ) 433 #define LAPACK_DPFTRI FORTRAN_ID2( dpftri, DPFTRI ) 434 #define LAPACK_CPFTRI FORTRAN_ID2( cpftri, CPFTRI ) 435 #define LAPACK_ZPFTRI FORTRAN_ID2( zpftri, ZPFTRI ) 436 437 // Value-type variants of pftrs 438 #define LAPACK_SPFTRS FORTRAN_ID2( spftrs, SPFTRS ) 439 #define LAPACK_DPFTRS FORTRAN_ID2( dpftrs, DPFTRS ) 440 #define LAPACK_CPFTRS FORTRAN_ID2( cpftrs, CPFTRS ) 441 #define LAPACK_ZPFTRS FORTRAN_ID2( zpftrs, ZPFTRS ) 442 443 // Value-type variants of pocon 444 #define LAPACK_SPOCON FORTRAN_ID2( spocon, SPOCON ) 445 #define LAPACK_DPOCON FORTRAN_ID2( dpocon, DPOCON ) 446 #define LAPACK_CPOCON FORTRAN_ID2( cpocon, CPOCON ) 447 #define LAPACK_ZPOCON FORTRAN_ID2( zpocon, ZPOCON ) 448 449 // Value-type variants of poequ 450 #define LAPACK_SPOEQU FORTRAN_ID2( spoequ, SPOEQU ) 451 #define LAPACK_DPOEQU FORTRAN_ID2( dpoequ, DPOEQU ) 452 #define LAPACK_CPOEQU FORTRAN_ID2( cpoequ, CPOEQU ) 453 #define LAPACK_ZPOEQU FORTRAN_ID2( zpoequ, ZPOEQU ) 454 455 // Value-type variants of porfs 456 #define LAPACK_SPORFS FORTRAN_ID2( sporfs, SPORFS ) 457 #define LAPACK_DPORFS FORTRAN_ID2( dporfs, DPORFS ) 458 #define LAPACK_CPORFS FORTRAN_ID2( cporfs, CPORFS ) 459 #define LAPACK_ZPORFS FORTRAN_ID2( zporfs, ZPORFS ) 460 461 // Value-type variants of potrf 462 #define LAPACK_SPOTRF FORTRAN_ID2( spotrf, SPOTRF ) 463 #define LAPACK_DPOTRF FORTRAN_ID2( dpotrf, DPOTRF ) 464 #define LAPACK_CPOTRF FORTRAN_ID2( cpotrf, CPOTRF ) 465 #define LAPACK_ZPOTRF FORTRAN_ID2( zpotrf, ZPOTRF ) 466 467 // Value-type variants of potri 468 #define LAPACK_SPOTRI FORTRAN_ID2( spotri, SPOTRI ) 469 #define LAPACK_DPOTRI FORTRAN_ID2( dpotri, DPOTRI ) 470 #define LAPACK_CPOTRI FORTRAN_ID2( cpotri, CPOTRI ) 471 #define LAPACK_ZPOTRI FORTRAN_ID2( zpotri, ZPOTRI ) 472 473 // Value-type variants of potrs 474 #define LAPACK_SPOTRS FORTRAN_ID2( spotrs, SPOTRS ) 475 #define LAPACK_DPOTRS FORTRAN_ID2( dpotrs, DPOTRS ) 476 #define LAPACK_CPOTRS FORTRAN_ID2( cpotrs, CPOTRS ) 477 #define LAPACK_ZPOTRS FORTRAN_ID2( zpotrs, ZPOTRS ) 478 479 // Value-type variants of ppcon 480 #define LAPACK_SPPCON FORTRAN_ID2( sppcon, SPPCON ) 481 #define LAPACK_DPPCON FORTRAN_ID2( dppcon, DPPCON ) 482 #define LAPACK_CPPCON FORTRAN_ID2( cppcon, CPPCON ) 483 #define LAPACK_ZPPCON FORTRAN_ID2( zppcon, ZPPCON ) 484 485 // Value-type variants of ppequ 486 #define LAPACK_SPPEQU FORTRAN_ID2( sppequ, SPPEQU ) 487 #define LAPACK_DPPEQU FORTRAN_ID2( dppequ, DPPEQU ) 488 #define LAPACK_CPPEQU FORTRAN_ID2( cppequ, CPPEQU ) 489 #define LAPACK_ZPPEQU FORTRAN_ID2( zppequ, ZPPEQU ) 490 491 // Value-type variants of pprfs 492 #define LAPACK_SPPRFS FORTRAN_ID2( spprfs, SPPRFS ) 493 #define LAPACK_DPPRFS FORTRAN_ID2( dpprfs, DPPRFS ) 494 #define LAPACK_CPPRFS FORTRAN_ID2( cpprfs, CPPRFS ) 495 #define LAPACK_ZPPRFS FORTRAN_ID2( zpprfs, ZPPRFS ) 496 497 // Value-type variants of pptrf 498 #define LAPACK_SPPTRF FORTRAN_ID2( spptrf, SPPTRF ) 499 #define LAPACK_DPPTRF FORTRAN_ID2( dpptrf, DPPTRF ) 500 #define LAPACK_CPPTRF FORTRAN_ID2( cpptrf, CPPTRF ) 501 #define LAPACK_ZPPTRF FORTRAN_ID2( zpptrf, ZPPTRF ) 502 503 // Value-type variants of pptri 504 #define LAPACK_SPPTRI FORTRAN_ID2( spptri, SPPTRI ) 505 #define LAPACK_DPPTRI FORTRAN_ID2( dpptri, DPPTRI ) 506 #define LAPACK_CPPTRI FORTRAN_ID2( cpptri, CPPTRI ) 507 #define LAPACK_ZPPTRI FORTRAN_ID2( zpptri, ZPPTRI ) 508 509 // Value-type variants of pptrs 510 #define LAPACK_SPPTRS FORTRAN_ID2( spptrs, SPPTRS ) 511 #define LAPACK_DPPTRS FORTRAN_ID2( dpptrs, DPPTRS ) 512 #define LAPACK_CPPTRS FORTRAN_ID2( cpptrs, CPPTRS ) 513 #define LAPACK_ZPPTRS FORTRAN_ID2( zpptrs, ZPPTRS ) 514 515 // Value-type variants of pstrf 516 #define LAPACK_SPSTRF FORTRAN_ID2( spstrf, SPSTRF ) 517 #define LAPACK_DPSTRF FORTRAN_ID2( dpstrf, DPSTRF ) 518 #define LAPACK_CPSTRF FORTRAN_ID2( cpstrf, CPSTRF ) 519 #define LAPACK_ZPSTRF FORTRAN_ID2( zpstrf, ZPSTRF ) 520 521 // Value-type variants of ptcon 522 #define LAPACK_SPTCON FORTRAN_ID2( sptcon, SPTCON ) 523 #define LAPACK_DPTCON FORTRAN_ID2( dptcon, DPTCON ) 524 #define LAPACK_CPTCON FORTRAN_ID2( cptcon, CPTCON ) 525 #define LAPACK_ZPTCON FORTRAN_ID2( zptcon, ZPTCON ) 526 527 // Value-type variants of ptrfs 528 #define LAPACK_SPTRFS FORTRAN_ID2( sptrfs, SPTRFS ) 529 #define LAPACK_DPTRFS FORTRAN_ID2( dptrfs, DPTRFS ) 530 #define LAPACK_CPTRFS FORTRAN_ID2( cptrfs, CPTRFS ) 531 #define LAPACK_ZPTRFS FORTRAN_ID2( zptrfs, ZPTRFS ) 532 533 // Value-type variants of pttrf 534 #define LAPACK_SPTTRF FORTRAN_ID2( spttrf, SPTTRF ) 535 #define LAPACK_DPTTRF FORTRAN_ID2( dpttrf, DPTTRF ) 536 #define LAPACK_CPTTRF FORTRAN_ID2( cpttrf, CPTTRF ) 537 #define LAPACK_ZPTTRF FORTRAN_ID2( zpttrf, ZPTTRF ) 538 539 // Value-type variants of pttrs 540 #define LAPACK_SPTTRS FORTRAN_ID2( spttrs, SPTTRS ) 541 #define LAPACK_DPTTRS FORTRAN_ID2( dpttrs, DPTTRS ) 542 #define LAPACK_CPTTRS FORTRAN_ID2( cpttrs, CPTTRS ) 543 #define LAPACK_ZPTTRS FORTRAN_ID2( zpttrs, ZPTTRS ) 544 545 // Value-type variants of spcon 546 #define LAPACK_SSPCON FORTRAN_ID2( sspcon, SSPCON ) 547 #define LAPACK_DSPCON FORTRAN_ID2( dspcon, DSPCON ) 548 #define LAPACK_CSPCON FORTRAN_ID2( cspcon, CSPCON ) 549 #define LAPACK_ZSPCON FORTRAN_ID2( zspcon, ZSPCON ) 550 551 // Value-type variants of sprfs 552 #define LAPACK_SSPRFS FORTRAN_ID2( ssprfs, SSPRFS ) 553 #define LAPACK_DSPRFS FORTRAN_ID2( dsprfs, DSPRFS ) 554 #define LAPACK_CSPRFS FORTRAN_ID2( csprfs, CSPRFS ) 555 #define LAPACK_ZSPRFS FORTRAN_ID2( zsprfs, ZSPRFS ) 556 557 // Value-type variants of sptrf 558 #define LAPACK_SSPTRF FORTRAN_ID2( ssptrf, SSPTRF ) 559 #define LAPACK_DSPTRF FORTRAN_ID2( dsptrf, DSPTRF ) 560 #define LAPACK_CSPTRF FORTRAN_ID2( csptrf, CSPTRF ) 561 #define LAPACK_ZSPTRF FORTRAN_ID2( zsptrf, ZSPTRF ) 562 563 // Value-type variants of sptri 564 #define LAPACK_SSPTRI FORTRAN_ID2( ssptri, SSPTRI ) 565 #define LAPACK_DSPTRI FORTRAN_ID2( dsptri, DSPTRI ) 566 #define LAPACK_CSPTRI FORTRAN_ID2( csptri, CSPTRI ) 567 #define LAPACK_ZSPTRI FORTRAN_ID2( zsptri, ZSPTRI ) 568 569 // Value-type variants of sptrs 570 #define LAPACK_SSPTRS FORTRAN_ID2( ssptrs, SSPTRS ) 571 #define LAPACK_DSPTRS FORTRAN_ID2( dsptrs, DSPTRS ) 572 #define LAPACK_CSPTRS FORTRAN_ID2( csptrs, CSPTRS ) 573 #define LAPACK_ZSPTRS FORTRAN_ID2( zsptrs, ZSPTRS ) 574 575 // Value-type variants of sycon 576 #define LAPACK_SSYCON FORTRAN_ID2( ssycon, SSYCON ) 577 #define LAPACK_DSYCON FORTRAN_ID2( dsycon, DSYCON ) 578 #define LAPACK_CSYCON FORTRAN_ID2( csycon, CSYCON ) 579 #define LAPACK_ZSYCON FORTRAN_ID2( zsycon, ZSYCON ) 580 581 // Value-type variants of syrfs 582 #define LAPACK_SSYRFS FORTRAN_ID2( ssyrfs, SSYRFS ) 583 #define LAPACK_DSYRFS FORTRAN_ID2( dsyrfs, DSYRFS ) 584 #define LAPACK_CSYRFS FORTRAN_ID2( csyrfs, CSYRFS ) 585 #define LAPACK_ZSYRFS FORTRAN_ID2( zsyrfs, ZSYRFS ) 586 587 // Value-type variants of sytrf 588 #define LAPACK_SSYTRF FORTRAN_ID2( ssytrf, SSYTRF ) 589 #define LAPACK_DSYTRF FORTRAN_ID2( dsytrf, DSYTRF ) 590 #define LAPACK_CSYTRF FORTRAN_ID2( csytrf, CSYTRF ) 591 #define LAPACK_ZSYTRF FORTRAN_ID2( zsytrf, ZSYTRF ) 592 593 // Value-type variants of sytri 594 #define LAPACK_SSYTRI FORTRAN_ID2( ssytri, SSYTRI ) 595 #define LAPACK_DSYTRI FORTRAN_ID2( dsytri, DSYTRI ) 596 #define LAPACK_CSYTRI FORTRAN_ID2( csytri, CSYTRI ) 597 #define LAPACK_ZSYTRI FORTRAN_ID2( zsytri, ZSYTRI ) 598 599 // Value-type variants of sytrs 600 #define LAPACK_SSYTRS FORTRAN_ID2( ssytrs, SSYTRS ) 601 #define LAPACK_DSYTRS FORTRAN_ID2( dsytrs, DSYTRS ) 602 #define LAPACK_CSYTRS FORTRAN_ID2( csytrs, CSYTRS ) 603 #define LAPACK_ZSYTRS FORTRAN_ID2( zsytrs, ZSYTRS ) 604 605 // Value-type variants of tbcon 606 #define LAPACK_STBCON FORTRAN_ID2( stbcon, STBCON ) 607 #define LAPACK_DTBCON FORTRAN_ID2( dtbcon, DTBCON ) 608 #define LAPACK_CTBCON FORTRAN_ID2( ctbcon, CTBCON ) 609 #define LAPACK_ZTBCON FORTRAN_ID2( ztbcon, ZTBCON ) 610 611 // Value-type variants of tbrfs 612 #define LAPACK_STBRFS FORTRAN_ID2( stbrfs, STBRFS ) 613 #define LAPACK_DTBRFS FORTRAN_ID2( dtbrfs, DTBRFS ) 614 #define LAPACK_CTBRFS FORTRAN_ID2( ctbrfs, CTBRFS ) 615 #define LAPACK_ZTBRFS FORTRAN_ID2( ztbrfs, ZTBRFS ) 616 617 // Value-type variants of tbtrs 618 #define LAPACK_STBTRS FORTRAN_ID2( stbtrs, STBTRS ) 619 #define LAPACK_DTBTRS FORTRAN_ID2( dtbtrs, DTBTRS ) 620 #define LAPACK_CTBTRS FORTRAN_ID2( ctbtrs, CTBTRS ) 621 #define LAPACK_ZTBTRS FORTRAN_ID2( ztbtrs, ZTBTRS ) 622 623 // Value-type variants of tftri 624 #define LAPACK_STFTRI FORTRAN_ID2( stftri, STFTRI ) 625 #define LAPACK_DTFTRI FORTRAN_ID2( dtftri, DTFTRI ) 626 #define LAPACK_CTFTRI FORTRAN_ID2( ctftri, CTFTRI ) 627 #define LAPACK_ZTFTRI FORTRAN_ID2( ztftri, ZTFTRI ) 628 629 // Value-type variants of tpcon 630 #define LAPACK_STPCON FORTRAN_ID2( stpcon, STPCON ) 631 #define LAPACK_DTPCON FORTRAN_ID2( dtpcon, DTPCON ) 632 #define LAPACK_CTPCON FORTRAN_ID2( ctpcon, CTPCON ) 633 #define LAPACK_ZTPCON FORTRAN_ID2( ztpcon, ZTPCON ) 634 635 // Value-type variants of tprfs 636 #define LAPACK_STPRFS FORTRAN_ID2( stprfs, STPRFS ) 637 #define LAPACK_DTPRFS FORTRAN_ID2( dtprfs, DTPRFS ) 638 #define LAPACK_CTPRFS FORTRAN_ID2( ctprfs, CTPRFS ) 639 #define LAPACK_ZTPRFS FORTRAN_ID2( ztprfs, ZTPRFS ) 640 641 // Value-type variants of tptri 642 #define LAPACK_STPTRI FORTRAN_ID2( stptri, STPTRI ) 643 #define LAPACK_DTPTRI FORTRAN_ID2( dtptri, DTPTRI ) 644 #define LAPACK_CTPTRI FORTRAN_ID2( ctptri, CTPTRI ) 645 #define LAPACK_ZTPTRI FORTRAN_ID2( ztptri, ZTPTRI ) 646 647 // Value-type variants of tptrs 648 #define LAPACK_STPTRS FORTRAN_ID2( stptrs, STPTRS ) 649 #define LAPACK_DTPTRS FORTRAN_ID2( dtptrs, DTPTRS ) 650 #define LAPACK_CTPTRS FORTRAN_ID2( ctptrs, CTPTRS ) 651 #define LAPACK_ZTPTRS FORTRAN_ID2( ztptrs, ZTPTRS ) 652 653 // Value-type variants of trcon 654 #define LAPACK_STRCON FORTRAN_ID2( strcon, STRCON ) 655 #define LAPACK_DTRCON FORTRAN_ID2( dtrcon, DTRCON ) 656 #define LAPACK_CTRCON FORTRAN_ID2( ctrcon, CTRCON ) 657 #define LAPACK_ZTRCON FORTRAN_ID2( ztrcon, ZTRCON ) 658 659 // Value-type variants of trrfs 660 #define LAPACK_STRRFS FORTRAN_ID2( strrfs, STRRFS ) 661 #define LAPACK_DTRRFS FORTRAN_ID2( dtrrfs, DTRRFS ) 662 #define LAPACK_CTRRFS FORTRAN_ID2( ctrrfs, CTRRFS ) 663 #define LAPACK_ZTRRFS FORTRAN_ID2( ztrrfs, ZTRRFS ) 664 665 // Value-type variants of trtri 666 #define LAPACK_STRTRI FORTRAN_ID2( strtri, STRTRI ) 667 #define LAPACK_DTRTRI FORTRAN_ID2( dtrtri, DTRTRI ) 668 #define LAPACK_CTRTRI FORTRAN_ID2( ctrtri, CTRTRI ) 669 #define LAPACK_ZTRTRI FORTRAN_ID2( ztrtri, ZTRTRI ) 670 671 // Value-type variants of trtrs 672 #define LAPACK_STRTRS FORTRAN_ID2( strtrs, STRTRS ) 673 #define LAPACK_DTRTRS FORTRAN_ID2( dtrtrs, DTRTRS ) 674 #define LAPACK_CTRTRS FORTRAN_ID2( ctrtrs, CTRTRS ) 675 #define LAPACK_ZTRTRS FORTRAN_ID2( ztrtrs, ZTRTRS ) 676 677 // Value-type variants of hbtrd 678 #define LAPACK_CHBTRD FORTRAN_ID2( chbtrd, CHBTRD ) 679 #define LAPACK_ZHBTRD FORTRAN_ID2( zhbtrd, ZHBTRD ) 680 681 // Value-type variants of hetrd 682 #define LAPACK_CHETRD FORTRAN_ID2( chetrd, CHETRD ) 683 #define LAPACK_ZHETRD FORTRAN_ID2( zhetrd, ZHETRD ) 684 685 // Value-type variants of hptrd 686 #define LAPACK_CHPTRD FORTRAN_ID2( chptrd, CHPTRD ) 687 #define LAPACK_ZHPTRD FORTRAN_ID2( zhptrd, ZHPTRD ) 688 689 // Value-type variants of opgtr 690 #define LAPACK_SOPGTR FORTRAN_ID2( sopgtr, SOPGTR ) 691 #define LAPACK_DOPGTR FORTRAN_ID2( dopgtr, DOPGTR ) 692 693 // Value-type variants of opmtr 694 #define LAPACK_SOPMTR FORTRAN_ID2( sopmtr, SOPMTR ) 695 #define LAPACK_DOPMTR FORTRAN_ID2( dopmtr, DOPMTR ) 696 697 // Value-type variants of orgtr 698 #define LAPACK_SORGTR FORTRAN_ID2( sorgtr, SORGTR ) 699 #define LAPACK_DORGTR FORTRAN_ID2( dorgtr, DORGTR ) 700 701 // Value-type variants of ormtr 702 #define LAPACK_SORMTR FORTRAN_ID2( sormtr, SORMTR ) 703 #define LAPACK_DORMTR FORTRAN_ID2( dormtr, DORMTR ) 704 705 // Value-type variants of pteqr 706 #define LAPACK_SPTEQR FORTRAN_ID2( spteqr, SPTEQR ) 707 #define LAPACK_DPTEQR FORTRAN_ID2( dpteqr, DPTEQR ) 708 #define LAPACK_CPTEQR FORTRAN_ID2( cpteqr, CPTEQR ) 709 #define LAPACK_ZPTEQR FORTRAN_ID2( zpteqr, ZPTEQR ) 710 711 // Value-type variants of sbtrd 712 #define LAPACK_SSBTRD FORTRAN_ID2( ssbtrd, SSBTRD ) 713 #define LAPACK_DSBTRD FORTRAN_ID2( dsbtrd, DSBTRD ) 714 715 // Value-type variants of sptrd 716 #define LAPACK_SSPTRD FORTRAN_ID2( ssptrd, SSPTRD ) 717 #define LAPACK_DSPTRD FORTRAN_ID2( dsptrd, DSPTRD ) 718 719 // Value-type variants of stebz 720 #define LAPACK_SSTEBZ FORTRAN_ID2( sstebz, SSTEBZ ) 721 #define LAPACK_DSTEBZ FORTRAN_ID2( dstebz, DSTEBZ ) 722 723 // Value-type variants of stedc 724 #define LAPACK_SSTEDC FORTRAN_ID2( sstedc, SSTEDC ) 725 #define LAPACK_DSTEDC FORTRAN_ID2( dstedc, DSTEDC ) 726 #define LAPACK_CSTEDC FORTRAN_ID2( cstedc, CSTEDC ) 727 #define LAPACK_ZSTEDC FORTRAN_ID2( zstedc, ZSTEDC ) 728 729 // Value-type variants of stegr 730 #define LAPACK_SSTEGR FORTRAN_ID2( sstegr, SSTEGR ) 731 #define LAPACK_DSTEGR FORTRAN_ID2( dstegr, DSTEGR ) 732 #define LAPACK_CSTEGR FORTRAN_ID2( cstegr, CSTEGR ) 733 #define LAPACK_ZSTEGR FORTRAN_ID2( zstegr, ZSTEGR ) 734 735 // Value-type variants of stein 736 #define LAPACK_SSTEIN FORTRAN_ID2( sstein, SSTEIN ) 737 #define LAPACK_DSTEIN FORTRAN_ID2( dstein, DSTEIN ) 738 #define LAPACK_CSTEIN FORTRAN_ID2( cstein, CSTEIN ) 739 #define LAPACK_ZSTEIN FORTRAN_ID2( zstein, ZSTEIN ) 740 741 // Value-type variants of stemr 742 #define LAPACK_SSTEMR FORTRAN_ID2( sstemr, SSTEMR ) 743 #define LAPACK_DSTEMR FORTRAN_ID2( dstemr, DSTEMR ) 744 #define LAPACK_CSTEMR FORTRAN_ID2( cstemr, CSTEMR ) 745 #define LAPACK_ZSTEMR FORTRAN_ID2( zstemr, ZSTEMR ) 746 747 // Value-type variants of steqr 748 #define LAPACK_SSTEQR FORTRAN_ID2( ssteqr, SSTEQR ) 749 #define LAPACK_DSTEQR FORTRAN_ID2( dsteqr, DSTEQR ) 750 #define LAPACK_CSTEQR FORTRAN_ID2( csteqr, CSTEQR ) 751 #define LAPACK_ZSTEQR FORTRAN_ID2( zsteqr, ZSTEQR ) 752 753 // Value-type variants of sterf 754 #define LAPACK_SSTERF FORTRAN_ID2( ssterf, SSTERF ) 755 #define LAPACK_DSTERF FORTRAN_ID2( dsterf, DSTERF ) 756 757 // Value-type variants of sytrd 758 #define LAPACK_SSYTRD FORTRAN_ID2( ssytrd, SSYTRD ) 759 #define LAPACK_DSYTRD FORTRAN_ID2( dsytrd, DSYTRD ) 760 761 // Value-type variants of ungtr 762 #define LAPACK_CUNGTR FORTRAN_ID2( cungtr, CUNGTR ) 763 #define LAPACK_ZUNGTR FORTRAN_ID2( zungtr, ZUNGTR ) 764 765 // Value-type variants of unmtr 766 #define LAPACK_CUNMTR FORTRAN_ID2( cunmtr, CUNMTR ) 767 #define LAPACK_ZUNMTR FORTRAN_ID2( zunmtr, ZUNMTR ) 768 769 // Value-type variants of upgtr 770 #define LAPACK_CUPGTR FORTRAN_ID2( cupgtr, CUPGTR ) 771 #define LAPACK_ZUPGTR FORTRAN_ID2( zupgtr, ZUPGTR ) 772 773 // Value-type variants of upmtr 774 #define LAPACK_CUPMTR FORTRAN_ID2( cupmtr, CUPMTR ) 775 #define LAPACK_ZUPMTR FORTRAN_ID2( zupmtr, ZUPMTR ) 776 777 // Value-type variants of ggbak 778 #define LAPACK_SGGBAK FORTRAN_ID2( sggbak, SGGBAK ) 779 #define LAPACK_DGGBAK FORTRAN_ID2( dggbak, DGGBAK ) 780 #define LAPACK_CGGBAK FORTRAN_ID2( cggbak, CGGBAK ) 781 #define LAPACK_ZGGBAK FORTRAN_ID2( zggbak, ZGGBAK ) 782 783 // Value-type variants of ggbal 784 #define LAPACK_SGGBAL FORTRAN_ID2( sggbal, SGGBAL ) 785 #define LAPACK_DGGBAL FORTRAN_ID2( dggbal, DGGBAL ) 786 #define LAPACK_CGGBAL FORTRAN_ID2( cggbal, CGGBAL ) 787 #define LAPACK_ZGGBAL FORTRAN_ID2( zggbal, ZGGBAL ) 788 789 // Value-type variants of gghrd 790 #define LAPACK_SGGHRD FORTRAN_ID2( sgghrd, SGGHRD ) 791 #define LAPACK_DGGHRD FORTRAN_ID2( dgghrd, DGGHRD ) 792 #define LAPACK_CGGHRD FORTRAN_ID2( cgghrd, CGGHRD ) 793 #define LAPACK_ZGGHRD FORTRAN_ID2( zgghrd, ZGGHRD ) 794 795 // Value-type variants of hgeqz 796 #define LAPACK_SHGEQZ FORTRAN_ID2( shgeqz, SHGEQZ ) 797 #define LAPACK_DHGEQZ FORTRAN_ID2( dhgeqz, DHGEQZ ) 798 #define LAPACK_CHGEQZ FORTRAN_ID2( chgeqz, CHGEQZ ) 799 #define LAPACK_ZHGEQZ FORTRAN_ID2( zhgeqz, ZHGEQZ ) 800 801 // Value-type variants of tgevc 802 #define LAPACK_STGEVC FORTRAN_ID2( stgevc, STGEVC ) 803 #define LAPACK_DTGEVC FORTRAN_ID2( dtgevc, DTGEVC ) 804 #define LAPACK_CTGEVC FORTRAN_ID2( ctgevc, CTGEVC ) 805 #define LAPACK_ZTGEVC FORTRAN_ID2( ztgevc, ZTGEVC ) 806 807 // Value-type variants of tgexc 808 #define LAPACK_STGEXC FORTRAN_ID2( stgexc, STGEXC ) 809 #define LAPACK_DTGEXC FORTRAN_ID2( dtgexc, DTGEXC ) 810 #define LAPACK_CTGEXC FORTRAN_ID2( ctgexc, CTGEXC ) 811 #define LAPACK_ZTGEXC FORTRAN_ID2( ztgexc, ZTGEXC ) 812 813 // Value-type variants of tgsen 814 #define LAPACK_STGSEN FORTRAN_ID2( stgsen, STGSEN ) 815 #define LAPACK_DTGSEN FORTRAN_ID2( dtgsen, DTGSEN ) 816 #define LAPACK_CTGSEN FORTRAN_ID2( ctgsen, CTGSEN ) 817 #define LAPACK_ZTGSEN FORTRAN_ID2( ztgsen, ZTGSEN ) 818 819 // Value-type variants of tgsna 820 #define LAPACK_STGSNA FORTRAN_ID2( stgsna, STGSNA ) 821 #define LAPACK_DTGSNA FORTRAN_ID2( dtgsna, DTGSNA ) 822 #define LAPACK_CTGSNA FORTRAN_ID2( ctgsna, CTGSNA ) 823 #define LAPACK_ZTGSNA FORTRAN_ID2( ztgsna, ZTGSNA ) 824 825 // Value-type variants of tgsyl 826 #define LAPACK_STGSYL FORTRAN_ID2( stgsyl, STGSYL ) 827 #define LAPACK_DTGSYL FORTRAN_ID2( dtgsyl, DTGSYL ) 828 #define LAPACK_CTGSYL FORTRAN_ID2( ctgsyl, CTGSYL ) 829 #define LAPACK_ZTGSYL FORTRAN_ID2( ztgsyl, ZTGSYL ) 830 831 // Value-type variants of ggsvp 832 #define LAPACK_SGGSVP FORTRAN_ID2( sggsvp, SGGSVP ) 833 #define LAPACK_DGGSVP FORTRAN_ID2( dggsvp, DGGSVP ) 834 #define LAPACK_CGGSVP FORTRAN_ID2( cggsvp, CGGSVP ) 835 #define LAPACK_ZGGSVP FORTRAN_ID2( zggsvp, ZGGSVP ) 836 837 // Value-type variants of tgsja 838 #define LAPACK_STGSJA FORTRAN_ID2( stgsja, STGSJA ) 839 #define LAPACK_DTGSJA FORTRAN_ID2( dtgsja, DTGSJA ) 840 #define LAPACK_CTGSJA FORTRAN_ID2( ctgsja, CTGSJA ) 841 #define LAPACK_ZTGSJA FORTRAN_ID2( ztgsja, ZTGSJA ) 842 843 // 844 // LAPACK driver routines 845 // 846 847 // Value-type variants of gegv 848 #define LAPACK_SGEGV FORTRAN_ID2( sgegv, SGEGV ) 849 #define LAPACK_DGEGV FORTRAN_ID2( dgegv, DGEGV ) 850 #define LAPACK_CGEGV FORTRAN_ID2( cgegv, CGEGV ) 851 #define LAPACK_ZGEGV FORTRAN_ID2( zgegv, ZGEGV ) 852 853 // Value-type variants of gges 854 #define LAPACK_SGGES FORTRAN_ID2( sgges, SGGES ) 855 #define LAPACK_DGGES FORTRAN_ID2( dgges, DGGES ) 856 #define LAPACK_CGGES FORTRAN_ID2( cgges, CGGES ) 857 #define LAPACK_ZGGES FORTRAN_ID2( zgges, ZGGES ) 858 859 // Value-type variants of ggesx 860 #define LAPACK_SGGESX FORTRAN_ID2( sggesx, SGGESX ) 861 #define LAPACK_DGGESX FORTRAN_ID2( dggesx, DGGESX ) 862 #define LAPACK_CGGESX FORTRAN_ID2( cggesx, CGGESX ) 863 #define LAPACK_ZGGESX FORTRAN_ID2( zggesx, ZGGESX ) 864 865 // Value-type variants of ggev 866 #define LAPACK_SGGEV FORTRAN_ID2( sggev, SGGEV ) 867 #define LAPACK_DGGEV FORTRAN_ID2( dggev, DGGEV ) 868 #define LAPACK_CGGEV FORTRAN_ID2( cggev, CGGEV ) 869 #define LAPACK_ZGGEV FORTRAN_ID2( zggev, ZGGEV ) 870 871 // Value-type variants of ggevx 872 #define LAPACK_SGGEVX FORTRAN_ID2( sggevx, SGGEVX ) 873 #define LAPACK_DGGEVX FORTRAN_ID2( dggevx, DGGEVX ) 874 #define LAPACK_CGGEVX FORTRAN_ID2( cggevx, CGGEVX ) 875 #define LAPACK_ZGGEVX FORTRAN_ID2( zggevx, ZGGEVX ) 876 877 // Value-type variants of ggsvd 878 #define LAPACK_SGGSVD FORTRAN_ID2( sggsvd, SGGSVD ) 879 #define LAPACK_DGGSVD FORTRAN_ID2( dggsvd, DGGSVD ) 880 #define LAPACK_CGGSVD FORTRAN_ID2( cggsvd, CGGSVD ) 881 #define LAPACK_ZGGSVD FORTRAN_ID2( zggsvd, ZGGSVD ) 882 883 // Value-type variants of hbgv 884 #define LAPACK_CHBGV FORTRAN_ID2( chbgv, CHBGV ) 885 #define LAPACK_ZHBGV FORTRAN_ID2( zhbgv, ZHBGV ) 886 887 // Value-type variants of hbgvd 888 #define LAPACK_CHBGVD FORTRAN_ID2( chbgvd, CHBGVD ) 889 #define LAPACK_ZHBGVD FORTRAN_ID2( zhbgvd, ZHBGVD ) 890 891 // Value-type variants of hbgvx 892 #define LAPACK_CHBGVX FORTRAN_ID2( chbgvx, CHBGVX ) 893 #define LAPACK_ZHBGVX FORTRAN_ID2( zhbgvx, ZHBGVX ) 894 895 // Value-type variants of hegv 896 #define LAPACK_CHEGV FORTRAN_ID2( chegv, CHEGV ) 897 #define LAPACK_ZHEGV FORTRAN_ID2( zhegv, ZHEGV ) 898 899 // Value-type variants of hegvd 900 #define LAPACK_CHEGVD FORTRAN_ID2( chegvd, CHEGVD ) 901 #define LAPACK_ZHEGVD FORTRAN_ID2( zhegvd, ZHEGVD ) 902 903 // Value-type variants of hegvx 904 #define LAPACK_CHEGVX FORTRAN_ID2( chegvx, CHEGVX ) 905 #define LAPACK_ZHEGVX FORTRAN_ID2( zhegvx, ZHEGVX ) 906 907 // Value-type variants of hpgv 908 #define LAPACK_CHPGV FORTRAN_ID2( chpgv, CHPGV ) 909 #define LAPACK_ZHPGV FORTRAN_ID2( zhpgv, ZHPGV ) 910 911 // Value-type variants of hpgvd 912 #define LAPACK_CHPGVD FORTRAN_ID2( chpgvd, CHPGVD ) 913 #define LAPACK_ZHPGVD FORTRAN_ID2( zhpgvd, ZHPGVD ) 914 915 // Value-type variants of hpgvx 916 #define LAPACK_CHPGVX FORTRAN_ID2( chpgvx, CHPGVX ) 917 #define LAPACK_ZHPGVX FORTRAN_ID2( zhpgvx, ZHPGVX ) 918 919 // Value-type variants of sbgv 920 #define LAPACK_SSBGV FORTRAN_ID2( ssbgv, SSBGV ) 921 #define LAPACK_DSBGV FORTRAN_ID2( dsbgv, DSBGV ) 922 923 // Value-type variants of sbgvd 924 #define LAPACK_SSBGVD FORTRAN_ID2( ssbgvd, SSBGVD ) 925 #define LAPACK_DSBGVD FORTRAN_ID2( dsbgvd, DSBGVD ) 926 927 // Value-type variants of sbgvx 928 #define LAPACK_SSBGVX FORTRAN_ID2( ssbgvx, SSBGVX ) 929 #define LAPACK_DSBGVX FORTRAN_ID2( dsbgvx, DSBGVX ) 930 931 // Value-type variants of spgv 932 #define LAPACK_SSPGV FORTRAN_ID2( sspgv, SSPGV ) 933 #define LAPACK_DSPGV FORTRAN_ID2( dspgv, DSPGV ) 934 935 // Value-type variants of spgvd 936 #define LAPACK_SSPGVD FORTRAN_ID2( sspgvd, SSPGVD ) 937 #define LAPACK_DSPGVD FORTRAN_ID2( dspgvd, DSPGVD ) 938 939 // Value-type variants of spgvx 940 #define LAPACK_SSPGVX FORTRAN_ID2( sspgvx, SSPGVX ) 941 #define LAPACK_DSPGVX FORTRAN_ID2( dspgvx, DSPGVX ) 942 943 // Value-type variants of sygv 944 #define LAPACK_SSYGV FORTRAN_ID2( ssygv, SSYGV ) 945 #define LAPACK_DSYGV FORTRAN_ID2( dsygv, DSYGV ) 946 947 // Value-type variants of sygvd 948 #define LAPACK_SSYGVD FORTRAN_ID2( ssygvd, SSYGVD ) 949 #define LAPACK_DSYGVD FORTRAN_ID2( dsygvd, DSYGVD ) 950 951 // Value-type variants of sygvx 952 #define LAPACK_SSYGVX FORTRAN_ID2( ssygvx, SSYGVX ) 953 #define LAPACK_DSYGVX FORTRAN_ID2( dsygvx, DSYGVX ) 954 955 // Value-type variants of ggglm 956 #define LAPACK_SGGGLM FORTRAN_ID2( sggglm, SGGGLM ) 957 #define LAPACK_DGGGLM FORTRAN_ID2( dggglm, DGGGLM ) 958 #define LAPACK_CGGGLM FORTRAN_ID2( cggglm, CGGGLM ) 959 #define LAPACK_ZGGGLM FORTRAN_ID2( zggglm, ZGGGLM ) 960 961 // Value-type variants of gglse 962 #define LAPACK_SGGLSE FORTRAN_ID2( sgglse, SGGLSE ) 963 #define LAPACK_DGGLSE FORTRAN_ID2( dgglse, DGGLSE ) 964 #define LAPACK_CGGLSE FORTRAN_ID2( cgglse, CGGLSE ) 965 #define LAPACK_ZGGLSE FORTRAN_ID2( zgglse, ZGGLSE ) 966 967 // Value-type variants of gbsv 968 #define LAPACK_SGBSV FORTRAN_ID2( sgbsv, SGBSV ) 969 #define LAPACK_DGBSV FORTRAN_ID2( dgbsv, DGBSV ) 970 #define LAPACK_CGBSV FORTRAN_ID2( cgbsv, CGBSV ) 971 #define LAPACK_ZGBSV FORTRAN_ID2( zgbsv, ZGBSV ) 972 973 // Value-type variants of gbsvx 974 #define LAPACK_SGBSVX FORTRAN_ID2( sgbsvx, SGBSVX ) 975 #define LAPACK_DGBSVX FORTRAN_ID2( dgbsvx, DGBSVX ) 976 #define LAPACK_CGBSVX FORTRAN_ID2( cgbsvx, CGBSVX ) 977 #define LAPACK_ZGBSVX FORTRAN_ID2( zgbsvx, ZGBSVX ) 978 979 // Value-type variants of gejsv 980 #define LAPACK_SGEJSV FORTRAN_ID2( sgejsv, SGEJSV ) 981 #define LAPACK_DGEJSV FORTRAN_ID2( dgejsv, DGEJSV ) 982 983 // Value-type variants of gesv 984 #define LAPACK_SGESV FORTRAN_ID2( sgesv, SGESV ) 985 #define LAPACK_DGESV FORTRAN_ID2( dgesv, DGESV ) 986 #define LAPACK_CGESV FORTRAN_ID2( cgesv, CGESV ) 987 #define LAPACK_ZGESV FORTRAN_ID2( zgesv, ZGESV ) 988 989 // Value-type variants of gesvx 990 #define LAPACK_SGESVX FORTRAN_ID2( sgesvx, SGESVX ) 991 #define LAPACK_DGESVX FORTRAN_ID2( dgesvx, DGESVX ) 992 #define LAPACK_CGESVX FORTRAN_ID2( cgesvx, CGESVX ) 993 #define LAPACK_ZGESVX FORTRAN_ID2( zgesvx, ZGESVX ) 994 995 // Value-type variants of gtsv 996 #define LAPACK_SGTSV FORTRAN_ID2( sgtsv, SGTSV ) 997 #define LAPACK_DGTSV FORTRAN_ID2( dgtsv, DGTSV ) 998 #define LAPACK_CGTSV FORTRAN_ID2( cgtsv, CGTSV ) 999 #define LAPACK_ZGTSV FORTRAN_ID2( zgtsv, ZGTSV ) 1000 1001 // Value-type variants of gtsvx 1002 #define LAPACK_SGTSVX FORTRAN_ID2( sgtsvx, SGTSVX ) 1003 #define LAPACK_DGTSVX FORTRAN_ID2( dgtsvx, DGTSVX ) 1004 #define LAPACK_CGTSVX FORTRAN_ID2( cgtsvx, CGTSVX ) 1005 #define LAPACK_ZGTSVX FORTRAN_ID2( zgtsvx, ZGTSVX ) 1006 1007 // Value-type variants of hesv 1008 #define LAPACK_CHESV FORTRAN_ID2( chesv, CHESV ) 1009 #define LAPACK_ZHESV FORTRAN_ID2( zhesv, ZHESV ) 1010 1011 // Value-type variants of hesvx 1012 #define LAPACK_CHESVX FORTRAN_ID2( chesvx, CHESVX ) 1013 #define LAPACK_ZHESVX FORTRAN_ID2( zhesvx, ZHESVX ) 1014 1015 // Value-type variants of hpsv 1016 #define LAPACK_CHPSV FORTRAN_ID2( chpsv, CHPSV ) 1017 #define LAPACK_ZHPSV FORTRAN_ID2( zhpsv, ZHPSV ) 1018 1019 // Value-type variants of hpsvx 1020 #define LAPACK_CHPSVX FORTRAN_ID2( chpsvx, CHPSVX ) 1021 #define LAPACK_ZHPSVX FORTRAN_ID2( zhpsvx, ZHPSVX ) 1022 1023 // Value-type variants of iter_gesv 1024 #define LAPACK_DSGESV FORTRAN_ID2( dsgesv, DSGESV ) 1025 #define LAPACK_ZCGESV FORTRAN_ID2( zcgesv, ZCGESV ) 1026 1027 // Value-type variants of iter_posv 1028 #define LAPACK_DSPOSV FORTRAN_ID2( dsposv, DSPOSV ) 1029 #define LAPACK_ZCPOSV FORTRAN_ID2( zcposv, ZCPOSV ) 1030 1031 // Value-type variants of pbsv 1032 #define LAPACK_SPBSV FORTRAN_ID2( spbsv, SPBSV ) 1033 #define LAPACK_DPBSV FORTRAN_ID2( dpbsv, DPBSV ) 1034 #define LAPACK_CPBSV FORTRAN_ID2( cpbsv, CPBSV ) 1035 #define LAPACK_ZPBSV FORTRAN_ID2( zpbsv, ZPBSV ) 1036 1037 // Value-type variants of pbsvx 1038 #define LAPACK_SPBSVX FORTRAN_ID2( spbsvx, SPBSVX ) 1039 #define LAPACK_DPBSVX FORTRAN_ID2( dpbsvx, DPBSVX ) 1040 #define LAPACK_CPBSVX FORTRAN_ID2( cpbsvx, CPBSVX ) 1041 #define LAPACK_ZPBSVX FORTRAN_ID2( zpbsvx, ZPBSVX ) 1042 1043 // Value-type variants of posv 1044 #define LAPACK_SPOSV FORTRAN_ID2( sposv, SPOSV ) 1045 #define LAPACK_DPOSV FORTRAN_ID2( dposv, DPOSV ) 1046 #define LAPACK_CPOSV FORTRAN_ID2( cposv, CPOSV ) 1047 #define LAPACK_ZPOSV FORTRAN_ID2( zposv, ZPOSV ) 1048 1049 // Value-type variants of posvx 1050 #define LAPACK_SPOSVX FORTRAN_ID2( sposvx, SPOSVX ) 1051 #define LAPACK_DPOSVX FORTRAN_ID2( dposvx, DPOSVX ) 1052 #define LAPACK_CPOSVX FORTRAN_ID2( cposvx, CPOSVX ) 1053 #define LAPACK_ZPOSVX FORTRAN_ID2( zposvx, ZPOSVX ) 1054 1055 // Value-type variants of ppsv 1056 #define LAPACK_SPPSV FORTRAN_ID2( sppsv, SPPSV ) 1057 #define LAPACK_DPPSV FORTRAN_ID2( dppsv, DPPSV ) 1058 #define LAPACK_CPPSV FORTRAN_ID2( cppsv, CPPSV ) 1059 #define LAPACK_ZPPSV FORTRAN_ID2( zppsv, ZPPSV ) 1060 1061 // Value-type variants of ppsvx 1062 #define LAPACK_SPPSVX FORTRAN_ID2( sppsvx, SPPSVX ) 1063 #define LAPACK_DPPSVX FORTRAN_ID2( dppsvx, DPPSVX ) 1064 #define LAPACK_CPPSVX FORTRAN_ID2( cppsvx, CPPSVX ) 1065 #define LAPACK_ZPPSVX FORTRAN_ID2( zppsvx, ZPPSVX ) 1066 1067 // Value-type variants of ptsv 1068 #define LAPACK_SPTSV FORTRAN_ID2( sptsv, SPTSV ) 1069 #define LAPACK_DPTSV FORTRAN_ID2( dptsv, DPTSV ) 1070 #define LAPACK_CPTSV FORTRAN_ID2( cptsv, CPTSV ) 1071 #define LAPACK_ZPTSV FORTRAN_ID2( zptsv, ZPTSV ) 1072 1073 // Value-type variants of ptsvx 1074 #define LAPACK_SPTSVX FORTRAN_ID2( sptsvx, SPTSVX ) 1075 #define LAPACK_DPTSVX FORTRAN_ID2( dptsvx, DPTSVX ) 1076 #define LAPACK_CPTSVX FORTRAN_ID2( cptsvx, CPTSVX ) 1077 #define LAPACK_ZPTSVX FORTRAN_ID2( zptsvx, ZPTSVX ) 1078 1079 // Value-type variants of spsv 1080 #define LAPACK_SSPSV FORTRAN_ID2( sspsv, SSPSV ) 1081 #define LAPACK_DSPSV FORTRAN_ID2( dspsv, DSPSV ) 1082 #define LAPACK_CSPSV FORTRAN_ID2( cspsv, CSPSV ) 1083 #define LAPACK_ZSPSV FORTRAN_ID2( zspsv, ZSPSV ) 1084 1085 // Value-type variants of spsvx 1086 #define LAPACK_SSPSVX FORTRAN_ID2( sspsvx, SSPSVX ) 1087 #define LAPACK_DSPSVX FORTRAN_ID2( dspsvx, DSPSVX ) 1088 #define LAPACK_CSPSVX FORTRAN_ID2( cspsvx, CSPSVX ) 1089 #define LAPACK_ZSPSVX FORTRAN_ID2( zspsvx, ZSPSVX ) 1090 1091 // Value-type variants of sysv 1092 #define LAPACK_SSYSV FORTRAN_ID2( ssysv, SSYSV ) 1093 #define LAPACK_DSYSV FORTRAN_ID2( dsysv, DSYSV ) 1094 #define LAPACK_CSYSV FORTRAN_ID2( csysv, CSYSV ) 1095 #define LAPACK_ZSYSV FORTRAN_ID2( zsysv, ZSYSV ) 1096 1097 // Value-type variants of sysvx 1098 #define LAPACK_SSYSVX FORTRAN_ID2( ssysvx, SSYSVX ) 1099 #define LAPACK_DSYSVX FORTRAN_ID2( dsysvx, DSYSVX ) 1100 #define LAPACK_CSYSVX FORTRAN_ID2( csysvx, CSYSVX ) 1101 #define LAPACK_ZSYSVX FORTRAN_ID2( zsysvx, ZSYSVX ) 1102 1103 // Value-type variants of gees 1104 #define LAPACK_SGEES FORTRAN_ID2( sgees, SGEES ) 1105 #define LAPACK_DGEES FORTRAN_ID2( dgees, DGEES ) 1106 #define LAPACK_CGEES FORTRAN_ID2( cgees, CGEES ) 1107 #define LAPACK_ZGEES FORTRAN_ID2( zgees, ZGEES ) 1108 1109 // Value-type variants of geesx 1110 #define LAPACK_SGEESX FORTRAN_ID2( sgeesx, SGEESX ) 1111 #define LAPACK_DGEESX FORTRAN_ID2( dgeesx, DGEESX ) 1112 #define LAPACK_CGEESX FORTRAN_ID2( cgeesx, CGEESX ) 1113 #define LAPACK_ZGEESX FORTRAN_ID2( zgeesx, ZGEESX ) 1114 1115 // Value-type variants of geev 1116 #define LAPACK_SGEEV FORTRAN_ID2( sgeev, SGEEV ) 1117 #define LAPACK_DGEEV FORTRAN_ID2( dgeev, DGEEV ) 1118 #define LAPACK_CGEEV FORTRAN_ID2( cgeev, CGEEV ) 1119 #define LAPACK_ZGEEV FORTRAN_ID2( zgeev, ZGEEV ) 1120 1121 // Value-type variants of geevx 1122 #define LAPACK_SGEEVX FORTRAN_ID2( sgeevx, SGEEVX ) 1123 #define LAPACK_DGEEVX FORTRAN_ID2( dgeevx, DGEEVX ) 1124 #define LAPACK_CGEEVX FORTRAN_ID2( cgeevx, CGEEVX ) 1125 #define LAPACK_ZGEEVX FORTRAN_ID2( zgeevx, ZGEEVX ) 1126 1127 // Value-type variants of gesdd 1128 #define LAPACK_SGESDD FORTRAN_ID2( sgesdd, SGESDD ) 1129 #define LAPACK_DGESDD FORTRAN_ID2( dgesdd, DGESDD ) 1130 #define LAPACK_CGESDD FORTRAN_ID2( cgesdd, CGESDD ) 1131 #define LAPACK_ZGESDD FORTRAN_ID2( zgesdd, ZGESDD ) 1132 1133 // Value-type variants of gesvd 1134 #define LAPACK_SGESVD FORTRAN_ID2( sgesvd, SGESVD ) 1135 #define LAPACK_DGESVD FORTRAN_ID2( dgesvd, DGESVD ) 1136 #define LAPACK_CGESVD FORTRAN_ID2( cgesvd, CGESVD ) 1137 #define LAPACK_ZGESVD FORTRAN_ID2( zgesvd, ZGESVD ) 1138 1139 // Value-type variants of hbev 1140 #define LAPACK_CHBEV FORTRAN_ID2( chbev, CHBEV ) 1141 #define LAPACK_ZHBEV FORTRAN_ID2( zhbev, ZHBEV ) 1142 1143 // Value-type variants of hbevd 1144 #define LAPACK_CHBEVD FORTRAN_ID2( chbevd, CHBEVD ) 1145 #define LAPACK_ZHBEVD FORTRAN_ID2( zhbevd, ZHBEVD ) 1146 1147 // Value-type variants of hbevx 1148 #define LAPACK_CHBEVX FORTRAN_ID2( chbevx, CHBEVX ) 1149 #define LAPACK_ZHBEVX FORTRAN_ID2( zhbevx, ZHBEVX ) 1150 1151 // Value-type variants of heev 1152 #define LAPACK_CHEEV FORTRAN_ID2( cheev, CHEEV ) 1153 #define LAPACK_ZHEEV FORTRAN_ID2( zheev, ZHEEV ) 1154 1155 // Value-type variants of heevd 1156 #define LAPACK_CHEEVD FORTRAN_ID2( cheevd, CHEEVD ) 1157 #define LAPACK_ZHEEVD FORTRAN_ID2( zheevd, ZHEEVD ) 1158 1159 // Value-type variants of heevr 1160 #define LAPACK_CHEEVR FORTRAN_ID2( cheevr, CHEEVR ) 1161 #define LAPACK_ZHEEVR FORTRAN_ID2( zheevr, ZHEEVR ) 1162 1163 // Value-type variants of heevx 1164 #define LAPACK_CHEEVX FORTRAN_ID2( cheevx, CHEEVX ) 1165 #define LAPACK_ZHEEVX FORTRAN_ID2( zheevx, ZHEEVX ) 1166 1167 // Value-type variants of hpev 1168 #define LAPACK_CHPEV FORTRAN_ID2( chpev, CHPEV ) 1169 #define LAPACK_ZHPEV FORTRAN_ID2( zhpev, ZHPEV ) 1170 1171 // Value-type variants of hpevd 1172 #define LAPACK_CHPEVD FORTRAN_ID2( chpevd, CHPEVD ) 1173 #define LAPACK_ZHPEVD FORTRAN_ID2( zhpevd, ZHPEVD ) 1174 1175 // Value-type variants of hpevx 1176 #define LAPACK_CHPEVX FORTRAN_ID2( chpevx, CHPEVX ) 1177 #define LAPACK_ZHPEVX FORTRAN_ID2( zhpevx, ZHPEVX ) 1178 1179 // Value-type variants of sbev 1180 #define LAPACK_SSBEV FORTRAN_ID2( ssbev, SSBEV ) 1181 #define LAPACK_DSBEV FORTRAN_ID2( dsbev, DSBEV ) 1182 1183 // Value-type variants of sbevd 1184 #define LAPACK_SSBEVD FORTRAN_ID2( ssbevd, SSBEVD ) 1185 #define LAPACK_DSBEVD FORTRAN_ID2( dsbevd, DSBEVD ) 1186 1187 // Value-type variants of sbevx 1188 #define LAPACK_SSBEVX FORTRAN_ID2( ssbevx, SSBEVX ) 1189 #define LAPACK_DSBEVX FORTRAN_ID2( dsbevx, DSBEVX ) 1190 1191 // Value-type variants of spev 1192 #define LAPACK_SSPEV FORTRAN_ID2( sspev, SSPEV ) 1193 #define LAPACK_DSPEV FORTRAN_ID2( dspev, DSPEV ) 1194 1195 // Value-type variants of spevd 1196 #define LAPACK_SSPEVD FORTRAN_ID2( sspevd, SSPEVD ) 1197 #define LAPACK_DSPEVD FORTRAN_ID2( dspevd, DSPEVD ) 1198 1199 // Value-type variants of spevx 1200 #define LAPACK_SSPEVX FORTRAN_ID2( sspevx, SSPEVX ) 1201 #define LAPACK_DSPEVX FORTRAN_ID2( dspevx, DSPEVX ) 1202 1203 // Value-type variants of stev 1204 #define LAPACK_SSTEV FORTRAN_ID2( sstev, SSTEV ) 1205 #define LAPACK_DSTEV FORTRAN_ID2( dstev, DSTEV ) 1206 1207 // Value-type variants of stevd 1208 #define LAPACK_SSTEVD FORTRAN_ID2( sstevd, SSTEVD ) 1209 #define LAPACK_DSTEVD FORTRAN_ID2( dstevd, DSTEVD ) 1210 1211 // Value-type variants of stevr 1212 #define LAPACK_SSTEVR FORTRAN_ID2( sstevr, SSTEVR ) 1213 #define LAPACK_DSTEVR FORTRAN_ID2( dstevr, DSTEVR ) 1214 1215 // Value-type variants of stevx 1216 #define LAPACK_SSTEVX FORTRAN_ID2( sstevx, SSTEVX ) 1217 #define LAPACK_DSTEVX FORTRAN_ID2( dstevx, DSTEVX ) 1218 1219 // Value-type variants of syev 1220 #define LAPACK_SSYEV FORTRAN_ID2( ssyev, SSYEV ) 1221 #define LAPACK_DSYEV FORTRAN_ID2( dsyev, DSYEV ) 1222 1223 // Value-type variants of syevd 1224 #define LAPACK_SSYEVD FORTRAN_ID2( ssyevd, SSYEVD ) 1225 #define LAPACK_DSYEVD FORTRAN_ID2( dsyevd, DSYEVD ) 1226 1227 // Value-type variants of syevr 1228 #define LAPACK_SSYEVR FORTRAN_ID2( ssyevr, SSYEVR ) 1229 #define LAPACK_DSYEVR FORTRAN_ID2( dsyevr, DSYEVR ) 1230 1231 // Value-type variants of syevx 1232 #define LAPACK_SSYEVX FORTRAN_ID2( ssyevx, SSYEVX ) 1233 #define LAPACK_DSYEVX FORTRAN_ID2( dsyevx, DSYEVX ) 1234 1235 // Value-type variants of gels 1236 #define LAPACK_SGELS FORTRAN_ID2( sgels, SGELS ) 1237 #define LAPACK_DGELS FORTRAN_ID2( dgels, DGELS ) 1238 #define LAPACK_CGELS FORTRAN_ID2( cgels, CGELS ) 1239 #define LAPACK_ZGELS FORTRAN_ID2( zgels, ZGELS ) 1240 1241 // Value-type variants of gelsd 1242 #define LAPACK_SGELSD FORTRAN_ID2( sgelsd, SGELSD ) 1243 #define LAPACK_DGELSD FORTRAN_ID2( dgelsd, DGELSD ) 1244 #define LAPACK_CGELSD FORTRAN_ID2( cgelsd, CGELSD ) 1245 #define LAPACK_ZGELSD FORTRAN_ID2( zgelsd, ZGELSD ) 1246 1247 // Value-type variants of gelss 1248 #define LAPACK_SGELSS FORTRAN_ID2( sgelss, SGELSS ) 1249 #define LAPACK_DGELSS FORTRAN_ID2( dgelss, DGELSS ) 1250 #define LAPACK_CGELSS FORTRAN_ID2( cgelss, CGELSS ) 1251 #define LAPACK_ZGELSS FORTRAN_ID2( zgelss, ZGELSS ) 1252 1253 // Value-type variants of gelsy 1254 #define LAPACK_SGELSY FORTRAN_ID2( sgelsy, SGELSY ) 1255 #define LAPACK_DGELSY FORTRAN_ID2( dgelsy, DGELSY ) 1256 #define LAPACK_CGELSY FORTRAN_ID2( cgelsy, CGELSY ) 1257 #define LAPACK_ZGELSY FORTRAN_ID2( zgelsy, ZGELSY ) 1258 1259 // 1260 // LAPACK auxiliary routines 1261 // 1262 1263 // Value-type variants of larf 1264 #define LAPACK_SLARF FORTRAN_ID2( slarf, SLARF ) 1265 #define LAPACK_DLARF FORTRAN_ID2( dlarf, DLARF ) 1266 #define LAPACK_CLARF FORTRAN_ID2( clarf, CLARF ) 1267 #define LAPACK_ZLARF FORTRAN_ID2( zlarf, ZLARF ) 1268 1269 // Value-type variants of larfb 1270 #define LAPACK_SLARFB FORTRAN_ID2( slarfb, SLARFB ) 1271 #define LAPACK_DLARFB FORTRAN_ID2( dlarfb, DLARFB ) 1272 #define LAPACK_CLARFB FORTRAN_ID2( clarfb, CLARFB ) 1273 #define LAPACK_ZLARFB FORTRAN_ID2( zlarfb, ZLARFB ) 1274 1275 // Value-type variants of larfg 1276 #define LAPACK_SLARFG FORTRAN_ID2( slarfg, SLARFG ) 1277 #define LAPACK_DLARFG FORTRAN_ID2( dlarfg, DLARFG ) 1278 #define LAPACK_CLARFG FORTRAN_ID2( clarfg, CLARFG ) 1279 #define LAPACK_ZLARFG FORTRAN_ID2( zlarfg, ZLARFG ) 1280 1281 // Value-type variants of larft 1282 #define LAPACK_SLARFT FORTRAN_ID2( slarft, SLARFT ) 1283 #define LAPACK_DLARFT FORTRAN_ID2( dlarft, DLARFT ) 1284 #define LAPACK_CLARFT FORTRAN_ID2( clarft, CLARFT ) 1285 #define LAPACK_ZLARFT FORTRAN_ID2( zlarft, ZLARFT ) 1286 1287 // Value-type variants of larfx 1288 #define LAPACK_SLARFX FORTRAN_ID2( slarfx, SLARFX ) 1289 #define LAPACK_DLARFX FORTRAN_ID2( dlarfx, DLARFX ) 1290 #define LAPACK_CLARFX FORTRAN_ID2( clarfx, CLARFX ) 1291 #define LAPACK_ZLARFX FORTRAN_ID2( zlarfx, ZLARFX ) 1292 1293 // Value-type variants of largv 1294 #define LAPACK_SLARGV FORTRAN_ID2( slargv, SLARGV ) 1295 #define LAPACK_DLARGV FORTRAN_ID2( dlargv, DLARGV ) 1296 #define LAPACK_CLARGV FORTRAN_ID2( clargv, CLARGV ) 1297 #define LAPACK_ZLARGV FORTRAN_ID2( zlargv, ZLARGV ) 1298 1299 // Value-type variants of larnv 1300 #define LAPACK_SLARNV FORTRAN_ID2( slarnv, SLARNV ) 1301 #define LAPACK_DLARNV FORTRAN_ID2( dlarnv, DLARNV ) 1302 #define LAPACK_CLARNV FORTRAN_ID2( clarnv, CLARNV ) 1303 #define LAPACK_ZLARNV FORTRAN_ID2( zlarnv, ZLARNV ) 1304 1305 // Value-type variants of larrb 1306 #define LAPACK_SLARRB FORTRAN_ID2( slarrb, SLARRB ) 1307 #define LAPACK_DLARRB FORTRAN_ID2( dlarrb, DLARRB ) 1308 1309 // Value-type variants of larre 1310 #define LAPACK_SLARRE FORTRAN_ID2( slarre, SLARRE ) 1311 #define LAPACK_DLARRE FORTRAN_ID2( dlarre, DLARRE ) 1312 1313 // Value-type variants of langb 1314 #define LAPACK_SLANGB FORTRAN_ID2( slangb, SLANGB ) 1315 #define LAPACK_DLANGB FORTRAN_ID2( dlangb, DLANGB ) 1316 #define LAPACK_CLANGB FORTRAN_ID2( clangb, CLANGB ) 1317 #define LAPACK_ZLANGB FORTRAN_ID2( zlangb, ZLANGB ) 1318 1319 // Value-type variants of lange 1320 #define LAPACK_SLANGE FORTRAN_ID2( slange, SLANGE ) 1321 #define LAPACK_DLANGE FORTRAN_ID2( dlange, DLANGE ) 1322 #define LAPACK_CLANGE FORTRAN_ID2( clange, CLANGE ) 1323 #define LAPACK_ZLANGE FORTRAN_ID2( zlange, ZLANGE ) 1324 1325 // Value-type variants of lanhb 1326 #define LAPACK_CLANHB FORTRAN_ID2( clanhb, CLANHB ) 1327 #define LAPACK_ZLANHB FORTRAN_ID2( zlanhb, ZLANHB ) 1328 1329 // Value-type variants of lanhe 1330 #define LAPACK_CLANHE FORTRAN_ID2( clanhe, CLANHE ) 1331 #define LAPACK_ZLANHE FORTRAN_ID2( zlanhe, ZLANHE ) 1332 1333 // Value-type variants of lanhp 1334 #define LAPACK_CLANHP FORTRAN_ID2( clanhp, CLANHP ) 1335 #define LAPACK_ZLANHP FORTRAN_ID2( zlanhp, ZLANHP ) 1336 1337 // Value-type variants of lanhs 1338 #define LAPACK_SLANHS FORTRAN_ID2( slanhs, SLANHS ) 1339 #define LAPACK_DLANHS FORTRAN_ID2( dlanhs, DLANHS ) 1340 #define LAPACK_CLANHS FORTRAN_ID2( clanhs, CLANHS ) 1341 #define LAPACK_ZLANHS FORTRAN_ID2( zlanhs, ZLANHS ) 1342 1343 // Value-type variants of lansb 1344 #define LAPACK_SLANSB FORTRAN_ID2( slansb, SLANSB ) 1345 #define LAPACK_DLANSB FORTRAN_ID2( dlansb, DLANSB ) 1346 #define LAPACK_CLANSB FORTRAN_ID2( clansb, CLANSB ) 1347 #define LAPACK_ZLANSB FORTRAN_ID2( zlansb, ZLANSB ) 1348 1349 // Value-type variants of lansp 1350 #define LAPACK_SLANSP FORTRAN_ID2( slansp, SLANSP ) 1351 #define LAPACK_DLANSP FORTRAN_ID2( dlansp, DLANSP ) 1352 #define LAPACK_CLANSP FORTRAN_ID2( clansp, CLANSP ) 1353 #define LAPACK_ZLANSP FORTRAN_ID2( zlansp, ZLANSP ) 1354 1355 // Value-type variants of lansy 1356 #define LAPACK_SLANSY FORTRAN_ID2( slansy, SLANSY ) 1357 #define LAPACK_DLANSY FORTRAN_ID2( dlansy, DLANSY ) 1358 #define LAPACK_CLANSY FORTRAN_ID2( clansy, CLANSY ) 1359 #define LAPACK_ZLANSY FORTRAN_ID2( zlansy, ZLANSY ) 1360 1361 // Value-type variants of lantb 1362 #define LAPACK_SLANTB FORTRAN_ID2( slantb, SLANTB ) 1363 #define LAPACK_DLANTB FORTRAN_ID2( dlantb, DLANTB ) 1364 #define LAPACK_CLANTB FORTRAN_ID2( clantb, CLANTB ) 1365 #define LAPACK_ZLANTB FORTRAN_ID2( zlantb, ZLANTB ) 1366 1367 // Value-type variants of lantp 1368 #define LAPACK_SLANTP FORTRAN_ID2( slantp, SLANTP ) 1369 #define LAPACK_DLANTP FORTRAN_ID2( dlantp, DLANTP ) 1370 #define LAPACK_CLANTP FORTRAN_ID2( clantp, CLANTP ) 1371 #define LAPACK_ZLANTP FORTRAN_ID2( zlantp, ZLANTP ) 1372 1373 // Value-type variants of lantr 1374 #define LAPACK_SLANTR FORTRAN_ID2( slantr, SLANTR ) 1375 #define LAPACK_DLANTR FORTRAN_ID2( dlantr, DLANTR ) 1376 #define LAPACK_CLANTR FORTRAN_ID2( clantr, CLANTR ) 1377 #define LAPACK_ZLANTR FORTRAN_ID2( zlantr, ZLANTR ) 1378 1379 // Value-type variants of labrd 1380 #define LAPACK_SLABRD FORTRAN_ID2( slabrd, SLABRD ) 1381 #define LAPACK_DLABRD FORTRAN_ID2( dlabrd, DLABRD ) 1382 #define LAPACK_CLABRD FORTRAN_ID2( clabrd, CLABRD ) 1383 #define LAPACK_ZLABRD FORTRAN_ID2( zlabrd, ZLABRD ) 1384 1385 // Value-type variants of lacgv 1386 #define LAPACK_CLACGV FORTRAN_ID2( clacgv, CLACGV ) 1387 #define LAPACK_ZLACGV FORTRAN_ID2( zlacgv, ZLACGV ) 1388 1389 // Value-type variants of lacon 1390 #define LAPACK_SLACON FORTRAN_ID2( slacon, SLACON ) 1391 #define LAPACK_DLACON FORTRAN_ID2( dlacon, DLACON ) 1392 #define LAPACK_CLACON FORTRAN_ID2( clacon, CLACON ) 1393 #define LAPACK_ZLACON FORTRAN_ID2( zlacon, ZLACON ) 1394 1395 // Value-type variants of laebz 1396 #define LAPACK_SLAEBZ FORTRAN_ID2( slaebz, SLAEBZ ) 1397 #define LAPACK_DLAEBZ FORTRAN_ID2( dlaebz, DLAEBZ ) 1398 1399 // Value-type variants of lalsd 1400 #define LAPACK_SLALSD FORTRAN_ID2( slalsd, SLALSD ) 1401 #define LAPACK_DLALSD FORTRAN_ID2( dlalsd, DLALSD ) 1402 #define LAPACK_CLALSD FORTRAN_ID2( clalsd, CLALSD ) 1403 #define LAPACK_ZLALSD FORTRAN_ID2( zlalsd, ZLALSD ) 1404 1405 // Value-type variants of largv 1406 #define LAPACK_SLARGV FORTRAN_ID2( slargv, SLARGV ) 1407 #define LAPACK_DLARGV FORTRAN_ID2( dlargv, DLARGV ) 1408 #define LAPACK_CLARGV FORTRAN_ID2( clargv, CLARGV ) 1409 #define LAPACK_ZLARGV FORTRAN_ID2( zlargv, ZLARGV ) 1410 1411 // Value-type variants of larz 1412 #define LAPACK_SLARZ FORTRAN_ID2( slarz, SLARZ ) 1413 #define LAPACK_DLARZ FORTRAN_ID2( dlarz, DLARZ ) 1414 #define LAPACK_CLARZ FORTRAN_ID2( clarz, CLARZ ) 1415 #define LAPACK_ZLARZ FORTRAN_ID2( zlarz, ZLARZ ) 1416 1417 // Value-type variants of latrd 1418 #define LAPACK_SLATRD FORTRAN_ID2( slatrd, SLATRD ) 1419 #define LAPACK_DLATRD FORTRAN_ID2( dlatrd, DLATRD ) 1420 #define LAPACK_CLATRD FORTRAN_ID2( clatrd, CLATRD ) 1421 #define LAPACK_ZLATRD FORTRAN_ID2( zlatrd, ZLATRD ) 1422 1423 // Value-type variants of latrs 1424 #define LAPACK_SLATRS FORTRAN_ID2( slatrs, SLATRS ) 1425 #define LAPACK_DLATRS FORTRAN_ID2( dlatrs, DLATRS ) 1426 #define LAPACK_CLATRS FORTRAN_ID2( clatrs, CLATRS ) 1427 #define LAPACK_ZLATRS FORTRAN_ID2( zlatrs, ZLATRS ) 1428 1429 // Value-type variants of latrz 1430 #define LAPACK_SLATRZ FORTRAN_ID2( slatrz, SLATRZ ) 1431 #define LAPACK_DLATRZ FORTRAN_ID2( dlatrz, DLATRZ ) 1432 #define LAPACK_CLATRZ FORTRAN_ID2( clatrz, CLATRZ ) 1433 #define LAPACK_ZLATRZ FORTRAN_ID2( zlatrz, ZLATRZ ) 1434 1435 // 1436 // LAPACK auxiliary routines 1437 // 1438 1439 #define LAPACK_ILAENV FORTRAN_ID2( ilaenv, ILAENV ) 1440 1441 #endif 1442 1443