You can not select more than 25 topics Topics must start with a chinese character,a letter or number, can include dashes ('-') and can be up to 35 characters long.

common_macro.h 83 kB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772
  1. /*********************************************************************/
  2. /* Copyright 2009, 2010 The University of Texas at Austin. */
  3. /* All rights reserved. */
  4. /* */
  5. /* Redistribution and use in source and binary forms, with or */
  6. /* without modification, are permitted provided that the following */
  7. /* conditions are met: */
  8. /* */
  9. /* 1. Redistributions of source code must retain the above */
  10. /* copyright notice, this list of conditions and the following */
  11. /* disclaimer. */
  12. /* */
  13. /* 2. Redistributions in binary form must reproduce the above */
  14. /* copyright notice, this list of conditions and the following */
  15. /* disclaimer in the documentation and/or other materials */
  16. /* provided with the distribution. */
  17. /* */
  18. /* THIS SOFTWARE IS PROVIDED BY THE UNIVERSITY OF TEXAS AT */
  19. /* AUSTIN ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, */
  20. /* INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF */
  21. /* MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE */
  22. /* DISCLAIMED. IN NO EVENT SHALL THE UNIVERSITY OF TEXAS AT */
  23. /* AUSTIN OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, */
  24. /* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES */
  25. /* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE */
  26. /* GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR */
  27. /* BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF */
  28. /* LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT */
  29. /* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT */
  30. /* OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE */
  31. /* POSSIBILITY OF SUCH DAMAGE. */
  32. /* */
  33. /* The views and conclusions contained in the software and */
  34. /* documentation are those of the authors and should not be */
  35. /* interpreted as representing official policies, either expressed */
  36. /* or implied, of The University of Texas at Austin. */
  37. /*********************************************************************/
  38. #ifndef COMMON_MACRO
  39. #define COMMON_MACRO
  40. #include "common_s.h"
  41. #include "common_d.h"
  42. #include "common_q.h"
  43. #include "common_c.h"
  44. #include "common_z.h"
  45. #include "common_x.h"
  46. #ifndef COMPLEX
  47. #ifdef XDOUBLE
  48. #define AMAX_K QAMAX_K
  49. #define AMIN_K QAMIN_K
  50. #define MAX_K QMAX_K
  51. #define MIN_K QMIN_K
  52. #define IAMAX_K IQAMAX_K
  53. #define IAMIN_K IQAMIN_K
  54. #define IMAX_K IQMAX_K
  55. #define IMIN_K IQMIN_K
  56. #define ASUM_K QASUM_K
  57. #define AXPYU_K QAXPYU_K
  58. #define AXPYC_K QAXPYC_K
  59. #define COPY_K QCOPY_K
  60. #define DOTU_K QDOTU_K
  61. #define DOTC_K QDOTC_K
  62. #define NRM2_K QNRM2_K
  63. #define SCAL_K QSCAL_K
  64. #define SWAP_K QSWAP_K
  65. #define ROT_K QROT_K
  66. #define GEMV_N QGEMV_N
  67. #define GEMV_T QGEMV_T
  68. #define GEMV_R QGEMV_R
  69. #define GEMV_C QGEMV_C
  70. #define GEMV_O QGEMV_O
  71. #define GEMV_U QGEMV_U
  72. #define GEMV_S QGEMV_S
  73. #define GEMV_D QGEMV_D
  74. #define GERU_K QGERU_K
  75. #define GERC_K QGERC_K
  76. #define GERV_K QGERV_K
  77. #define GERD_K QGERD_K
  78. #define SYMV_U QSYMV_U
  79. #define SYMV_L QSYMV_L
  80. #define SYMV_THREAD_U QSYMV_THREAD_U
  81. #define SYMV_THREAD_L QSYMV_THREAD_L
  82. #define GEMM_ONCOPY QGEMM_ONCOPY
  83. #define GEMM_OTCOPY QGEMM_OTCOPY
  84. #define GEMM_INCOPY QGEMM_INCOPY
  85. #define GEMM_ITCOPY QGEMM_ITCOPY
  86. #ifdef UNIT
  87. #define TRMM_OUNCOPY QTRMM_OUNUCOPY
  88. #define TRMM_OUTCOPY QTRMM_OUTUCOPY
  89. #define TRMM_OLNCOPY QTRMM_OLNUCOPY
  90. #define TRMM_OLTCOPY QTRMM_OLTUCOPY
  91. #define TRSM_OUNCOPY QTRSM_OUNUCOPY
  92. #define TRSM_OUTCOPY QTRSM_OUTUCOPY
  93. #define TRSM_OLNCOPY QTRSM_OLNUCOPY
  94. #define TRSM_OLTCOPY QTRSM_OLTUCOPY
  95. #define TRMM_IUNCOPY QTRMM_IUNUCOPY
  96. #define TRMM_IUTCOPY QTRMM_IUTUCOPY
  97. #define TRMM_ILNCOPY QTRMM_ILNUCOPY
  98. #define TRMM_ILTCOPY QTRMM_ILTUCOPY
  99. #define TRSM_IUNCOPY QTRSM_IUNUCOPY
  100. #define TRSM_IUTCOPY QTRSM_IUTUCOPY
  101. #define TRSM_ILNCOPY QTRSM_ILNUCOPY
  102. #define TRSM_ILTCOPY QTRSM_ILTUCOPY
  103. #else
  104. #define TRMM_OUNCOPY QTRMM_OUNNCOPY
  105. #define TRMM_OUTCOPY QTRMM_OUTNCOPY
  106. #define TRMM_OLNCOPY QTRMM_OLNNCOPY
  107. #define TRMM_OLTCOPY QTRMM_OLTNCOPY
  108. #define TRSM_OUNCOPY QTRSM_OUNNCOPY
  109. #define TRSM_OUTCOPY QTRSM_OUTNCOPY
  110. #define TRSM_OLNCOPY QTRSM_OLNNCOPY
  111. #define TRSM_OLTCOPY QTRSM_OLTNCOPY
  112. #define TRMM_IUNCOPY QTRMM_IUNNCOPY
  113. #define TRMM_IUTCOPY QTRMM_IUTNCOPY
  114. #define TRMM_ILNCOPY QTRMM_ILNNCOPY
  115. #define TRMM_ILTCOPY QTRMM_ILTNCOPY
  116. #define TRSM_IUNCOPY QTRSM_IUNNCOPY
  117. #define TRSM_IUTCOPY QTRSM_IUTNCOPY
  118. #define TRSM_ILNCOPY QTRSM_ILNNCOPY
  119. #define TRSM_ILTCOPY QTRSM_ILTNCOPY
  120. #endif
  121. #define GEMM_BETA QGEMM_BETA
  122. #define GEMM_KERNEL_N QGEMM_KERNEL
  123. #define GEMM_KERNEL_L QGEMM_KERNEL
  124. #define GEMM_KERNEL_R QGEMM_KERNEL
  125. #define GEMM_KERNEL_B QGEMM_KERNEL
  126. #define TRMM_KERNEL_LN QTRMM_KERNEL_LN
  127. #define TRMM_KERNEL_LT QTRMM_KERNEL_LT
  128. #define TRMM_KERNEL_LR QTRMM_KERNEL_LN
  129. #define TRMM_KERNEL_LC QTRMM_KERNEL_LT
  130. #define TRMM_KERNEL_RN QTRMM_KERNEL_RN
  131. #define TRMM_KERNEL_RT QTRMM_KERNEL_RT
  132. #define TRMM_KERNEL_RR QTRMM_KERNEL_RN
  133. #define TRMM_KERNEL_RC QTRMM_KERNEL_RT
  134. #define TRSM_KERNEL_LN QTRSM_KERNEL_LN
  135. #define TRSM_KERNEL_LT QTRSM_KERNEL_LT
  136. #define TRSM_KERNEL_LR QTRSM_KERNEL_LN
  137. #define TRSM_KERNEL_LC QTRSM_KERNEL_LT
  138. #define TRSM_KERNEL_RN QTRSM_KERNEL_RN
  139. #define TRSM_KERNEL_RT QTRSM_KERNEL_RT
  140. #define TRSM_KERNEL_RR QTRSM_KERNEL_RN
  141. #define TRSM_KERNEL_RC QTRSM_KERNEL_RT
  142. #define SYMM_IUTCOPY QSYMM_IUTCOPY
  143. #define SYMM_ILTCOPY QSYMM_ILTCOPY
  144. #define SYMM_OUTCOPY QSYMM_OUTCOPY
  145. #define SYMM_OLTCOPY QSYMM_OLTCOPY
  146. #define GEMM_NN QGEMM_NN
  147. #define GEMM_CN QGEMM_TN
  148. #define GEMM_TN QGEMM_TN
  149. #define GEMM_NC QGEMM_NT
  150. #define GEMM_NT QGEMM_NT
  151. #define GEMM_CC QGEMM_TT
  152. #define GEMM_CT QGEMM_TT
  153. #define GEMM_TC QGEMM_TT
  154. #define GEMM_TT QGEMM_TT
  155. #define GEMM_NR QGEMM_NN
  156. #define GEMM_TR QGEMM_TN
  157. #define GEMM_CR QGEMM_TN
  158. #define GEMM_RN QGEMM_NN
  159. #define GEMM_RT QGEMM_NT
  160. #define GEMM_RC QGEMM_NT
  161. #define GEMM_RR QGEMM_NN
  162. #define SYMM_LU QSYMM_LU
  163. #define SYMM_LL QSYMM_LL
  164. #define SYMM_RU QSYMM_RU
  165. #define SYMM_RL QSYMM_RL
  166. #define HEMM_LU QHEMM_LU
  167. #define HEMM_LL QHEMM_LL
  168. #define HEMM_RU QHEMM_RU
  169. #define HEMM_RL QHEMM_RL
  170. #define SYRK_UN QSYRK_UN
  171. #define SYRK_UT QSYRK_UT
  172. #define SYRK_LN QSYRK_LN
  173. #define SYRK_LT QSYRK_LT
  174. #define SYRK_UR QSYRK_UN
  175. #define SYRK_UC QSYRK_UT
  176. #define SYRK_LR QSYRK_LN
  177. #define SYRK_LC QSYRK_LT
  178. #define SYRK_KERNEL_U QSYRK_KERNEL_U
  179. #define SYRK_KERNEL_L QSYRK_KERNEL_L
  180. #define HERK_UN QSYRK_UN
  181. #define HERK_LN QSYRK_LN
  182. #define HERK_UC QSYRK_UT
  183. #define HERK_LC QSYRK_LT
  184. #define HER2K_UN QSYR2K_UN
  185. #define HER2K_LN QSYR2K_LN
  186. #define HER2K_UC QSYR2K_UT
  187. #define HER2K_LC QSYR2K_LT
  188. #define SYR2K_UN QSYR2K_UN
  189. #define SYR2K_UT QSYR2K_UT
  190. #define SYR2K_LN QSYR2K_LN
  191. #define SYR2K_LT QSYR2K_LT
  192. #define SYR2K_UR QSYR2K_UN
  193. #define SYR2K_UC QSYR2K_UT
  194. #define SYR2K_LR QSYR2K_LN
  195. #define SYR2K_LC QSYR2K_LT
  196. #define SYR2K_KERNEL_U QSYR2K_KERNEL_U
  197. #define SYR2K_KERNEL_L QSYR2K_KERNEL_L
  198. #define TRMM_LNUU QTRMM_LNUU
  199. #define TRMM_LNUN QTRMM_LNUN
  200. #define TRMM_LNLU QTRMM_LNLU
  201. #define TRMM_LNLN QTRMM_LNLN
  202. #define TRMM_LTUU QTRMM_LTUU
  203. #define TRMM_LTUN QTRMM_LTUN
  204. #define TRMM_LTLU QTRMM_LTLU
  205. #define TRMM_LTLN QTRMM_LTLN
  206. #define TRMM_LRUU QTRMM_LNUU
  207. #define TRMM_LRUN QTRMM_LNUN
  208. #define TRMM_LRLU QTRMM_LNLU
  209. #define TRMM_LRLN QTRMM_LNLN
  210. #define TRMM_LCUU QTRMM_LTUU
  211. #define TRMM_LCUN QTRMM_LTUN
  212. #define TRMM_LCLU QTRMM_LTLU
  213. #define TRMM_LCLN QTRMM_LTLN
  214. #define TRMM_RNUU QTRMM_RNUU
  215. #define TRMM_RNUN QTRMM_RNUN
  216. #define TRMM_RNLU QTRMM_RNLU
  217. #define TRMM_RNLN QTRMM_RNLN
  218. #define TRMM_RTUU QTRMM_RTUU
  219. #define TRMM_RTUN QTRMM_RTUN
  220. #define TRMM_RTLU QTRMM_RTLU
  221. #define TRMM_RTLN QTRMM_RTLN
  222. #define TRMM_RRUU QTRMM_RNUU
  223. #define TRMM_RRUN QTRMM_RNUN
  224. #define TRMM_RRLU QTRMM_RNLU
  225. #define TRMM_RRLN QTRMM_RNLN
  226. #define TRMM_RCUU QTRMM_RTUU
  227. #define TRMM_RCUN QTRMM_RTUN
  228. #define TRMM_RCLU QTRMM_RTLU
  229. #define TRMM_RCLN QTRMM_RTLN
  230. #define TRSM_LNUU QTRSM_LNUU
  231. #define TRSM_LNUN QTRSM_LNUN
  232. #define TRSM_LNLU QTRSM_LNLU
  233. #define TRSM_LNLN QTRSM_LNLN
  234. #define TRSM_LTUU QTRSM_LTUU
  235. #define TRSM_LTUN QTRSM_LTUN
  236. #define TRSM_LTLU QTRSM_LTLU
  237. #define TRSM_LTLN QTRSM_LTLN
  238. #define TRSM_LRUU QTRSM_LNUU
  239. #define TRSM_LRUN QTRSM_LNUN
  240. #define TRSM_LRLU QTRSM_LNLU
  241. #define TRSM_LRLN QTRSM_LNLN
  242. #define TRSM_LCUU QTRSM_LTUU
  243. #define TRSM_LCUN QTRSM_LTUN
  244. #define TRSM_LCLU QTRSM_LTLU
  245. #define TRSM_LCLN QTRSM_LTLN
  246. #define TRSM_RNUU QTRSM_RNUU
  247. #define TRSM_RNUN QTRSM_RNUN
  248. #define TRSM_RNLU QTRSM_RNLU
  249. #define TRSM_RNLN QTRSM_RNLN
  250. #define TRSM_RTUU QTRSM_RTUU
  251. #define TRSM_RTUN QTRSM_RTUN
  252. #define TRSM_RTLU QTRSM_RTLU
  253. #define TRSM_RTLN QTRSM_RTLN
  254. #define TRSM_RRUU QTRSM_RNUU
  255. #define TRSM_RRUN QTRSM_RNUN
  256. #define TRSM_RRLU QTRSM_RNLU
  257. #define TRSM_RRLN QTRSM_RNLN
  258. #define TRSM_RCUU QTRSM_RTUU
  259. #define TRSM_RCUN QTRSM_RTUN
  260. #define TRSM_RCLU QTRSM_RTLU
  261. #define TRSM_RCLN QTRSM_RTLN
  262. #define GEMM_THREAD_NN QGEMM_THREAD_NN
  263. #define GEMM_THREAD_CN QGEMM_THREAD_TN
  264. #define GEMM_THREAD_TN QGEMM_THREAD_TN
  265. #define GEMM_THREAD_NC QGEMM_THREAD_NT
  266. #define GEMM_THREAD_NT QGEMM_THREAD_NT
  267. #define GEMM_THREAD_CC QGEMM_THREAD_TT
  268. #define GEMM_THREAD_CT QGEMM_THREAD_TT
  269. #define GEMM_THREAD_TC QGEMM_THREAD_TT
  270. #define GEMM_THREAD_TT QGEMM_THREAD_TT
  271. #define GEMM_THREAD_NR QGEMM_THREAD_NN
  272. #define GEMM_THREAD_TR QGEMM_THREAD_TN
  273. #define GEMM_THREAD_CR QGEMM_THREAD_TN
  274. #define GEMM_THREAD_RN QGEMM_THREAD_NN
  275. #define GEMM_THREAD_RT QGEMM_THREAD_NT
  276. #define GEMM_THREAD_RC QGEMM_THREAD_NT
  277. #define GEMM_THREAD_RR QGEMM_THREAD_NN
  278. #define SYMM_THREAD_LU QSYMM_THREAD_LU
  279. #define SYMM_THREAD_LL QSYMM_THREAD_LL
  280. #define SYMM_THREAD_RU QSYMM_THREAD_RU
  281. #define SYMM_THREAD_RL QSYMM_THREAD_RL
  282. #define HEMM_THREAD_LU QHEMM_THREAD_LU
  283. #define HEMM_THREAD_LL QHEMM_THREAD_LL
  284. #define HEMM_THREAD_RU QHEMM_THREAD_RU
  285. #define HEMM_THREAD_RL QHEMM_THREAD_RL
  286. #define SYRK_THREAD_UN QSYRK_THREAD_UN
  287. #define SYRK_THREAD_UT QSYRK_THREAD_UT
  288. #define SYRK_THREAD_LN QSYRK_THREAD_LN
  289. #define SYRK_THREAD_LT QSYRK_THREAD_LT
  290. #define SYRK_THREAD_UR QSYRK_THREAD_UR
  291. #define SYRK_THREAD_UC QSYRK_THREAD_UC
  292. #define SYRK_THREAD_LR QSYRK_THREAD_LN
  293. #define SYRK_THREAD_LC QSYRK_THREAD_LT
  294. #define HERK_THREAD_UN QSYRK_THREAD_UN
  295. #define HERK_THREAD_UT QSYRK_THREAD_UT
  296. #define HERK_THREAD_LN QSYRK_THREAD_LN
  297. #define HERK_THREAD_LT QSYRK_THREAD_LT
  298. #define HERK_THREAD_UR QSYRK_THREAD_UR
  299. #define HERK_THREAD_UC QSYRK_THREAD_UC
  300. #define HERK_THREAD_LR QSYRK_THREAD_LN
  301. #define HERK_THREAD_LC QSYRK_THREAD_LT
  302. #elif defined(DOUBLE)
  303. #define AMAX_K DAMAX_K
  304. #define AMIN_K DAMIN_K
  305. #define MAX_K DMAX_K
  306. #define MIN_K DMIN_K
  307. #define IAMAX_K IDAMAX_K
  308. #define IAMIN_K IDAMIN_K
  309. #define IMAX_K IDMAX_K
  310. #define IMIN_K IDMIN_K
  311. #define ASUM_K DASUM_K
  312. #define AXPYU_K DAXPYU_K
  313. #define AXPYC_K DAXPYC_K
  314. #define COPY_K DCOPY_K
  315. #define DOTU_K DDOTU_K
  316. #define DOTC_K DDOTC_K
  317. #define NRM2_K DNRM2_K
  318. #define SCAL_K DSCAL_K
  319. #define SWAP_K DSWAP_K
  320. #define ROT_K DROT_K
  321. #define GEMV_N DGEMV_N
  322. #define GEMV_T DGEMV_T
  323. #define GEMV_R DGEMV_R
  324. #define GEMV_C DGEMV_C
  325. #define GEMV_O DGEMV_O
  326. #define GEMV_U DGEMV_U
  327. #define GEMV_S DGEMV_S
  328. #define GEMV_D DGEMV_D
  329. #define GERU_K DGERU_K
  330. #define GERC_K DGERC_K
  331. #define GERV_K DGERV_K
  332. #define GERD_K DGERD_K
  333. #define SYMV_U DSYMV_U
  334. #define SYMV_L DSYMV_L
  335. #define SYMV_THREAD_U DSYMV_THREAD_U
  336. #define SYMV_THREAD_L DSYMV_THREAD_L
  337. #define GEMM_ONCOPY DGEMM_ONCOPY
  338. #define GEMM_OTCOPY DGEMM_OTCOPY
  339. #define GEMM_INCOPY DGEMM_INCOPY
  340. #define GEMM_ITCOPY DGEMM_ITCOPY
  341. #ifdef UNIT
  342. #define TRMM_OUNCOPY DTRMM_OUNUCOPY
  343. #define TRMM_OUTCOPY DTRMM_OUTUCOPY
  344. #define TRMM_OLNCOPY DTRMM_OLNUCOPY
  345. #define TRMM_OLTCOPY DTRMM_OLTUCOPY
  346. #define TRSM_OUNCOPY DTRSM_OUNUCOPY
  347. #define TRSM_OUTCOPY DTRSM_OUTUCOPY
  348. #define TRSM_OLNCOPY DTRSM_OLNUCOPY
  349. #define TRSM_OLTCOPY DTRSM_OLTUCOPY
  350. #define TRMM_IUNCOPY DTRMM_IUNUCOPY
  351. #define TRMM_IUTCOPY DTRMM_IUTUCOPY
  352. #define TRMM_ILNCOPY DTRMM_ILNUCOPY
  353. #define TRMM_ILTCOPY DTRMM_ILTUCOPY
  354. #define TRSM_IUNCOPY DTRSM_IUNUCOPY
  355. #define TRSM_IUTCOPY DTRSM_IUTUCOPY
  356. #define TRSM_ILNCOPY DTRSM_ILNUCOPY
  357. #define TRSM_ILTCOPY DTRSM_ILTUCOPY
  358. #else
  359. #define TRMM_OUNCOPY DTRMM_OUNNCOPY
  360. #define TRMM_OUTCOPY DTRMM_OUTNCOPY
  361. #define TRMM_OLNCOPY DTRMM_OLNNCOPY
  362. #define TRMM_OLTCOPY DTRMM_OLTNCOPY
  363. #define TRSM_OUNCOPY DTRSM_OUNNCOPY
  364. #define TRSM_OUTCOPY DTRSM_OUTNCOPY
  365. #define TRSM_OLNCOPY DTRSM_OLNNCOPY
  366. #define TRSM_OLTCOPY DTRSM_OLTNCOPY
  367. #define TRMM_IUNCOPY DTRMM_IUNNCOPY
  368. #define TRMM_IUTCOPY DTRMM_IUTNCOPY
  369. #define TRMM_ILNCOPY DTRMM_ILNNCOPY
  370. #define TRMM_ILTCOPY DTRMM_ILTNCOPY
  371. #define TRSM_IUNCOPY DTRSM_IUNNCOPY
  372. #define TRSM_IUTCOPY DTRSM_IUTNCOPY
  373. #define TRSM_ILNCOPY DTRSM_ILNNCOPY
  374. #define TRSM_ILTCOPY DTRSM_ILTNCOPY
  375. #endif
  376. #define GEMM_BETA DGEMM_BETA
  377. #define GEMM_KERNEL_N DGEMM_KERNEL
  378. #define GEMM_KERNEL_L DGEMM_KERNEL
  379. #define GEMM_KERNEL_R DGEMM_KERNEL
  380. #define GEMM_KERNEL_B DGEMM_KERNEL
  381. #define TRMM_KERNEL_LN DTRMM_KERNEL_LN
  382. #define TRMM_KERNEL_LT DTRMM_KERNEL_LT
  383. #define TRMM_KERNEL_LR DTRMM_KERNEL_LN
  384. #define TRMM_KERNEL_LC DTRMM_KERNEL_LT
  385. #define TRMM_KERNEL_RN DTRMM_KERNEL_RN
  386. #define TRMM_KERNEL_RT DTRMM_KERNEL_RT
  387. #define TRMM_KERNEL_RR DTRMM_KERNEL_RN
  388. #define TRMM_KERNEL_RC DTRMM_KERNEL_RT
  389. #define TRSM_KERNEL_LN DTRSM_KERNEL_LN
  390. #define TRSM_KERNEL_LT DTRSM_KERNEL_LT
  391. #define TRSM_KERNEL_LR DTRSM_KERNEL_LN
  392. #define TRSM_KERNEL_LC DTRSM_KERNEL_LT
  393. #define TRSM_KERNEL_RN DTRSM_KERNEL_RN
  394. #define TRSM_KERNEL_RT DTRSM_KERNEL_RT
  395. #define TRSM_KERNEL_RR DTRSM_KERNEL_RN
  396. #define TRSM_KERNEL_RC DTRSM_KERNEL_RT
  397. #define SYMM_IUTCOPY DSYMM_IUTCOPY
  398. #define SYMM_ILTCOPY DSYMM_ILTCOPY
  399. #define SYMM_OUTCOPY DSYMM_OUTCOPY
  400. #define SYMM_OLTCOPY DSYMM_OLTCOPY
  401. #define GEMM_NN DGEMM_NN
  402. #define GEMM_CN DGEMM_TN
  403. #define GEMM_TN DGEMM_TN
  404. #define GEMM_NC DGEMM_NT
  405. #define GEMM_NT DGEMM_NT
  406. #define GEMM_CC DGEMM_TT
  407. #define GEMM_CT DGEMM_TT
  408. #define GEMM_TC DGEMM_TT
  409. #define GEMM_TT DGEMM_TT
  410. #define GEMM_NR DGEMM_NN
  411. #define GEMM_TR DGEMM_TN
  412. #define GEMM_CR DGEMM_TN
  413. #define GEMM_RN DGEMM_NN
  414. #define GEMM_RT DGEMM_NT
  415. #define GEMM_RC DGEMM_NT
  416. #define GEMM_RR DGEMM_NN
  417. #define SYMM_LU DSYMM_LU
  418. #define SYMM_LL DSYMM_LL
  419. #define SYMM_RU DSYMM_RU
  420. #define SYMM_RL DSYMM_RL
  421. #define HEMM_LU DHEMM_LU
  422. #define HEMM_LL DHEMM_LL
  423. #define HEMM_RU DHEMM_RU
  424. #define HEMM_RL DHEMM_RL
  425. #define SYRK_UN DSYRK_UN
  426. #define SYRK_UT DSYRK_UT
  427. #define SYRK_LN DSYRK_LN
  428. #define SYRK_LT DSYRK_LT
  429. #define SYRK_UR DSYRK_UN
  430. #define SYRK_UC DSYRK_UT
  431. #define SYRK_LR DSYRK_LN
  432. #define SYRK_LC DSYRK_LT
  433. #define SYRK_KERNEL_U DSYRK_KERNEL_U
  434. #define SYRK_KERNEL_L DSYRK_KERNEL_L
  435. #define HERK_UN DSYRK_UN
  436. #define HERK_LN DSYRK_LN
  437. #define HERK_UC DSYRK_UT
  438. #define HERK_LC DSYRK_LT
  439. #define HER2K_UN DSYR2K_UN
  440. #define HER2K_LN DSYR2K_LN
  441. #define HER2K_UC DSYR2K_UT
  442. #define HER2K_LC DSYR2K_LT
  443. #define SYR2K_UN DSYR2K_UN
  444. #define SYR2K_UT DSYR2K_UT
  445. #define SYR2K_LN DSYR2K_LN
  446. #define SYR2K_LT DSYR2K_LT
  447. #define SYR2K_UR DSYR2K_UN
  448. #define SYR2K_UC DSYR2K_UT
  449. #define SYR2K_LR DSYR2K_LN
  450. #define SYR2K_LC DSYR2K_LT
  451. #define SYR2K_KERNEL_U DSYR2K_KERNEL_U
  452. #define SYR2K_KERNEL_L DSYR2K_KERNEL_L
  453. #define TRMM_LNUU DTRMM_LNUU
  454. #define TRMM_LNUN DTRMM_LNUN
  455. #define TRMM_LNLU DTRMM_LNLU
  456. #define TRMM_LNLN DTRMM_LNLN
  457. #define TRMM_LTUU DTRMM_LTUU
  458. #define TRMM_LTUN DTRMM_LTUN
  459. #define TRMM_LTLU DTRMM_LTLU
  460. #define TRMM_LTLN DTRMM_LTLN
  461. #define TRMM_LRUU DTRMM_LNUU
  462. #define TRMM_LRUN DTRMM_LNUN
  463. #define TRMM_LRLU DTRMM_LNLU
  464. #define TRMM_LRLN DTRMM_LNLN
  465. #define TRMM_LCUU DTRMM_LTUU
  466. #define TRMM_LCUN DTRMM_LTUN
  467. #define TRMM_LCLU DTRMM_LTLU
  468. #define TRMM_LCLN DTRMM_LTLN
  469. #define TRMM_RNUU DTRMM_RNUU
  470. #define TRMM_RNUN DTRMM_RNUN
  471. #define TRMM_RNLU DTRMM_RNLU
  472. #define TRMM_RNLN DTRMM_RNLN
  473. #define TRMM_RTUU DTRMM_RTUU
  474. #define TRMM_RTUN DTRMM_RTUN
  475. #define TRMM_RTLU DTRMM_RTLU
  476. #define TRMM_RTLN DTRMM_RTLN
  477. #define TRMM_RRUU DTRMM_RNUU
  478. #define TRMM_RRUN DTRMM_RNUN
  479. #define TRMM_RRLU DTRMM_RNLU
  480. #define TRMM_RRLN DTRMM_RNLN
  481. #define TRMM_RCUU DTRMM_RTUU
  482. #define TRMM_RCUN DTRMM_RTUN
  483. #define TRMM_RCLU DTRMM_RTLU
  484. #define TRMM_RCLN DTRMM_RTLN
  485. #define TRSM_LNUU DTRSM_LNUU
  486. #define TRSM_LNUN DTRSM_LNUN
  487. #define TRSM_LNLU DTRSM_LNLU
  488. #define TRSM_LNLN DTRSM_LNLN
  489. #define TRSM_LTUU DTRSM_LTUU
  490. #define TRSM_LTUN DTRSM_LTUN
  491. #define TRSM_LTLU DTRSM_LTLU
  492. #define TRSM_LTLN DTRSM_LTLN
  493. #define TRSM_LRUU DTRSM_LNUU
  494. #define TRSM_LRUN DTRSM_LNUN
  495. #define TRSM_LRLU DTRSM_LNLU
  496. #define TRSM_LRLN DTRSM_LNLN
  497. #define TRSM_LCUU DTRSM_LTUU
  498. #define TRSM_LCUN DTRSM_LTUN
  499. #define TRSM_LCLU DTRSM_LTLU
  500. #define TRSM_LCLN DTRSM_LTLN
  501. #define TRSM_RNUU DTRSM_RNUU
  502. #define TRSM_RNUN DTRSM_RNUN
  503. #define TRSM_RNLU DTRSM_RNLU
  504. #define TRSM_RNLN DTRSM_RNLN
  505. #define TRSM_RTUU DTRSM_RTUU
  506. #define TRSM_RTUN DTRSM_RTUN
  507. #define TRSM_RTLU DTRSM_RTLU
  508. #define TRSM_RTLN DTRSM_RTLN
  509. #define TRSM_RRUU DTRSM_RNUU
  510. #define TRSM_RRUN DTRSM_RNUN
  511. #define TRSM_RRLU DTRSM_RNLU
  512. #define TRSM_RRLN DTRSM_RNLN
  513. #define TRSM_RCUU DTRSM_RTUU
  514. #define TRSM_RCUN DTRSM_RTUN
  515. #define TRSM_RCLU DTRSM_RTLU
  516. #define TRSM_RCLN DTRSM_RTLN
  517. #define GEMM_THREAD_NN DGEMM_THREAD_NN
  518. #define GEMM_THREAD_CN DGEMM_THREAD_TN
  519. #define GEMM_THREAD_TN DGEMM_THREAD_TN
  520. #define GEMM_THREAD_NC DGEMM_THREAD_NT
  521. #define GEMM_THREAD_NT DGEMM_THREAD_NT
  522. #define GEMM_THREAD_CC DGEMM_THREAD_TT
  523. #define GEMM_THREAD_CT DGEMM_THREAD_TT
  524. #define GEMM_THREAD_TC DGEMM_THREAD_TT
  525. #define GEMM_THREAD_TT DGEMM_THREAD_TT
  526. #define GEMM_THREAD_NR DGEMM_THREAD_NN
  527. #define GEMM_THREAD_TR DGEMM_THREAD_TN
  528. #define GEMM_THREAD_CR DGEMM_THREAD_TN
  529. #define GEMM_THREAD_RN DGEMM_THREAD_NN
  530. #define GEMM_THREAD_RT DGEMM_THREAD_NT
  531. #define GEMM_THREAD_RC DGEMM_THREAD_NT
  532. #define GEMM_THREAD_RR DGEMM_THREAD_NN
  533. #define SYMM_THREAD_LU DSYMM_THREAD_LU
  534. #define SYMM_THREAD_LL DSYMM_THREAD_LL
  535. #define SYMM_THREAD_RU DSYMM_THREAD_RU
  536. #define SYMM_THREAD_RL DSYMM_THREAD_RL
  537. #define HEMM_THREAD_LU DHEMM_THREAD_LU
  538. #define HEMM_THREAD_LL DHEMM_THREAD_LL
  539. #define HEMM_THREAD_RU DHEMM_THREAD_RU
  540. #define HEMM_THREAD_RL DHEMM_THREAD_RL
  541. #define SYRK_THREAD_UN DSYRK_THREAD_UN
  542. #define SYRK_THREAD_UT DSYRK_THREAD_UT
  543. #define SYRK_THREAD_LN DSYRK_THREAD_LN
  544. #define SYRK_THREAD_LT DSYRK_THREAD_LT
  545. #define SYRK_THREAD_UR DSYRK_THREAD_UR
  546. #define SYRK_THREAD_UC DSYRK_THREAD_UC
  547. #define SYRK_THREAD_LR DSYRK_THREAD_LN
  548. #define SYRK_THREAD_LC DSYRK_THREAD_LT
  549. #define HERK_THREAD_UN DSYRK_THREAD_UN
  550. #define HERK_THREAD_UT DSYRK_THREAD_UT
  551. #define HERK_THREAD_LN DSYRK_THREAD_LN
  552. #define HERK_THREAD_LT DSYRK_THREAD_LT
  553. #define HERK_THREAD_UR DSYRK_THREAD_UR
  554. #define HERK_THREAD_UC DSYRK_THREAD_UC
  555. #define HERK_THREAD_LR DSYRK_THREAD_LN
  556. #define HERK_THREAD_LC DSYRK_THREAD_LT
  557. #define AXPBY_K DAXPBY_K
  558. #define OMATCOPY_K_CN DOMATCOPY_K_CN
  559. #define OMATCOPY_K_RN DOMATCOPY_K_RN
  560. #define OMATCOPY_K_CT DOMATCOPY_K_CT
  561. #define OMATCOPY_K_RT DOMATCOPY_K_RT
  562. #else
  563. #define AMAX_K SAMAX_K
  564. #define AMIN_K SAMIN_K
  565. #define MAX_K SMAX_K
  566. #define MIN_K SMIN_K
  567. #define IAMAX_K ISAMAX_K
  568. #define IAMIN_K ISAMIN_K
  569. #define IMAX_K ISMAX_K
  570. #define IMIN_K ISMIN_K
  571. #define ASUM_K SASUM_K
  572. #define AXPYU_K SAXPYU_K
  573. #define AXPYC_K SAXPYU_K
  574. #define COPY_K SCOPY_K
  575. #define DOTU_K SDOTU_K
  576. #define DOTC_K SDOTC_K
  577. #define NRM2_K SNRM2_K
  578. #define SCAL_K SSCAL_K
  579. #define SWAP_K SSWAP_K
  580. #define ROT_K SROT_K
  581. #define GEMV_N SGEMV_N
  582. #define GEMV_T SGEMV_T
  583. #define GEMV_R SGEMV_R
  584. #define GEMV_C SGEMV_C
  585. #define GEMV_O SGEMV_O
  586. #define GEMV_U SGEMV_U
  587. #define GEMV_S SGEMV_S
  588. #define GEMV_D SGEMV_D
  589. #define GERU_K SGERU_K
  590. #define GERC_K SGERC_K
  591. #define GERV_K SGERV_K
  592. #define GERD_K SGERD_K
  593. #define SYMV_U SSYMV_U
  594. #define SYMV_L SSYMV_L
  595. #define SYMV_THREAD_U SSYMV_THREAD_U
  596. #define SYMV_THREAD_L SSYMV_THREAD_L
  597. #define GEMM_ONCOPY SGEMM_ONCOPY
  598. #define GEMM_OTCOPY SGEMM_OTCOPY
  599. #define GEMM_INCOPY SGEMM_INCOPY
  600. #define GEMM_ITCOPY SGEMM_ITCOPY
  601. #ifdef UNIT
  602. #define TRMM_OUNCOPY STRMM_OUNUCOPY
  603. #define TRMM_OUTCOPY STRMM_OUTUCOPY
  604. #define TRMM_OLNCOPY STRMM_OLNUCOPY
  605. #define TRMM_OLTCOPY STRMM_OLTUCOPY
  606. #define TRSM_OUNCOPY STRSM_OUNUCOPY
  607. #define TRSM_OUTCOPY STRSM_OUTUCOPY
  608. #define TRSM_OLNCOPY STRSM_OLNUCOPY
  609. #define TRSM_OLTCOPY STRSM_OLTUCOPY
  610. #define TRMM_IUNCOPY STRMM_IUNUCOPY
  611. #define TRMM_IUTCOPY STRMM_IUTUCOPY
  612. #define TRMM_ILNCOPY STRMM_ILNUCOPY
  613. #define TRMM_ILTCOPY STRMM_ILTUCOPY
  614. #define TRSM_IUNCOPY STRSM_IUNUCOPY
  615. #define TRSM_IUTCOPY STRSM_IUTUCOPY
  616. #define TRSM_ILNCOPY STRSM_ILNUCOPY
  617. #define TRSM_ILTCOPY STRSM_ILTUCOPY
  618. #else
  619. #define TRMM_OUNCOPY STRMM_OUNNCOPY
  620. #define TRMM_OUTCOPY STRMM_OUTNCOPY
  621. #define TRMM_OLNCOPY STRMM_OLNNCOPY
  622. #define TRMM_OLTCOPY STRMM_OLTNCOPY
  623. #define TRSM_OUNCOPY STRSM_OUNNCOPY
  624. #define TRSM_OUTCOPY STRSM_OUTNCOPY
  625. #define TRSM_OLNCOPY STRSM_OLNNCOPY
  626. #define TRSM_OLTCOPY STRSM_OLTNCOPY
  627. #define TRMM_IUNCOPY STRMM_IUNNCOPY
  628. #define TRMM_IUTCOPY STRMM_IUTNCOPY
  629. #define TRMM_ILNCOPY STRMM_ILNNCOPY
  630. #define TRMM_ILTCOPY STRMM_ILTNCOPY
  631. #define TRSM_IUNCOPY STRSM_IUNNCOPY
  632. #define TRSM_IUTCOPY STRSM_IUTNCOPY
  633. #define TRSM_ILNCOPY STRSM_ILNNCOPY
  634. #define TRSM_ILTCOPY STRSM_ILTNCOPY
  635. #endif
  636. #define GEMM_BETA SGEMM_BETA
  637. #define GEMM_KERNEL_N SGEMM_KERNEL
  638. #define GEMM_KERNEL_L SGEMM_KERNEL
  639. #define GEMM_KERNEL_R SGEMM_KERNEL
  640. #define GEMM_KERNEL_B SGEMM_KERNEL
  641. #define TRMM_KERNEL_LN STRMM_KERNEL_LN
  642. #define TRMM_KERNEL_LT STRMM_KERNEL_LT
  643. #define TRMM_KERNEL_LR STRMM_KERNEL_LN
  644. #define TRMM_KERNEL_LC STRMM_KERNEL_LT
  645. #define TRMM_KERNEL_RN STRMM_KERNEL_RN
  646. #define TRMM_KERNEL_RT STRMM_KERNEL_RT
  647. #define TRMM_KERNEL_RR STRMM_KERNEL_RN
  648. #define TRMM_KERNEL_RC STRMM_KERNEL_RT
  649. #define TRSM_KERNEL_LN STRSM_KERNEL_LN
  650. #define TRSM_KERNEL_LT STRSM_KERNEL_LT
  651. #define TRSM_KERNEL_LR STRSM_KERNEL_LN
  652. #define TRSM_KERNEL_LC STRSM_KERNEL_LT
  653. #define TRSM_KERNEL_RN STRSM_KERNEL_RN
  654. #define TRSM_KERNEL_RT STRSM_KERNEL_RT
  655. #define TRSM_KERNEL_RR STRSM_KERNEL_RN
  656. #define TRSM_KERNEL_RC STRSM_KERNEL_RT
  657. #define SYMM_IUTCOPY SSYMM_IUTCOPY
  658. #define SYMM_ILTCOPY SSYMM_ILTCOPY
  659. #define SYMM_OUTCOPY SSYMM_OUTCOPY
  660. #define SYMM_OLTCOPY SSYMM_OLTCOPY
  661. #define GEMM_NN SGEMM_NN
  662. #define GEMM_CN SGEMM_TN
  663. #define GEMM_TN SGEMM_TN
  664. #define GEMM_NC SGEMM_NT
  665. #define GEMM_NT SGEMM_NT
  666. #define GEMM_CC SGEMM_TT
  667. #define GEMM_CT SGEMM_TT
  668. #define GEMM_TC SGEMM_TT
  669. #define GEMM_TT SGEMM_TT
  670. #define GEMM_NR SGEMM_NN
  671. #define GEMM_TR SGEMM_TN
  672. #define GEMM_CR SGEMM_TN
  673. #define GEMM_RN SGEMM_NN
  674. #define GEMM_RT SGEMM_NT
  675. #define GEMM_RC SGEMM_NT
  676. #define GEMM_RR SGEMM_NN
  677. #define SYMM_LU SSYMM_LU
  678. #define SYMM_LL SSYMM_LL
  679. #define SYMM_RU SSYMM_RU
  680. #define SYMM_RL SSYMM_RL
  681. #define HEMM_LU SHEMM_LU
  682. #define HEMM_LL SHEMM_LL
  683. #define HEMM_RU SHEMM_RU
  684. #define HEMM_RL SHEMM_RL
  685. #define SYRK_UN SSYRK_UN
  686. #define SYRK_UT SSYRK_UT
  687. #define SYRK_LN SSYRK_LN
  688. #define SYRK_LT SSYRK_LT
  689. #define SYRK_UR SSYRK_UN
  690. #define SYRK_UC SSYRK_UT
  691. #define SYRK_LR SSYRK_LN
  692. #define SYRK_LC SSYRK_LT
  693. #define SYRK_KERNEL_U SSYRK_KERNEL_U
  694. #define SYRK_KERNEL_L SSYRK_KERNEL_L
  695. #define HERK_UN SSYRK_UN
  696. #define HERK_LN SSYRK_LN
  697. #define HERK_UC SSYRK_UT
  698. #define HERK_LC SSYRK_LT
  699. #define HER2K_UN SSYR2K_UN
  700. #define HER2K_LN SSYR2K_LN
  701. #define HER2K_UC SSYR2K_UT
  702. #define HER2K_LC SSYR2K_LT
  703. #define SYR2K_UN SSYR2K_UN
  704. #define SYR2K_UT SSYR2K_UT
  705. #define SYR2K_LN SSYR2K_LN
  706. #define SYR2K_LT SSYR2K_LT
  707. #define SYR2K_UR SSYR2K_UN
  708. #define SYR2K_UC SSYR2K_UT
  709. #define SYR2K_LR SSYR2K_LN
  710. #define SYR2K_LC SSYR2K_LT
  711. #define SYR2K_KERNEL_U SSYR2K_KERNEL_U
  712. #define SYR2K_KERNEL_L SSYR2K_KERNEL_L
  713. #define TRMM_LNUU STRMM_LNUU
  714. #define TRMM_LNUN STRMM_LNUN
  715. #define TRMM_LNLU STRMM_LNLU
  716. #define TRMM_LNLN STRMM_LNLN
  717. #define TRMM_LTUU STRMM_LTUU
  718. #define TRMM_LTUN STRMM_LTUN
  719. #define TRMM_LTLU STRMM_LTLU
  720. #define TRMM_LTLN STRMM_LTLN
  721. #define TRMM_LRUU STRMM_LNUU
  722. #define TRMM_LRUN STRMM_LNUN
  723. #define TRMM_LRLU STRMM_LNLU
  724. #define TRMM_LRLN STRMM_LNLN
  725. #define TRMM_LCUU STRMM_LTUU
  726. #define TRMM_LCUN STRMM_LTUN
  727. #define TRMM_LCLU STRMM_LTLU
  728. #define TRMM_LCLN STRMM_LTLN
  729. #define TRMM_RNUU STRMM_RNUU
  730. #define TRMM_RNUN STRMM_RNUN
  731. #define TRMM_RNLU STRMM_RNLU
  732. #define TRMM_RNLN STRMM_RNLN
  733. #define TRMM_RTUU STRMM_RTUU
  734. #define TRMM_RTUN STRMM_RTUN
  735. #define TRMM_RTLU STRMM_RTLU
  736. #define TRMM_RTLN STRMM_RTLN
  737. #define TRMM_RRUU STRMM_RNUU
  738. #define TRMM_RRUN STRMM_RNUN
  739. #define TRMM_RRLU STRMM_RNLU
  740. #define TRMM_RRLN STRMM_RNLN
  741. #define TRMM_RCUU STRMM_RTUU
  742. #define TRMM_RCUN STRMM_RTUN
  743. #define TRMM_RCLU STRMM_RTLU
  744. #define TRMM_RCLN STRMM_RTLN
  745. #define TRSM_LNUU STRSM_LNUU
  746. #define TRSM_LNUN STRSM_LNUN
  747. #define TRSM_LNLU STRSM_LNLU
  748. #define TRSM_LNLN STRSM_LNLN
  749. #define TRSM_LTUU STRSM_LTUU
  750. #define TRSM_LTUN STRSM_LTUN
  751. #define TRSM_LTLU STRSM_LTLU
  752. #define TRSM_LTLN STRSM_LTLN
  753. #define TRSM_LRUU STRSM_LNUU
  754. #define TRSM_LRUN STRSM_LNUN
  755. #define TRSM_LRLU STRSM_LNLU
  756. #define TRSM_LRLN STRSM_LNLN
  757. #define TRSM_LCUU STRSM_LTUU
  758. #define TRSM_LCUN STRSM_LTUN
  759. #define TRSM_LCLU STRSM_LTLU
  760. #define TRSM_LCLN STRSM_LTLN
  761. #define TRSM_RNUU STRSM_RNUU
  762. #define TRSM_RNUN STRSM_RNUN
  763. #define TRSM_RNLU STRSM_RNLU
  764. #define TRSM_RNLN STRSM_RNLN
  765. #define TRSM_RTUU STRSM_RTUU
  766. #define TRSM_RTUN STRSM_RTUN
  767. #define TRSM_RTLU STRSM_RTLU
  768. #define TRSM_RTLN STRSM_RTLN
  769. #define TRSM_RRUU STRSM_RNUU
  770. #define TRSM_RRUN STRSM_RNUN
  771. #define TRSM_RRLU STRSM_RNLU
  772. #define TRSM_RRLN STRSM_RNLN
  773. #define TRSM_RCUU STRSM_RTUU
  774. #define TRSM_RCUN STRSM_RTUN
  775. #define TRSM_RCLU STRSM_RTLU
  776. #define TRSM_RCLN STRSM_RTLN
  777. #define GEMM_THREAD_NN SGEMM_THREAD_NN
  778. #define GEMM_THREAD_CN SGEMM_THREAD_TN
  779. #define GEMM_THREAD_TN SGEMM_THREAD_TN
  780. #define GEMM_THREAD_NC SGEMM_THREAD_NT
  781. #define GEMM_THREAD_NT SGEMM_THREAD_NT
  782. #define GEMM_THREAD_CC SGEMM_THREAD_TT
  783. #define GEMM_THREAD_CT SGEMM_THREAD_TT
  784. #define GEMM_THREAD_TC SGEMM_THREAD_TT
  785. #define GEMM_THREAD_TT SGEMM_THREAD_TT
  786. #define GEMM_THREAD_NR SGEMM_THREAD_NN
  787. #define GEMM_THREAD_TR SGEMM_THREAD_TN
  788. #define GEMM_THREAD_CR SGEMM_THREAD_TN
  789. #define GEMM_THREAD_RN SGEMM_THREAD_NN
  790. #define GEMM_THREAD_RT SGEMM_THREAD_NT
  791. #define GEMM_THREAD_RC SGEMM_THREAD_NT
  792. #define GEMM_THREAD_RR SGEMM_THREAD_NN
  793. #define SYMM_THREAD_LU SSYMM_THREAD_LU
  794. #define SYMM_THREAD_LL SSYMM_THREAD_LL
  795. #define SYMM_THREAD_RU SSYMM_THREAD_RU
  796. #define SYMM_THREAD_RL SSYMM_THREAD_RL
  797. #define HEMM_THREAD_LU SHEMM_THREAD_LU
  798. #define HEMM_THREAD_LL SHEMM_THREAD_LL
  799. #define HEMM_THREAD_RU SHEMM_THREAD_RU
  800. #define HEMM_THREAD_RL SHEMM_THREAD_RL
  801. #define SYRK_THREAD_UN SSYRK_THREAD_UN
  802. #define SYRK_THREAD_UT SSYRK_THREAD_UT
  803. #define SYRK_THREAD_LN SSYRK_THREAD_LN
  804. #define SYRK_THREAD_LT SSYRK_THREAD_LT
  805. #define SYRK_THREAD_UR SSYRK_THREAD_UR
  806. #define SYRK_THREAD_UC SSYRK_THREAD_UC
  807. #define SYRK_THREAD_LR SSYRK_THREAD_LN
  808. #define SYRK_THREAD_LC SSYRK_THREAD_LT
  809. #define HERK_THREAD_UN SSYRK_THREAD_UN
  810. #define HERK_THREAD_UT SSYRK_THREAD_UT
  811. #define HERK_THREAD_LN SSYRK_THREAD_LN
  812. #define HERK_THREAD_LT SSYRK_THREAD_LT
  813. #define HERK_THREAD_UR SSYRK_THREAD_UR
  814. #define HERK_THREAD_UC SSYRK_THREAD_UC
  815. #define HERK_THREAD_LR SSYRK_THREAD_LN
  816. #define HERK_THREAD_LC SSYRK_THREAD_LT
  817. #define AXPBY_K SAXPBY_K
  818. #define OMATCOPY_K_CN SOMATCOPY_K_CN
  819. #define OMATCOPY_K_RN SOMATCOPY_K_RN
  820. #define OMATCOPY_K_CT SOMATCOPY_K_CT
  821. #define OMATCOPY_K_RT SOMATCOPY_K_RT
  822. #endif
  823. #else
  824. #ifdef XDOUBLE
  825. #define AMAX_K XAMAX_K
  826. #define AMIN_K XAMIN_K
  827. #define MAX_K XMAX_K
  828. #define MIN_K XMIN_K
  829. #define IAMAX_K IXAMAX_K
  830. #define IAMIN_K IXAMIN_K
  831. #define IMAX_K IXMAX_K
  832. #define IMIN_K IXMIN_K
  833. #define ASUM_K XASUM_K
  834. #define AXPYU_K XAXPYU_K
  835. #define AXPYC_K XAXPYC_K
  836. #define COPY_K XCOPY_K
  837. #define DOTU_K XDOTU_K
  838. #define DOTC_K XDOTC_K
  839. #define NRM2_K XNRM2_K
  840. #define SCAL_K XSCAL_K
  841. #define SWAP_K XSWAP_K
  842. #define ROT_K XROT_K
  843. #define GEMV_N XGEMV_N
  844. #define GEMV_T XGEMV_T
  845. #define GEMV_R XGEMV_R
  846. #define GEMV_C XGEMV_C
  847. #define GEMV_O XGEMV_O
  848. #define GEMV_U XGEMV_U
  849. #define GEMV_S XGEMV_S
  850. #define GEMV_D XGEMV_D
  851. #define GERU_K XGERU_K
  852. #define GERC_K XGERC_K
  853. #define GERV_K XGERV_K
  854. #define GERD_K XGERD_K
  855. #define SYMV_U XSYMV_U
  856. #define SYMV_L XSYMV_L
  857. #define HEMV_U XHEMV_U
  858. #define HEMV_L XHEMV_L
  859. #define HEMV_V XHEMV_V
  860. #define HEMV_M XHEMV_M
  861. #define SYMV_THREAD_U XSYMV_THREAD_U
  862. #define SYMV_THREAD_L XSYMV_THREAD_L
  863. #define HEMV_THREAD_U XHEMV_THREAD_U
  864. #define HEMV_THREAD_L XHEMV_THREAD_L
  865. #define HEMV_THREAD_V XHEMV_THREAD_V
  866. #define HEMV_THREAD_M XHEMV_THREAD_M
  867. #define GEMM_ONCOPY XGEMM_ONCOPY
  868. #define GEMM_OTCOPY XGEMM_OTCOPY
  869. #define GEMM_INCOPY XGEMM_INCOPY
  870. #define GEMM_ITCOPY XGEMM_ITCOPY
  871. #define GEMM3M_ONCOPYB XGEMM3M_ONCOPYB
  872. #define GEMM3M_ONCOPYR XGEMM3M_ONCOPYR
  873. #define GEMM3M_ONCOPYI XGEMM3M_ONCOPYI
  874. #define GEMM3M_OTCOPYB XGEMM3M_OTCOPYB
  875. #define GEMM3M_OTCOPYR XGEMM3M_OTCOPYR
  876. #define GEMM3M_OTCOPYI XGEMM3M_OTCOPYI
  877. #define GEMM3M_INCOPYB XGEMM3M_INCOPYB
  878. #define GEMM3M_INCOPYR XGEMM3M_INCOPYR
  879. #define GEMM3M_INCOPYI XGEMM3M_INCOPYI
  880. #define GEMM3M_ITCOPYB XGEMM3M_ITCOPYB
  881. #define GEMM3M_ITCOPYR XGEMM3M_ITCOPYR
  882. #define GEMM3M_ITCOPYI XGEMM3M_ITCOPYI
  883. #ifdef UNIT
  884. #define TRMM_OUNCOPY XTRMM_OUNUCOPY
  885. #define TRMM_OUTCOPY XTRMM_OUTUCOPY
  886. #define TRMM_OLNCOPY XTRMM_OLNUCOPY
  887. #define TRMM_OLTCOPY XTRMM_OLTUCOPY
  888. #define TRSM_OUNCOPY XTRSM_OUNUCOPY
  889. #define TRSM_OUTCOPY XTRSM_OUTUCOPY
  890. #define TRSM_OLNCOPY XTRSM_OLNUCOPY
  891. #define TRSM_OLTCOPY XTRSM_OLTUCOPY
  892. #define TRMM_IUNCOPY XTRMM_IUNUCOPY
  893. #define TRMM_IUTCOPY XTRMM_IUTUCOPY
  894. #define TRMM_ILNCOPY XTRMM_ILNUCOPY
  895. #define TRMM_ILTCOPY XTRMM_ILTUCOPY
  896. #define TRSM_IUNCOPY XTRSM_IUNUCOPY
  897. #define TRSM_IUTCOPY XTRSM_IUTUCOPY
  898. #define TRSM_ILNCOPY XTRSM_ILNUCOPY
  899. #define TRSM_ILTCOPY XTRSM_ILTUCOPY
  900. #else
  901. #define TRMM_OUNCOPY XTRMM_OUNNCOPY
  902. #define TRMM_OUTCOPY XTRMM_OUTNCOPY
  903. #define TRMM_OLNCOPY XTRMM_OLNNCOPY
  904. #define TRMM_OLTCOPY XTRMM_OLTNCOPY
  905. #define TRSM_OUNCOPY XTRSM_OUNNCOPY
  906. #define TRSM_OUTCOPY XTRSM_OUTNCOPY
  907. #define TRSM_OLNCOPY XTRSM_OLNNCOPY
  908. #define TRSM_OLTCOPY XTRSM_OLTNCOPY
  909. #define TRMM_IUNCOPY XTRMM_IUNNCOPY
  910. #define TRMM_IUTCOPY XTRMM_IUTNCOPY
  911. #define TRMM_ILNCOPY XTRMM_ILNNCOPY
  912. #define TRMM_ILTCOPY XTRMM_ILTNCOPY
  913. #define TRSM_IUNCOPY XTRSM_IUNNCOPY
  914. #define TRSM_IUTCOPY XTRSM_IUTNCOPY
  915. #define TRSM_ILNCOPY XTRSM_ILNNCOPY
  916. #define TRSM_ILTCOPY XTRSM_ILTNCOPY
  917. #endif
  918. #define SYMM3M_ILCOPYB XSYMM3M_ILCOPYB
  919. #define SYMM3M_IUCOPYB XSYMM3M_IUCOPYB
  920. #define SYMM3M_ILCOPYR XSYMM3M_ILCOPYR
  921. #define SYMM3M_IUCOPYR XSYMM3M_IUCOPYR
  922. #define SYMM3M_ILCOPYI XSYMM3M_ILCOPYI
  923. #define SYMM3M_IUCOPYI XSYMM3M_IUCOPYI
  924. #define SYMM3M_OLCOPYB XSYMM3M_OLCOPYB
  925. #define SYMM3M_OUCOPYB XSYMM3M_OUCOPYB
  926. #define SYMM3M_OLCOPYR XSYMM3M_OLCOPYR
  927. #define SYMM3M_OUCOPYR XSYMM3M_OUCOPYR
  928. #define SYMM3M_OLCOPYI XSYMM3M_OLCOPYI
  929. #define SYMM3M_OUCOPYI XSYMM3M_OUCOPYI
  930. #define HEMM3M_ILCOPYB XHEMM3M_ILCOPYB
  931. #define HEMM3M_IUCOPYB XHEMM3M_IUCOPYB
  932. #define HEMM3M_ILCOPYR XHEMM3M_ILCOPYR
  933. #define HEMM3M_IUCOPYR XHEMM3M_IUCOPYR
  934. #define HEMM3M_ILCOPYI XHEMM3M_ILCOPYI
  935. #define HEMM3M_IUCOPYI XHEMM3M_IUCOPYI
  936. #define HEMM3M_OLCOPYB XHEMM3M_OLCOPYB
  937. #define HEMM3M_OUCOPYB XHEMM3M_OUCOPYB
  938. #define HEMM3M_OLCOPYR XHEMM3M_OLCOPYR
  939. #define HEMM3M_OUCOPYR XHEMM3M_OUCOPYR
  940. #define HEMM3M_OLCOPYI XHEMM3M_OLCOPYI
  941. #define HEMM3M_OUCOPYI XHEMM3M_OUCOPYI
  942. #define GEMM_BETA XGEMM_BETA
  943. #define GEMM_KERNEL_N XGEMM_KERNEL_N
  944. #define GEMM_KERNEL_L XGEMM_KERNEL_L
  945. #define GEMM_KERNEL_R XGEMM_KERNEL_R
  946. #define GEMM_KERNEL_B XGEMM_KERNEL_B
  947. #define GEMM3M_KERNEL XGEMM3M_KERNEL
  948. #define TRMM_KERNEL_LN XTRMM_KERNEL_LN
  949. #define TRMM_KERNEL_LT XTRMM_KERNEL_LT
  950. #define TRMM_KERNEL_LR XTRMM_KERNEL_LR
  951. #define TRMM_KERNEL_LC XTRMM_KERNEL_LC
  952. #define TRMM_KERNEL_RN XTRMM_KERNEL_RN
  953. #define TRMM_KERNEL_RT XTRMM_KERNEL_RT
  954. #define TRMM_KERNEL_RR XTRMM_KERNEL_RR
  955. #define TRMM_KERNEL_RC XTRMM_KERNEL_RC
  956. #define TRSM_KERNEL_LN XTRSM_KERNEL_LN
  957. #define TRSM_KERNEL_LT XTRSM_KERNEL_LT
  958. #define TRSM_KERNEL_LR XTRSM_KERNEL_LR
  959. #define TRSM_KERNEL_LC XTRSM_KERNEL_LC
  960. #define TRSM_KERNEL_RN XTRSM_KERNEL_RN
  961. #define TRSM_KERNEL_RT XTRSM_KERNEL_RT
  962. #define TRSM_KERNEL_RR XTRSM_KERNEL_RR
  963. #define TRSM_KERNEL_RC XTRSM_KERNEL_RC
  964. #define GEMM_NN XGEMM_NN
  965. #define GEMM_CN XGEMM_CN
  966. #define GEMM_TN XGEMM_TN
  967. #define GEMM_NC XGEMM_NC
  968. #define GEMM_NT XGEMM_NT
  969. #define GEMM_CC XGEMM_CC
  970. #define GEMM_CT XGEMM_CT
  971. #define GEMM_TC XGEMM_TC
  972. #define GEMM_TT XGEMM_TT
  973. #define GEMM_NR XGEMM_NR
  974. #define GEMM_TR XGEMM_TR
  975. #define GEMM_CR XGEMM_CR
  976. #define GEMM_RN XGEMM_RN
  977. #define GEMM_RT XGEMM_RT
  978. #define GEMM_RC XGEMM_RC
  979. #define GEMM_RR XGEMM_RR
  980. #define SYMM_LU XSYMM_LU
  981. #define SYMM_LL XSYMM_LL
  982. #define SYMM_RU XSYMM_RU
  983. #define SYMM_RL XSYMM_RL
  984. #define HEMM_LU XHEMM_LU
  985. #define HEMM_LL XHEMM_LL
  986. #define HEMM_RU XHEMM_RU
  987. #define HEMM_RL XHEMM_RL
  988. #define HEMM_IUTCOPY XHEMM_IUTCOPY
  989. #define HEMM_ILTCOPY XHEMM_ILTCOPY
  990. #define HEMM_OUTCOPY XHEMM_OUTCOPY
  991. #define HEMM_OLTCOPY XHEMM_OLTCOPY
  992. #define SYRK_UN XSYRK_UN
  993. #define SYRK_UT XSYRK_UT
  994. #define SYRK_LN XSYRK_LN
  995. #define SYRK_LT XSYRK_LT
  996. #define SYRK_UR XSYRK_UN
  997. #define SYRK_UC XSYRK_UT
  998. #define SYRK_LR XSYRK_LN
  999. #define SYRK_LC XSYRK_LT
  1000. #define SYRK_KERNEL_U XSYRK_KERNEL_U
  1001. #define SYRK_KERNEL_L XSYRK_KERNEL_L
  1002. #define HERK_UN XHERK_UN
  1003. #define HERK_LN XHERK_LN
  1004. #define HERK_UC XHERK_UC
  1005. #define HERK_LC XHERK_LC
  1006. #define HER2K_UN XHER2K_UN
  1007. #define HER2K_LN XHER2K_LN
  1008. #define HER2K_UC XHER2K_UC
  1009. #define HER2K_LC XHER2K_LC
  1010. #define SYR2K_UN XSYR2K_UN
  1011. #define SYR2K_UT XSYR2K_UT
  1012. #define SYR2K_LN XSYR2K_LN
  1013. #define SYR2K_LT XSYR2K_LT
  1014. #define SYR2K_UR XSYR2K_UN
  1015. #define SYR2K_UC XSYR2K_UT
  1016. #define SYR2K_LR XSYR2K_LN
  1017. #define SYR2K_LC XSYR2K_LT
  1018. #define SYR2K_KERNEL_U XSYR2K_KERNEL_U
  1019. #define SYR2K_KERNEL_L XSYR2K_KERNEL_L
  1020. #define TRMM_LNUU XTRMM_LNUU
  1021. #define TRMM_LNUN XTRMM_LNUN
  1022. #define TRMM_LNLU XTRMM_LNLU
  1023. #define TRMM_LNLN XTRMM_LNLN
  1024. #define TRMM_LTUU XTRMM_LTUU
  1025. #define TRMM_LTUN XTRMM_LTUN
  1026. #define TRMM_LTLU XTRMM_LTLU
  1027. #define TRMM_LTLN XTRMM_LTLN
  1028. #define TRMM_LRUU XTRMM_LRUU
  1029. #define TRMM_LRUN XTRMM_LRUN
  1030. #define TRMM_LRLU XTRMM_LRLU
  1031. #define TRMM_LRLN XTRMM_LRLN
  1032. #define TRMM_LCUU XTRMM_LCUU
  1033. #define TRMM_LCUN XTRMM_LCUN
  1034. #define TRMM_LCLU XTRMM_LCLU
  1035. #define TRMM_LCLN XTRMM_LCLN
  1036. #define TRMM_RNUU XTRMM_RNUU
  1037. #define TRMM_RNUN XTRMM_RNUN
  1038. #define TRMM_RNLU XTRMM_RNLU
  1039. #define TRMM_RNLN XTRMM_RNLN
  1040. #define TRMM_RTUU XTRMM_RTUU
  1041. #define TRMM_RTUN XTRMM_RTUN
  1042. #define TRMM_RTLU XTRMM_RTLU
  1043. #define TRMM_RTLN XTRMM_RTLN
  1044. #define TRMM_RRUU XTRMM_RRUU
  1045. #define TRMM_RRUN XTRMM_RRUN
  1046. #define TRMM_RRLU XTRMM_RRLU
  1047. #define TRMM_RRLN XTRMM_RRLN
  1048. #define TRMM_RCUU XTRMM_RCUU
  1049. #define TRMM_RCUN XTRMM_RCUN
  1050. #define TRMM_RCLU XTRMM_RCLU
  1051. #define TRMM_RCLN XTRMM_RCLN
  1052. #define TRSM_LNUU XTRSM_LNUU
  1053. #define TRSM_LNUN XTRSM_LNUN
  1054. #define TRSM_LNLU XTRSM_LNLU
  1055. #define TRSM_LNLN XTRSM_LNLN
  1056. #define TRSM_LTUU XTRSM_LTUU
  1057. #define TRSM_LTUN XTRSM_LTUN
  1058. #define TRSM_LTLU XTRSM_LTLU
  1059. #define TRSM_LTLN XTRSM_LTLN
  1060. #define TRSM_LRUU XTRSM_LRUU
  1061. #define TRSM_LRUN XTRSM_LRUN
  1062. #define TRSM_LRLU XTRSM_LRLU
  1063. #define TRSM_LRLN XTRSM_LRLN
  1064. #define TRSM_LCUU XTRSM_LCUU
  1065. #define TRSM_LCUN XTRSM_LCUN
  1066. #define TRSM_LCLU XTRSM_LCLU
  1067. #define TRSM_LCLN XTRSM_LCLN
  1068. #define TRSM_RNUU XTRSM_RNUU
  1069. #define TRSM_RNUN XTRSM_RNUN
  1070. #define TRSM_RNLU XTRSM_RNLU
  1071. #define TRSM_RNLN XTRSM_RNLN
  1072. #define TRSM_RTUU XTRSM_RTUU
  1073. #define TRSM_RTUN XTRSM_RTUN
  1074. #define TRSM_RTLU XTRSM_RTLU
  1075. #define TRSM_RTLN XTRSM_RTLN
  1076. #define TRSM_RRUU XTRSM_RRUU
  1077. #define TRSM_RRUN XTRSM_RRUN
  1078. #define TRSM_RRLU XTRSM_RRLU
  1079. #define TRSM_RRLN XTRSM_RRLN
  1080. #define TRSM_RCUU XTRSM_RCUU
  1081. #define TRSM_RCUN XTRSM_RCUN
  1082. #define TRSM_RCLU XTRSM_RCLU
  1083. #define TRSM_RCLN XTRSM_RCLN
  1084. #define GEMM_THREAD_NN XGEMM_THREAD_NN
  1085. #define GEMM_THREAD_CN XGEMM_THREAD_CN
  1086. #define GEMM_THREAD_TN XGEMM_THREAD_TN
  1087. #define GEMM_THREAD_NC XGEMM_THREAD_NC
  1088. #define GEMM_THREAD_NT XGEMM_THREAD_NT
  1089. #define GEMM_THREAD_CC XGEMM_THREAD_CC
  1090. #define GEMM_THREAD_CT XGEMM_THREAD_CT
  1091. #define GEMM_THREAD_TC XGEMM_THREAD_TC
  1092. #define GEMM_THREAD_TT XGEMM_THREAD_TT
  1093. #define GEMM_THREAD_NR XGEMM_THREAD_NR
  1094. #define GEMM_THREAD_TR XGEMM_THREAD_TR
  1095. #define GEMM_THREAD_CR XGEMM_THREAD_CR
  1096. #define GEMM_THREAD_RN XGEMM_THREAD_RN
  1097. #define GEMM_THREAD_RT XGEMM_THREAD_RT
  1098. #define GEMM_THREAD_RC XGEMM_THREAD_RC
  1099. #define GEMM_THREAD_RR XGEMM_THREAD_RR
  1100. #define SYMM_THREAD_LU XSYMM_THREAD_LU
  1101. #define SYMM_THREAD_LL XSYMM_THREAD_LL
  1102. #define SYMM_THREAD_RU XSYMM_THREAD_RU
  1103. #define SYMM_THREAD_RL XSYMM_THREAD_RL
  1104. #define HEMM_THREAD_LU XHEMM_THREAD_LU
  1105. #define HEMM_THREAD_LL XHEMM_THREAD_LL
  1106. #define HEMM_THREAD_RU XHEMM_THREAD_RU
  1107. #define HEMM_THREAD_RL XHEMM_THREAD_RL
  1108. #define SYRK_THREAD_UN XSYRK_THREAD_UN
  1109. #define SYRK_THREAD_UT XSYRK_THREAD_UT
  1110. #define SYRK_THREAD_LN XSYRK_THREAD_LN
  1111. #define SYRK_THREAD_LT XSYRK_THREAD_LT
  1112. #define SYRK_THREAD_UR XSYRK_THREAD_UR
  1113. #define SYRK_THREAD_UC XSYRK_THREAD_UC
  1114. #define SYRK_THREAD_LR XSYRK_THREAD_LR
  1115. #define SYRK_THREAD_LC XSYRK_THREAD_LC
  1116. #define HERK_THREAD_UN XHERK_THREAD_UN
  1117. #define HERK_THREAD_UT XHERK_THREAD_UT
  1118. #define HERK_THREAD_LN XHERK_THREAD_LN
  1119. #define HERK_THREAD_LT XHERK_THREAD_LT
  1120. #define HERK_THREAD_UR XHERK_THREAD_UR
  1121. #define HERK_THREAD_UC XHERK_THREAD_UC
  1122. #define HERK_THREAD_LR XHERK_THREAD_LR
  1123. #define HERK_THREAD_LC XHERK_THREAD_LC
  1124. #define GEMM3M_NN XGEMM3M_NN
  1125. #define GEMM3M_CN XGEMM3M_CN
  1126. #define GEMM3M_TN XGEMM3M_TN
  1127. #define GEMM3M_NC XGEMM3M_NC
  1128. #define GEMM3M_NT XGEMM3M_NT
  1129. #define GEMM3M_CC XGEMM3M_CC
  1130. #define GEMM3M_CT XGEMM3M_CT
  1131. #define GEMM3M_TC XGEMM3M_TC
  1132. #define GEMM3M_TT XGEMM3M_TT
  1133. #define GEMM3M_NR XGEMM3M_NR
  1134. #define GEMM3M_TR XGEMM3M_TR
  1135. #define GEMM3M_CR XGEMM3M_CR
  1136. #define GEMM3M_RN XGEMM3M_RN
  1137. #define GEMM3M_RT XGEMM3M_RT
  1138. #define GEMM3M_RC XGEMM3M_RC
  1139. #define GEMM3M_RR XGEMM3M_RR
  1140. #define GEMM3M_THREAD_NN XGEMM3M_THREAD_NN
  1141. #define GEMM3M_THREAD_CN XGEMM3M_THREAD_CN
  1142. #define GEMM3M_THREAD_TN XGEMM3M_THREAD_TN
  1143. #define GEMM3M_THREAD_NC XGEMM3M_THREAD_NC
  1144. #define GEMM3M_THREAD_NT XGEMM3M_THREAD_NT
  1145. #define GEMM3M_THREAD_CC XGEMM3M_THREAD_CC
  1146. #define GEMM3M_THREAD_CT XGEMM3M_THREAD_CT
  1147. #define GEMM3M_THREAD_TC XGEMM3M_THREAD_TC
  1148. #define GEMM3M_THREAD_TT XGEMM3M_THREAD_TT
  1149. #define GEMM3M_THREAD_NR XGEMM3M_THREAD_NR
  1150. #define GEMM3M_THREAD_TR XGEMM3M_THREAD_TR
  1151. #define GEMM3M_THREAD_CR XGEMM3M_THREAD_CR
  1152. #define GEMM3M_THREAD_RN XGEMM3M_THREAD_RN
  1153. #define GEMM3M_THREAD_RT XGEMM3M_THREAD_RT
  1154. #define GEMM3M_THREAD_RC XGEMM3M_THREAD_RC
  1155. #define GEMM3M_THREAD_RR XGEMM3M_THREAD_RR
  1156. #define SYMM3M_LU XSYMM3M_LU
  1157. #define SYMM3M_LL XSYMM3M_LL
  1158. #define SYMM3M_RU XSYMM3M_RU
  1159. #define SYMM3M_RL XSYMM3M_RL
  1160. #define SYMM3M_THREAD_LU XSYMM3M_THREAD_LU
  1161. #define SYMM3M_THREAD_LL XSYMM3M_THREAD_LL
  1162. #define SYMM3M_THREAD_RU XSYMM3M_THREAD_RU
  1163. #define SYMM3M_THREAD_RL XSYMM3M_THREAD_RL
  1164. #define HEMM3M_LU XHEMM3M_LU
  1165. #define HEMM3M_LL XHEMM3M_LL
  1166. #define HEMM3M_RU XHEMM3M_RU
  1167. #define HEMM3M_RL XHEMM3M_RL
  1168. #define HEMM3M_THREAD_LU XHEMM3M_THREAD_LU
  1169. #define HEMM3M_THREAD_LL XHEMM3M_THREAD_LL
  1170. #define HEMM3M_THREAD_RU XHEMM3M_THREAD_RU
  1171. #define HEMM3M_THREAD_RL XHEMM3M_THREAD_RL
  1172. #define SYMM_IUTCOPY XSYMM_IUTCOPY
  1173. #define SYMM_ILTCOPY XSYMM_ILTCOPY
  1174. #define SYMM_OUTCOPY XSYMM_OUTCOPY
  1175. #define SYMM_OLTCOPY XSYMM_OLTCOPY
  1176. #elif defined(DOUBLE)
  1177. #define AMAX_K ZAMAX_K
  1178. #define AMIN_K ZAMIN_K
  1179. #define MAX_K ZMAX_K
  1180. #define MIN_K ZMIN_K
  1181. #define IAMAX_K IZAMAX_K
  1182. #define IAMIN_K IZAMIN_K
  1183. #define IMAX_K IZMAX_K
  1184. #define IMIN_K IZMIN_K
  1185. #define ASUM_K ZASUM_K
  1186. #define AXPYU_K ZAXPYU_K
  1187. #define AXPYC_K ZAXPYC_K
  1188. #define COPY_K ZCOPY_K
  1189. #define DOTU_K ZDOTU_K
  1190. #define DOTC_K ZDOTC_K
  1191. #define NRM2_K ZNRM2_K
  1192. #define SCAL_K ZSCAL_K
  1193. #define SWAP_K ZSWAP_K
  1194. #define ROT_K ZROT_K
  1195. #define GEMV_N ZGEMV_N
  1196. #define GEMV_T ZGEMV_T
  1197. #define GEMV_R ZGEMV_R
  1198. #define GEMV_C ZGEMV_C
  1199. #define GEMV_O ZGEMV_O
  1200. #define GEMV_U ZGEMV_U
  1201. #define GEMV_S ZGEMV_S
  1202. #define GEMV_D ZGEMV_D
  1203. #define GERU_K ZGERU_K
  1204. #define GERC_K ZGERC_K
  1205. #define GERV_K ZGERV_K
  1206. #define GERD_K ZGERD_K
  1207. #define SYMV_U ZSYMV_U
  1208. #define SYMV_L ZSYMV_L
  1209. #define HEMV_U ZHEMV_U
  1210. #define HEMV_L ZHEMV_L
  1211. #define HEMV_V ZHEMV_V
  1212. #define HEMV_M ZHEMV_M
  1213. #define SYMV_THREAD_U ZSYMV_THREAD_U
  1214. #define SYMV_THREAD_L ZSYMV_THREAD_L
  1215. #define HEMV_THREAD_U ZHEMV_THREAD_U
  1216. #define HEMV_THREAD_L ZHEMV_THREAD_L
  1217. #define HEMV_THREAD_V ZHEMV_THREAD_V
  1218. #define HEMV_THREAD_M ZHEMV_THREAD_M
  1219. #define GEMM_ONCOPY ZGEMM_ONCOPY
  1220. #define GEMM_OTCOPY ZGEMM_OTCOPY
  1221. #define GEMM_INCOPY ZGEMM_INCOPY
  1222. #define GEMM_ITCOPY ZGEMM_ITCOPY
  1223. #define GEMM3M_ONCOPYB ZGEMM3M_ONCOPYB
  1224. #define GEMM3M_ONCOPYR ZGEMM3M_ONCOPYR
  1225. #define GEMM3M_ONCOPYI ZGEMM3M_ONCOPYI
  1226. #define GEMM3M_OTCOPYB ZGEMM3M_OTCOPYB
  1227. #define GEMM3M_OTCOPYR ZGEMM3M_OTCOPYR
  1228. #define GEMM3M_OTCOPYI ZGEMM3M_OTCOPYI
  1229. #define GEMM3M_INCOPYB ZGEMM3M_INCOPYB
  1230. #define GEMM3M_INCOPYR ZGEMM3M_INCOPYR
  1231. #define GEMM3M_INCOPYI ZGEMM3M_INCOPYI
  1232. #define GEMM3M_ITCOPYB ZGEMM3M_ITCOPYB
  1233. #define GEMM3M_ITCOPYR ZGEMM3M_ITCOPYR
  1234. #define GEMM3M_ITCOPYI ZGEMM3M_ITCOPYI
  1235. #ifdef UNIT
  1236. #define TRMM_OUNCOPY ZTRMM_OUNUCOPY
  1237. #define TRMM_OUTCOPY ZTRMM_OUTUCOPY
  1238. #define TRMM_OLNCOPY ZTRMM_OLNUCOPY
  1239. #define TRMM_OLTCOPY ZTRMM_OLTUCOPY
  1240. #define TRSM_OUNCOPY ZTRSM_OUNUCOPY
  1241. #define TRSM_OUTCOPY ZTRSM_OUTUCOPY
  1242. #define TRSM_OLNCOPY ZTRSM_OLNUCOPY
  1243. #define TRSM_OLTCOPY ZTRSM_OLTUCOPY
  1244. #define TRMM_IUNCOPY ZTRMM_IUNUCOPY
  1245. #define TRMM_IUTCOPY ZTRMM_IUTUCOPY
  1246. #define TRMM_ILNCOPY ZTRMM_ILNUCOPY
  1247. #define TRMM_ILTCOPY ZTRMM_ILTUCOPY
  1248. #define TRSM_IUNCOPY ZTRSM_IUNUCOPY
  1249. #define TRSM_IUTCOPY ZTRSM_IUTUCOPY
  1250. #define TRSM_ILNCOPY ZTRSM_ILNUCOPY
  1251. #define TRSM_ILTCOPY ZTRSM_ILTUCOPY
  1252. #else
  1253. #define TRMM_OUNCOPY ZTRMM_OUNNCOPY
  1254. #define TRMM_OUTCOPY ZTRMM_OUTNCOPY
  1255. #define TRMM_OLNCOPY ZTRMM_OLNNCOPY
  1256. #define TRMM_OLTCOPY ZTRMM_OLTNCOPY
  1257. #define TRSM_OUNCOPY ZTRSM_OUNNCOPY
  1258. #define TRSM_OUTCOPY ZTRSM_OUTNCOPY
  1259. #define TRSM_OLNCOPY ZTRSM_OLNNCOPY
  1260. #define TRSM_OLTCOPY ZTRSM_OLTNCOPY
  1261. #define TRMM_IUNCOPY ZTRMM_IUNNCOPY
  1262. #define TRMM_IUTCOPY ZTRMM_IUTNCOPY
  1263. #define TRMM_ILNCOPY ZTRMM_ILNNCOPY
  1264. #define TRMM_ILTCOPY ZTRMM_ILTNCOPY
  1265. #define TRSM_IUNCOPY ZTRSM_IUNNCOPY
  1266. #define TRSM_IUTCOPY ZTRSM_IUTNCOPY
  1267. #define TRSM_ILNCOPY ZTRSM_ILNNCOPY
  1268. #define TRSM_ILTCOPY ZTRSM_ILTNCOPY
  1269. #endif
  1270. #define SYMM3M_ILCOPYB ZSYMM3M_ILCOPYB
  1271. #define SYMM3M_IUCOPYB ZSYMM3M_IUCOPYB
  1272. #define SYMM3M_ILCOPYR ZSYMM3M_ILCOPYR
  1273. #define SYMM3M_IUCOPYR ZSYMM3M_IUCOPYR
  1274. #define SYMM3M_ILCOPYI ZSYMM3M_ILCOPYI
  1275. #define SYMM3M_IUCOPYI ZSYMM3M_IUCOPYI
  1276. #define SYMM3M_OLCOPYB ZSYMM3M_OLCOPYB
  1277. #define SYMM3M_OUCOPYB ZSYMM3M_OUCOPYB
  1278. #define SYMM3M_OLCOPYR ZSYMM3M_OLCOPYR
  1279. #define SYMM3M_OUCOPYR ZSYMM3M_OUCOPYR
  1280. #define SYMM3M_OLCOPYI ZSYMM3M_OLCOPYI
  1281. #define SYMM3M_OUCOPYI ZSYMM3M_OUCOPYI
  1282. #define HEMM3M_ILCOPYB ZHEMM3M_ILCOPYB
  1283. #define HEMM3M_IUCOPYB ZHEMM3M_IUCOPYB
  1284. #define HEMM3M_ILCOPYR ZHEMM3M_ILCOPYR
  1285. #define HEMM3M_IUCOPYR ZHEMM3M_IUCOPYR
  1286. #define HEMM3M_ILCOPYI ZHEMM3M_ILCOPYI
  1287. #define HEMM3M_IUCOPYI ZHEMM3M_IUCOPYI
  1288. #define HEMM3M_OLCOPYB ZHEMM3M_OLCOPYB
  1289. #define HEMM3M_OUCOPYB ZHEMM3M_OUCOPYB
  1290. #define HEMM3M_OLCOPYR ZHEMM3M_OLCOPYR
  1291. #define HEMM3M_OUCOPYR ZHEMM3M_OUCOPYR
  1292. #define HEMM3M_OLCOPYI ZHEMM3M_OLCOPYI
  1293. #define HEMM3M_OUCOPYI ZHEMM3M_OUCOPYI
  1294. #define GEMM_BETA ZGEMM_BETA
  1295. #define GEMM_KERNEL_N ZGEMM_KERNEL_N
  1296. #define GEMM_KERNEL_L ZGEMM_KERNEL_L
  1297. #define GEMM_KERNEL_R ZGEMM_KERNEL_R
  1298. #define GEMM_KERNEL_B ZGEMM_KERNEL_B
  1299. #define GEMM3M_KERNEL ZGEMM3M_KERNEL
  1300. #define TRMM_KERNEL_LN ZTRMM_KERNEL_LN
  1301. #define TRMM_KERNEL_LT ZTRMM_KERNEL_LT
  1302. #define TRMM_KERNEL_LR ZTRMM_KERNEL_LR
  1303. #define TRMM_KERNEL_LC ZTRMM_KERNEL_LC
  1304. #define TRMM_KERNEL_RN ZTRMM_KERNEL_RN
  1305. #define TRMM_KERNEL_RT ZTRMM_KERNEL_RT
  1306. #define TRMM_KERNEL_RR ZTRMM_KERNEL_RR
  1307. #define TRMM_KERNEL_RC ZTRMM_KERNEL_RC
  1308. #define TRSM_KERNEL_LN ZTRSM_KERNEL_LN
  1309. #define TRSM_KERNEL_LT ZTRSM_KERNEL_LT
  1310. #define TRSM_KERNEL_LR ZTRSM_KERNEL_LR
  1311. #define TRSM_KERNEL_LC ZTRSM_KERNEL_LC
  1312. #define TRSM_KERNEL_RN ZTRSM_KERNEL_RN
  1313. #define TRSM_KERNEL_RT ZTRSM_KERNEL_RT
  1314. #define TRSM_KERNEL_RR ZTRSM_KERNEL_RR
  1315. #define TRSM_KERNEL_RC ZTRSM_KERNEL_RC
  1316. #define GEMM_NN ZGEMM_NN
  1317. #define GEMM_CN ZGEMM_CN
  1318. #define GEMM_TN ZGEMM_TN
  1319. #define GEMM_NC ZGEMM_NC
  1320. #define GEMM_NT ZGEMM_NT
  1321. #define GEMM_CC ZGEMM_CC
  1322. #define GEMM_CT ZGEMM_CT
  1323. #define GEMM_TC ZGEMM_TC
  1324. #define GEMM_TT ZGEMM_TT
  1325. #define GEMM_NR ZGEMM_NR
  1326. #define GEMM_TR ZGEMM_TR
  1327. #define GEMM_CR ZGEMM_CR
  1328. #define GEMM_RN ZGEMM_RN
  1329. #define GEMM_RT ZGEMM_RT
  1330. #define GEMM_RC ZGEMM_RC
  1331. #define GEMM_RR ZGEMM_RR
  1332. #define SYMM_LU ZSYMM_LU
  1333. #define SYMM_LL ZSYMM_LL
  1334. #define SYMM_RU ZSYMM_RU
  1335. #define SYMM_RL ZSYMM_RL
  1336. #define HEMM_LU ZHEMM_LU
  1337. #define HEMM_LL ZHEMM_LL
  1338. #define HEMM_RU ZHEMM_RU
  1339. #define HEMM_RL ZHEMM_RL
  1340. #define HEMM_IUTCOPY ZHEMM_IUTCOPY
  1341. #define HEMM_ILTCOPY ZHEMM_ILTCOPY
  1342. #define HEMM_OUTCOPY ZHEMM_OUTCOPY
  1343. #define HEMM_OLTCOPY ZHEMM_OLTCOPY
  1344. #define SYRK_UN ZSYRK_UN
  1345. #define SYRK_UT ZSYRK_UT
  1346. #define SYRK_LN ZSYRK_LN
  1347. #define SYRK_LT ZSYRK_LT
  1348. #define SYRK_UR ZSYRK_UN
  1349. #define SYRK_UC ZSYRK_UT
  1350. #define SYRK_LR ZSYRK_LN
  1351. #define SYRK_LC ZSYRK_LT
  1352. #define SYRK_KERNEL_U ZSYRK_KERNEL_U
  1353. #define SYRK_KERNEL_L ZSYRK_KERNEL_L
  1354. #define HERK_UN ZHERK_UN
  1355. #define HERK_LN ZHERK_LN
  1356. #define HERK_UC ZHERK_UC
  1357. #define HERK_LC ZHERK_LC
  1358. #define HER2K_UN ZHER2K_UN
  1359. #define HER2K_LN ZHER2K_LN
  1360. #define HER2K_UC ZHER2K_UC
  1361. #define HER2K_LC ZHER2K_LC
  1362. #define SYR2K_UN ZSYR2K_UN
  1363. #define SYR2K_UT ZSYR2K_UT
  1364. #define SYR2K_LN ZSYR2K_LN
  1365. #define SYR2K_LT ZSYR2K_LT
  1366. #define SYR2K_UR ZSYR2K_UN
  1367. #define SYR2K_UC ZSYR2K_UT
  1368. #define SYR2K_LR ZSYR2K_LN
  1369. #define SYR2K_LC ZSYR2K_LT
  1370. #define SYR2K_KERNEL_U ZSYR2K_KERNEL_U
  1371. #define SYR2K_KERNEL_L ZSYR2K_KERNEL_L
  1372. #define TRMM_LNUU ZTRMM_LNUU
  1373. #define TRMM_LNUN ZTRMM_LNUN
  1374. #define TRMM_LNLU ZTRMM_LNLU
  1375. #define TRMM_LNLN ZTRMM_LNLN
  1376. #define TRMM_LTUU ZTRMM_LTUU
  1377. #define TRMM_LTUN ZTRMM_LTUN
  1378. #define TRMM_LTLU ZTRMM_LTLU
  1379. #define TRMM_LTLN ZTRMM_LTLN
  1380. #define TRMM_LRUU ZTRMM_LRUU
  1381. #define TRMM_LRUN ZTRMM_LRUN
  1382. #define TRMM_LRLU ZTRMM_LRLU
  1383. #define TRMM_LRLN ZTRMM_LRLN
  1384. #define TRMM_LCUU ZTRMM_LCUU
  1385. #define TRMM_LCUN ZTRMM_LCUN
  1386. #define TRMM_LCLU ZTRMM_LCLU
  1387. #define TRMM_LCLN ZTRMM_LCLN
  1388. #define TRMM_RNUU ZTRMM_RNUU
  1389. #define TRMM_RNUN ZTRMM_RNUN
  1390. #define TRMM_RNLU ZTRMM_RNLU
  1391. #define TRMM_RNLN ZTRMM_RNLN
  1392. #define TRMM_RTUU ZTRMM_RTUU
  1393. #define TRMM_RTUN ZTRMM_RTUN
  1394. #define TRMM_RTLU ZTRMM_RTLU
  1395. #define TRMM_RTLN ZTRMM_RTLN
  1396. #define TRMM_RRUU ZTRMM_RRUU
  1397. #define TRMM_RRUN ZTRMM_RRUN
  1398. #define TRMM_RRLU ZTRMM_RRLU
  1399. #define TRMM_RRLN ZTRMM_RRLN
  1400. #define TRMM_RCUU ZTRMM_RCUU
  1401. #define TRMM_RCUN ZTRMM_RCUN
  1402. #define TRMM_RCLU ZTRMM_RCLU
  1403. #define TRMM_RCLN ZTRMM_RCLN
  1404. #define TRSM_LNUU ZTRSM_LNUU
  1405. #define TRSM_LNUN ZTRSM_LNUN
  1406. #define TRSM_LNLU ZTRSM_LNLU
  1407. #define TRSM_LNLN ZTRSM_LNLN
  1408. #define TRSM_LTUU ZTRSM_LTUU
  1409. #define TRSM_LTUN ZTRSM_LTUN
  1410. #define TRSM_LTLU ZTRSM_LTLU
  1411. #define TRSM_LTLN ZTRSM_LTLN
  1412. #define TRSM_LRUU ZTRSM_LRUU
  1413. #define TRSM_LRUN ZTRSM_LRUN
  1414. #define TRSM_LRLU ZTRSM_LRLU
  1415. #define TRSM_LRLN ZTRSM_LRLN
  1416. #define TRSM_LCUU ZTRSM_LCUU
  1417. #define TRSM_LCUN ZTRSM_LCUN
  1418. #define TRSM_LCLU ZTRSM_LCLU
  1419. #define TRSM_LCLN ZTRSM_LCLN
  1420. #define TRSM_RNUU ZTRSM_RNUU
  1421. #define TRSM_RNUN ZTRSM_RNUN
  1422. #define TRSM_RNLU ZTRSM_RNLU
  1423. #define TRSM_RNLN ZTRSM_RNLN
  1424. #define TRSM_RTUU ZTRSM_RTUU
  1425. #define TRSM_RTUN ZTRSM_RTUN
  1426. #define TRSM_RTLU ZTRSM_RTLU
  1427. #define TRSM_RTLN ZTRSM_RTLN
  1428. #define TRSM_RRUU ZTRSM_RRUU
  1429. #define TRSM_RRUN ZTRSM_RRUN
  1430. #define TRSM_RRLU ZTRSM_RRLU
  1431. #define TRSM_RRLN ZTRSM_RRLN
  1432. #define TRSM_RCUU ZTRSM_RCUU
  1433. #define TRSM_RCUN ZTRSM_RCUN
  1434. #define TRSM_RCLU ZTRSM_RCLU
  1435. #define TRSM_RCLN ZTRSM_RCLN
  1436. #define GEMM_THREAD_NN ZGEMM_THREAD_NN
  1437. #define GEMM_THREAD_CN ZGEMM_THREAD_CN
  1438. #define GEMM_THREAD_TN ZGEMM_THREAD_TN
  1439. #define GEMM_THREAD_NC ZGEMM_THREAD_NC
  1440. #define GEMM_THREAD_NT ZGEMM_THREAD_NT
  1441. #define GEMM_THREAD_CC ZGEMM_THREAD_CC
  1442. #define GEMM_THREAD_CT ZGEMM_THREAD_CT
  1443. #define GEMM_THREAD_TC ZGEMM_THREAD_TC
  1444. #define GEMM_THREAD_TT ZGEMM_THREAD_TT
  1445. #define GEMM_THREAD_NR ZGEMM_THREAD_NR
  1446. #define GEMM_THREAD_TR ZGEMM_THREAD_TR
  1447. #define GEMM_THREAD_CR ZGEMM_THREAD_CR
  1448. #define GEMM_THREAD_RN ZGEMM_THREAD_RN
  1449. #define GEMM_THREAD_RT ZGEMM_THREAD_RT
  1450. #define GEMM_THREAD_RC ZGEMM_THREAD_RC
  1451. #define GEMM_THREAD_RR ZGEMM_THREAD_RR
  1452. #define SYMM_THREAD_LU ZSYMM_THREAD_LU
  1453. #define SYMM_THREAD_LL ZSYMM_THREAD_LL
  1454. #define SYMM_THREAD_RU ZSYMM_THREAD_RU
  1455. #define SYMM_THREAD_RL ZSYMM_THREAD_RL
  1456. #define HEMM_THREAD_LU ZHEMM_THREAD_LU
  1457. #define HEMM_THREAD_LL ZHEMM_THREAD_LL
  1458. #define HEMM_THREAD_RU ZHEMM_THREAD_RU
  1459. #define HEMM_THREAD_RL ZHEMM_THREAD_RL
  1460. #define SYRK_THREAD_UN ZSYRK_THREAD_UN
  1461. #define SYRK_THREAD_UT ZSYRK_THREAD_UT
  1462. #define SYRK_THREAD_LN ZSYRK_THREAD_LN
  1463. #define SYRK_THREAD_LT ZSYRK_THREAD_LT
  1464. #define SYRK_THREAD_UR ZSYRK_THREAD_UR
  1465. #define SYRK_THREAD_UC ZSYRK_THREAD_UC
  1466. #define SYRK_THREAD_LR ZSYRK_THREAD_LR
  1467. #define SYRK_THREAD_LC ZSYRK_THREAD_LC
  1468. #define HERK_THREAD_UN ZHERK_THREAD_UN
  1469. #define HERK_THREAD_UT ZHERK_THREAD_UT
  1470. #define HERK_THREAD_LN ZHERK_THREAD_LN
  1471. #define HERK_THREAD_LT ZHERK_THREAD_LT
  1472. #define HERK_THREAD_UR ZHERK_THREAD_UR
  1473. #define HERK_THREAD_UC ZHERK_THREAD_UC
  1474. #define HERK_THREAD_LR ZHERK_THREAD_LR
  1475. #define HERK_THREAD_LC ZHERK_THREAD_LC
  1476. #define GEMM3M_NN ZGEMM3M_NN
  1477. #define GEMM3M_CN ZGEMM3M_CN
  1478. #define GEMM3M_TN ZGEMM3M_TN
  1479. #define GEMM3M_NC ZGEMM3M_NC
  1480. #define GEMM3M_NT ZGEMM3M_NT
  1481. #define GEMM3M_CC ZGEMM3M_CC
  1482. #define GEMM3M_CT ZGEMM3M_CT
  1483. #define GEMM3M_TC ZGEMM3M_TC
  1484. #define GEMM3M_TT ZGEMM3M_TT
  1485. #define GEMM3M_NR ZGEMM3M_NR
  1486. #define GEMM3M_TR ZGEMM3M_TR
  1487. #define GEMM3M_CR ZGEMM3M_CR
  1488. #define GEMM3M_RN ZGEMM3M_RN
  1489. #define GEMM3M_RT ZGEMM3M_RT
  1490. #define GEMM3M_RC ZGEMM3M_RC
  1491. #define GEMM3M_RR ZGEMM3M_RR
  1492. #define GEMM3M_THREAD_NN ZGEMM3M_THREAD_NN
  1493. #define GEMM3M_THREAD_CN ZGEMM3M_THREAD_CN
  1494. #define GEMM3M_THREAD_TN ZGEMM3M_THREAD_TN
  1495. #define GEMM3M_THREAD_NC ZGEMM3M_THREAD_NC
  1496. #define GEMM3M_THREAD_NT ZGEMM3M_THREAD_NT
  1497. #define GEMM3M_THREAD_CC ZGEMM3M_THREAD_CC
  1498. #define GEMM3M_THREAD_CT ZGEMM3M_THREAD_CT
  1499. #define GEMM3M_THREAD_TC ZGEMM3M_THREAD_TC
  1500. #define GEMM3M_THREAD_TT ZGEMM3M_THREAD_TT
  1501. #define GEMM3M_THREAD_NR ZGEMM3M_THREAD_NR
  1502. #define GEMM3M_THREAD_TR ZGEMM3M_THREAD_TR
  1503. #define GEMM3M_THREAD_CR ZGEMM3M_THREAD_CR
  1504. #define GEMM3M_THREAD_RN ZGEMM3M_THREAD_RN
  1505. #define GEMM3M_THREAD_RT ZGEMM3M_THREAD_RT
  1506. #define GEMM3M_THREAD_RC ZGEMM3M_THREAD_RC
  1507. #define GEMM3M_THREAD_RR ZGEMM3M_THREAD_RR
  1508. #define SYMM3M_LU ZSYMM3M_LU
  1509. #define SYMM3M_LL ZSYMM3M_LL
  1510. #define SYMM3M_RU ZSYMM3M_RU
  1511. #define SYMM3M_RL ZSYMM3M_RL
  1512. #define SYMM3M_THREAD_LU ZSYMM3M_THREAD_LU
  1513. #define SYMM3M_THREAD_LL ZSYMM3M_THREAD_LL
  1514. #define SYMM3M_THREAD_RU ZSYMM3M_THREAD_RU
  1515. #define SYMM3M_THREAD_RL ZSYMM3M_THREAD_RL
  1516. #define HEMM3M_LU ZHEMM3M_LU
  1517. #define HEMM3M_LL ZHEMM3M_LL
  1518. #define HEMM3M_RU ZHEMM3M_RU
  1519. #define HEMM3M_RL ZHEMM3M_RL
  1520. #define HEMM3M_THREAD_LU ZHEMM3M_THREAD_LU
  1521. #define HEMM3M_THREAD_LL ZHEMM3M_THREAD_LL
  1522. #define HEMM3M_THREAD_RU ZHEMM3M_THREAD_RU
  1523. #define HEMM3M_THREAD_RL ZHEMM3M_THREAD_RL
  1524. #define SYMM_IUTCOPY ZSYMM_IUTCOPY
  1525. #define SYMM_ILTCOPY ZSYMM_ILTCOPY
  1526. #define SYMM_OUTCOPY ZSYMM_OUTCOPY
  1527. #define SYMM_OLTCOPY ZSYMM_OLTCOPY
  1528. #define AXPBY_K ZAXPBY_K
  1529. #define OMATCOPY_K_CN ZOMATCOPY_K_CN
  1530. #define OMATCOPY_K_RN ZOMATCOPY_K_RN
  1531. #define OMATCOPY_K_CT ZOMATCOPY_K_CT
  1532. #define OMATCOPY_K_RT ZOMATCOPY_K_RT
  1533. #define OMATCOPY_K_CNC ZOMATCOPY_K_CNC
  1534. #define OMATCOPY_K_RNC ZOMATCOPY_K_RNC
  1535. #define OMATCOPY_K_CTC ZOMATCOPY_K_CTC
  1536. #define OMATCOPY_K_RTC ZOMATCOPY_K_RTC
  1537. #else
  1538. #define AMAX_K CAMAX_K
  1539. #define AMIN_K CAMIN_K
  1540. #define MAX_K CMAX_K
  1541. #define MIN_K CMIN_K
  1542. #define IAMAX_K ICAMAX_K
  1543. #define IAMIN_K ICAMIN_K
  1544. #define IMAX_K ICMAX_K
  1545. #define IMIN_K ICMIN_K
  1546. #define ASUM_K CASUM_K
  1547. #define AXPYU_K CAXPYU_K
  1548. #define AXPYC_K CAXPYC_K
  1549. #define COPY_K CCOPY_K
  1550. #define DOTU_K CDOTU_K
  1551. #define DOTC_K CDOTC_K
  1552. #define NRM2_K CNRM2_K
  1553. #define SCAL_K CSCAL_K
  1554. #define SWAP_K CSWAP_K
  1555. #define ROT_K CROT_K
  1556. #define GEMV_N CGEMV_N
  1557. #define GEMV_T CGEMV_T
  1558. #define GEMV_R CGEMV_R
  1559. #define GEMV_C CGEMV_C
  1560. #define GEMV_O CGEMV_O
  1561. #define GEMV_U CGEMV_U
  1562. #define GEMV_S CGEMV_S
  1563. #define GEMV_D CGEMV_D
  1564. #define GERU_K CGERU_K
  1565. #define GERC_K CGERC_K
  1566. #define GERV_K CGERV_K
  1567. #define GERD_K CGERD_K
  1568. #define SYMV_U CSYMV_U
  1569. #define SYMV_L CSYMV_L
  1570. #define HEMV_U CHEMV_U
  1571. #define HEMV_L CHEMV_L
  1572. #define HEMV_V CHEMV_V
  1573. #define HEMV_M CHEMV_M
  1574. #define SYMV_THREAD_U CSYMV_THREAD_U
  1575. #define SYMV_THREAD_L CSYMV_THREAD_L
  1576. #define HEMV_THREAD_U CHEMV_THREAD_U
  1577. #define HEMV_THREAD_L CHEMV_THREAD_L
  1578. #define HEMV_THREAD_V CHEMV_THREAD_V
  1579. #define HEMV_THREAD_M CHEMV_THREAD_M
  1580. #define GEMM_ONCOPY CGEMM_ONCOPY
  1581. #define GEMM_OTCOPY CGEMM_OTCOPY
  1582. #define GEMM_INCOPY CGEMM_INCOPY
  1583. #define GEMM_ITCOPY CGEMM_ITCOPY
  1584. #define GEMM3M_ONCOPYB CGEMM3M_ONCOPYB
  1585. #define GEMM3M_ONCOPYR CGEMM3M_ONCOPYR
  1586. #define GEMM3M_ONCOPYI CGEMM3M_ONCOPYI
  1587. #define GEMM3M_OTCOPYB CGEMM3M_OTCOPYB
  1588. #define GEMM3M_OTCOPYR CGEMM3M_OTCOPYR
  1589. #define GEMM3M_OTCOPYI CGEMM3M_OTCOPYI
  1590. #define GEMM3M_INCOPYB CGEMM3M_INCOPYB
  1591. #define GEMM3M_INCOPYR CGEMM3M_INCOPYR
  1592. #define GEMM3M_INCOPYI CGEMM3M_INCOPYI
  1593. #define GEMM3M_ITCOPYB CGEMM3M_ITCOPYB
  1594. #define GEMM3M_ITCOPYR CGEMM3M_ITCOPYR
  1595. #define GEMM3M_ITCOPYI CGEMM3M_ITCOPYI
  1596. #ifdef UNIT
  1597. #define TRMM_OUNCOPY CTRMM_OUNUCOPY
  1598. #define TRMM_OUTCOPY CTRMM_OUTUCOPY
  1599. #define TRMM_OLNCOPY CTRMM_OLNUCOPY
  1600. #define TRMM_OLTCOPY CTRMM_OLTUCOPY
  1601. #define TRSM_OUNCOPY CTRSM_OUNUCOPY
  1602. #define TRSM_OUTCOPY CTRSM_OUTUCOPY
  1603. #define TRSM_OLNCOPY CTRSM_OLNUCOPY
  1604. #define TRSM_OLTCOPY CTRSM_OLTUCOPY
  1605. #define TRMM_IUNCOPY CTRMM_IUNUCOPY
  1606. #define TRMM_IUTCOPY CTRMM_IUTUCOPY
  1607. #define TRMM_ILNCOPY CTRMM_ILNUCOPY
  1608. #define TRMM_ILTCOPY CTRMM_ILTUCOPY
  1609. #define TRSM_IUNCOPY CTRSM_IUNUCOPY
  1610. #define TRSM_IUTCOPY CTRSM_IUTUCOPY
  1611. #define TRSM_ILNCOPY CTRSM_ILNUCOPY
  1612. #define TRSM_ILTCOPY CTRSM_ILTUCOPY
  1613. #else
  1614. #define TRMM_OUNCOPY CTRMM_OUNNCOPY
  1615. #define TRMM_OUTCOPY CTRMM_OUTNCOPY
  1616. #define TRMM_OLNCOPY CTRMM_OLNNCOPY
  1617. #define TRMM_OLTCOPY CTRMM_OLTNCOPY
  1618. #define TRSM_OUNCOPY CTRSM_OUNNCOPY
  1619. #define TRSM_OUTCOPY CTRSM_OUTNCOPY
  1620. #define TRSM_OLNCOPY CTRSM_OLNNCOPY
  1621. #define TRSM_OLTCOPY CTRSM_OLTNCOPY
  1622. #define TRMM_IUNCOPY CTRMM_IUNNCOPY
  1623. #define TRMM_IUTCOPY CTRMM_IUTNCOPY
  1624. #define TRMM_ILNCOPY CTRMM_ILNNCOPY
  1625. #define TRMM_ILTCOPY CTRMM_ILTNCOPY
  1626. #define TRSM_IUNCOPY CTRSM_IUNNCOPY
  1627. #define TRSM_IUTCOPY CTRSM_IUTNCOPY
  1628. #define TRSM_ILNCOPY CTRSM_ILNNCOPY
  1629. #define TRSM_ILTCOPY CTRSM_ILTNCOPY
  1630. #endif
  1631. #define SYMM3M_ILCOPYB CSYMM3M_ILCOPYB
  1632. #define SYMM3M_IUCOPYB CSYMM3M_IUCOPYB
  1633. #define SYMM3M_ILCOPYR CSYMM3M_ILCOPYR
  1634. #define SYMM3M_IUCOPYR CSYMM3M_IUCOPYR
  1635. #define SYMM3M_ILCOPYI CSYMM3M_ILCOPYI
  1636. #define SYMM3M_IUCOPYI CSYMM3M_IUCOPYI
  1637. #define SYMM3M_OLCOPYB CSYMM3M_OLCOPYB
  1638. #define SYMM3M_OUCOPYB CSYMM3M_OUCOPYB
  1639. #define SYMM3M_OLCOPYR CSYMM3M_OLCOPYR
  1640. #define SYMM3M_OUCOPYR CSYMM3M_OUCOPYR
  1641. #define SYMM3M_OLCOPYI CSYMM3M_OLCOPYI
  1642. #define SYMM3M_OUCOPYI CSYMM3M_OUCOPYI
  1643. #define HEMM3M_ILCOPYB CHEMM3M_ILCOPYB
  1644. #define HEMM3M_IUCOPYB CHEMM3M_IUCOPYB
  1645. #define HEMM3M_ILCOPYR CHEMM3M_ILCOPYR
  1646. #define HEMM3M_IUCOPYR CHEMM3M_IUCOPYR
  1647. #define HEMM3M_ILCOPYI CHEMM3M_ILCOPYI
  1648. #define HEMM3M_IUCOPYI CHEMM3M_IUCOPYI
  1649. #define HEMM3M_OLCOPYB CHEMM3M_OLCOPYB
  1650. #define HEMM3M_OUCOPYB CHEMM3M_OUCOPYB
  1651. #define HEMM3M_OLCOPYR CHEMM3M_OLCOPYR
  1652. #define HEMM3M_OUCOPYR CHEMM3M_OUCOPYR
  1653. #define HEMM3M_OLCOPYI CHEMM3M_OLCOPYI
  1654. #define HEMM3M_OUCOPYI CHEMM3M_OUCOPYI
  1655. #define GEMM_BETA CGEMM_BETA
  1656. #define GEMM_KERNEL_N CGEMM_KERNEL_N
  1657. #define GEMM_KERNEL_L CGEMM_KERNEL_L
  1658. #define GEMM_KERNEL_R CGEMM_KERNEL_R
  1659. #define GEMM_KERNEL_B CGEMM_KERNEL_B
  1660. #define GEMM3M_KERNEL CGEMM3M_KERNEL
  1661. #define TRMM_KERNEL_LN CTRMM_KERNEL_LN
  1662. #define TRMM_KERNEL_LT CTRMM_KERNEL_LT
  1663. #define TRMM_KERNEL_LR CTRMM_KERNEL_LR
  1664. #define TRMM_KERNEL_LC CTRMM_KERNEL_LC
  1665. #define TRMM_KERNEL_RN CTRMM_KERNEL_RN
  1666. #define TRMM_KERNEL_RT CTRMM_KERNEL_RT
  1667. #define TRMM_KERNEL_RR CTRMM_KERNEL_RR
  1668. #define TRMM_KERNEL_RC CTRMM_KERNEL_RC
  1669. #define TRSM_KERNEL_LN CTRSM_KERNEL_LN
  1670. #define TRSM_KERNEL_LT CTRSM_KERNEL_LT
  1671. #define TRSM_KERNEL_LR CTRSM_KERNEL_LR
  1672. #define TRSM_KERNEL_LC CTRSM_KERNEL_LC
  1673. #define TRSM_KERNEL_RN CTRSM_KERNEL_RN
  1674. #define TRSM_KERNEL_RT CTRSM_KERNEL_RT
  1675. #define TRSM_KERNEL_RR CTRSM_KERNEL_RR
  1676. #define TRSM_KERNEL_RC CTRSM_KERNEL_RC
  1677. #define GEMM_NN CGEMM_NN
  1678. #define GEMM_CN CGEMM_CN
  1679. #define GEMM_TN CGEMM_TN
  1680. #define GEMM_NC CGEMM_NC
  1681. #define GEMM_NT CGEMM_NT
  1682. #define GEMM_CC CGEMM_CC
  1683. #define GEMM_CT CGEMM_CT
  1684. #define GEMM_TC CGEMM_TC
  1685. #define GEMM_TT CGEMM_TT
  1686. #define GEMM_NR CGEMM_NR
  1687. #define GEMM_TR CGEMM_TR
  1688. #define GEMM_CR CGEMM_CR
  1689. #define GEMM_RN CGEMM_RN
  1690. #define GEMM_RT CGEMM_RT
  1691. #define GEMM_RC CGEMM_RC
  1692. #define GEMM_RR CGEMM_RR
  1693. #define SYMM_LU CSYMM_LU
  1694. #define SYMM_LL CSYMM_LL
  1695. #define SYMM_RU CSYMM_RU
  1696. #define SYMM_RL CSYMM_RL
  1697. #define HEMM_LU CHEMM_LU
  1698. #define HEMM_LL CHEMM_LL
  1699. #define HEMM_RU CHEMM_RU
  1700. #define HEMM_RL CHEMM_RL
  1701. #define HEMM_IUTCOPY CHEMM_IUTCOPY
  1702. #define HEMM_ILTCOPY CHEMM_ILTCOPY
  1703. #define HEMM_OUTCOPY CHEMM_OUTCOPY
  1704. #define HEMM_OLTCOPY CHEMM_OLTCOPY
  1705. #define SYRK_UN CSYRK_UN
  1706. #define SYRK_UT CSYRK_UT
  1707. #define SYRK_LN CSYRK_LN
  1708. #define SYRK_LT CSYRK_LT
  1709. #define SYRK_UR CSYRK_UN
  1710. #define SYRK_UC CSYRK_UT
  1711. #define SYRK_LR CSYRK_LN
  1712. #define SYRK_LC CSYRK_LT
  1713. #define SYRK_KERNEL_U CSYRK_KERNEL_U
  1714. #define SYRK_KERNEL_L CSYRK_KERNEL_L
  1715. #define HERK_UN CHERK_UN
  1716. #define HERK_LN CHERK_LN
  1717. #define HERK_UC CHERK_UC
  1718. #define HERK_LC CHERK_LC
  1719. #define HER2K_UN CHER2K_UN
  1720. #define HER2K_LN CHER2K_LN
  1721. #define HER2K_UC CHER2K_UC
  1722. #define HER2K_LC CHER2K_LC
  1723. #define SYR2K_UN CSYR2K_UN
  1724. #define SYR2K_UT CSYR2K_UT
  1725. #define SYR2K_LN CSYR2K_LN
  1726. #define SYR2K_LT CSYR2K_LT
  1727. #define SYR2K_UR CSYR2K_UN
  1728. #define SYR2K_UC CSYR2K_UT
  1729. #define SYR2K_LR CSYR2K_LN
  1730. #define SYR2K_LC CSYR2K_LT
  1731. #define SYR2K_KERNEL_U CSYR2K_KERNEL_U
  1732. #define SYR2K_KERNEL_L CSYR2K_KERNEL_L
  1733. #define TRMM_LNUU CTRMM_LNUU
  1734. #define TRMM_LNUN CTRMM_LNUN
  1735. #define TRMM_LNLU CTRMM_LNLU
  1736. #define TRMM_LNLN CTRMM_LNLN
  1737. #define TRMM_LTUU CTRMM_LTUU
  1738. #define TRMM_LTUN CTRMM_LTUN
  1739. #define TRMM_LTLU CTRMM_LTLU
  1740. #define TRMM_LTLN CTRMM_LTLN
  1741. #define TRMM_LRUU CTRMM_LRUU
  1742. #define TRMM_LRUN CTRMM_LRUN
  1743. #define TRMM_LRLU CTRMM_LRLU
  1744. #define TRMM_LRLN CTRMM_LRLN
  1745. #define TRMM_LCUU CTRMM_LCUU
  1746. #define TRMM_LCUN CTRMM_LCUN
  1747. #define TRMM_LCLU CTRMM_LCLU
  1748. #define TRMM_LCLN CTRMM_LCLN
  1749. #define TRMM_RNUU CTRMM_RNUU
  1750. #define TRMM_RNUN CTRMM_RNUN
  1751. #define TRMM_RNLU CTRMM_RNLU
  1752. #define TRMM_RNLN CTRMM_RNLN
  1753. #define TRMM_RTUU CTRMM_RTUU
  1754. #define TRMM_RTUN CTRMM_RTUN
  1755. #define TRMM_RTLU CTRMM_RTLU
  1756. #define TRMM_RTLN CTRMM_RTLN
  1757. #define TRMM_RRUU CTRMM_RRUU
  1758. #define TRMM_RRUN CTRMM_RRUN
  1759. #define TRMM_RRLU CTRMM_RRLU
  1760. #define TRMM_RRLN CTRMM_RRLN
  1761. #define TRMM_RCUU CTRMM_RCUU
  1762. #define TRMM_RCUN CTRMM_RCUN
  1763. #define TRMM_RCLU CTRMM_RCLU
  1764. #define TRMM_RCLN CTRMM_RCLN
  1765. #define TRSM_LNUU CTRSM_LNUU
  1766. #define TRSM_LNUN CTRSM_LNUN
  1767. #define TRSM_LNLU CTRSM_LNLU
  1768. #define TRSM_LNLN CTRSM_LNLN
  1769. #define TRSM_LTUU CTRSM_LTUU
  1770. #define TRSM_LTUN CTRSM_LTUN
  1771. #define TRSM_LTLU CTRSM_LTLU
  1772. #define TRSM_LTLN CTRSM_LTLN
  1773. #define TRSM_LRUU CTRSM_LRUU
  1774. #define TRSM_LRUN CTRSM_LRUN
  1775. #define TRSM_LRLU CTRSM_LRLU
  1776. #define TRSM_LRLN CTRSM_LRLN
  1777. #define TRSM_LCUU CTRSM_LCUU
  1778. #define TRSM_LCUN CTRSM_LCUN
  1779. #define TRSM_LCLU CTRSM_LCLU
  1780. #define TRSM_LCLN CTRSM_LCLN
  1781. #define TRSM_RNUU CTRSM_RNUU
  1782. #define TRSM_RNUN CTRSM_RNUN
  1783. #define TRSM_RNLU CTRSM_RNLU
  1784. #define TRSM_RNLN CTRSM_RNLN
  1785. #define TRSM_RTUU CTRSM_RTUU
  1786. #define TRSM_RTUN CTRSM_RTUN
  1787. #define TRSM_RTLU CTRSM_RTLU
  1788. #define TRSM_RTLN CTRSM_RTLN
  1789. #define TRSM_RRUU CTRSM_RRUU
  1790. #define TRSM_RRUN CTRSM_RRUN
  1791. #define TRSM_RRLU CTRSM_RRLU
  1792. #define TRSM_RRLN CTRSM_RRLN
  1793. #define TRSM_RCUU CTRSM_RCUU
  1794. #define TRSM_RCUN CTRSM_RCUN
  1795. #define TRSM_RCLU CTRSM_RCLU
  1796. #define TRSM_RCLN CTRSM_RCLN
  1797. #define GEMM_THREAD_NN CGEMM_THREAD_NN
  1798. #define GEMM_THREAD_CN CGEMM_THREAD_CN
  1799. #define GEMM_THREAD_TN CGEMM_THREAD_TN
  1800. #define GEMM_THREAD_NC CGEMM_THREAD_NC
  1801. #define GEMM_THREAD_NT CGEMM_THREAD_NT
  1802. #define GEMM_THREAD_CC CGEMM_THREAD_CC
  1803. #define GEMM_THREAD_CT CGEMM_THREAD_CT
  1804. #define GEMM_THREAD_TC CGEMM_THREAD_TC
  1805. #define GEMM_THREAD_TT CGEMM_THREAD_TT
  1806. #define GEMM_THREAD_NR CGEMM_THREAD_NR
  1807. #define GEMM_THREAD_TR CGEMM_THREAD_TR
  1808. #define GEMM_THREAD_CR CGEMM_THREAD_CR
  1809. #define GEMM_THREAD_RN CGEMM_THREAD_RN
  1810. #define GEMM_THREAD_RT CGEMM_THREAD_RT
  1811. #define GEMM_THREAD_RC CGEMM_THREAD_RC
  1812. #define GEMM_THREAD_RR CGEMM_THREAD_RR
  1813. #define SYMM_THREAD_LU CSYMM_THREAD_LU
  1814. #define SYMM_THREAD_LL CSYMM_THREAD_LL
  1815. #define SYMM_THREAD_RU CSYMM_THREAD_RU
  1816. #define SYMM_THREAD_RL CSYMM_THREAD_RL
  1817. #define HEMM_THREAD_LU CHEMM_THREAD_LU
  1818. #define HEMM_THREAD_LL CHEMM_THREAD_LL
  1819. #define HEMM_THREAD_RU CHEMM_THREAD_RU
  1820. #define HEMM_THREAD_RL CHEMM_THREAD_RL
  1821. #define SYRK_THREAD_UN CSYRK_THREAD_UN
  1822. #define SYRK_THREAD_UT CSYRK_THREAD_UT
  1823. #define SYRK_THREAD_LN CSYRK_THREAD_LN
  1824. #define SYRK_THREAD_LT CSYRK_THREAD_LT
  1825. #define SYRK_THREAD_UR CSYRK_THREAD_UR
  1826. #define SYRK_THREAD_UC CSYRK_THREAD_UC
  1827. #define SYRK_THREAD_LR CSYRK_THREAD_LR
  1828. #define SYRK_THREAD_LC CSYRK_THREAD_LC
  1829. #define HERK_THREAD_UN CHERK_THREAD_UN
  1830. #define HERK_THREAD_UT CHERK_THREAD_UT
  1831. #define HERK_THREAD_LN CHERK_THREAD_LN
  1832. #define HERK_THREAD_LT CHERK_THREAD_LT
  1833. #define HERK_THREAD_UR CHERK_THREAD_UR
  1834. #define HERK_THREAD_UC CHERK_THREAD_UC
  1835. #define HERK_THREAD_LR CHERK_THREAD_LR
  1836. #define HERK_THREAD_LC CHERK_THREAD_LC
  1837. #define GEMM3M_NN CGEMM3M_NN
  1838. #define GEMM3M_CN CGEMM3M_CN
  1839. #define GEMM3M_TN CGEMM3M_TN
  1840. #define GEMM3M_NC CGEMM3M_NC
  1841. #define GEMM3M_NT CGEMM3M_NT
  1842. #define GEMM3M_CC CGEMM3M_CC
  1843. #define GEMM3M_CT CGEMM3M_CT
  1844. #define GEMM3M_TC CGEMM3M_TC
  1845. #define GEMM3M_TT CGEMM3M_TT
  1846. #define GEMM3M_NR CGEMM3M_NR
  1847. #define GEMM3M_TR CGEMM3M_TR
  1848. #define GEMM3M_CR CGEMM3M_CR
  1849. #define GEMM3M_RN CGEMM3M_RN
  1850. #define GEMM3M_RT CGEMM3M_RT
  1851. #define GEMM3M_RC CGEMM3M_RC
  1852. #define GEMM3M_RR CGEMM3M_RR
  1853. #define GEMM3M_THREAD_NN CGEMM3M_THREAD_NN
  1854. #define GEMM3M_THREAD_CN CGEMM3M_THREAD_CN
  1855. #define GEMM3M_THREAD_TN CGEMM3M_THREAD_TN
  1856. #define GEMM3M_THREAD_NC CGEMM3M_THREAD_NC
  1857. #define GEMM3M_THREAD_NT CGEMM3M_THREAD_NT
  1858. #define GEMM3M_THREAD_CC CGEMM3M_THREAD_CC
  1859. #define GEMM3M_THREAD_CT CGEMM3M_THREAD_CT
  1860. #define GEMM3M_THREAD_TC CGEMM3M_THREAD_TC
  1861. #define GEMM3M_THREAD_TT CGEMM3M_THREAD_TT
  1862. #define GEMM3M_THREAD_NR CGEMM3M_THREAD_NR
  1863. #define GEMM3M_THREAD_TR CGEMM3M_THREAD_TR
  1864. #define GEMM3M_THREAD_CR CGEMM3M_THREAD_CR
  1865. #define GEMM3M_THREAD_RN CGEMM3M_THREAD_RN
  1866. #define GEMM3M_THREAD_RT CGEMM3M_THREAD_RT
  1867. #define GEMM3M_THREAD_RC CGEMM3M_THREAD_RC
  1868. #define GEMM3M_THREAD_RR CGEMM3M_THREAD_RR
  1869. #define SYMM3M_LU CSYMM3M_LU
  1870. #define SYMM3M_LL CSYMM3M_LL
  1871. #define SYMM3M_RU CSYMM3M_RU
  1872. #define SYMM3M_RL CSYMM3M_RL
  1873. #define SYMM3M_THREAD_LU CSYMM3M_THREAD_LU
  1874. #define SYMM3M_THREAD_LL CSYMM3M_THREAD_LL
  1875. #define SYMM3M_THREAD_RU CSYMM3M_THREAD_RU
  1876. #define SYMM3M_THREAD_RL CSYMM3M_THREAD_RL
  1877. #define HEMM3M_LU CHEMM3M_LU
  1878. #define HEMM3M_LL CHEMM3M_LL
  1879. #define HEMM3M_RU CHEMM3M_RU
  1880. #define HEMM3M_RL CHEMM3M_RL
  1881. #define HEMM3M_THREAD_LU CHEMM3M_THREAD_LU
  1882. #define HEMM3M_THREAD_LL CHEMM3M_THREAD_LL
  1883. #define HEMM3M_THREAD_RU CHEMM3M_THREAD_RU
  1884. #define HEMM3M_THREAD_RL CHEMM3M_THREAD_RL
  1885. #define SYMM_IUTCOPY CSYMM_IUTCOPY
  1886. #define SYMM_ILTCOPY CSYMM_ILTCOPY
  1887. #define SYMM_OUTCOPY CSYMM_OUTCOPY
  1888. #define SYMM_OLTCOPY CSYMM_OLTCOPY
  1889. #define AXPBY_K CAXPBY_K
  1890. #define OMATCOPY_K_CN COMATCOPY_K_CN
  1891. #define OMATCOPY_K_RN COMATCOPY_K_RN
  1892. #define OMATCOPY_K_CT COMATCOPY_K_CT
  1893. #define OMATCOPY_K_RT COMATCOPY_K_RT
  1894. #define OMATCOPY_K_CNC COMATCOPY_K_CNC
  1895. #define OMATCOPY_K_RNC COMATCOPY_K_RNC
  1896. #define OMATCOPY_K_CTC COMATCOPY_K_CTC
  1897. #define OMATCOPY_K_RTC COMATCOPY_K_RTC
  1898. #endif
  1899. #endif
  1900. #ifndef ASSEMBLER
  1901. #if defined(ARCH_X86) || defined(ARCH_X86_64) || defined(ARCH_IA64) || defined(ARCH_MIPS64)
  1902. extern BLASLONG gemm_offset_a;
  1903. extern BLASLONG gemm_offset_b;
  1904. extern BLASLONG sgemm_p;
  1905. extern BLASLONG sgemm_q;
  1906. extern BLASLONG sgemm_r;
  1907. extern BLASLONG dgemm_p;
  1908. extern BLASLONG dgemm_q;
  1909. extern BLASLONG dgemm_r;
  1910. extern BLASLONG qgemm_p;
  1911. extern BLASLONG qgemm_q;
  1912. extern BLASLONG qgemm_r;
  1913. extern BLASLONG cgemm_p;
  1914. extern BLASLONG cgemm_q;
  1915. extern BLASLONG cgemm_r;
  1916. extern BLASLONG zgemm_p;
  1917. extern BLASLONG zgemm_q;
  1918. extern BLASLONG zgemm_r;
  1919. extern BLASLONG xgemm_p;
  1920. extern BLASLONG xgemm_q;
  1921. extern BLASLONG xgemm_r;
  1922. #endif
  1923. typedef struct {
  1924. void *a, *b, *c, *d, *alpha, *beta;
  1925. BLASLONG m, n, k, lda, ldb, ldc, ldd;
  1926. #ifdef SMP
  1927. void *common;
  1928. BLASLONG nthreads;
  1929. #endif
  1930. #ifdef PARAMTEST
  1931. BLASLONG gemm_p, gemm_q, gemm_r;
  1932. #endif
  1933. #ifdef PREFETCHTEST
  1934. BLASLONG prea, preb, prec, pred;
  1935. #endif
  1936. } blas_arg_t;
  1937. #endif
  1938. #ifdef XDOUBLE
  1939. #define TRSV_NUU qtrsv_NUU
  1940. #define TRSV_NUN qtrsv_NUN
  1941. #define TRSV_NLU qtrsv_NLU
  1942. #define TRSV_NLN qtrsv_NLN
  1943. #define TRSV_TUU qtrsv_TUU
  1944. #define TRSV_TUN qtrsv_TUN
  1945. #define TRSV_TLU qtrsv_TLU
  1946. #define TRSV_TLN qtrsv_TLN
  1947. #define ZTRSV_NUU xtrsv_NUU
  1948. #define ZTRSV_NUN xtrsv_NUN
  1949. #define ZTRSV_NLU xtrsv_NLU
  1950. #define ZTRSV_NLN xtrsv_NLN
  1951. #define ZTRSV_TUU xtrsv_TUU
  1952. #define ZTRSV_TUN xtrsv_TUN
  1953. #define ZTRSV_TLU xtrsv_TLU
  1954. #define ZTRSV_TLN xtrsv_TLN
  1955. #define ZTRSV_RUU xtrsv_RUU
  1956. #define ZTRSV_RUN xtrsv_RUN
  1957. #define ZTRSV_RLU xtrsv_RLU
  1958. #define ZTRSV_RLN xtrsv_RLN
  1959. #define ZTRSV_CUU xtrsv_CUU
  1960. #define ZTRSV_CUN xtrsv_CUN
  1961. #define ZTRSV_CLU xtrsv_CLU
  1962. #define ZTRSV_CLN xtrsv_CLN
  1963. #define TRMV_NUU qtrmv_NUU
  1964. #define TRMV_NUN qtrmv_NUN
  1965. #define TRMV_NLU qtrmv_NLU
  1966. #define TRMV_NLN qtrmv_NLN
  1967. #define TRMV_TUU qtrmv_TUU
  1968. #define TRMV_TUN qtrmv_TUN
  1969. #define TRMV_TLU qtrmv_TLU
  1970. #define TRMV_TLN qtrmv_TLN
  1971. #define TRMV_THREAD_NUU qtrmv_thread_NUU
  1972. #define TRMV_THREAD_NUN qtrmv_thread_NUN
  1973. #define TRMV_THREAD_NLU qtrmv_thread_NLU
  1974. #define TRMV_THREAD_NLN qtrmv_thread_NLN
  1975. #define TRMV_THREAD_TUU qtrmv_thread_TUU
  1976. #define TRMV_THREAD_TUN qtrmv_thread_TUN
  1977. #define TRMV_THREAD_TLU qtrmv_thread_TLU
  1978. #define TRMV_THREAD_TLN qtrmv_thread_TLN
  1979. #define ZTRMV_NUU xtrmv_NUU
  1980. #define ZTRMV_NUN xtrmv_NUN
  1981. #define ZTRMV_NLU xtrmv_NLU
  1982. #define ZTRMV_NLN xtrmv_NLN
  1983. #define ZTRMV_TUU xtrmv_TUU
  1984. #define ZTRMV_TUN xtrmv_TUN
  1985. #define ZTRMV_TLU xtrmv_TLU
  1986. #define ZTRMV_TLN xtrmv_TLN
  1987. #define ZTRMV_RUU xtrmv_RUU
  1988. #define ZTRMV_RUN xtrmv_RUN
  1989. #define ZTRMV_RLU xtrmv_RLU
  1990. #define ZTRMV_RLN xtrmv_RLN
  1991. #define ZTRMV_CUU xtrmv_CUU
  1992. #define ZTRMV_CUN xtrmv_CUN
  1993. #define ZTRMV_CLU xtrmv_CLU
  1994. #define ZTRMV_CLN xtrmv_CLN
  1995. #define ZTRMV_THREAD_NUU xtrmv_thread_NUU
  1996. #define ZTRMV_THREAD_NUN xtrmv_thread_NUN
  1997. #define ZTRMV_THREAD_NLU xtrmv_thread_NLU
  1998. #define ZTRMV_THREAD_NLN xtrmv_thread_NLN
  1999. #define ZTRMV_THREAD_TUU xtrmv_thread_TUU
  2000. #define ZTRMV_THREAD_TUN xtrmv_thread_TUN
  2001. #define ZTRMV_THREAD_TLU xtrmv_thread_TLU
  2002. #define ZTRMV_THREAD_TLN xtrmv_thread_TLN
  2003. #define ZTRMV_THREAD_RUU xtrmv_thread_RUU
  2004. #define ZTRMV_THREAD_RUN xtrmv_thread_RUN
  2005. #define ZTRMV_THREAD_RLU xtrmv_thread_RLU
  2006. #define ZTRMV_THREAD_RLN xtrmv_thread_RLN
  2007. #define ZTRMV_THREAD_CUU xtrmv_thread_CUU
  2008. #define ZTRMV_THREAD_CUN xtrmv_thread_CUN
  2009. #define ZTRMV_THREAD_CLU xtrmv_thread_CLU
  2010. #define ZTRMV_THREAD_CLN xtrmv_thread_CLN
  2011. #elif defined(DOUBLE)
  2012. #define TRSV_NUU dtrsv_NUU
  2013. #define TRSV_NUN dtrsv_NUN
  2014. #define TRSV_NLU dtrsv_NLU
  2015. #define TRSV_NLN dtrsv_NLN
  2016. #define TRSV_TUU dtrsv_TUU
  2017. #define TRSV_TUN dtrsv_TUN
  2018. #define TRSV_TLU dtrsv_TLU
  2019. #define TRSV_TLN dtrsv_TLN
  2020. #define ZTRSV_NUU ztrsv_NUU
  2021. #define ZTRSV_NUN ztrsv_NUN
  2022. #define ZTRSV_NLU ztrsv_NLU
  2023. #define ZTRSV_NLN ztrsv_NLN
  2024. #define ZTRSV_TUU ztrsv_TUU
  2025. #define ZTRSV_TUN ztrsv_TUN
  2026. #define ZTRSV_TLU ztrsv_TLU
  2027. #define ZTRSV_TLN ztrsv_TLN
  2028. #define ZTRSV_RUU ztrsv_RUU
  2029. #define ZTRSV_RUN ztrsv_RUN
  2030. #define ZTRSV_RLU ztrsv_RLU
  2031. #define ZTRSV_RLN ztrsv_RLN
  2032. #define ZTRSV_CUU ztrsv_CUU
  2033. #define ZTRSV_CUN ztrsv_CUN
  2034. #define ZTRSV_CLU ztrsv_CLU
  2035. #define ZTRSV_CLN ztrsv_CLN
  2036. #define TRMV_NUU dtrmv_NUU
  2037. #define TRMV_NUN dtrmv_NUN
  2038. #define TRMV_NLU dtrmv_NLU
  2039. #define TRMV_NLN dtrmv_NLN
  2040. #define TRMV_TUU dtrmv_TUU
  2041. #define TRMV_TUN dtrmv_TUN
  2042. #define TRMV_TLU dtrmv_TLU
  2043. #define TRMV_TLN dtrmv_TLN
  2044. #define TRMV_THREAD_NUU dtrmv_thread_NUU
  2045. #define TRMV_THREAD_NUN dtrmv_thread_NUN
  2046. #define TRMV_THREAD_NLU dtrmv_thread_NLU
  2047. #define TRMV_THREAD_NLN dtrmv_thread_NLN
  2048. #define TRMV_THREAD_TUU dtrmv_thread_TUU
  2049. #define TRMV_THREAD_TUN dtrmv_thread_TUN
  2050. #define TRMV_THREAD_TLU dtrmv_thread_TLU
  2051. #define TRMV_THREAD_TLN dtrmv_thread_TLN
  2052. #define ZTRMV_NUU ztrmv_NUU
  2053. #define ZTRMV_NUN ztrmv_NUN
  2054. #define ZTRMV_NLU ztrmv_NLU
  2055. #define ZTRMV_NLN ztrmv_NLN
  2056. #define ZTRMV_TUU ztrmv_TUU
  2057. #define ZTRMV_TUN ztrmv_TUN
  2058. #define ZTRMV_TLU ztrmv_TLU
  2059. #define ZTRMV_TLN ztrmv_TLN
  2060. #define ZTRMV_RUU ztrmv_RUU
  2061. #define ZTRMV_RUN ztrmv_RUN
  2062. #define ZTRMV_RLU ztrmv_RLU
  2063. #define ZTRMV_RLN ztrmv_RLN
  2064. #define ZTRMV_CUU ztrmv_CUU
  2065. #define ZTRMV_CUN ztrmv_CUN
  2066. #define ZTRMV_CLU ztrmv_CLU
  2067. #define ZTRMV_CLN ztrmv_CLN
  2068. #define ZTRMV_THREAD_NUU ztrmv_thread_NUU
  2069. #define ZTRMV_THREAD_NUN ztrmv_thread_NUN
  2070. #define ZTRMV_THREAD_NLU ztrmv_thread_NLU
  2071. #define ZTRMV_THREAD_NLN ztrmv_thread_NLN
  2072. #define ZTRMV_THREAD_TUU ztrmv_thread_TUU
  2073. #define ZTRMV_THREAD_TUN ztrmv_thread_TUN
  2074. #define ZTRMV_THREAD_TLU ztrmv_thread_TLU
  2075. #define ZTRMV_THREAD_TLN ztrmv_thread_TLN
  2076. #define ZTRMV_THREAD_RUU ztrmv_thread_RUU
  2077. #define ZTRMV_THREAD_RUN ztrmv_thread_RUN
  2078. #define ZTRMV_THREAD_RLU ztrmv_thread_RLU
  2079. #define ZTRMV_THREAD_RLN ztrmv_thread_RLN
  2080. #define ZTRMV_THREAD_CUU ztrmv_thread_CUU
  2081. #define ZTRMV_THREAD_CUN ztrmv_thread_CUN
  2082. #define ZTRMV_THREAD_CLU ztrmv_thread_CLU
  2083. #define ZTRMV_THREAD_CLN ztrmv_thread_CLN
  2084. #else
  2085. #define TRSV_NUU strsv_NUU
  2086. #define TRSV_NUN strsv_NUN
  2087. #define TRSV_NLU strsv_NLU
  2088. #define TRSV_NLN strsv_NLN
  2089. #define TRSV_TUU strsv_TUU
  2090. #define TRSV_TUN strsv_TUN
  2091. #define TRSV_TLU strsv_TLU
  2092. #define TRSV_TLN strsv_TLN
  2093. #define ZTRSV_NUU ctrsv_NUU
  2094. #define ZTRSV_NUN ctrsv_NUN
  2095. #define ZTRSV_NLU ctrsv_NLU
  2096. #define ZTRSV_NLN ctrsv_NLN
  2097. #define ZTRSV_TUU ctrsv_TUU
  2098. #define ZTRSV_TUN ctrsv_TUN
  2099. #define ZTRSV_TLU ctrsv_TLU
  2100. #define ZTRSV_TLN ctrsv_TLN
  2101. #define ZTRSV_RUU ctrsv_RUU
  2102. #define ZTRSV_RUN ctrsv_RUN
  2103. #define ZTRSV_RLU ctrsv_RLU
  2104. #define ZTRSV_RLN ctrsv_RLN
  2105. #define ZTRSV_CUU ctrsv_CUU
  2106. #define ZTRSV_CUN ctrsv_CUN
  2107. #define ZTRSV_CLU ctrsv_CLU
  2108. #define ZTRSV_CLN ctrsv_CLN
  2109. #define TRMV_NUU strmv_NUU
  2110. #define TRMV_NUN strmv_NUN
  2111. #define TRMV_NLU strmv_NLU
  2112. #define TRMV_NLN strmv_NLN
  2113. #define TRMV_TUU strmv_TUU
  2114. #define TRMV_TUN strmv_TUN
  2115. #define TRMV_TLU strmv_TLU
  2116. #define TRMV_TLN strmv_TLN
  2117. #define TRMV_THREAD_NUU strmv_thread_NUU
  2118. #define TRMV_THREAD_NUN strmv_thread_NUN
  2119. #define TRMV_THREAD_NLU strmv_thread_NLU
  2120. #define TRMV_THREAD_NLN strmv_thread_NLN
  2121. #define TRMV_THREAD_TUU strmv_thread_TUU
  2122. #define TRMV_THREAD_TUN strmv_thread_TUN
  2123. #define TRMV_THREAD_TLU strmv_thread_TLU
  2124. #define TRMV_THREAD_TLN strmv_thread_TLN
  2125. #define ZTRMV_NUU ctrmv_NUU
  2126. #define ZTRMV_NUN ctrmv_NUN
  2127. #define ZTRMV_NLU ctrmv_NLU
  2128. #define ZTRMV_NLN ctrmv_NLN
  2129. #define ZTRMV_TUU ctrmv_TUU
  2130. #define ZTRMV_TUN ctrmv_TUN
  2131. #define ZTRMV_TLU ctrmv_TLU
  2132. #define ZTRMV_TLN ctrmv_TLN
  2133. #define ZTRMV_RUU ctrmv_RUU
  2134. #define ZTRMV_RUN ctrmv_RUN
  2135. #define ZTRMV_RLU ctrmv_RLU
  2136. #define ZTRMV_RLN ctrmv_RLN
  2137. #define ZTRMV_CUU ctrmv_CUU
  2138. #define ZTRMV_CUN ctrmv_CUN
  2139. #define ZTRMV_CLU ctrmv_CLU
  2140. #define ZTRMV_CLN ctrmv_CLN
  2141. #define ZTRMV_THREAD_NUU ctrmv_thread_NUU
  2142. #define ZTRMV_THREAD_NUN ctrmv_thread_NUN
  2143. #define ZTRMV_THREAD_NLU ctrmv_thread_NLU
  2144. #define ZTRMV_THREAD_NLN ctrmv_thread_NLN
  2145. #define ZTRMV_THREAD_TUU ctrmv_thread_TUU
  2146. #define ZTRMV_THREAD_TUN ctrmv_thread_TUN
  2147. #define ZTRMV_THREAD_TLU ctrmv_thread_TLU
  2148. #define ZTRMV_THREAD_TLN ctrmv_thread_TLN
  2149. #define ZTRMV_THREAD_RUU ctrmv_thread_RUU
  2150. #define ZTRMV_THREAD_RUN ctrmv_thread_RUN
  2151. #define ZTRMV_THREAD_RLU ctrmv_thread_RLU
  2152. #define ZTRMV_THREAD_RLN ctrmv_thread_RLN
  2153. #define ZTRMV_THREAD_CUU ctrmv_thread_CUU
  2154. #define ZTRMV_THREAD_CUN ctrmv_thread_CUN
  2155. #define ZTRMV_THREAD_CLU ctrmv_thread_CLU
  2156. #define ZTRMV_THREAD_CLN ctrmv_thread_CLN
  2157. #endif
  2158. #define SGETF2 sgetf2_k
  2159. #define DGETF2 dgetf2_k
  2160. #define QGETF2 qgetf2_k
  2161. #define CGETF2 cgetf2_k
  2162. #define ZGETF2 zgetf2_k
  2163. #define XGETF2 xgetf2_k
  2164. #define SLASWP_PLUS slaswp_plus
  2165. #define SLASWP_MINUS slaswp_minus
  2166. #define DLASWP_PLUS dlaswp_plus
  2167. #define DLASWP_MINUS dlaswp_minus
  2168. #define QLASWP_PLUS qlaswp_plus
  2169. #define QLASWP_MINUS qlaswp_minus
  2170. #define CLASWP_PLUS claswp_plus
  2171. #define CLASWP_MINUS claswp_minus
  2172. #define ZLASWP_PLUS zlaswp_plus
  2173. #define ZLASWP_MINUS zlaswp_minus
  2174. #define XLASWP_PLUS xlaswp_plus
  2175. #define XLASWP_MINUS xlaswp_minus
  2176. #define SLARF_L slarf_L
  2177. #define SLARF_R slarf_R
  2178. #define DLARF_L dlarf_L
  2179. #define DLARF_R dlarf_R
  2180. #define QLARF_L qlarf_L
  2181. #define QLARF_R qlarf_R
  2182. #define CLARF_L clarf_L
  2183. #define CLARF_R clarf_R
  2184. #define ZLARF_L zlarf_L
  2185. #define ZLARF_R zlarf_R
  2186. #define XLARF_L xlarf_L
  2187. #define XLARF_R xlarf_R
  2188. #ifndef COMPLEX
  2189. #ifdef XDOUBLE
  2190. #define GETF2 QGETF2
  2191. #define GETRF QGETRF
  2192. #define GETRS_N_SINGLE qgetrs_N_single
  2193. #define GETRS_T_SINGLE qgetrs_T_single
  2194. #define GETRS_R_SINGLE qgetrs_N_single
  2195. #define GETRS_C_SINGLE qgetrs_T_single
  2196. #define GETRS_N_PARALLEL qgetrs_N_parallel
  2197. #define GETRS_T_PARALLEL qgetrs_T_parallel
  2198. #define GETRS_R_PARALLEL qgetrs_N_parallel
  2199. #define GETRS_C_PARALLEL qgetrs_T_parallel
  2200. #define LASWP_PLUS QLASWP_PLUS
  2201. #define LASWP_MINUS QLASWP_MINUS
  2202. #define LASWP_NCOPY QLASWP_NCOPY
  2203. #define GETRS_N QGETRS_N
  2204. #define GETRS_T QGETRS_T
  2205. #define GETRF_SINGLE qgetrf_single
  2206. #define GETRF_PARALLEL qgetrf_parallel
  2207. #define NEG_TCOPY QNEG_TCOPY
  2208. #define LARF_L QLARF_L
  2209. #define LARF_R QLARF_R
  2210. #elif defined(DOUBLE)
  2211. #define GETF2 DGETF2
  2212. #define GETRF DGETRF
  2213. #define GETRS_N_SINGLE dgetrs_N_single
  2214. #define GETRS_T_SINGLE dgetrs_T_single
  2215. #define GETRS_R_SINGLE dgetrs_N_single
  2216. #define GETRS_C_SINGLE dgetrs_T_single
  2217. #define GETRS_N_PARALLEL dgetrs_N_parallel
  2218. #define GETRS_T_PARALLEL dgetrs_T_parallel
  2219. #define GETRS_R_PARALLEL dgetrs_N_parallel
  2220. #define GETRS_C_PARALLEL dgetrs_T_parallel
  2221. #define LASWP_PLUS DLASWP_PLUS
  2222. #define LASWP_MINUS DLASWP_MINUS
  2223. #define LASWP_NCOPY DLASWP_NCOPY
  2224. #define GETRS_N DGETRS_N
  2225. #define GETRS_T DGETRS_T
  2226. #define GETRF_SINGLE dgetrf_single
  2227. #define GETRF_PARALLEL dgetrf_parallel
  2228. #define NEG_TCOPY DNEG_TCOPY
  2229. #define LARF_L DLARF_L
  2230. #define LARF_R DLARF_R
  2231. #else
  2232. #define GETF2 SGETF2
  2233. #define GETRF SGETRF
  2234. #define GETRS_N_SINGLE sgetrs_N_single
  2235. #define GETRS_T_SINGLE sgetrs_T_single
  2236. #define GETRS_R_SINGLE sgetrs_N_single
  2237. #define GETRS_C_SINGLE sgetrs_T_single
  2238. #define GETRS_N_PARALLEL sgetrs_N_parallel
  2239. #define GETRS_T_PARALLEL sgetrs_T_parallel
  2240. #define GETRS_R_PARALLEL sgetrs_N_parallel
  2241. #define GETRS_C_PARALLEL sgetrs_T_parallel
  2242. #define LASWP_PLUS SLASWP_PLUS
  2243. #define LASWP_MINUS SLASWP_MINUS
  2244. #define LASWP_NCOPY SLASWP_NCOPY
  2245. #define GETRS_N SGETRS_N
  2246. #define GETRS_T SGETRS_T
  2247. #define GETRF_SINGLE sgetrf_single
  2248. #define GETRF_PARALLEL sgetrf_parallel
  2249. #define NEG_TCOPY SNEG_TCOPY
  2250. #define LARF_L SLARF_L
  2251. #define LARF_R SLARF_R
  2252. #endif
  2253. #else
  2254. #ifdef XDOUBLE
  2255. #define GETF2 XGETF2
  2256. #define GETRF XGETRF
  2257. #define GETRS_N_SINGLE xgetrs_N_single
  2258. #define GETRS_T_SINGLE xgetrs_T_single
  2259. #define GETRS_R_SINGLE xgetrs_R_single
  2260. #define GETRS_C_SINGLE xgetrs_C_single
  2261. #define GETRS_N_PARALLEL xgetrs_N_parallel
  2262. #define GETRS_T_PARALLEL xgetrs_T_parallel
  2263. #define GETRS_R_PARALLEL xgetrs_R_parallel
  2264. #define GETRS_C_PARALLEL xgetrs_C_parallel
  2265. #define LASWP_PLUS XLASWP_PLUS
  2266. #define LASWP_MINUS XLASWP_MINUS
  2267. #define LASWP_NCOPY XLASWP_NCOPY
  2268. #define GETRS_N XGETRS_N
  2269. #define GETRS_T XGETRS_T
  2270. #define GETRF_SINGLE xgetrf_single
  2271. #define GETRF_PARALLEL xgetrf_parallel
  2272. #define NEG_TCOPY XNEG_TCOPY
  2273. #define LARF_L XLARF_L
  2274. #define LARF_R XLARF_R
  2275. #elif defined(DOUBLE)
  2276. #define GETF2 ZGETF2
  2277. #define GETRF ZGETRF
  2278. #define GETRS_N_SINGLE zgetrs_N_single
  2279. #define GETRS_T_SINGLE zgetrs_T_single
  2280. #define GETRS_R_SINGLE zgetrs_R_single
  2281. #define GETRS_C_SINGLE zgetrs_C_single
  2282. #define GETRS_N_PARALLEL zgetrs_N_parallel
  2283. #define GETRS_T_PARALLEL zgetrs_T_parallel
  2284. #define GETRS_R_PARALLEL zgetrs_R_parallel
  2285. #define GETRS_C_PARALLEL zgetrs_C_parallel
  2286. #define LASWP_PLUS ZLASWP_PLUS
  2287. #define LASWP_MINUS ZLASWP_MINUS
  2288. #define LASWP_NCOPY ZLASWP_NCOPY
  2289. #define GETRS_N ZGETRS_N
  2290. #define GETRS_T ZGETRS_T
  2291. #define GETRF_SINGLE zgetrf_single
  2292. #define GETRF_PARALLEL zgetrf_parallel
  2293. #define NEG_TCOPY ZNEG_TCOPY
  2294. #define LARF_L ZLARF_L
  2295. #define LARF_R ZLARF_R
  2296. #else
  2297. #define GETF2 CGETF2
  2298. #define GETRF CGETRF
  2299. #define GETRS_N_SINGLE cgetrs_N_single
  2300. #define GETRS_T_SINGLE cgetrs_T_single
  2301. #define GETRS_R_SINGLE cgetrs_R_single
  2302. #define GETRS_C_SINGLE cgetrs_C_single
  2303. #define GETRS_N_PARALLEL cgetrs_N_parallel
  2304. #define GETRS_T_PARALLEL cgetrs_T_parallel
  2305. #define GETRS_R_PARALLEL cgetrs_R_parallel
  2306. #define GETRS_C_PARALLEL cgetrs_C_parallel
  2307. #define LASWP_PLUS CLASWP_PLUS
  2308. #define LASWP_MINUS CLASWP_MINUS
  2309. #define LASWP_NCOPY CLASWP_NCOPY
  2310. #define GETRS_N CGETRS_N
  2311. #define GETRS_T CGETRS_T
  2312. #define GETRF_SINGLE cgetrf_single
  2313. #define GETRF_PARALLEL cgetrf_parallel
  2314. #define NEG_TCOPY CNEG_TCOPY
  2315. #define LARF_L CLARF_L
  2316. #define LARF_R CLARF_R
  2317. #endif
  2318. #endif
  2319. #ifndef COMPLEX
  2320. #ifdef XDOUBLE
  2321. #define POTF2_U qpotf2_U
  2322. #define POTF2_L qpotf2_L
  2323. #define LAUU2_U qlauu2_U
  2324. #define LAUU2_L qlauu2_L
  2325. #define POTRF_U_SINGLE qpotrf_U_single
  2326. #define POTRF_L_SINGLE qpotrf_L_single
  2327. #define POTRF_U_PARALLEL qpotrf_U_parallel
  2328. #define POTRF_L_PARALLEL qpotrf_L_parallel
  2329. #define LAUUM_U_SINGLE qlauum_U_single
  2330. #define LAUUM_L_SINGLE qlauum_L_single
  2331. #define LAUUM_U_PARALLEL qlauum_U_parallel
  2332. #define LAUUM_L_PARALLEL qlauum_L_parallel
  2333. #define TRTI2_UU qtrti2_UU
  2334. #define TRTI2_UN qtrti2_UN
  2335. #define TRTI2_LU qtrti2_LU
  2336. #define TRTI2_LN qtrti2_LN
  2337. #define TRTRI_UU_SINGLE qtrtri_UU_single
  2338. #define TRTRI_UN_SINGLE qtrtri_UN_single
  2339. #define TRTRI_LU_SINGLE qtrtri_LU_single
  2340. #define TRTRI_LN_SINGLE qtrtri_LN_single
  2341. #define TRTRI_UU_PARALLEL qtrtri_UU_parallel
  2342. #define TRTRI_UN_PARALLEL qtrtri_UN_parallel
  2343. #define TRTRI_LU_PARALLEL qtrtri_LU_parallel
  2344. #define TRTRI_LN_PARALLEL qtrtri_LN_parallel
  2345. #elif defined(DOUBLE)
  2346. #define POTF2_U dpotf2_U
  2347. #define POTF2_L dpotf2_L
  2348. #define LAUU2_U dlauu2_U
  2349. #define LAUU2_L dlauu2_L
  2350. #define POTRF_U_SINGLE dpotrf_U_single
  2351. #define POTRF_L_SINGLE dpotrf_L_single
  2352. #define POTRF_U_PARALLEL dpotrf_U_parallel
  2353. #define POTRF_L_PARALLEL dpotrf_L_parallel
  2354. #define LAUUM_U_SINGLE dlauum_U_single
  2355. #define LAUUM_L_SINGLE dlauum_L_single
  2356. #define LAUUM_U_PARALLEL dlauum_U_parallel
  2357. #define LAUUM_L_PARALLEL dlauum_L_parallel
  2358. #define TRTI2_UU dtrti2_UU
  2359. #define TRTI2_UN dtrti2_UN
  2360. #define TRTI2_LU dtrti2_LU
  2361. #define TRTI2_LN dtrti2_LN
  2362. #define TRTRI_UU_SINGLE dtrtri_UU_single
  2363. #define TRTRI_UN_SINGLE dtrtri_UN_single
  2364. #define TRTRI_LU_SINGLE dtrtri_LU_single
  2365. #define TRTRI_LN_SINGLE dtrtri_LN_single
  2366. #define TRTRI_UU_PARALLEL dtrtri_UU_parallel
  2367. #define TRTRI_UN_PARALLEL dtrtri_UN_parallel
  2368. #define TRTRI_LU_PARALLEL dtrtri_LU_parallel
  2369. #define TRTRI_LN_PARALLEL dtrtri_LN_parallel
  2370. #else
  2371. #define POTF2_U spotf2_U
  2372. #define POTF2_L spotf2_L
  2373. #define LAUU2_U slauu2_U
  2374. #define LAUU2_L slauu2_L
  2375. #define POTRF_U_SINGLE spotrf_U_single
  2376. #define POTRF_L_SINGLE spotrf_L_single
  2377. #define POTRF_U_PARALLEL spotrf_U_parallel
  2378. #define POTRF_L_PARALLEL spotrf_L_parallel
  2379. #define LAUUM_U_SINGLE slauum_U_single
  2380. #define LAUUM_L_SINGLE slauum_L_single
  2381. #define LAUUM_U_PARALLEL slauum_U_parallel
  2382. #define LAUUM_L_PARALLEL slauum_L_parallel
  2383. #define TRTI2_UU strti2_UU
  2384. #define TRTI2_UN strti2_UN
  2385. #define TRTI2_LU strti2_LU
  2386. #define TRTI2_LN strti2_LN
  2387. #define TRTRI_UU_SINGLE strtri_UU_single
  2388. #define TRTRI_UN_SINGLE strtri_UN_single
  2389. #define TRTRI_LU_SINGLE strtri_LU_single
  2390. #define TRTRI_LN_SINGLE strtri_LN_single
  2391. #define TRTRI_UU_PARALLEL strtri_UU_parallel
  2392. #define TRTRI_UN_PARALLEL strtri_UN_parallel
  2393. #define TRTRI_LU_PARALLEL strtri_LU_parallel
  2394. #define TRTRI_LN_PARALLEL strtri_LN_parallel
  2395. #endif
  2396. #else
  2397. #ifdef XDOUBLE
  2398. #define POTF2_U xpotf2_U
  2399. #define POTF2_L xpotf2_L
  2400. #define LAUU2_U xlauu2_U
  2401. #define LAUU2_L xlauu2_L
  2402. #define POTRF_U_SINGLE xpotrf_U_single
  2403. #define POTRF_L_SINGLE xpotrf_L_single
  2404. #define POTRF_U_PARALLEL xpotrf_U_parallel
  2405. #define POTRF_L_PARALLEL xpotrf_L_parallel
  2406. #define LAUUM_U_SINGLE xlauum_U_single
  2407. #define LAUUM_L_SINGLE xlauum_L_single
  2408. #define LAUUM_U_PARALLEL xlauum_U_parallel
  2409. #define LAUUM_L_PARALLEL xlauum_L_parallel
  2410. #define TRTI2_UU xtrti2_UU
  2411. #define TRTI2_UN xtrti2_UN
  2412. #define TRTI2_LU xtrti2_LU
  2413. #define TRTI2_LN xtrti2_LN
  2414. #define TRTRI_UU_SINGLE xtrtri_UU_single
  2415. #define TRTRI_UN_SINGLE xtrtri_UN_single
  2416. #define TRTRI_LU_SINGLE xtrtri_LU_single
  2417. #define TRTRI_LN_SINGLE xtrtri_LN_single
  2418. #define TRTRI_UU_PARALLEL xtrtri_UU_parallel
  2419. #define TRTRI_UN_PARALLEL xtrtri_UN_parallel
  2420. #define TRTRI_LU_PARALLEL xtrtri_LU_parallel
  2421. #define TRTRI_LN_PARALLEL xtrtri_LN_parallel
  2422. #elif defined(DOUBLE)
  2423. #define POTF2_U zpotf2_U
  2424. #define POTF2_L zpotf2_L
  2425. #define LAUU2_U zlauu2_U
  2426. #define LAUU2_L zlauu2_L
  2427. #define POTRF_U_SINGLE zpotrf_U_single
  2428. #define POTRF_L_SINGLE zpotrf_L_single
  2429. #define POTRF_U_PARALLEL zpotrf_U_parallel
  2430. #define POTRF_L_PARALLEL zpotrf_L_parallel
  2431. #define LAUUM_U_SINGLE zlauum_U_single
  2432. #define LAUUM_L_SINGLE zlauum_L_single
  2433. #define LAUUM_U_PARALLEL zlauum_U_parallel
  2434. #define LAUUM_L_PARALLEL zlauum_L_parallel
  2435. #define TRTI2_UU ztrti2_UU
  2436. #define TRTI2_UN ztrti2_UN
  2437. #define TRTI2_LU ztrti2_LU
  2438. #define TRTI2_LN ztrti2_LN
  2439. #define TRTRI_UU_SINGLE ztrtri_UU_single
  2440. #define TRTRI_UN_SINGLE ztrtri_UN_single
  2441. #define TRTRI_LU_SINGLE ztrtri_LU_single
  2442. #define TRTRI_LN_SINGLE ztrtri_LN_single
  2443. #define TRTRI_UU_PARALLEL ztrtri_UU_parallel
  2444. #define TRTRI_UN_PARALLEL ztrtri_UN_parallel
  2445. #define TRTRI_LU_PARALLEL ztrtri_LU_parallel
  2446. #define TRTRI_LN_PARALLEL ztrtri_LN_parallel
  2447. #else
  2448. #define POTF2_U cpotf2_U
  2449. #define POTF2_L cpotf2_L
  2450. #define LAUU2_U clauu2_U
  2451. #define LAUU2_L clauu2_L
  2452. #define POTRF_U_SINGLE cpotrf_U_single
  2453. #define POTRF_L_SINGLE cpotrf_L_single
  2454. #define POTRF_U_PARALLEL cpotrf_U_parallel
  2455. #define POTRF_L_PARALLEL cpotrf_L_parallel
  2456. #define LAUUM_U_SINGLE clauum_U_single
  2457. #define LAUUM_L_SINGLE clauum_L_single
  2458. #define LAUUM_U_PARALLEL clauum_U_parallel
  2459. #define LAUUM_L_PARALLEL clauum_L_parallel
  2460. #define TRTI2_UU ctrti2_UU
  2461. #define TRTI2_UN ctrti2_UN
  2462. #define TRTI2_LU ctrti2_LU
  2463. #define TRTI2_LN ctrti2_LN
  2464. #define TRTRI_UU_SINGLE ctrtri_UU_single
  2465. #define TRTRI_UN_SINGLE ctrtri_UN_single
  2466. #define TRTRI_LU_SINGLE ctrtri_LU_single
  2467. #define TRTRI_LN_SINGLE ctrtri_LN_single
  2468. #define TRTRI_UU_PARALLEL ctrtri_UU_parallel
  2469. #define TRTRI_UN_PARALLEL ctrtri_UN_parallel
  2470. #define TRTRI_LU_PARALLEL ctrtri_LU_parallel
  2471. #define TRTRI_LN_PARALLEL ctrtri_LN_parallel
  2472. #endif
  2473. #endif
  2474. #endif