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

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194219521962197219821992200220122022203220422052206220722082209221022112212221322142215221622172218221922202221222222232224222522262227222822292230223122322233223422352236223722382239224022412242224322442245224622472248224922502251225222532254225522562257225822592260226122622263226422652266226722682269227022712272227322742275227622772278227922802281228222832284228522862287228822892290229122922293229422952296229722982299230023012302230323042305230623072308230923102311231223132314231523162317231823192320232123222323232423252326232723282329233023312332233323342335233623372338233923402341234223432344234523462347234823492350235123522353235423552356235723582359236023612362236323642365236623672368236923702371237223732374237523762377237823792380238123822383238423852386238723882389239023912392239323942395239623972398239924002401240224032404240524062407240824092410241124122413241424152416241724182419242024212422242324242425242624272428242924302431243224332434243524362437243824392440244124422443244424452446244724482449245024512452245324542455245624572458245924602461246224632464246524662467246824692470247124722473247424752476247724782479248024812482248324842485248624872488248924902491249224932494249524962497249824992500250125022503250425052506250725082509251025112512251325142515251625172518251925202521252225232524252525262527252825292530253125322533253425352536253725382539254025412542254325442545254625472548254925502551255225532554255525562557255825592560256125622563256425652566256725682569257025712572257325742575257625772578257925802581258225832584258525862587258825892590259125922593259425952596259725982599260026012602260326042605260626072608260926102611261226132614261526162617261826192620262126222623262426252626262726282629263026312632263326342635263626372638263926402641264226432644264526462647264826492650265126522653265426552656265726582659266026612662266326642665266626672668266926702671267226732674267526762677267826792680268126822683268426852686268726882689269026912692269326942695269626972698269927002701270227032704270527062707270827092710271127122713271427152716271727182719272027212722272327242725272627272728272927302731273227332734273527362737273827392740274127422743274427452746274727482749275027512752275327542755275627572758275927602761276227632764276527662767276827692770277127722773277427752776
  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. #define GEADD_K DGEADD_K
  563. #else
  564. #define AMAX_K SAMAX_K
  565. #define AMIN_K SAMIN_K
  566. #define MAX_K SMAX_K
  567. #define MIN_K SMIN_K
  568. #define IAMAX_K ISAMAX_K
  569. #define IAMIN_K ISAMIN_K
  570. #define IMAX_K ISMAX_K
  571. #define IMIN_K ISMIN_K
  572. #define ASUM_K SASUM_K
  573. #define AXPYU_K SAXPYU_K
  574. #define AXPYC_K SAXPYU_K
  575. #define COPY_K SCOPY_K
  576. #define DOTU_K SDOTU_K
  577. #define DOTC_K SDOTC_K
  578. #define NRM2_K SNRM2_K
  579. #define SCAL_K SSCAL_K
  580. #define SWAP_K SSWAP_K
  581. #define ROT_K SROT_K
  582. #define GEMV_N SGEMV_N
  583. #define GEMV_T SGEMV_T
  584. #define GEMV_R SGEMV_R
  585. #define GEMV_C SGEMV_C
  586. #define GEMV_O SGEMV_O
  587. #define GEMV_U SGEMV_U
  588. #define GEMV_S SGEMV_S
  589. #define GEMV_D SGEMV_D
  590. #define GERU_K SGERU_K
  591. #define GERC_K SGERC_K
  592. #define GERV_K SGERV_K
  593. #define GERD_K SGERD_K
  594. #define SYMV_U SSYMV_U
  595. #define SYMV_L SSYMV_L
  596. #define SYMV_THREAD_U SSYMV_THREAD_U
  597. #define SYMV_THREAD_L SSYMV_THREAD_L
  598. #define GEMM_ONCOPY SGEMM_ONCOPY
  599. #define GEMM_OTCOPY SGEMM_OTCOPY
  600. #define GEMM_INCOPY SGEMM_INCOPY
  601. #define GEMM_ITCOPY SGEMM_ITCOPY
  602. #ifdef UNIT
  603. #define TRMM_OUNCOPY STRMM_OUNUCOPY
  604. #define TRMM_OUTCOPY STRMM_OUTUCOPY
  605. #define TRMM_OLNCOPY STRMM_OLNUCOPY
  606. #define TRMM_OLTCOPY STRMM_OLTUCOPY
  607. #define TRSM_OUNCOPY STRSM_OUNUCOPY
  608. #define TRSM_OUTCOPY STRSM_OUTUCOPY
  609. #define TRSM_OLNCOPY STRSM_OLNUCOPY
  610. #define TRSM_OLTCOPY STRSM_OLTUCOPY
  611. #define TRMM_IUNCOPY STRMM_IUNUCOPY
  612. #define TRMM_IUTCOPY STRMM_IUTUCOPY
  613. #define TRMM_ILNCOPY STRMM_ILNUCOPY
  614. #define TRMM_ILTCOPY STRMM_ILTUCOPY
  615. #define TRSM_IUNCOPY STRSM_IUNUCOPY
  616. #define TRSM_IUTCOPY STRSM_IUTUCOPY
  617. #define TRSM_ILNCOPY STRSM_ILNUCOPY
  618. #define TRSM_ILTCOPY STRSM_ILTUCOPY
  619. #else
  620. #define TRMM_OUNCOPY STRMM_OUNNCOPY
  621. #define TRMM_OUTCOPY STRMM_OUTNCOPY
  622. #define TRMM_OLNCOPY STRMM_OLNNCOPY
  623. #define TRMM_OLTCOPY STRMM_OLTNCOPY
  624. #define TRSM_OUNCOPY STRSM_OUNNCOPY
  625. #define TRSM_OUTCOPY STRSM_OUTNCOPY
  626. #define TRSM_OLNCOPY STRSM_OLNNCOPY
  627. #define TRSM_OLTCOPY STRSM_OLTNCOPY
  628. #define TRMM_IUNCOPY STRMM_IUNNCOPY
  629. #define TRMM_IUTCOPY STRMM_IUTNCOPY
  630. #define TRMM_ILNCOPY STRMM_ILNNCOPY
  631. #define TRMM_ILTCOPY STRMM_ILTNCOPY
  632. #define TRSM_IUNCOPY STRSM_IUNNCOPY
  633. #define TRSM_IUTCOPY STRSM_IUTNCOPY
  634. #define TRSM_ILNCOPY STRSM_ILNNCOPY
  635. #define TRSM_ILTCOPY STRSM_ILTNCOPY
  636. #endif
  637. #define GEMM_BETA SGEMM_BETA
  638. #define GEMM_KERNEL_N SGEMM_KERNEL
  639. #define GEMM_KERNEL_L SGEMM_KERNEL
  640. #define GEMM_KERNEL_R SGEMM_KERNEL
  641. #define GEMM_KERNEL_B SGEMM_KERNEL
  642. #define TRMM_KERNEL_LN STRMM_KERNEL_LN
  643. #define TRMM_KERNEL_LT STRMM_KERNEL_LT
  644. #define TRMM_KERNEL_LR STRMM_KERNEL_LN
  645. #define TRMM_KERNEL_LC STRMM_KERNEL_LT
  646. #define TRMM_KERNEL_RN STRMM_KERNEL_RN
  647. #define TRMM_KERNEL_RT STRMM_KERNEL_RT
  648. #define TRMM_KERNEL_RR STRMM_KERNEL_RN
  649. #define TRMM_KERNEL_RC STRMM_KERNEL_RT
  650. #define TRSM_KERNEL_LN STRSM_KERNEL_LN
  651. #define TRSM_KERNEL_LT STRSM_KERNEL_LT
  652. #define TRSM_KERNEL_LR STRSM_KERNEL_LN
  653. #define TRSM_KERNEL_LC STRSM_KERNEL_LT
  654. #define TRSM_KERNEL_RN STRSM_KERNEL_RN
  655. #define TRSM_KERNEL_RT STRSM_KERNEL_RT
  656. #define TRSM_KERNEL_RR STRSM_KERNEL_RN
  657. #define TRSM_KERNEL_RC STRSM_KERNEL_RT
  658. #define SYMM_IUTCOPY SSYMM_IUTCOPY
  659. #define SYMM_ILTCOPY SSYMM_ILTCOPY
  660. #define SYMM_OUTCOPY SSYMM_OUTCOPY
  661. #define SYMM_OLTCOPY SSYMM_OLTCOPY
  662. #define GEMM_NN SGEMM_NN
  663. #define GEMM_CN SGEMM_TN
  664. #define GEMM_TN SGEMM_TN
  665. #define GEMM_NC SGEMM_NT
  666. #define GEMM_NT SGEMM_NT
  667. #define GEMM_CC SGEMM_TT
  668. #define GEMM_CT SGEMM_TT
  669. #define GEMM_TC SGEMM_TT
  670. #define GEMM_TT SGEMM_TT
  671. #define GEMM_NR SGEMM_NN
  672. #define GEMM_TR SGEMM_TN
  673. #define GEMM_CR SGEMM_TN
  674. #define GEMM_RN SGEMM_NN
  675. #define GEMM_RT SGEMM_NT
  676. #define GEMM_RC SGEMM_NT
  677. #define GEMM_RR SGEMM_NN
  678. #define SYMM_LU SSYMM_LU
  679. #define SYMM_LL SSYMM_LL
  680. #define SYMM_RU SSYMM_RU
  681. #define SYMM_RL SSYMM_RL
  682. #define HEMM_LU SHEMM_LU
  683. #define HEMM_LL SHEMM_LL
  684. #define HEMM_RU SHEMM_RU
  685. #define HEMM_RL SHEMM_RL
  686. #define SYRK_UN SSYRK_UN
  687. #define SYRK_UT SSYRK_UT
  688. #define SYRK_LN SSYRK_LN
  689. #define SYRK_LT SSYRK_LT
  690. #define SYRK_UR SSYRK_UN
  691. #define SYRK_UC SSYRK_UT
  692. #define SYRK_LR SSYRK_LN
  693. #define SYRK_LC SSYRK_LT
  694. #define SYRK_KERNEL_U SSYRK_KERNEL_U
  695. #define SYRK_KERNEL_L SSYRK_KERNEL_L
  696. #define HERK_UN SSYRK_UN
  697. #define HERK_LN SSYRK_LN
  698. #define HERK_UC SSYRK_UT
  699. #define HERK_LC SSYRK_LT
  700. #define HER2K_UN SSYR2K_UN
  701. #define HER2K_LN SSYR2K_LN
  702. #define HER2K_UC SSYR2K_UT
  703. #define HER2K_LC SSYR2K_LT
  704. #define SYR2K_UN SSYR2K_UN
  705. #define SYR2K_UT SSYR2K_UT
  706. #define SYR2K_LN SSYR2K_LN
  707. #define SYR2K_LT SSYR2K_LT
  708. #define SYR2K_UR SSYR2K_UN
  709. #define SYR2K_UC SSYR2K_UT
  710. #define SYR2K_LR SSYR2K_LN
  711. #define SYR2K_LC SSYR2K_LT
  712. #define SYR2K_KERNEL_U SSYR2K_KERNEL_U
  713. #define SYR2K_KERNEL_L SSYR2K_KERNEL_L
  714. #define TRMM_LNUU STRMM_LNUU
  715. #define TRMM_LNUN STRMM_LNUN
  716. #define TRMM_LNLU STRMM_LNLU
  717. #define TRMM_LNLN STRMM_LNLN
  718. #define TRMM_LTUU STRMM_LTUU
  719. #define TRMM_LTUN STRMM_LTUN
  720. #define TRMM_LTLU STRMM_LTLU
  721. #define TRMM_LTLN STRMM_LTLN
  722. #define TRMM_LRUU STRMM_LNUU
  723. #define TRMM_LRUN STRMM_LNUN
  724. #define TRMM_LRLU STRMM_LNLU
  725. #define TRMM_LRLN STRMM_LNLN
  726. #define TRMM_LCUU STRMM_LTUU
  727. #define TRMM_LCUN STRMM_LTUN
  728. #define TRMM_LCLU STRMM_LTLU
  729. #define TRMM_LCLN STRMM_LTLN
  730. #define TRMM_RNUU STRMM_RNUU
  731. #define TRMM_RNUN STRMM_RNUN
  732. #define TRMM_RNLU STRMM_RNLU
  733. #define TRMM_RNLN STRMM_RNLN
  734. #define TRMM_RTUU STRMM_RTUU
  735. #define TRMM_RTUN STRMM_RTUN
  736. #define TRMM_RTLU STRMM_RTLU
  737. #define TRMM_RTLN STRMM_RTLN
  738. #define TRMM_RRUU STRMM_RNUU
  739. #define TRMM_RRUN STRMM_RNUN
  740. #define TRMM_RRLU STRMM_RNLU
  741. #define TRMM_RRLN STRMM_RNLN
  742. #define TRMM_RCUU STRMM_RTUU
  743. #define TRMM_RCUN STRMM_RTUN
  744. #define TRMM_RCLU STRMM_RTLU
  745. #define TRMM_RCLN STRMM_RTLN
  746. #define TRSM_LNUU STRSM_LNUU
  747. #define TRSM_LNUN STRSM_LNUN
  748. #define TRSM_LNLU STRSM_LNLU
  749. #define TRSM_LNLN STRSM_LNLN
  750. #define TRSM_LTUU STRSM_LTUU
  751. #define TRSM_LTUN STRSM_LTUN
  752. #define TRSM_LTLU STRSM_LTLU
  753. #define TRSM_LTLN STRSM_LTLN
  754. #define TRSM_LRUU STRSM_LNUU
  755. #define TRSM_LRUN STRSM_LNUN
  756. #define TRSM_LRLU STRSM_LNLU
  757. #define TRSM_LRLN STRSM_LNLN
  758. #define TRSM_LCUU STRSM_LTUU
  759. #define TRSM_LCUN STRSM_LTUN
  760. #define TRSM_LCLU STRSM_LTLU
  761. #define TRSM_LCLN STRSM_LTLN
  762. #define TRSM_RNUU STRSM_RNUU
  763. #define TRSM_RNUN STRSM_RNUN
  764. #define TRSM_RNLU STRSM_RNLU
  765. #define TRSM_RNLN STRSM_RNLN
  766. #define TRSM_RTUU STRSM_RTUU
  767. #define TRSM_RTUN STRSM_RTUN
  768. #define TRSM_RTLU STRSM_RTLU
  769. #define TRSM_RTLN STRSM_RTLN
  770. #define TRSM_RRUU STRSM_RNUU
  771. #define TRSM_RRUN STRSM_RNUN
  772. #define TRSM_RRLU STRSM_RNLU
  773. #define TRSM_RRLN STRSM_RNLN
  774. #define TRSM_RCUU STRSM_RTUU
  775. #define TRSM_RCUN STRSM_RTUN
  776. #define TRSM_RCLU STRSM_RTLU
  777. #define TRSM_RCLN STRSM_RTLN
  778. #define GEMM_THREAD_NN SGEMM_THREAD_NN
  779. #define GEMM_THREAD_CN SGEMM_THREAD_TN
  780. #define GEMM_THREAD_TN SGEMM_THREAD_TN
  781. #define GEMM_THREAD_NC SGEMM_THREAD_NT
  782. #define GEMM_THREAD_NT SGEMM_THREAD_NT
  783. #define GEMM_THREAD_CC SGEMM_THREAD_TT
  784. #define GEMM_THREAD_CT SGEMM_THREAD_TT
  785. #define GEMM_THREAD_TC SGEMM_THREAD_TT
  786. #define GEMM_THREAD_TT SGEMM_THREAD_TT
  787. #define GEMM_THREAD_NR SGEMM_THREAD_NN
  788. #define GEMM_THREAD_TR SGEMM_THREAD_TN
  789. #define GEMM_THREAD_CR SGEMM_THREAD_TN
  790. #define GEMM_THREAD_RN SGEMM_THREAD_NN
  791. #define GEMM_THREAD_RT SGEMM_THREAD_NT
  792. #define GEMM_THREAD_RC SGEMM_THREAD_NT
  793. #define GEMM_THREAD_RR SGEMM_THREAD_NN
  794. #define SYMM_THREAD_LU SSYMM_THREAD_LU
  795. #define SYMM_THREAD_LL SSYMM_THREAD_LL
  796. #define SYMM_THREAD_RU SSYMM_THREAD_RU
  797. #define SYMM_THREAD_RL SSYMM_THREAD_RL
  798. #define HEMM_THREAD_LU SHEMM_THREAD_LU
  799. #define HEMM_THREAD_LL SHEMM_THREAD_LL
  800. #define HEMM_THREAD_RU SHEMM_THREAD_RU
  801. #define HEMM_THREAD_RL SHEMM_THREAD_RL
  802. #define SYRK_THREAD_UN SSYRK_THREAD_UN
  803. #define SYRK_THREAD_UT SSYRK_THREAD_UT
  804. #define SYRK_THREAD_LN SSYRK_THREAD_LN
  805. #define SYRK_THREAD_LT SSYRK_THREAD_LT
  806. #define SYRK_THREAD_UR SSYRK_THREAD_UR
  807. #define SYRK_THREAD_UC SSYRK_THREAD_UC
  808. #define SYRK_THREAD_LR SSYRK_THREAD_LN
  809. #define SYRK_THREAD_LC SSYRK_THREAD_LT
  810. #define HERK_THREAD_UN SSYRK_THREAD_UN
  811. #define HERK_THREAD_UT SSYRK_THREAD_UT
  812. #define HERK_THREAD_LN SSYRK_THREAD_LN
  813. #define HERK_THREAD_LT SSYRK_THREAD_LT
  814. #define HERK_THREAD_UR SSYRK_THREAD_UR
  815. #define HERK_THREAD_UC SSYRK_THREAD_UC
  816. #define HERK_THREAD_LR SSYRK_THREAD_LN
  817. #define HERK_THREAD_LC SSYRK_THREAD_LT
  818. #define AXPBY_K SAXPBY_K
  819. #define OMATCOPY_K_CN SOMATCOPY_K_CN
  820. #define OMATCOPY_K_RN SOMATCOPY_K_RN
  821. #define OMATCOPY_K_CT SOMATCOPY_K_CT
  822. #define OMATCOPY_K_RT SOMATCOPY_K_RT
  823. #define GEADD_K SGEADD_K
  824. #endif
  825. #else
  826. #ifdef XDOUBLE
  827. #define AMAX_K XAMAX_K
  828. #define AMIN_K XAMIN_K
  829. #define MAX_K XMAX_K
  830. #define MIN_K XMIN_K
  831. #define IAMAX_K IXAMAX_K
  832. #define IAMIN_K IXAMIN_K
  833. #define IMAX_K IXMAX_K
  834. #define IMIN_K IXMIN_K
  835. #define ASUM_K XASUM_K
  836. #define AXPYU_K XAXPYU_K
  837. #define AXPYC_K XAXPYC_K
  838. #define COPY_K XCOPY_K
  839. #define DOTU_K XDOTU_K
  840. #define DOTC_K XDOTC_K
  841. #define NRM2_K XNRM2_K
  842. #define SCAL_K XSCAL_K
  843. #define SWAP_K XSWAP_K
  844. #define ROT_K XROT_K
  845. #define GEMV_N XGEMV_N
  846. #define GEMV_T XGEMV_T
  847. #define GEMV_R XGEMV_R
  848. #define GEMV_C XGEMV_C
  849. #define GEMV_O XGEMV_O
  850. #define GEMV_U XGEMV_U
  851. #define GEMV_S XGEMV_S
  852. #define GEMV_D XGEMV_D
  853. #define GERU_K XGERU_K
  854. #define GERC_K XGERC_K
  855. #define GERV_K XGERV_K
  856. #define GERD_K XGERD_K
  857. #define SYMV_U XSYMV_U
  858. #define SYMV_L XSYMV_L
  859. #define HEMV_U XHEMV_U
  860. #define HEMV_L XHEMV_L
  861. #define HEMV_V XHEMV_V
  862. #define HEMV_M XHEMV_M
  863. #define SYMV_THREAD_U XSYMV_THREAD_U
  864. #define SYMV_THREAD_L XSYMV_THREAD_L
  865. #define HEMV_THREAD_U XHEMV_THREAD_U
  866. #define HEMV_THREAD_L XHEMV_THREAD_L
  867. #define HEMV_THREAD_V XHEMV_THREAD_V
  868. #define HEMV_THREAD_M XHEMV_THREAD_M
  869. #define GEMM_ONCOPY XGEMM_ONCOPY
  870. #define GEMM_OTCOPY XGEMM_OTCOPY
  871. #define GEMM_INCOPY XGEMM_INCOPY
  872. #define GEMM_ITCOPY XGEMM_ITCOPY
  873. #define GEMM3M_ONCOPYB XGEMM3M_ONCOPYB
  874. #define GEMM3M_ONCOPYR XGEMM3M_ONCOPYR
  875. #define GEMM3M_ONCOPYI XGEMM3M_ONCOPYI
  876. #define GEMM3M_OTCOPYB XGEMM3M_OTCOPYB
  877. #define GEMM3M_OTCOPYR XGEMM3M_OTCOPYR
  878. #define GEMM3M_OTCOPYI XGEMM3M_OTCOPYI
  879. #define GEMM3M_INCOPYB XGEMM3M_INCOPYB
  880. #define GEMM3M_INCOPYR XGEMM3M_INCOPYR
  881. #define GEMM3M_INCOPYI XGEMM3M_INCOPYI
  882. #define GEMM3M_ITCOPYB XGEMM3M_ITCOPYB
  883. #define GEMM3M_ITCOPYR XGEMM3M_ITCOPYR
  884. #define GEMM3M_ITCOPYI XGEMM3M_ITCOPYI
  885. #ifdef UNIT
  886. #define TRMM_OUNCOPY XTRMM_OUNUCOPY
  887. #define TRMM_OUTCOPY XTRMM_OUTUCOPY
  888. #define TRMM_OLNCOPY XTRMM_OLNUCOPY
  889. #define TRMM_OLTCOPY XTRMM_OLTUCOPY
  890. #define TRSM_OUNCOPY XTRSM_OUNUCOPY
  891. #define TRSM_OUTCOPY XTRSM_OUTUCOPY
  892. #define TRSM_OLNCOPY XTRSM_OLNUCOPY
  893. #define TRSM_OLTCOPY XTRSM_OLTUCOPY
  894. #define TRMM_IUNCOPY XTRMM_IUNUCOPY
  895. #define TRMM_IUTCOPY XTRMM_IUTUCOPY
  896. #define TRMM_ILNCOPY XTRMM_ILNUCOPY
  897. #define TRMM_ILTCOPY XTRMM_ILTUCOPY
  898. #define TRSM_IUNCOPY XTRSM_IUNUCOPY
  899. #define TRSM_IUTCOPY XTRSM_IUTUCOPY
  900. #define TRSM_ILNCOPY XTRSM_ILNUCOPY
  901. #define TRSM_ILTCOPY XTRSM_ILTUCOPY
  902. #else
  903. #define TRMM_OUNCOPY XTRMM_OUNNCOPY
  904. #define TRMM_OUTCOPY XTRMM_OUTNCOPY
  905. #define TRMM_OLNCOPY XTRMM_OLNNCOPY
  906. #define TRMM_OLTCOPY XTRMM_OLTNCOPY
  907. #define TRSM_OUNCOPY XTRSM_OUNNCOPY
  908. #define TRSM_OUTCOPY XTRSM_OUTNCOPY
  909. #define TRSM_OLNCOPY XTRSM_OLNNCOPY
  910. #define TRSM_OLTCOPY XTRSM_OLTNCOPY
  911. #define TRMM_IUNCOPY XTRMM_IUNNCOPY
  912. #define TRMM_IUTCOPY XTRMM_IUTNCOPY
  913. #define TRMM_ILNCOPY XTRMM_ILNNCOPY
  914. #define TRMM_ILTCOPY XTRMM_ILTNCOPY
  915. #define TRSM_IUNCOPY XTRSM_IUNNCOPY
  916. #define TRSM_IUTCOPY XTRSM_IUTNCOPY
  917. #define TRSM_ILNCOPY XTRSM_ILNNCOPY
  918. #define TRSM_ILTCOPY XTRSM_ILTNCOPY
  919. #endif
  920. #define SYMM3M_ILCOPYB XSYMM3M_ILCOPYB
  921. #define SYMM3M_IUCOPYB XSYMM3M_IUCOPYB
  922. #define SYMM3M_ILCOPYR XSYMM3M_ILCOPYR
  923. #define SYMM3M_IUCOPYR XSYMM3M_IUCOPYR
  924. #define SYMM3M_ILCOPYI XSYMM3M_ILCOPYI
  925. #define SYMM3M_IUCOPYI XSYMM3M_IUCOPYI
  926. #define SYMM3M_OLCOPYB XSYMM3M_OLCOPYB
  927. #define SYMM3M_OUCOPYB XSYMM3M_OUCOPYB
  928. #define SYMM3M_OLCOPYR XSYMM3M_OLCOPYR
  929. #define SYMM3M_OUCOPYR XSYMM3M_OUCOPYR
  930. #define SYMM3M_OLCOPYI XSYMM3M_OLCOPYI
  931. #define SYMM3M_OUCOPYI XSYMM3M_OUCOPYI
  932. #define HEMM3M_ILCOPYB XHEMM3M_ILCOPYB
  933. #define HEMM3M_IUCOPYB XHEMM3M_IUCOPYB
  934. #define HEMM3M_ILCOPYR XHEMM3M_ILCOPYR
  935. #define HEMM3M_IUCOPYR XHEMM3M_IUCOPYR
  936. #define HEMM3M_ILCOPYI XHEMM3M_ILCOPYI
  937. #define HEMM3M_IUCOPYI XHEMM3M_IUCOPYI
  938. #define HEMM3M_OLCOPYB XHEMM3M_OLCOPYB
  939. #define HEMM3M_OUCOPYB XHEMM3M_OUCOPYB
  940. #define HEMM3M_OLCOPYR XHEMM3M_OLCOPYR
  941. #define HEMM3M_OUCOPYR XHEMM3M_OUCOPYR
  942. #define HEMM3M_OLCOPYI XHEMM3M_OLCOPYI
  943. #define HEMM3M_OUCOPYI XHEMM3M_OUCOPYI
  944. #define GEMM_BETA XGEMM_BETA
  945. #define GEMM_KERNEL_N XGEMM_KERNEL_N
  946. #define GEMM_KERNEL_L XGEMM_KERNEL_L
  947. #define GEMM_KERNEL_R XGEMM_KERNEL_R
  948. #define GEMM_KERNEL_B XGEMM_KERNEL_B
  949. #define GEMM3M_KERNEL XGEMM3M_KERNEL
  950. #define TRMM_KERNEL_LN XTRMM_KERNEL_LN
  951. #define TRMM_KERNEL_LT XTRMM_KERNEL_LT
  952. #define TRMM_KERNEL_LR XTRMM_KERNEL_LR
  953. #define TRMM_KERNEL_LC XTRMM_KERNEL_LC
  954. #define TRMM_KERNEL_RN XTRMM_KERNEL_RN
  955. #define TRMM_KERNEL_RT XTRMM_KERNEL_RT
  956. #define TRMM_KERNEL_RR XTRMM_KERNEL_RR
  957. #define TRMM_KERNEL_RC XTRMM_KERNEL_RC
  958. #define TRSM_KERNEL_LN XTRSM_KERNEL_LN
  959. #define TRSM_KERNEL_LT XTRSM_KERNEL_LT
  960. #define TRSM_KERNEL_LR XTRSM_KERNEL_LR
  961. #define TRSM_KERNEL_LC XTRSM_KERNEL_LC
  962. #define TRSM_KERNEL_RN XTRSM_KERNEL_RN
  963. #define TRSM_KERNEL_RT XTRSM_KERNEL_RT
  964. #define TRSM_KERNEL_RR XTRSM_KERNEL_RR
  965. #define TRSM_KERNEL_RC XTRSM_KERNEL_RC
  966. #define GEMM_NN XGEMM_NN
  967. #define GEMM_CN XGEMM_CN
  968. #define GEMM_TN XGEMM_TN
  969. #define GEMM_NC XGEMM_NC
  970. #define GEMM_NT XGEMM_NT
  971. #define GEMM_CC XGEMM_CC
  972. #define GEMM_CT XGEMM_CT
  973. #define GEMM_TC XGEMM_TC
  974. #define GEMM_TT XGEMM_TT
  975. #define GEMM_NR XGEMM_NR
  976. #define GEMM_TR XGEMM_TR
  977. #define GEMM_CR XGEMM_CR
  978. #define GEMM_RN XGEMM_RN
  979. #define GEMM_RT XGEMM_RT
  980. #define GEMM_RC XGEMM_RC
  981. #define GEMM_RR XGEMM_RR
  982. #define SYMM_LU XSYMM_LU
  983. #define SYMM_LL XSYMM_LL
  984. #define SYMM_RU XSYMM_RU
  985. #define SYMM_RL XSYMM_RL
  986. #define HEMM_LU XHEMM_LU
  987. #define HEMM_LL XHEMM_LL
  988. #define HEMM_RU XHEMM_RU
  989. #define HEMM_RL XHEMM_RL
  990. #define HEMM_IUTCOPY XHEMM_IUTCOPY
  991. #define HEMM_ILTCOPY XHEMM_ILTCOPY
  992. #define HEMM_OUTCOPY XHEMM_OUTCOPY
  993. #define HEMM_OLTCOPY XHEMM_OLTCOPY
  994. #define SYRK_UN XSYRK_UN
  995. #define SYRK_UT XSYRK_UT
  996. #define SYRK_LN XSYRK_LN
  997. #define SYRK_LT XSYRK_LT
  998. #define SYRK_UR XSYRK_UN
  999. #define SYRK_UC XSYRK_UT
  1000. #define SYRK_LR XSYRK_LN
  1001. #define SYRK_LC XSYRK_LT
  1002. #define SYRK_KERNEL_U XSYRK_KERNEL_U
  1003. #define SYRK_KERNEL_L XSYRK_KERNEL_L
  1004. #define HERK_UN XHERK_UN
  1005. #define HERK_LN XHERK_LN
  1006. #define HERK_UC XHERK_UC
  1007. #define HERK_LC XHERK_LC
  1008. #define HER2K_UN XHER2K_UN
  1009. #define HER2K_LN XHER2K_LN
  1010. #define HER2K_UC XHER2K_UC
  1011. #define HER2K_LC XHER2K_LC
  1012. #define SYR2K_UN XSYR2K_UN
  1013. #define SYR2K_UT XSYR2K_UT
  1014. #define SYR2K_LN XSYR2K_LN
  1015. #define SYR2K_LT XSYR2K_LT
  1016. #define SYR2K_UR XSYR2K_UN
  1017. #define SYR2K_UC XSYR2K_UT
  1018. #define SYR2K_LR XSYR2K_LN
  1019. #define SYR2K_LC XSYR2K_LT
  1020. #define SYR2K_KERNEL_U XSYR2K_KERNEL_U
  1021. #define SYR2K_KERNEL_L XSYR2K_KERNEL_L
  1022. #define TRMM_LNUU XTRMM_LNUU
  1023. #define TRMM_LNUN XTRMM_LNUN
  1024. #define TRMM_LNLU XTRMM_LNLU
  1025. #define TRMM_LNLN XTRMM_LNLN
  1026. #define TRMM_LTUU XTRMM_LTUU
  1027. #define TRMM_LTUN XTRMM_LTUN
  1028. #define TRMM_LTLU XTRMM_LTLU
  1029. #define TRMM_LTLN XTRMM_LTLN
  1030. #define TRMM_LRUU XTRMM_LRUU
  1031. #define TRMM_LRUN XTRMM_LRUN
  1032. #define TRMM_LRLU XTRMM_LRLU
  1033. #define TRMM_LRLN XTRMM_LRLN
  1034. #define TRMM_LCUU XTRMM_LCUU
  1035. #define TRMM_LCUN XTRMM_LCUN
  1036. #define TRMM_LCLU XTRMM_LCLU
  1037. #define TRMM_LCLN XTRMM_LCLN
  1038. #define TRMM_RNUU XTRMM_RNUU
  1039. #define TRMM_RNUN XTRMM_RNUN
  1040. #define TRMM_RNLU XTRMM_RNLU
  1041. #define TRMM_RNLN XTRMM_RNLN
  1042. #define TRMM_RTUU XTRMM_RTUU
  1043. #define TRMM_RTUN XTRMM_RTUN
  1044. #define TRMM_RTLU XTRMM_RTLU
  1045. #define TRMM_RTLN XTRMM_RTLN
  1046. #define TRMM_RRUU XTRMM_RRUU
  1047. #define TRMM_RRUN XTRMM_RRUN
  1048. #define TRMM_RRLU XTRMM_RRLU
  1049. #define TRMM_RRLN XTRMM_RRLN
  1050. #define TRMM_RCUU XTRMM_RCUU
  1051. #define TRMM_RCUN XTRMM_RCUN
  1052. #define TRMM_RCLU XTRMM_RCLU
  1053. #define TRMM_RCLN XTRMM_RCLN
  1054. #define TRSM_LNUU XTRSM_LNUU
  1055. #define TRSM_LNUN XTRSM_LNUN
  1056. #define TRSM_LNLU XTRSM_LNLU
  1057. #define TRSM_LNLN XTRSM_LNLN
  1058. #define TRSM_LTUU XTRSM_LTUU
  1059. #define TRSM_LTUN XTRSM_LTUN
  1060. #define TRSM_LTLU XTRSM_LTLU
  1061. #define TRSM_LTLN XTRSM_LTLN
  1062. #define TRSM_LRUU XTRSM_LRUU
  1063. #define TRSM_LRUN XTRSM_LRUN
  1064. #define TRSM_LRLU XTRSM_LRLU
  1065. #define TRSM_LRLN XTRSM_LRLN
  1066. #define TRSM_LCUU XTRSM_LCUU
  1067. #define TRSM_LCUN XTRSM_LCUN
  1068. #define TRSM_LCLU XTRSM_LCLU
  1069. #define TRSM_LCLN XTRSM_LCLN
  1070. #define TRSM_RNUU XTRSM_RNUU
  1071. #define TRSM_RNUN XTRSM_RNUN
  1072. #define TRSM_RNLU XTRSM_RNLU
  1073. #define TRSM_RNLN XTRSM_RNLN
  1074. #define TRSM_RTUU XTRSM_RTUU
  1075. #define TRSM_RTUN XTRSM_RTUN
  1076. #define TRSM_RTLU XTRSM_RTLU
  1077. #define TRSM_RTLN XTRSM_RTLN
  1078. #define TRSM_RRUU XTRSM_RRUU
  1079. #define TRSM_RRUN XTRSM_RRUN
  1080. #define TRSM_RRLU XTRSM_RRLU
  1081. #define TRSM_RRLN XTRSM_RRLN
  1082. #define TRSM_RCUU XTRSM_RCUU
  1083. #define TRSM_RCUN XTRSM_RCUN
  1084. #define TRSM_RCLU XTRSM_RCLU
  1085. #define TRSM_RCLN XTRSM_RCLN
  1086. #define GEMM_THREAD_NN XGEMM_THREAD_NN
  1087. #define GEMM_THREAD_CN XGEMM_THREAD_CN
  1088. #define GEMM_THREAD_TN XGEMM_THREAD_TN
  1089. #define GEMM_THREAD_NC XGEMM_THREAD_NC
  1090. #define GEMM_THREAD_NT XGEMM_THREAD_NT
  1091. #define GEMM_THREAD_CC XGEMM_THREAD_CC
  1092. #define GEMM_THREAD_CT XGEMM_THREAD_CT
  1093. #define GEMM_THREAD_TC XGEMM_THREAD_TC
  1094. #define GEMM_THREAD_TT XGEMM_THREAD_TT
  1095. #define GEMM_THREAD_NR XGEMM_THREAD_NR
  1096. #define GEMM_THREAD_TR XGEMM_THREAD_TR
  1097. #define GEMM_THREAD_CR XGEMM_THREAD_CR
  1098. #define GEMM_THREAD_RN XGEMM_THREAD_RN
  1099. #define GEMM_THREAD_RT XGEMM_THREAD_RT
  1100. #define GEMM_THREAD_RC XGEMM_THREAD_RC
  1101. #define GEMM_THREAD_RR XGEMM_THREAD_RR
  1102. #define SYMM_THREAD_LU XSYMM_THREAD_LU
  1103. #define SYMM_THREAD_LL XSYMM_THREAD_LL
  1104. #define SYMM_THREAD_RU XSYMM_THREAD_RU
  1105. #define SYMM_THREAD_RL XSYMM_THREAD_RL
  1106. #define HEMM_THREAD_LU XHEMM_THREAD_LU
  1107. #define HEMM_THREAD_LL XHEMM_THREAD_LL
  1108. #define HEMM_THREAD_RU XHEMM_THREAD_RU
  1109. #define HEMM_THREAD_RL XHEMM_THREAD_RL
  1110. #define SYRK_THREAD_UN XSYRK_THREAD_UN
  1111. #define SYRK_THREAD_UT XSYRK_THREAD_UT
  1112. #define SYRK_THREAD_LN XSYRK_THREAD_LN
  1113. #define SYRK_THREAD_LT XSYRK_THREAD_LT
  1114. #define SYRK_THREAD_UR XSYRK_THREAD_UR
  1115. #define SYRK_THREAD_UC XSYRK_THREAD_UC
  1116. #define SYRK_THREAD_LR XSYRK_THREAD_LR
  1117. #define SYRK_THREAD_LC XSYRK_THREAD_LC
  1118. #define HERK_THREAD_UN XHERK_THREAD_UN
  1119. #define HERK_THREAD_UT XHERK_THREAD_UT
  1120. #define HERK_THREAD_LN XHERK_THREAD_LN
  1121. #define HERK_THREAD_LT XHERK_THREAD_LT
  1122. #define HERK_THREAD_UR XHERK_THREAD_UR
  1123. #define HERK_THREAD_UC XHERK_THREAD_UC
  1124. #define HERK_THREAD_LR XHERK_THREAD_LR
  1125. #define HERK_THREAD_LC XHERK_THREAD_LC
  1126. #define GEMM3M_NN XGEMM3M_NN
  1127. #define GEMM3M_CN XGEMM3M_CN
  1128. #define GEMM3M_TN XGEMM3M_TN
  1129. #define GEMM3M_NC XGEMM3M_NC
  1130. #define GEMM3M_NT XGEMM3M_NT
  1131. #define GEMM3M_CC XGEMM3M_CC
  1132. #define GEMM3M_CT XGEMM3M_CT
  1133. #define GEMM3M_TC XGEMM3M_TC
  1134. #define GEMM3M_TT XGEMM3M_TT
  1135. #define GEMM3M_NR XGEMM3M_NR
  1136. #define GEMM3M_TR XGEMM3M_TR
  1137. #define GEMM3M_CR XGEMM3M_CR
  1138. #define GEMM3M_RN XGEMM3M_RN
  1139. #define GEMM3M_RT XGEMM3M_RT
  1140. #define GEMM3M_RC XGEMM3M_RC
  1141. #define GEMM3M_RR XGEMM3M_RR
  1142. #define GEMM3M_THREAD_NN XGEMM3M_THREAD_NN
  1143. #define GEMM3M_THREAD_CN XGEMM3M_THREAD_CN
  1144. #define GEMM3M_THREAD_TN XGEMM3M_THREAD_TN
  1145. #define GEMM3M_THREAD_NC XGEMM3M_THREAD_NC
  1146. #define GEMM3M_THREAD_NT XGEMM3M_THREAD_NT
  1147. #define GEMM3M_THREAD_CC XGEMM3M_THREAD_CC
  1148. #define GEMM3M_THREAD_CT XGEMM3M_THREAD_CT
  1149. #define GEMM3M_THREAD_TC XGEMM3M_THREAD_TC
  1150. #define GEMM3M_THREAD_TT XGEMM3M_THREAD_TT
  1151. #define GEMM3M_THREAD_NR XGEMM3M_THREAD_NR
  1152. #define GEMM3M_THREAD_TR XGEMM3M_THREAD_TR
  1153. #define GEMM3M_THREAD_CR XGEMM3M_THREAD_CR
  1154. #define GEMM3M_THREAD_RN XGEMM3M_THREAD_RN
  1155. #define GEMM3M_THREAD_RT XGEMM3M_THREAD_RT
  1156. #define GEMM3M_THREAD_RC XGEMM3M_THREAD_RC
  1157. #define GEMM3M_THREAD_RR XGEMM3M_THREAD_RR
  1158. #define SYMM3M_LU XSYMM3M_LU
  1159. #define SYMM3M_LL XSYMM3M_LL
  1160. #define SYMM3M_RU XSYMM3M_RU
  1161. #define SYMM3M_RL XSYMM3M_RL
  1162. #define SYMM3M_THREAD_LU XSYMM3M_THREAD_LU
  1163. #define SYMM3M_THREAD_LL XSYMM3M_THREAD_LL
  1164. #define SYMM3M_THREAD_RU XSYMM3M_THREAD_RU
  1165. #define SYMM3M_THREAD_RL XSYMM3M_THREAD_RL
  1166. #define HEMM3M_LU XHEMM3M_LU
  1167. #define HEMM3M_LL XHEMM3M_LL
  1168. #define HEMM3M_RU XHEMM3M_RU
  1169. #define HEMM3M_RL XHEMM3M_RL
  1170. #define HEMM3M_THREAD_LU XHEMM3M_THREAD_LU
  1171. #define HEMM3M_THREAD_LL XHEMM3M_THREAD_LL
  1172. #define HEMM3M_THREAD_RU XHEMM3M_THREAD_RU
  1173. #define HEMM3M_THREAD_RL XHEMM3M_THREAD_RL
  1174. #define SYMM_IUTCOPY XSYMM_IUTCOPY
  1175. #define SYMM_ILTCOPY XSYMM_ILTCOPY
  1176. #define SYMM_OUTCOPY XSYMM_OUTCOPY
  1177. #define SYMM_OLTCOPY XSYMM_OLTCOPY
  1178. #elif defined(DOUBLE)
  1179. #define AMAX_K ZAMAX_K
  1180. #define AMIN_K ZAMIN_K
  1181. #define MAX_K ZMAX_K
  1182. #define MIN_K ZMIN_K
  1183. #define IAMAX_K IZAMAX_K
  1184. #define IAMIN_K IZAMIN_K
  1185. #define IMAX_K IZMAX_K
  1186. #define IMIN_K IZMIN_K
  1187. #define ASUM_K ZASUM_K
  1188. #define AXPYU_K ZAXPYU_K
  1189. #define AXPYC_K ZAXPYC_K
  1190. #define COPY_K ZCOPY_K
  1191. #define DOTU_K ZDOTU_K
  1192. #define DOTC_K ZDOTC_K
  1193. #define NRM2_K ZNRM2_K
  1194. #define SCAL_K ZSCAL_K
  1195. #define SWAP_K ZSWAP_K
  1196. #define ROT_K ZROT_K
  1197. #define GEMV_N ZGEMV_N
  1198. #define GEMV_T ZGEMV_T
  1199. #define GEMV_R ZGEMV_R
  1200. #define GEMV_C ZGEMV_C
  1201. #define GEMV_O ZGEMV_O
  1202. #define GEMV_U ZGEMV_U
  1203. #define GEMV_S ZGEMV_S
  1204. #define GEMV_D ZGEMV_D
  1205. #define GERU_K ZGERU_K
  1206. #define GERC_K ZGERC_K
  1207. #define GERV_K ZGERV_K
  1208. #define GERD_K ZGERD_K
  1209. #define SYMV_U ZSYMV_U
  1210. #define SYMV_L ZSYMV_L
  1211. #define HEMV_U ZHEMV_U
  1212. #define HEMV_L ZHEMV_L
  1213. #define HEMV_V ZHEMV_V
  1214. #define HEMV_M ZHEMV_M
  1215. #define SYMV_THREAD_U ZSYMV_THREAD_U
  1216. #define SYMV_THREAD_L ZSYMV_THREAD_L
  1217. #define HEMV_THREAD_U ZHEMV_THREAD_U
  1218. #define HEMV_THREAD_L ZHEMV_THREAD_L
  1219. #define HEMV_THREAD_V ZHEMV_THREAD_V
  1220. #define HEMV_THREAD_M ZHEMV_THREAD_M
  1221. #define GEMM_ONCOPY ZGEMM_ONCOPY
  1222. #define GEMM_OTCOPY ZGEMM_OTCOPY
  1223. #define GEMM_INCOPY ZGEMM_INCOPY
  1224. #define GEMM_ITCOPY ZGEMM_ITCOPY
  1225. #define GEMM3M_ONCOPYB ZGEMM3M_ONCOPYB
  1226. #define GEMM3M_ONCOPYR ZGEMM3M_ONCOPYR
  1227. #define GEMM3M_ONCOPYI ZGEMM3M_ONCOPYI
  1228. #define GEMM3M_OTCOPYB ZGEMM3M_OTCOPYB
  1229. #define GEMM3M_OTCOPYR ZGEMM3M_OTCOPYR
  1230. #define GEMM3M_OTCOPYI ZGEMM3M_OTCOPYI
  1231. #define GEMM3M_INCOPYB ZGEMM3M_INCOPYB
  1232. #define GEMM3M_INCOPYR ZGEMM3M_INCOPYR
  1233. #define GEMM3M_INCOPYI ZGEMM3M_INCOPYI
  1234. #define GEMM3M_ITCOPYB ZGEMM3M_ITCOPYB
  1235. #define GEMM3M_ITCOPYR ZGEMM3M_ITCOPYR
  1236. #define GEMM3M_ITCOPYI ZGEMM3M_ITCOPYI
  1237. #ifdef UNIT
  1238. #define TRMM_OUNCOPY ZTRMM_OUNUCOPY
  1239. #define TRMM_OUTCOPY ZTRMM_OUTUCOPY
  1240. #define TRMM_OLNCOPY ZTRMM_OLNUCOPY
  1241. #define TRMM_OLTCOPY ZTRMM_OLTUCOPY
  1242. #define TRSM_OUNCOPY ZTRSM_OUNUCOPY
  1243. #define TRSM_OUTCOPY ZTRSM_OUTUCOPY
  1244. #define TRSM_OLNCOPY ZTRSM_OLNUCOPY
  1245. #define TRSM_OLTCOPY ZTRSM_OLTUCOPY
  1246. #define TRMM_IUNCOPY ZTRMM_IUNUCOPY
  1247. #define TRMM_IUTCOPY ZTRMM_IUTUCOPY
  1248. #define TRMM_ILNCOPY ZTRMM_ILNUCOPY
  1249. #define TRMM_ILTCOPY ZTRMM_ILTUCOPY
  1250. #define TRSM_IUNCOPY ZTRSM_IUNUCOPY
  1251. #define TRSM_IUTCOPY ZTRSM_IUTUCOPY
  1252. #define TRSM_ILNCOPY ZTRSM_ILNUCOPY
  1253. #define TRSM_ILTCOPY ZTRSM_ILTUCOPY
  1254. #else
  1255. #define TRMM_OUNCOPY ZTRMM_OUNNCOPY
  1256. #define TRMM_OUTCOPY ZTRMM_OUTNCOPY
  1257. #define TRMM_OLNCOPY ZTRMM_OLNNCOPY
  1258. #define TRMM_OLTCOPY ZTRMM_OLTNCOPY
  1259. #define TRSM_OUNCOPY ZTRSM_OUNNCOPY
  1260. #define TRSM_OUTCOPY ZTRSM_OUTNCOPY
  1261. #define TRSM_OLNCOPY ZTRSM_OLNNCOPY
  1262. #define TRSM_OLTCOPY ZTRSM_OLTNCOPY
  1263. #define TRMM_IUNCOPY ZTRMM_IUNNCOPY
  1264. #define TRMM_IUTCOPY ZTRMM_IUTNCOPY
  1265. #define TRMM_ILNCOPY ZTRMM_ILNNCOPY
  1266. #define TRMM_ILTCOPY ZTRMM_ILTNCOPY
  1267. #define TRSM_IUNCOPY ZTRSM_IUNNCOPY
  1268. #define TRSM_IUTCOPY ZTRSM_IUTNCOPY
  1269. #define TRSM_ILNCOPY ZTRSM_ILNNCOPY
  1270. #define TRSM_ILTCOPY ZTRSM_ILTNCOPY
  1271. #endif
  1272. #define SYMM3M_ILCOPYB ZSYMM3M_ILCOPYB
  1273. #define SYMM3M_IUCOPYB ZSYMM3M_IUCOPYB
  1274. #define SYMM3M_ILCOPYR ZSYMM3M_ILCOPYR
  1275. #define SYMM3M_IUCOPYR ZSYMM3M_IUCOPYR
  1276. #define SYMM3M_ILCOPYI ZSYMM3M_ILCOPYI
  1277. #define SYMM3M_IUCOPYI ZSYMM3M_IUCOPYI
  1278. #define SYMM3M_OLCOPYB ZSYMM3M_OLCOPYB
  1279. #define SYMM3M_OUCOPYB ZSYMM3M_OUCOPYB
  1280. #define SYMM3M_OLCOPYR ZSYMM3M_OLCOPYR
  1281. #define SYMM3M_OUCOPYR ZSYMM3M_OUCOPYR
  1282. #define SYMM3M_OLCOPYI ZSYMM3M_OLCOPYI
  1283. #define SYMM3M_OUCOPYI ZSYMM3M_OUCOPYI
  1284. #define HEMM3M_ILCOPYB ZHEMM3M_ILCOPYB
  1285. #define HEMM3M_IUCOPYB ZHEMM3M_IUCOPYB
  1286. #define HEMM3M_ILCOPYR ZHEMM3M_ILCOPYR
  1287. #define HEMM3M_IUCOPYR ZHEMM3M_IUCOPYR
  1288. #define HEMM3M_ILCOPYI ZHEMM3M_ILCOPYI
  1289. #define HEMM3M_IUCOPYI ZHEMM3M_IUCOPYI
  1290. #define HEMM3M_OLCOPYB ZHEMM3M_OLCOPYB
  1291. #define HEMM3M_OUCOPYB ZHEMM3M_OUCOPYB
  1292. #define HEMM3M_OLCOPYR ZHEMM3M_OLCOPYR
  1293. #define HEMM3M_OUCOPYR ZHEMM3M_OUCOPYR
  1294. #define HEMM3M_OLCOPYI ZHEMM3M_OLCOPYI
  1295. #define HEMM3M_OUCOPYI ZHEMM3M_OUCOPYI
  1296. #define GEMM_BETA ZGEMM_BETA
  1297. #define GEMM_KERNEL_N ZGEMM_KERNEL_N
  1298. #define GEMM_KERNEL_L ZGEMM_KERNEL_L
  1299. #define GEMM_KERNEL_R ZGEMM_KERNEL_R
  1300. #define GEMM_KERNEL_B ZGEMM_KERNEL_B
  1301. #define GEMM3M_KERNEL ZGEMM3M_KERNEL
  1302. #define TRMM_KERNEL_LN ZTRMM_KERNEL_LN
  1303. #define TRMM_KERNEL_LT ZTRMM_KERNEL_LT
  1304. #define TRMM_KERNEL_LR ZTRMM_KERNEL_LR
  1305. #define TRMM_KERNEL_LC ZTRMM_KERNEL_LC
  1306. #define TRMM_KERNEL_RN ZTRMM_KERNEL_RN
  1307. #define TRMM_KERNEL_RT ZTRMM_KERNEL_RT
  1308. #define TRMM_KERNEL_RR ZTRMM_KERNEL_RR
  1309. #define TRMM_KERNEL_RC ZTRMM_KERNEL_RC
  1310. #define TRSM_KERNEL_LN ZTRSM_KERNEL_LN
  1311. #define TRSM_KERNEL_LT ZTRSM_KERNEL_LT
  1312. #define TRSM_KERNEL_LR ZTRSM_KERNEL_LR
  1313. #define TRSM_KERNEL_LC ZTRSM_KERNEL_LC
  1314. #define TRSM_KERNEL_RN ZTRSM_KERNEL_RN
  1315. #define TRSM_KERNEL_RT ZTRSM_KERNEL_RT
  1316. #define TRSM_KERNEL_RR ZTRSM_KERNEL_RR
  1317. #define TRSM_KERNEL_RC ZTRSM_KERNEL_RC
  1318. #define GEMM_NN ZGEMM_NN
  1319. #define GEMM_CN ZGEMM_CN
  1320. #define GEMM_TN ZGEMM_TN
  1321. #define GEMM_NC ZGEMM_NC
  1322. #define GEMM_NT ZGEMM_NT
  1323. #define GEMM_CC ZGEMM_CC
  1324. #define GEMM_CT ZGEMM_CT
  1325. #define GEMM_TC ZGEMM_TC
  1326. #define GEMM_TT ZGEMM_TT
  1327. #define GEMM_NR ZGEMM_NR
  1328. #define GEMM_TR ZGEMM_TR
  1329. #define GEMM_CR ZGEMM_CR
  1330. #define GEMM_RN ZGEMM_RN
  1331. #define GEMM_RT ZGEMM_RT
  1332. #define GEMM_RC ZGEMM_RC
  1333. #define GEMM_RR ZGEMM_RR
  1334. #define SYMM_LU ZSYMM_LU
  1335. #define SYMM_LL ZSYMM_LL
  1336. #define SYMM_RU ZSYMM_RU
  1337. #define SYMM_RL ZSYMM_RL
  1338. #define HEMM_LU ZHEMM_LU
  1339. #define HEMM_LL ZHEMM_LL
  1340. #define HEMM_RU ZHEMM_RU
  1341. #define HEMM_RL ZHEMM_RL
  1342. #define HEMM_IUTCOPY ZHEMM_IUTCOPY
  1343. #define HEMM_ILTCOPY ZHEMM_ILTCOPY
  1344. #define HEMM_OUTCOPY ZHEMM_OUTCOPY
  1345. #define HEMM_OLTCOPY ZHEMM_OLTCOPY
  1346. #define SYRK_UN ZSYRK_UN
  1347. #define SYRK_UT ZSYRK_UT
  1348. #define SYRK_LN ZSYRK_LN
  1349. #define SYRK_LT ZSYRK_LT
  1350. #define SYRK_UR ZSYRK_UN
  1351. #define SYRK_UC ZSYRK_UT
  1352. #define SYRK_LR ZSYRK_LN
  1353. #define SYRK_LC ZSYRK_LT
  1354. #define SYRK_KERNEL_U ZSYRK_KERNEL_U
  1355. #define SYRK_KERNEL_L ZSYRK_KERNEL_L
  1356. #define HERK_UN ZHERK_UN
  1357. #define HERK_LN ZHERK_LN
  1358. #define HERK_UC ZHERK_UC
  1359. #define HERK_LC ZHERK_LC
  1360. #define HER2K_UN ZHER2K_UN
  1361. #define HER2K_LN ZHER2K_LN
  1362. #define HER2K_UC ZHER2K_UC
  1363. #define HER2K_LC ZHER2K_LC
  1364. #define SYR2K_UN ZSYR2K_UN
  1365. #define SYR2K_UT ZSYR2K_UT
  1366. #define SYR2K_LN ZSYR2K_LN
  1367. #define SYR2K_LT ZSYR2K_LT
  1368. #define SYR2K_UR ZSYR2K_UN
  1369. #define SYR2K_UC ZSYR2K_UT
  1370. #define SYR2K_LR ZSYR2K_LN
  1371. #define SYR2K_LC ZSYR2K_LT
  1372. #define SYR2K_KERNEL_U ZSYR2K_KERNEL_U
  1373. #define SYR2K_KERNEL_L ZSYR2K_KERNEL_L
  1374. #define TRMM_LNUU ZTRMM_LNUU
  1375. #define TRMM_LNUN ZTRMM_LNUN
  1376. #define TRMM_LNLU ZTRMM_LNLU
  1377. #define TRMM_LNLN ZTRMM_LNLN
  1378. #define TRMM_LTUU ZTRMM_LTUU
  1379. #define TRMM_LTUN ZTRMM_LTUN
  1380. #define TRMM_LTLU ZTRMM_LTLU
  1381. #define TRMM_LTLN ZTRMM_LTLN
  1382. #define TRMM_LRUU ZTRMM_LRUU
  1383. #define TRMM_LRUN ZTRMM_LRUN
  1384. #define TRMM_LRLU ZTRMM_LRLU
  1385. #define TRMM_LRLN ZTRMM_LRLN
  1386. #define TRMM_LCUU ZTRMM_LCUU
  1387. #define TRMM_LCUN ZTRMM_LCUN
  1388. #define TRMM_LCLU ZTRMM_LCLU
  1389. #define TRMM_LCLN ZTRMM_LCLN
  1390. #define TRMM_RNUU ZTRMM_RNUU
  1391. #define TRMM_RNUN ZTRMM_RNUN
  1392. #define TRMM_RNLU ZTRMM_RNLU
  1393. #define TRMM_RNLN ZTRMM_RNLN
  1394. #define TRMM_RTUU ZTRMM_RTUU
  1395. #define TRMM_RTUN ZTRMM_RTUN
  1396. #define TRMM_RTLU ZTRMM_RTLU
  1397. #define TRMM_RTLN ZTRMM_RTLN
  1398. #define TRMM_RRUU ZTRMM_RRUU
  1399. #define TRMM_RRUN ZTRMM_RRUN
  1400. #define TRMM_RRLU ZTRMM_RRLU
  1401. #define TRMM_RRLN ZTRMM_RRLN
  1402. #define TRMM_RCUU ZTRMM_RCUU
  1403. #define TRMM_RCUN ZTRMM_RCUN
  1404. #define TRMM_RCLU ZTRMM_RCLU
  1405. #define TRMM_RCLN ZTRMM_RCLN
  1406. #define TRSM_LNUU ZTRSM_LNUU
  1407. #define TRSM_LNUN ZTRSM_LNUN
  1408. #define TRSM_LNLU ZTRSM_LNLU
  1409. #define TRSM_LNLN ZTRSM_LNLN
  1410. #define TRSM_LTUU ZTRSM_LTUU
  1411. #define TRSM_LTUN ZTRSM_LTUN
  1412. #define TRSM_LTLU ZTRSM_LTLU
  1413. #define TRSM_LTLN ZTRSM_LTLN
  1414. #define TRSM_LRUU ZTRSM_LRUU
  1415. #define TRSM_LRUN ZTRSM_LRUN
  1416. #define TRSM_LRLU ZTRSM_LRLU
  1417. #define TRSM_LRLN ZTRSM_LRLN
  1418. #define TRSM_LCUU ZTRSM_LCUU
  1419. #define TRSM_LCUN ZTRSM_LCUN
  1420. #define TRSM_LCLU ZTRSM_LCLU
  1421. #define TRSM_LCLN ZTRSM_LCLN
  1422. #define TRSM_RNUU ZTRSM_RNUU
  1423. #define TRSM_RNUN ZTRSM_RNUN
  1424. #define TRSM_RNLU ZTRSM_RNLU
  1425. #define TRSM_RNLN ZTRSM_RNLN
  1426. #define TRSM_RTUU ZTRSM_RTUU
  1427. #define TRSM_RTUN ZTRSM_RTUN
  1428. #define TRSM_RTLU ZTRSM_RTLU
  1429. #define TRSM_RTLN ZTRSM_RTLN
  1430. #define TRSM_RRUU ZTRSM_RRUU
  1431. #define TRSM_RRUN ZTRSM_RRUN
  1432. #define TRSM_RRLU ZTRSM_RRLU
  1433. #define TRSM_RRLN ZTRSM_RRLN
  1434. #define TRSM_RCUU ZTRSM_RCUU
  1435. #define TRSM_RCUN ZTRSM_RCUN
  1436. #define TRSM_RCLU ZTRSM_RCLU
  1437. #define TRSM_RCLN ZTRSM_RCLN
  1438. #define GEMM_THREAD_NN ZGEMM_THREAD_NN
  1439. #define GEMM_THREAD_CN ZGEMM_THREAD_CN
  1440. #define GEMM_THREAD_TN ZGEMM_THREAD_TN
  1441. #define GEMM_THREAD_NC ZGEMM_THREAD_NC
  1442. #define GEMM_THREAD_NT ZGEMM_THREAD_NT
  1443. #define GEMM_THREAD_CC ZGEMM_THREAD_CC
  1444. #define GEMM_THREAD_CT ZGEMM_THREAD_CT
  1445. #define GEMM_THREAD_TC ZGEMM_THREAD_TC
  1446. #define GEMM_THREAD_TT ZGEMM_THREAD_TT
  1447. #define GEMM_THREAD_NR ZGEMM_THREAD_NR
  1448. #define GEMM_THREAD_TR ZGEMM_THREAD_TR
  1449. #define GEMM_THREAD_CR ZGEMM_THREAD_CR
  1450. #define GEMM_THREAD_RN ZGEMM_THREAD_RN
  1451. #define GEMM_THREAD_RT ZGEMM_THREAD_RT
  1452. #define GEMM_THREAD_RC ZGEMM_THREAD_RC
  1453. #define GEMM_THREAD_RR ZGEMM_THREAD_RR
  1454. #define SYMM_THREAD_LU ZSYMM_THREAD_LU
  1455. #define SYMM_THREAD_LL ZSYMM_THREAD_LL
  1456. #define SYMM_THREAD_RU ZSYMM_THREAD_RU
  1457. #define SYMM_THREAD_RL ZSYMM_THREAD_RL
  1458. #define HEMM_THREAD_LU ZHEMM_THREAD_LU
  1459. #define HEMM_THREAD_LL ZHEMM_THREAD_LL
  1460. #define HEMM_THREAD_RU ZHEMM_THREAD_RU
  1461. #define HEMM_THREAD_RL ZHEMM_THREAD_RL
  1462. #define SYRK_THREAD_UN ZSYRK_THREAD_UN
  1463. #define SYRK_THREAD_UT ZSYRK_THREAD_UT
  1464. #define SYRK_THREAD_LN ZSYRK_THREAD_LN
  1465. #define SYRK_THREAD_LT ZSYRK_THREAD_LT
  1466. #define SYRK_THREAD_UR ZSYRK_THREAD_UR
  1467. #define SYRK_THREAD_UC ZSYRK_THREAD_UC
  1468. #define SYRK_THREAD_LR ZSYRK_THREAD_LR
  1469. #define SYRK_THREAD_LC ZSYRK_THREAD_LC
  1470. #define HERK_THREAD_UN ZHERK_THREAD_UN
  1471. #define HERK_THREAD_UT ZHERK_THREAD_UT
  1472. #define HERK_THREAD_LN ZHERK_THREAD_LN
  1473. #define HERK_THREAD_LT ZHERK_THREAD_LT
  1474. #define HERK_THREAD_UR ZHERK_THREAD_UR
  1475. #define HERK_THREAD_UC ZHERK_THREAD_UC
  1476. #define HERK_THREAD_LR ZHERK_THREAD_LR
  1477. #define HERK_THREAD_LC ZHERK_THREAD_LC
  1478. #define GEMM3M_NN ZGEMM3M_NN
  1479. #define GEMM3M_CN ZGEMM3M_CN
  1480. #define GEMM3M_TN ZGEMM3M_TN
  1481. #define GEMM3M_NC ZGEMM3M_NC
  1482. #define GEMM3M_NT ZGEMM3M_NT
  1483. #define GEMM3M_CC ZGEMM3M_CC
  1484. #define GEMM3M_CT ZGEMM3M_CT
  1485. #define GEMM3M_TC ZGEMM3M_TC
  1486. #define GEMM3M_TT ZGEMM3M_TT
  1487. #define GEMM3M_NR ZGEMM3M_NR
  1488. #define GEMM3M_TR ZGEMM3M_TR
  1489. #define GEMM3M_CR ZGEMM3M_CR
  1490. #define GEMM3M_RN ZGEMM3M_RN
  1491. #define GEMM3M_RT ZGEMM3M_RT
  1492. #define GEMM3M_RC ZGEMM3M_RC
  1493. #define GEMM3M_RR ZGEMM3M_RR
  1494. #define GEMM3M_THREAD_NN ZGEMM3M_THREAD_NN
  1495. #define GEMM3M_THREAD_CN ZGEMM3M_THREAD_CN
  1496. #define GEMM3M_THREAD_TN ZGEMM3M_THREAD_TN
  1497. #define GEMM3M_THREAD_NC ZGEMM3M_THREAD_NC
  1498. #define GEMM3M_THREAD_NT ZGEMM3M_THREAD_NT
  1499. #define GEMM3M_THREAD_CC ZGEMM3M_THREAD_CC
  1500. #define GEMM3M_THREAD_CT ZGEMM3M_THREAD_CT
  1501. #define GEMM3M_THREAD_TC ZGEMM3M_THREAD_TC
  1502. #define GEMM3M_THREAD_TT ZGEMM3M_THREAD_TT
  1503. #define GEMM3M_THREAD_NR ZGEMM3M_THREAD_NR
  1504. #define GEMM3M_THREAD_TR ZGEMM3M_THREAD_TR
  1505. #define GEMM3M_THREAD_CR ZGEMM3M_THREAD_CR
  1506. #define GEMM3M_THREAD_RN ZGEMM3M_THREAD_RN
  1507. #define GEMM3M_THREAD_RT ZGEMM3M_THREAD_RT
  1508. #define GEMM3M_THREAD_RC ZGEMM3M_THREAD_RC
  1509. #define GEMM3M_THREAD_RR ZGEMM3M_THREAD_RR
  1510. #define SYMM3M_LU ZSYMM3M_LU
  1511. #define SYMM3M_LL ZSYMM3M_LL
  1512. #define SYMM3M_RU ZSYMM3M_RU
  1513. #define SYMM3M_RL ZSYMM3M_RL
  1514. #define SYMM3M_THREAD_LU ZSYMM3M_THREAD_LU
  1515. #define SYMM3M_THREAD_LL ZSYMM3M_THREAD_LL
  1516. #define SYMM3M_THREAD_RU ZSYMM3M_THREAD_RU
  1517. #define SYMM3M_THREAD_RL ZSYMM3M_THREAD_RL
  1518. #define HEMM3M_LU ZHEMM3M_LU
  1519. #define HEMM3M_LL ZHEMM3M_LL
  1520. #define HEMM3M_RU ZHEMM3M_RU
  1521. #define HEMM3M_RL ZHEMM3M_RL
  1522. #define HEMM3M_THREAD_LU ZHEMM3M_THREAD_LU
  1523. #define HEMM3M_THREAD_LL ZHEMM3M_THREAD_LL
  1524. #define HEMM3M_THREAD_RU ZHEMM3M_THREAD_RU
  1525. #define HEMM3M_THREAD_RL ZHEMM3M_THREAD_RL
  1526. #define SYMM_IUTCOPY ZSYMM_IUTCOPY
  1527. #define SYMM_ILTCOPY ZSYMM_ILTCOPY
  1528. #define SYMM_OUTCOPY ZSYMM_OUTCOPY
  1529. #define SYMM_OLTCOPY ZSYMM_OLTCOPY
  1530. #define AXPBY_K ZAXPBY_K
  1531. #define OMATCOPY_K_CN ZOMATCOPY_K_CN
  1532. #define OMATCOPY_K_RN ZOMATCOPY_K_RN
  1533. #define OMATCOPY_K_CT ZOMATCOPY_K_CT
  1534. #define OMATCOPY_K_RT ZOMATCOPY_K_RT
  1535. #define OMATCOPY_K_CNC ZOMATCOPY_K_CNC
  1536. #define OMATCOPY_K_RNC ZOMATCOPY_K_RNC
  1537. #define OMATCOPY_K_CTC ZOMATCOPY_K_CTC
  1538. #define OMATCOPY_K_RTC ZOMATCOPY_K_RTC
  1539. #define GEADD_K ZGEADD_K
  1540. #else
  1541. #define AMAX_K CAMAX_K
  1542. #define AMIN_K CAMIN_K
  1543. #define MAX_K CMAX_K
  1544. #define MIN_K CMIN_K
  1545. #define IAMAX_K ICAMAX_K
  1546. #define IAMIN_K ICAMIN_K
  1547. #define IMAX_K ICMAX_K
  1548. #define IMIN_K ICMIN_K
  1549. #define ASUM_K CASUM_K
  1550. #define AXPYU_K CAXPYU_K
  1551. #define AXPYC_K CAXPYC_K
  1552. #define COPY_K CCOPY_K
  1553. #define DOTU_K CDOTU_K
  1554. #define DOTC_K CDOTC_K
  1555. #define NRM2_K CNRM2_K
  1556. #define SCAL_K CSCAL_K
  1557. #define SWAP_K CSWAP_K
  1558. #define ROT_K CROT_K
  1559. #define GEMV_N CGEMV_N
  1560. #define GEMV_T CGEMV_T
  1561. #define GEMV_R CGEMV_R
  1562. #define GEMV_C CGEMV_C
  1563. #define GEMV_O CGEMV_O
  1564. #define GEMV_U CGEMV_U
  1565. #define GEMV_S CGEMV_S
  1566. #define GEMV_D CGEMV_D
  1567. #define GERU_K CGERU_K
  1568. #define GERC_K CGERC_K
  1569. #define GERV_K CGERV_K
  1570. #define GERD_K CGERD_K
  1571. #define SYMV_U CSYMV_U
  1572. #define SYMV_L CSYMV_L
  1573. #define HEMV_U CHEMV_U
  1574. #define HEMV_L CHEMV_L
  1575. #define HEMV_V CHEMV_V
  1576. #define HEMV_M CHEMV_M
  1577. #define SYMV_THREAD_U CSYMV_THREAD_U
  1578. #define SYMV_THREAD_L CSYMV_THREAD_L
  1579. #define HEMV_THREAD_U CHEMV_THREAD_U
  1580. #define HEMV_THREAD_L CHEMV_THREAD_L
  1581. #define HEMV_THREAD_V CHEMV_THREAD_V
  1582. #define HEMV_THREAD_M CHEMV_THREAD_M
  1583. #define GEMM_ONCOPY CGEMM_ONCOPY
  1584. #define GEMM_OTCOPY CGEMM_OTCOPY
  1585. #define GEMM_INCOPY CGEMM_INCOPY
  1586. #define GEMM_ITCOPY CGEMM_ITCOPY
  1587. #define GEMM3M_ONCOPYB CGEMM3M_ONCOPYB
  1588. #define GEMM3M_ONCOPYR CGEMM3M_ONCOPYR
  1589. #define GEMM3M_ONCOPYI CGEMM3M_ONCOPYI
  1590. #define GEMM3M_OTCOPYB CGEMM3M_OTCOPYB
  1591. #define GEMM3M_OTCOPYR CGEMM3M_OTCOPYR
  1592. #define GEMM3M_OTCOPYI CGEMM3M_OTCOPYI
  1593. #define GEMM3M_INCOPYB CGEMM3M_INCOPYB
  1594. #define GEMM3M_INCOPYR CGEMM3M_INCOPYR
  1595. #define GEMM3M_INCOPYI CGEMM3M_INCOPYI
  1596. #define GEMM3M_ITCOPYB CGEMM3M_ITCOPYB
  1597. #define GEMM3M_ITCOPYR CGEMM3M_ITCOPYR
  1598. #define GEMM3M_ITCOPYI CGEMM3M_ITCOPYI
  1599. #ifdef UNIT
  1600. #define TRMM_OUNCOPY CTRMM_OUNUCOPY
  1601. #define TRMM_OUTCOPY CTRMM_OUTUCOPY
  1602. #define TRMM_OLNCOPY CTRMM_OLNUCOPY
  1603. #define TRMM_OLTCOPY CTRMM_OLTUCOPY
  1604. #define TRSM_OUNCOPY CTRSM_OUNUCOPY
  1605. #define TRSM_OUTCOPY CTRSM_OUTUCOPY
  1606. #define TRSM_OLNCOPY CTRSM_OLNUCOPY
  1607. #define TRSM_OLTCOPY CTRSM_OLTUCOPY
  1608. #define TRMM_IUNCOPY CTRMM_IUNUCOPY
  1609. #define TRMM_IUTCOPY CTRMM_IUTUCOPY
  1610. #define TRMM_ILNCOPY CTRMM_ILNUCOPY
  1611. #define TRMM_ILTCOPY CTRMM_ILTUCOPY
  1612. #define TRSM_IUNCOPY CTRSM_IUNUCOPY
  1613. #define TRSM_IUTCOPY CTRSM_IUTUCOPY
  1614. #define TRSM_ILNCOPY CTRSM_ILNUCOPY
  1615. #define TRSM_ILTCOPY CTRSM_ILTUCOPY
  1616. #else
  1617. #define TRMM_OUNCOPY CTRMM_OUNNCOPY
  1618. #define TRMM_OUTCOPY CTRMM_OUTNCOPY
  1619. #define TRMM_OLNCOPY CTRMM_OLNNCOPY
  1620. #define TRMM_OLTCOPY CTRMM_OLTNCOPY
  1621. #define TRSM_OUNCOPY CTRSM_OUNNCOPY
  1622. #define TRSM_OUTCOPY CTRSM_OUTNCOPY
  1623. #define TRSM_OLNCOPY CTRSM_OLNNCOPY
  1624. #define TRSM_OLTCOPY CTRSM_OLTNCOPY
  1625. #define TRMM_IUNCOPY CTRMM_IUNNCOPY
  1626. #define TRMM_IUTCOPY CTRMM_IUTNCOPY
  1627. #define TRMM_ILNCOPY CTRMM_ILNNCOPY
  1628. #define TRMM_ILTCOPY CTRMM_ILTNCOPY
  1629. #define TRSM_IUNCOPY CTRSM_IUNNCOPY
  1630. #define TRSM_IUTCOPY CTRSM_IUTNCOPY
  1631. #define TRSM_ILNCOPY CTRSM_ILNNCOPY
  1632. #define TRSM_ILTCOPY CTRSM_ILTNCOPY
  1633. #endif
  1634. #define SYMM3M_ILCOPYB CSYMM3M_ILCOPYB
  1635. #define SYMM3M_IUCOPYB CSYMM3M_IUCOPYB
  1636. #define SYMM3M_ILCOPYR CSYMM3M_ILCOPYR
  1637. #define SYMM3M_IUCOPYR CSYMM3M_IUCOPYR
  1638. #define SYMM3M_ILCOPYI CSYMM3M_ILCOPYI
  1639. #define SYMM3M_IUCOPYI CSYMM3M_IUCOPYI
  1640. #define SYMM3M_OLCOPYB CSYMM3M_OLCOPYB
  1641. #define SYMM3M_OUCOPYB CSYMM3M_OUCOPYB
  1642. #define SYMM3M_OLCOPYR CSYMM3M_OLCOPYR
  1643. #define SYMM3M_OUCOPYR CSYMM3M_OUCOPYR
  1644. #define SYMM3M_OLCOPYI CSYMM3M_OLCOPYI
  1645. #define SYMM3M_OUCOPYI CSYMM3M_OUCOPYI
  1646. #define HEMM3M_ILCOPYB CHEMM3M_ILCOPYB
  1647. #define HEMM3M_IUCOPYB CHEMM3M_IUCOPYB
  1648. #define HEMM3M_ILCOPYR CHEMM3M_ILCOPYR
  1649. #define HEMM3M_IUCOPYR CHEMM3M_IUCOPYR
  1650. #define HEMM3M_ILCOPYI CHEMM3M_ILCOPYI
  1651. #define HEMM3M_IUCOPYI CHEMM3M_IUCOPYI
  1652. #define HEMM3M_OLCOPYB CHEMM3M_OLCOPYB
  1653. #define HEMM3M_OUCOPYB CHEMM3M_OUCOPYB
  1654. #define HEMM3M_OLCOPYR CHEMM3M_OLCOPYR
  1655. #define HEMM3M_OUCOPYR CHEMM3M_OUCOPYR
  1656. #define HEMM3M_OLCOPYI CHEMM3M_OLCOPYI
  1657. #define HEMM3M_OUCOPYI CHEMM3M_OUCOPYI
  1658. #define GEMM_BETA CGEMM_BETA
  1659. #define GEMM_KERNEL_N CGEMM_KERNEL_N
  1660. #define GEMM_KERNEL_L CGEMM_KERNEL_L
  1661. #define GEMM_KERNEL_R CGEMM_KERNEL_R
  1662. #define GEMM_KERNEL_B CGEMM_KERNEL_B
  1663. #define GEMM3M_KERNEL CGEMM3M_KERNEL
  1664. #define TRMM_KERNEL_LN CTRMM_KERNEL_LN
  1665. #define TRMM_KERNEL_LT CTRMM_KERNEL_LT
  1666. #define TRMM_KERNEL_LR CTRMM_KERNEL_LR
  1667. #define TRMM_KERNEL_LC CTRMM_KERNEL_LC
  1668. #define TRMM_KERNEL_RN CTRMM_KERNEL_RN
  1669. #define TRMM_KERNEL_RT CTRMM_KERNEL_RT
  1670. #define TRMM_KERNEL_RR CTRMM_KERNEL_RR
  1671. #define TRMM_KERNEL_RC CTRMM_KERNEL_RC
  1672. #define TRSM_KERNEL_LN CTRSM_KERNEL_LN
  1673. #define TRSM_KERNEL_LT CTRSM_KERNEL_LT
  1674. #define TRSM_KERNEL_LR CTRSM_KERNEL_LR
  1675. #define TRSM_KERNEL_LC CTRSM_KERNEL_LC
  1676. #define TRSM_KERNEL_RN CTRSM_KERNEL_RN
  1677. #define TRSM_KERNEL_RT CTRSM_KERNEL_RT
  1678. #define TRSM_KERNEL_RR CTRSM_KERNEL_RR
  1679. #define TRSM_KERNEL_RC CTRSM_KERNEL_RC
  1680. #define GEMM_NN CGEMM_NN
  1681. #define GEMM_CN CGEMM_CN
  1682. #define GEMM_TN CGEMM_TN
  1683. #define GEMM_NC CGEMM_NC
  1684. #define GEMM_NT CGEMM_NT
  1685. #define GEMM_CC CGEMM_CC
  1686. #define GEMM_CT CGEMM_CT
  1687. #define GEMM_TC CGEMM_TC
  1688. #define GEMM_TT CGEMM_TT
  1689. #define GEMM_NR CGEMM_NR
  1690. #define GEMM_TR CGEMM_TR
  1691. #define GEMM_CR CGEMM_CR
  1692. #define GEMM_RN CGEMM_RN
  1693. #define GEMM_RT CGEMM_RT
  1694. #define GEMM_RC CGEMM_RC
  1695. #define GEMM_RR CGEMM_RR
  1696. #define SYMM_LU CSYMM_LU
  1697. #define SYMM_LL CSYMM_LL
  1698. #define SYMM_RU CSYMM_RU
  1699. #define SYMM_RL CSYMM_RL
  1700. #define HEMM_LU CHEMM_LU
  1701. #define HEMM_LL CHEMM_LL
  1702. #define HEMM_RU CHEMM_RU
  1703. #define HEMM_RL CHEMM_RL
  1704. #define HEMM_IUTCOPY CHEMM_IUTCOPY
  1705. #define HEMM_ILTCOPY CHEMM_ILTCOPY
  1706. #define HEMM_OUTCOPY CHEMM_OUTCOPY
  1707. #define HEMM_OLTCOPY CHEMM_OLTCOPY
  1708. #define SYRK_UN CSYRK_UN
  1709. #define SYRK_UT CSYRK_UT
  1710. #define SYRK_LN CSYRK_LN
  1711. #define SYRK_LT CSYRK_LT
  1712. #define SYRK_UR CSYRK_UN
  1713. #define SYRK_UC CSYRK_UT
  1714. #define SYRK_LR CSYRK_LN
  1715. #define SYRK_LC CSYRK_LT
  1716. #define SYRK_KERNEL_U CSYRK_KERNEL_U
  1717. #define SYRK_KERNEL_L CSYRK_KERNEL_L
  1718. #define HERK_UN CHERK_UN
  1719. #define HERK_LN CHERK_LN
  1720. #define HERK_UC CHERK_UC
  1721. #define HERK_LC CHERK_LC
  1722. #define HER2K_UN CHER2K_UN
  1723. #define HER2K_LN CHER2K_LN
  1724. #define HER2K_UC CHER2K_UC
  1725. #define HER2K_LC CHER2K_LC
  1726. #define SYR2K_UN CSYR2K_UN
  1727. #define SYR2K_UT CSYR2K_UT
  1728. #define SYR2K_LN CSYR2K_LN
  1729. #define SYR2K_LT CSYR2K_LT
  1730. #define SYR2K_UR CSYR2K_UN
  1731. #define SYR2K_UC CSYR2K_UT
  1732. #define SYR2K_LR CSYR2K_LN
  1733. #define SYR2K_LC CSYR2K_LT
  1734. #define SYR2K_KERNEL_U CSYR2K_KERNEL_U
  1735. #define SYR2K_KERNEL_L CSYR2K_KERNEL_L
  1736. #define TRMM_LNUU CTRMM_LNUU
  1737. #define TRMM_LNUN CTRMM_LNUN
  1738. #define TRMM_LNLU CTRMM_LNLU
  1739. #define TRMM_LNLN CTRMM_LNLN
  1740. #define TRMM_LTUU CTRMM_LTUU
  1741. #define TRMM_LTUN CTRMM_LTUN
  1742. #define TRMM_LTLU CTRMM_LTLU
  1743. #define TRMM_LTLN CTRMM_LTLN
  1744. #define TRMM_LRUU CTRMM_LRUU
  1745. #define TRMM_LRUN CTRMM_LRUN
  1746. #define TRMM_LRLU CTRMM_LRLU
  1747. #define TRMM_LRLN CTRMM_LRLN
  1748. #define TRMM_LCUU CTRMM_LCUU
  1749. #define TRMM_LCUN CTRMM_LCUN
  1750. #define TRMM_LCLU CTRMM_LCLU
  1751. #define TRMM_LCLN CTRMM_LCLN
  1752. #define TRMM_RNUU CTRMM_RNUU
  1753. #define TRMM_RNUN CTRMM_RNUN
  1754. #define TRMM_RNLU CTRMM_RNLU
  1755. #define TRMM_RNLN CTRMM_RNLN
  1756. #define TRMM_RTUU CTRMM_RTUU
  1757. #define TRMM_RTUN CTRMM_RTUN
  1758. #define TRMM_RTLU CTRMM_RTLU
  1759. #define TRMM_RTLN CTRMM_RTLN
  1760. #define TRMM_RRUU CTRMM_RRUU
  1761. #define TRMM_RRUN CTRMM_RRUN
  1762. #define TRMM_RRLU CTRMM_RRLU
  1763. #define TRMM_RRLN CTRMM_RRLN
  1764. #define TRMM_RCUU CTRMM_RCUU
  1765. #define TRMM_RCUN CTRMM_RCUN
  1766. #define TRMM_RCLU CTRMM_RCLU
  1767. #define TRMM_RCLN CTRMM_RCLN
  1768. #define TRSM_LNUU CTRSM_LNUU
  1769. #define TRSM_LNUN CTRSM_LNUN
  1770. #define TRSM_LNLU CTRSM_LNLU
  1771. #define TRSM_LNLN CTRSM_LNLN
  1772. #define TRSM_LTUU CTRSM_LTUU
  1773. #define TRSM_LTUN CTRSM_LTUN
  1774. #define TRSM_LTLU CTRSM_LTLU
  1775. #define TRSM_LTLN CTRSM_LTLN
  1776. #define TRSM_LRUU CTRSM_LRUU
  1777. #define TRSM_LRUN CTRSM_LRUN
  1778. #define TRSM_LRLU CTRSM_LRLU
  1779. #define TRSM_LRLN CTRSM_LRLN
  1780. #define TRSM_LCUU CTRSM_LCUU
  1781. #define TRSM_LCUN CTRSM_LCUN
  1782. #define TRSM_LCLU CTRSM_LCLU
  1783. #define TRSM_LCLN CTRSM_LCLN
  1784. #define TRSM_RNUU CTRSM_RNUU
  1785. #define TRSM_RNUN CTRSM_RNUN
  1786. #define TRSM_RNLU CTRSM_RNLU
  1787. #define TRSM_RNLN CTRSM_RNLN
  1788. #define TRSM_RTUU CTRSM_RTUU
  1789. #define TRSM_RTUN CTRSM_RTUN
  1790. #define TRSM_RTLU CTRSM_RTLU
  1791. #define TRSM_RTLN CTRSM_RTLN
  1792. #define TRSM_RRUU CTRSM_RRUU
  1793. #define TRSM_RRUN CTRSM_RRUN
  1794. #define TRSM_RRLU CTRSM_RRLU
  1795. #define TRSM_RRLN CTRSM_RRLN
  1796. #define TRSM_RCUU CTRSM_RCUU
  1797. #define TRSM_RCUN CTRSM_RCUN
  1798. #define TRSM_RCLU CTRSM_RCLU
  1799. #define TRSM_RCLN CTRSM_RCLN
  1800. #define GEMM_THREAD_NN CGEMM_THREAD_NN
  1801. #define GEMM_THREAD_CN CGEMM_THREAD_CN
  1802. #define GEMM_THREAD_TN CGEMM_THREAD_TN
  1803. #define GEMM_THREAD_NC CGEMM_THREAD_NC
  1804. #define GEMM_THREAD_NT CGEMM_THREAD_NT
  1805. #define GEMM_THREAD_CC CGEMM_THREAD_CC
  1806. #define GEMM_THREAD_CT CGEMM_THREAD_CT
  1807. #define GEMM_THREAD_TC CGEMM_THREAD_TC
  1808. #define GEMM_THREAD_TT CGEMM_THREAD_TT
  1809. #define GEMM_THREAD_NR CGEMM_THREAD_NR
  1810. #define GEMM_THREAD_TR CGEMM_THREAD_TR
  1811. #define GEMM_THREAD_CR CGEMM_THREAD_CR
  1812. #define GEMM_THREAD_RN CGEMM_THREAD_RN
  1813. #define GEMM_THREAD_RT CGEMM_THREAD_RT
  1814. #define GEMM_THREAD_RC CGEMM_THREAD_RC
  1815. #define GEMM_THREAD_RR CGEMM_THREAD_RR
  1816. #define SYMM_THREAD_LU CSYMM_THREAD_LU
  1817. #define SYMM_THREAD_LL CSYMM_THREAD_LL
  1818. #define SYMM_THREAD_RU CSYMM_THREAD_RU
  1819. #define SYMM_THREAD_RL CSYMM_THREAD_RL
  1820. #define HEMM_THREAD_LU CHEMM_THREAD_LU
  1821. #define HEMM_THREAD_LL CHEMM_THREAD_LL
  1822. #define HEMM_THREAD_RU CHEMM_THREAD_RU
  1823. #define HEMM_THREAD_RL CHEMM_THREAD_RL
  1824. #define SYRK_THREAD_UN CSYRK_THREAD_UN
  1825. #define SYRK_THREAD_UT CSYRK_THREAD_UT
  1826. #define SYRK_THREAD_LN CSYRK_THREAD_LN
  1827. #define SYRK_THREAD_LT CSYRK_THREAD_LT
  1828. #define SYRK_THREAD_UR CSYRK_THREAD_UR
  1829. #define SYRK_THREAD_UC CSYRK_THREAD_UC
  1830. #define SYRK_THREAD_LR CSYRK_THREAD_LR
  1831. #define SYRK_THREAD_LC CSYRK_THREAD_LC
  1832. #define HERK_THREAD_UN CHERK_THREAD_UN
  1833. #define HERK_THREAD_UT CHERK_THREAD_UT
  1834. #define HERK_THREAD_LN CHERK_THREAD_LN
  1835. #define HERK_THREAD_LT CHERK_THREAD_LT
  1836. #define HERK_THREAD_UR CHERK_THREAD_UR
  1837. #define HERK_THREAD_UC CHERK_THREAD_UC
  1838. #define HERK_THREAD_LR CHERK_THREAD_LR
  1839. #define HERK_THREAD_LC CHERK_THREAD_LC
  1840. #define GEMM3M_NN CGEMM3M_NN
  1841. #define GEMM3M_CN CGEMM3M_CN
  1842. #define GEMM3M_TN CGEMM3M_TN
  1843. #define GEMM3M_NC CGEMM3M_NC
  1844. #define GEMM3M_NT CGEMM3M_NT
  1845. #define GEMM3M_CC CGEMM3M_CC
  1846. #define GEMM3M_CT CGEMM3M_CT
  1847. #define GEMM3M_TC CGEMM3M_TC
  1848. #define GEMM3M_TT CGEMM3M_TT
  1849. #define GEMM3M_NR CGEMM3M_NR
  1850. #define GEMM3M_TR CGEMM3M_TR
  1851. #define GEMM3M_CR CGEMM3M_CR
  1852. #define GEMM3M_RN CGEMM3M_RN
  1853. #define GEMM3M_RT CGEMM3M_RT
  1854. #define GEMM3M_RC CGEMM3M_RC
  1855. #define GEMM3M_RR CGEMM3M_RR
  1856. #define GEMM3M_THREAD_NN CGEMM3M_THREAD_NN
  1857. #define GEMM3M_THREAD_CN CGEMM3M_THREAD_CN
  1858. #define GEMM3M_THREAD_TN CGEMM3M_THREAD_TN
  1859. #define GEMM3M_THREAD_NC CGEMM3M_THREAD_NC
  1860. #define GEMM3M_THREAD_NT CGEMM3M_THREAD_NT
  1861. #define GEMM3M_THREAD_CC CGEMM3M_THREAD_CC
  1862. #define GEMM3M_THREAD_CT CGEMM3M_THREAD_CT
  1863. #define GEMM3M_THREAD_TC CGEMM3M_THREAD_TC
  1864. #define GEMM3M_THREAD_TT CGEMM3M_THREAD_TT
  1865. #define GEMM3M_THREAD_NR CGEMM3M_THREAD_NR
  1866. #define GEMM3M_THREAD_TR CGEMM3M_THREAD_TR
  1867. #define GEMM3M_THREAD_CR CGEMM3M_THREAD_CR
  1868. #define GEMM3M_THREAD_RN CGEMM3M_THREAD_RN
  1869. #define GEMM3M_THREAD_RT CGEMM3M_THREAD_RT
  1870. #define GEMM3M_THREAD_RC CGEMM3M_THREAD_RC
  1871. #define GEMM3M_THREAD_RR CGEMM3M_THREAD_RR
  1872. #define SYMM3M_LU CSYMM3M_LU
  1873. #define SYMM3M_LL CSYMM3M_LL
  1874. #define SYMM3M_RU CSYMM3M_RU
  1875. #define SYMM3M_RL CSYMM3M_RL
  1876. #define SYMM3M_THREAD_LU CSYMM3M_THREAD_LU
  1877. #define SYMM3M_THREAD_LL CSYMM3M_THREAD_LL
  1878. #define SYMM3M_THREAD_RU CSYMM3M_THREAD_RU
  1879. #define SYMM3M_THREAD_RL CSYMM3M_THREAD_RL
  1880. #define HEMM3M_LU CHEMM3M_LU
  1881. #define HEMM3M_LL CHEMM3M_LL
  1882. #define HEMM3M_RU CHEMM3M_RU
  1883. #define HEMM3M_RL CHEMM3M_RL
  1884. #define HEMM3M_THREAD_LU CHEMM3M_THREAD_LU
  1885. #define HEMM3M_THREAD_LL CHEMM3M_THREAD_LL
  1886. #define HEMM3M_THREAD_RU CHEMM3M_THREAD_RU
  1887. #define HEMM3M_THREAD_RL CHEMM3M_THREAD_RL
  1888. #define SYMM_IUTCOPY CSYMM_IUTCOPY
  1889. #define SYMM_ILTCOPY CSYMM_ILTCOPY
  1890. #define SYMM_OUTCOPY CSYMM_OUTCOPY
  1891. #define SYMM_OLTCOPY CSYMM_OLTCOPY
  1892. #define AXPBY_K CAXPBY_K
  1893. #define OMATCOPY_K_CN COMATCOPY_K_CN
  1894. #define OMATCOPY_K_RN COMATCOPY_K_RN
  1895. #define OMATCOPY_K_CT COMATCOPY_K_CT
  1896. #define OMATCOPY_K_RT COMATCOPY_K_RT
  1897. #define OMATCOPY_K_CNC COMATCOPY_K_CNC
  1898. #define OMATCOPY_K_RNC COMATCOPY_K_RNC
  1899. #define OMATCOPY_K_CTC COMATCOPY_K_CTC
  1900. #define OMATCOPY_K_RTC COMATCOPY_K_RTC
  1901. #define GEADD_K CGEADD_K
  1902. #endif
  1903. #endif
  1904. #ifndef ASSEMBLER
  1905. #if defined(ARCH_X86) || defined(ARCH_X86_64) || defined(ARCH_IA64) || defined(ARCH_MIPS64)
  1906. extern BLASLONG gemm_offset_a;
  1907. extern BLASLONG gemm_offset_b;
  1908. extern BLASLONG sgemm_p;
  1909. extern BLASLONG sgemm_q;
  1910. extern BLASLONG sgemm_r;
  1911. extern BLASLONG dgemm_p;
  1912. extern BLASLONG dgemm_q;
  1913. extern BLASLONG dgemm_r;
  1914. extern BLASLONG qgemm_p;
  1915. extern BLASLONG qgemm_q;
  1916. extern BLASLONG qgemm_r;
  1917. extern BLASLONG cgemm_p;
  1918. extern BLASLONG cgemm_q;
  1919. extern BLASLONG cgemm_r;
  1920. extern BLASLONG zgemm_p;
  1921. extern BLASLONG zgemm_q;
  1922. extern BLASLONG zgemm_r;
  1923. extern BLASLONG xgemm_p;
  1924. extern BLASLONG xgemm_q;
  1925. extern BLASLONG xgemm_r;
  1926. #endif
  1927. typedef struct {
  1928. void *a, *b, *c, *d, *alpha, *beta;
  1929. BLASLONG m, n, k, lda, ldb, ldc, ldd;
  1930. #ifdef SMP
  1931. void *common;
  1932. BLASLONG nthreads;
  1933. #endif
  1934. #ifdef PARAMTEST
  1935. BLASLONG gemm_p, gemm_q, gemm_r;
  1936. #endif
  1937. #ifdef PREFETCHTEST
  1938. BLASLONG prea, preb, prec, pred;
  1939. #endif
  1940. } blas_arg_t;
  1941. #endif
  1942. #ifdef XDOUBLE
  1943. #define TRSV_NUU qtrsv_NUU
  1944. #define TRSV_NUN qtrsv_NUN
  1945. #define TRSV_NLU qtrsv_NLU
  1946. #define TRSV_NLN qtrsv_NLN
  1947. #define TRSV_TUU qtrsv_TUU
  1948. #define TRSV_TUN qtrsv_TUN
  1949. #define TRSV_TLU qtrsv_TLU
  1950. #define TRSV_TLN qtrsv_TLN
  1951. #define ZTRSV_NUU xtrsv_NUU
  1952. #define ZTRSV_NUN xtrsv_NUN
  1953. #define ZTRSV_NLU xtrsv_NLU
  1954. #define ZTRSV_NLN xtrsv_NLN
  1955. #define ZTRSV_TUU xtrsv_TUU
  1956. #define ZTRSV_TUN xtrsv_TUN
  1957. #define ZTRSV_TLU xtrsv_TLU
  1958. #define ZTRSV_TLN xtrsv_TLN
  1959. #define ZTRSV_RUU xtrsv_RUU
  1960. #define ZTRSV_RUN xtrsv_RUN
  1961. #define ZTRSV_RLU xtrsv_RLU
  1962. #define ZTRSV_RLN xtrsv_RLN
  1963. #define ZTRSV_CUU xtrsv_CUU
  1964. #define ZTRSV_CUN xtrsv_CUN
  1965. #define ZTRSV_CLU xtrsv_CLU
  1966. #define ZTRSV_CLN xtrsv_CLN
  1967. #define TRMV_NUU qtrmv_NUU
  1968. #define TRMV_NUN qtrmv_NUN
  1969. #define TRMV_NLU qtrmv_NLU
  1970. #define TRMV_NLN qtrmv_NLN
  1971. #define TRMV_TUU qtrmv_TUU
  1972. #define TRMV_TUN qtrmv_TUN
  1973. #define TRMV_TLU qtrmv_TLU
  1974. #define TRMV_TLN qtrmv_TLN
  1975. #define TRMV_THREAD_NUU qtrmv_thread_NUU
  1976. #define TRMV_THREAD_NUN qtrmv_thread_NUN
  1977. #define TRMV_THREAD_NLU qtrmv_thread_NLU
  1978. #define TRMV_THREAD_NLN qtrmv_thread_NLN
  1979. #define TRMV_THREAD_TUU qtrmv_thread_TUU
  1980. #define TRMV_THREAD_TUN qtrmv_thread_TUN
  1981. #define TRMV_THREAD_TLU qtrmv_thread_TLU
  1982. #define TRMV_THREAD_TLN qtrmv_thread_TLN
  1983. #define ZTRMV_NUU xtrmv_NUU
  1984. #define ZTRMV_NUN xtrmv_NUN
  1985. #define ZTRMV_NLU xtrmv_NLU
  1986. #define ZTRMV_NLN xtrmv_NLN
  1987. #define ZTRMV_TUU xtrmv_TUU
  1988. #define ZTRMV_TUN xtrmv_TUN
  1989. #define ZTRMV_TLU xtrmv_TLU
  1990. #define ZTRMV_TLN xtrmv_TLN
  1991. #define ZTRMV_RUU xtrmv_RUU
  1992. #define ZTRMV_RUN xtrmv_RUN
  1993. #define ZTRMV_RLU xtrmv_RLU
  1994. #define ZTRMV_RLN xtrmv_RLN
  1995. #define ZTRMV_CUU xtrmv_CUU
  1996. #define ZTRMV_CUN xtrmv_CUN
  1997. #define ZTRMV_CLU xtrmv_CLU
  1998. #define ZTRMV_CLN xtrmv_CLN
  1999. #define ZTRMV_THREAD_NUU xtrmv_thread_NUU
  2000. #define ZTRMV_THREAD_NUN xtrmv_thread_NUN
  2001. #define ZTRMV_THREAD_NLU xtrmv_thread_NLU
  2002. #define ZTRMV_THREAD_NLN xtrmv_thread_NLN
  2003. #define ZTRMV_THREAD_TUU xtrmv_thread_TUU
  2004. #define ZTRMV_THREAD_TUN xtrmv_thread_TUN
  2005. #define ZTRMV_THREAD_TLU xtrmv_thread_TLU
  2006. #define ZTRMV_THREAD_TLN xtrmv_thread_TLN
  2007. #define ZTRMV_THREAD_RUU xtrmv_thread_RUU
  2008. #define ZTRMV_THREAD_RUN xtrmv_thread_RUN
  2009. #define ZTRMV_THREAD_RLU xtrmv_thread_RLU
  2010. #define ZTRMV_THREAD_RLN xtrmv_thread_RLN
  2011. #define ZTRMV_THREAD_CUU xtrmv_thread_CUU
  2012. #define ZTRMV_THREAD_CUN xtrmv_thread_CUN
  2013. #define ZTRMV_THREAD_CLU xtrmv_thread_CLU
  2014. #define ZTRMV_THREAD_CLN xtrmv_thread_CLN
  2015. #elif defined(DOUBLE)
  2016. #define TRSV_NUU dtrsv_NUU
  2017. #define TRSV_NUN dtrsv_NUN
  2018. #define TRSV_NLU dtrsv_NLU
  2019. #define TRSV_NLN dtrsv_NLN
  2020. #define TRSV_TUU dtrsv_TUU
  2021. #define TRSV_TUN dtrsv_TUN
  2022. #define TRSV_TLU dtrsv_TLU
  2023. #define TRSV_TLN dtrsv_TLN
  2024. #define ZTRSV_NUU ztrsv_NUU
  2025. #define ZTRSV_NUN ztrsv_NUN
  2026. #define ZTRSV_NLU ztrsv_NLU
  2027. #define ZTRSV_NLN ztrsv_NLN
  2028. #define ZTRSV_TUU ztrsv_TUU
  2029. #define ZTRSV_TUN ztrsv_TUN
  2030. #define ZTRSV_TLU ztrsv_TLU
  2031. #define ZTRSV_TLN ztrsv_TLN
  2032. #define ZTRSV_RUU ztrsv_RUU
  2033. #define ZTRSV_RUN ztrsv_RUN
  2034. #define ZTRSV_RLU ztrsv_RLU
  2035. #define ZTRSV_RLN ztrsv_RLN
  2036. #define ZTRSV_CUU ztrsv_CUU
  2037. #define ZTRSV_CUN ztrsv_CUN
  2038. #define ZTRSV_CLU ztrsv_CLU
  2039. #define ZTRSV_CLN ztrsv_CLN
  2040. #define TRMV_NUU dtrmv_NUU
  2041. #define TRMV_NUN dtrmv_NUN
  2042. #define TRMV_NLU dtrmv_NLU
  2043. #define TRMV_NLN dtrmv_NLN
  2044. #define TRMV_TUU dtrmv_TUU
  2045. #define TRMV_TUN dtrmv_TUN
  2046. #define TRMV_TLU dtrmv_TLU
  2047. #define TRMV_TLN dtrmv_TLN
  2048. #define TRMV_THREAD_NUU dtrmv_thread_NUU
  2049. #define TRMV_THREAD_NUN dtrmv_thread_NUN
  2050. #define TRMV_THREAD_NLU dtrmv_thread_NLU
  2051. #define TRMV_THREAD_NLN dtrmv_thread_NLN
  2052. #define TRMV_THREAD_TUU dtrmv_thread_TUU
  2053. #define TRMV_THREAD_TUN dtrmv_thread_TUN
  2054. #define TRMV_THREAD_TLU dtrmv_thread_TLU
  2055. #define TRMV_THREAD_TLN dtrmv_thread_TLN
  2056. #define ZTRMV_NUU ztrmv_NUU
  2057. #define ZTRMV_NUN ztrmv_NUN
  2058. #define ZTRMV_NLU ztrmv_NLU
  2059. #define ZTRMV_NLN ztrmv_NLN
  2060. #define ZTRMV_TUU ztrmv_TUU
  2061. #define ZTRMV_TUN ztrmv_TUN
  2062. #define ZTRMV_TLU ztrmv_TLU
  2063. #define ZTRMV_TLN ztrmv_TLN
  2064. #define ZTRMV_RUU ztrmv_RUU
  2065. #define ZTRMV_RUN ztrmv_RUN
  2066. #define ZTRMV_RLU ztrmv_RLU
  2067. #define ZTRMV_RLN ztrmv_RLN
  2068. #define ZTRMV_CUU ztrmv_CUU
  2069. #define ZTRMV_CUN ztrmv_CUN
  2070. #define ZTRMV_CLU ztrmv_CLU
  2071. #define ZTRMV_CLN ztrmv_CLN
  2072. #define ZTRMV_THREAD_NUU ztrmv_thread_NUU
  2073. #define ZTRMV_THREAD_NUN ztrmv_thread_NUN
  2074. #define ZTRMV_THREAD_NLU ztrmv_thread_NLU
  2075. #define ZTRMV_THREAD_NLN ztrmv_thread_NLN
  2076. #define ZTRMV_THREAD_TUU ztrmv_thread_TUU
  2077. #define ZTRMV_THREAD_TUN ztrmv_thread_TUN
  2078. #define ZTRMV_THREAD_TLU ztrmv_thread_TLU
  2079. #define ZTRMV_THREAD_TLN ztrmv_thread_TLN
  2080. #define ZTRMV_THREAD_RUU ztrmv_thread_RUU
  2081. #define ZTRMV_THREAD_RUN ztrmv_thread_RUN
  2082. #define ZTRMV_THREAD_RLU ztrmv_thread_RLU
  2083. #define ZTRMV_THREAD_RLN ztrmv_thread_RLN
  2084. #define ZTRMV_THREAD_CUU ztrmv_thread_CUU
  2085. #define ZTRMV_THREAD_CUN ztrmv_thread_CUN
  2086. #define ZTRMV_THREAD_CLU ztrmv_thread_CLU
  2087. #define ZTRMV_THREAD_CLN ztrmv_thread_CLN
  2088. #else
  2089. #define TRSV_NUU strsv_NUU
  2090. #define TRSV_NUN strsv_NUN
  2091. #define TRSV_NLU strsv_NLU
  2092. #define TRSV_NLN strsv_NLN
  2093. #define TRSV_TUU strsv_TUU
  2094. #define TRSV_TUN strsv_TUN
  2095. #define TRSV_TLU strsv_TLU
  2096. #define TRSV_TLN strsv_TLN
  2097. #define ZTRSV_NUU ctrsv_NUU
  2098. #define ZTRSV_NUN ctrsv_NUN
  2099. #define ZTRSV_NLU ctrsv_NLU
  2100. #define ZTRSV_NLN ctrsv_NLN
  2101. #define ZTRSV_TUU ctrsv_TUU
  2102. #define ZTRSV_TUN ctrsv_TUN
  2103. #define ZTRSV_TLU ctrsv_TLU
  2104. #define ZTRSV_TLN ctrsv_TLN
  2105. #define ZTRSV_RUU ctrsv_RUU
  2106. #define ZTRSV_RUN ctrsv_RUN
  2107. #define ZTRSV_RLU ctrsv_RLU
  2108. #define ZTRSV_RLN ctrsv_RLN
  2109. #define ZTRSV_CUU ctrsv_CUU
  2110. #define ZTRSV_CUN ctrsv_CUN
  2111. #define ZTRSV_CLU ctrsv_CLU
  2112. #define ZTRSV_CLN ctrsv_CLN
  2113. #define TRMV_NUU strmv_NUU
  2114. #define TRMV_NUN strmv_NUN
  2115. #define TRMV_NLU strmv_NLU
  2116. #define TRMV_NLN strmv_NLN
  2117. #define TRMV_TUU strmv_TUU
  2118. #define TRMV_TUN strmv_TUN
  2119. #define TRMV_TLU strmv_TLU
  2120. #define TRMV_TLN strmv_TLN
  2121. #define TRMV_THREAD_NUU strmv_thread_NUU
  2122. #define TRMV_THREAD_NUN strmv_thread_NUN
  2123. #define TRMV_THREAD_NLU strmv_thread_NLU
  2124. #define TRMV_THREAD_NLN strmv_thread_NLN
  2125. #define TRMV_THREAD_TUU strmv_thread_TUU
  2126. #define TRMV_THREAD_TUN strmv_thread_TUN
  2127. #define TRMV_THREAD_TLU strmv_thread_TLU
  2128. #define TRMV_THREAD_TLN strmv_thread_TLN
  2129. #define ZTRMV_NUU ctrmv_NUU
  2130. #define ZTRMV_NUN ctrmv_NUN
  2131. #define ZTRMV_NLU ctrmv_NLU
  2132. #define ZTRMV_NLN ctrmv_NLN
  2133. #define ZTRMV_TUU ctrmv_TUU
  2134. #define ZTRMV_TUN ctrmv_TUN
  2135. #define ZTRMV_TLU ctrmv_TLU
  2136. #define ZTRMV_TLN ctrmv_TLN
  2137. #define ZTRMV_RUU ctrmv_RUU
  2138. #define ZTRMV_RUN ctrmv_RUN
  2139. #define ZTRMV_RLU ctrmv_RLU
  2140. #define ZTRMV_RLN ctrmv_RLN
  2141. #define ZTRMV_CUU ctrmv_CUU
  2142. #define ZTRMV_CUN ctrmv_CUN
  2143. #define ZTRMV_CLU ctrmv_CLU
  2144. #define ZTRMV_CLN ctrmv_CLN
  2145. #define ZTRMV_THREAD_NUU ctrmv_thread_NUU
  2146. #define ZTRMV_THREAD_NUN ctrmv_thread_NUN
  2147. #define ZTRMV_THREAD_NLU ctrmv_thread_NLU
  2148. #define ZTRMV_THREAD_NLN ctrmv_thread_NLN
  2149. #define ZTRMV_THREAD_TUU ctrmv_thread_TUU
  2150. #define ZTRMV_THREAD_TUN ctrmv_thread_TUN
  2151. #define ZTRMV_THREAD_TLU ctrmv_thread_TLU
  2152. #define ZTRMV_THREAD_TLN ctrmv_thread_TLN
  2153. #define ZTRMV_THREAD_RUU ctrmv_thread_RUU
  2154. #define ZTRMV_THREAD_RUN ctrmv_thread_RUN
  2155. #define ZTRMV_THREAD_RLU ctrmv_thread_RLU
  2156. #define ZTRMV_THREAD_RLN ctrmv_thread_RLN
  2157. #define ZTRMV_THREAD_CUU ctrmv_thread_CUU
  2158. #define ZTRMV_THREAD_CUN ctrmv_thread_CUN
  2159. #define ZTRMV_THREAD_CLU ctrmv_thread_CLU
  2160. #define ZTRMV_THREAD_CLN ctrmv_thread_CLN
  2161. #endif
  2162. #define SGETF2 sgetf2_k
  2163. #define DGETF2 dgetf2_k
  2164. #define QGETF2 qgetf2_k
  2165. #define CGETF2 cgetf2_k
  2166. #define ZGETF2 zgetf2_k
  2167. #define XGETF2 xgetf2_k
  2168. #define SLASWP_PLUS slaswp_plus
  2169. #define SLASWP_MINUS slaswp_minus
  2170. #define DLASWP_PLUS dlaswp_plus
  2171. #define DLASWP_MINUS dlaswp_minus
  2172. #define QLASWP_PLUS qlaswp_plus
  2173. #define QLASWP_MINUS qlaswp_minus
  2174. #define CLASWP_PLUS claswp_plus
  2175. #define CLASWP_MINUS claswp_minus
  2176. #define ZLASWP_PLUS zlaswp_plus
  2177. #define ZLASWP_MINUS zlaswp_minus
  2178. #define XLASWP_PLUS xlaswp_plus
  2179. #define XLASWP_MINUS xlaswp_minus
  2180. #define SLARF_L slarf_L
  2181. #define SLARF_R slarf_R
  2182. #define DLARF_L dlarf_L
  2183. #define DLARF_R dlarf_R
  2184. #define QLARF_L qlarf_L
  2185. #define QLARF_R qlarf_R
  2186. #define CLARF_L clarf_L
  2187. #define CLARF_R clarf_R
  2188. #define ZLARF_L zlarf_L
  2189. #define ZLARF_R zlarf_R
  2190. #define XLARF_L xlarf_L
  2191. #define XLARF_R xlarf_R
  2192. #ifndef COMPLEX
  2193. #ifdef XDOUBLE
  2194. #define GETF2 QGETF2
  2195. #define GETRF QGETRF
  2196. #define GETRS_N_SINGLE qgetrs_N_single
  2197. #define GETRS_T_SINGLE qgetrs_T_single
  2198. #define GETRS_R_SINGLE qgetrs_N_single
  2199. #define GETRS_C_SINGLE qgetrs_T_single
  2200. #define GETRS_N_PARALLEL qgetrs_N_parallel
  2201. #define GETRS_T_PARALLEL qgetrs_T_parallel
  2202. #define GETRS_R_PARALLEL qgetrs_N_parallel
  2203. #define GETRS_C_PARALLEL qgetrs_T_parallel
  2204. #define LASWP_PLUS QLASWP_PLUS
  2205. #define LASWP_MINUS QLASWP_MINUS
  2206. #define LASWP_NCOPY QLASWP_NCOPY
  2207. #define GETRS_N QGETRS_N
  2208. #define GETRS_T QGETRS_T
  2209. #define GETRF_SINGLE qgetrf_single
  2210. #define GETRF_PARALLEL qgetrf_parallel
  2211. #define NEG_TCOPY QNEG_TCOPY
  2212. #define LARF_L QLARF_L
  2213. #define LARF_R QLARF_R
  2214. #elif defined(DOUBLE)
  2215. #define GETF2 DGETF2
  2216. #define GETRF DGETRF
  2217. #define GETRS_N_SINGLE dgetrs_N_single
  2218. #define GETRS_T_SINGLE dgetrs_T_single
  2219. #define GETRS_R_SINGLE dgetrs_N_single
  2220. #define GETRS_C_SINGLE dgetrs_T_single
  2221. #define GETRS_N_PARALLEL dgetrs_N_parallel
  2222. #define GETRS_T_PARALLEL dgetrs_T_parallel
  2223. #define GETRS_R_PARALLEL dgetrs_N_parallel
  2224. #define GETRS_C_PARALLEL dgetrs_T_parallel
  2225. #define LASWP_PLUS DLASWP_PLUS
  2226. #define LASWP_MINUS DLASWP_MINUS
  2227. #define LASWP_NCOPY DLASWP_NCOPY
  2228. #define GETRS_N DGETRS_N
  2229. #define GETRS_T DGETRS_T
  2230. #define GETRF_SINGLE dgetrf_single
  2231. #define GETRF_PARALLEL dgetrf_parallel
  2232. #define NEG_TCOPY DNEG_TCOPY
  2233. #define LARF_L DLARF_L
  2234. #define LARF_R DLARF_R
  2235. #else
  2236. #define GETF2 SGETF2
  2237. #define GETRF SGETRF
  2238. #define GETRS_N_SINGLE sgetrs_N_single
  2239. #define GETRS_T_SINGLE sgetrs_T_single
  2240. #define GETRS_R_SINGLE sgetrs_N_single
  2241. #define GETRS_C_SINGLE sgetrs_T_single
  2242. #define GETRS_N_PARALLEL sgetrs_N_parallel
  2243. #define GETRS_T_PARALLEL sgetrs_T_parallel
  2244. #define GETRS_R_PARALLEL sgetrs_N_parallel
  2245. #define GETRS_C_PARALLEL sgetrs_T_parallel
  2246. #define LASWP_PLUS SLASWP_PLUS
  2247. #define LASWP_MINUS SLASWP_MINUS
  2248. #define LASWP_NCOPY SLASWP_NCOPY
  2249. #define GETRS_N SGETRS_N
  2250. #define GETRS_T SGETRS_T
  2251. #define GETRF_SINGLE sgetrf_single
  2252. #define GETRF_PARALLEL sgetrf_parallel
  2253. #define NEG_TCOPY SNEG_TCOPY
  2254. #define LARF_L SLARF_L
  2255. #define LARF_R SLARF_R
  2256. #endif
  2257. #else
  2258. #ifdef XDOUBLE
  2259. #define GETF2 XGETF2
  2260. #define GETRF XGETRF
  2261. #define GETRS_N_SINGLE xgetrs_N_single
  2262. #define GETRS_T_SINGLE xgetrs_T_single
  2263. #define GETRS_R_SINGLE xgetrs_R_single
  2264. #define GETRS_C_SINGLE xgetrs_C_single
  2265. #define GETRS_N_PARALLEL xgetrs_N_parallel
  2266. #define GETRS_T_PARALLEL xgetrs_T_parallel
  2267. #define GETRS_R_PARALLEL xgetrs_R_parallel
  2268. #define GETRS_C_PARALLEL xgetrs_C_parallel
  2269. #define LASWP_PLUS XLASWP_PLUS
  2270. #define LASWP_MINUS XLASWP_MINUS
  2271. #define LASWP_NCOPY XLASWP_NCOPY
  2272. #define GETRS_N XGETRS_N
  2273. #define GETRS_T XGETRS_T
  2274. #define GETRF_SINGLE xgetrf_single
  2275. #define GETRF_PARALLEL xgetrf_parallel
  2276. #define NEG_TCOPY XNEG_TCOPY
  2277. #define LARF_L XLARF_L
  2278. #define LARF_R XLARF_R
  2279. #elif defined(DOUBLE)
  2280. #define GETF2 ZGETF2
  2281. #define GETRF ZGETRF
  2282. #define GETRS_N_SINGLE zgetrs_N_single
  2283. #define GETRS_T_SINGLE zgetrs_T_single
  2284. #define GETRS_R_SINGLE zgetrs_R_single
  2285. #define GETRS_C_SINGLE zgetrs_C_single
  2286. #define GETRS_N_PARALLEL zgetrs_N_parallel
  2287. #define GETRS_T_PARALLEL zgetrs_T_parallel
  2288. #define GETRS_R_PARALLEL zgetrs_R_parallel
  2289. #define GETRS_C_PARALLEL zgetrs_C_parallel
  2290. #define LASWP_PLUS ZLASWP_PLUS
  2291. #define LASWP_MINUS ZLASWP_MINUS
  2292. #define LASWP_NCOPY ZLASWP_NCOPY
  2293. #define GETRS_N ZGETRS_N
  2294. #define GETRS_T ZGETRS_T
  2295. #define GETRF_SINGLE zgetrf_single
  2296. #define GETRF_PARALLEL zgetrf_parallel
  2297. #define NEG_TCOPY ZNEG_TCOPY
  2298. #define LARF_L ZLARF_L
  2299. #define LARF_R ZLARF_R
  2300. #else
  2301. #define GETF2 CGETF2
  2302. #define GETRF CGETRF
  2303. #define GETRS_N_SINGLE cgetrs_N_single
  2304. #define GETRS_T_SINGLE cgetrs_T_single
  2305. #define GETRS_R_SINGLE cgetrs_R_single
  2306. #define GETRS_C_SINGLE cgetrs_C_single
  2307. #define GETRS_N_PARALLEL cgetrs_N_parallel
  2308. #define GETRS_T_PARALLEL cgetrs_T_parallel
  2309. #define GETRS_R_PARALLEL cgetrs_R_parallel
  2310. #define GETRS_C_PARALLEL cgetrs_C_parallel
  2311. #define LASWP_PLUS CLASWP_PLUS
  2312. #define LASWP_MINUS CLASWP_MINUS
  2313. #define LASWP_NCOPY CLASWP_NCOPY
  2314. #define GETRS_N CGETRS_N
  2315. #define GETRS_T CGETRS_T
  2316. #define GETRF_SINGLE cgetrf_single
  2317. #define GETRF_PARALLEL cgetrf_parallel
  2318. #define NEG_TCOPY CNEG_TCOPY
  2319. #define LARF_L CLARF_L
  2320. #define LARF_R CLARF_R
  2321. #endif
  2322. #endif
  2323. #ifndef COMPLEX
  2324. #ifdef XDOUBLE
  2325. #define POTF2_U qpotf2_U
  2326. #define POTF2_L qpotf2_L
  2327. #define LAUU2_U qlauu2_U
  2328. #define LAUU2_L qlauu2_L
  2329. #define POTRF_U_SINGLE qpotrf_U_single
  2330. #define POTRF_L_SINGLE qpotrf_L_single
  2331. #define POTRF_U_PARALLEL qpotrf_U_parallel
  2332. #define POTRF_L_PARALLEL qpotrf_L_parallel
  2333. #define LAUUM_U_SINGLE qlauum_U_single
  2334. #define LAUUM_L_SINGLE qlauum_L_single
  2335. #define LAUUM_U_PARALLEL qlauum_U_parallel
  2336. #define LAUUM_L_PARALLEL qlauum_L_parallel
  2337. #define TRTI2_UU qtrti2_UU
  2338. #define TRTI2_UN qtrti2_UN
  2339. #define TRTI2_LU qtrti2_LU
  2340. #define TRTI2_LN qtrti2_LN
  2341. #define TRTRI_UU_SINGLE qtrtri_UU_single
  2342. #define TRTRI_UN_SINGLE qtrtri_UN_single
  2343. #define TRTRI_LU_SINGLE qtrtri_LU_single
  2344. #define TRTRI_LN_SINGLE qtrtri_LN_single
  2345. #define TRTRI_UU_PARALLEL qtrtri_UU_parallel
  2346. #define TRTRI_UN_PARALLEL qtrtri_UN_parallel
  2347. #define TRTRI_LU_PARALLEL qtrtri_LU_parallel
  2348. #define TRTRI_LN_PARALLEL qtrtri_LN_parallel
  2349. #elif defined(DOUBLE)
  2350. #define POTF2_U dpotf2_U
  2351. #define POTF2_L dpotf2_L
  2352. #define LAUU2_U dlauu2_U
  2353. #define LAUU2_L dlauu2_L
  2354. #define POTRF_U_SINGLE dpotrf_U_single
  2355. #define POTRF_L_SINGLE dpotrf_L_single
  2356. #define POTRF_U_PARALLEL dpotrf_U_parallel
  2357. #define POTRF_L_PARALLEL dpotrf_L_parallel
  2358. #define LAUUM_U_SINGLE dlauum_U_single
  2359. #define LAUUM_L_SINGLE dlauum_L_single
  2360. #define LAUUM_U_PARALLEL dlauum_U_parallel
  2361. #define LAUUM_L_PARALLEL dlauum_L_parallel
  2362. #define TRTI2_UU dtrti2_UU
  2363. #define TRTI2_UN dtrti2_UN
  2364. #define TRTI2_LU dtrti2_LU
  2365. #define TRTI2_LN dtrti2_LN
  2366. #define TRTRI_UU_SINGLE dtrtri_UU_single
  2367. #define TRTRI_UN_SINGLE dtrtri_UN_single
  2368. #define TRTRI_LU_SINGLE dtrtri_LU_single
  2369. #define TRTRI_LN_SINGLE dtrtri_LN_single
  2370. #define TRTRI_UU_PARALLEL dtrtri_UU_parallel
  2371. #define TRTRI_UN_PARALLEL dtrtri_UN_parallel
  2372. #define TRTRI_LU_PARALLEL dtrtri_LU_parallel
  2373. #define TRTRI_LN_PARALLEL dtrtri_LN_parallel
  2374. #else
  2375. #define POTF2_U spotf2_U
  2376. #define POTF2_L spotf2_L
  2377. #define LAUU2_U slauu2_U
  2378. #define LAUU2_L slauu2_L
  2379. #define POTRF_U_SINGLE spotrf_U_single
  2380. #define POTRF_L_SINGLE spotrf_L_single
  2381. #define POTRF_U_PARALLEL spotrf_U_parallel
  2382. #define POTRF_L_PARALLEL spotrf_L_parallel
  2383. #define LAUUM_U_SINGLE slauum_U_single
  2384. #define LAUUM_L_SINGLE slauum_L_single
  2385. #define LAUUM_U_PARALLEL slauum_U_parallel
  2386. #define LAUUM_L_PARALLEL slauum_L_parallel
  2387. #define TRTI2_UU strti2_UU
  2388. #define TRTI2_UN strti2_UN
  2389. #define TRTI2_LU strti2_LU
  2390. #define TRTI2_LN strti2_LN
  2391. #define TRTRI_UU_SINGLE strtri_UU_single
  2392. #define TRTRI_UN_SINGLE strtri_UN_single
  2393. #define TRTRI_LU_SINGLE strtri_LU_single
  2394. #define TRTRI_LN_SINGLE strtri_LN_single
  2395. #define TRTRI_UU_PARALLEL strtri_UU_parallel
  2396. #define TRTRI_UN_PARALLEL strtri_UN_parallel
  2397. #define TRTRI_LU_PARALLEL strtri_LU_parallel
  2398. #define TRTRI_LN_PARALLEL strtri_LN_parallel
  2399. #endif
  2400. #else
  2401. #ifdef XDOUBLE
  2402. #define POTF2_U xpotf2_U
  2403. #define POTF2_L xpotf2_L
  2404. #define LAUU2_U xlauu2_U
  2405. #define LAUU2_L xlauu2_L
  2406. #define POTRF_U_SINGLE xpotrf_U_single
  2407. #define POTRF_L_SINGLE xpotrf_L_single
  2408. #define POTRF_U_PARALLEL xpotrf_U_parallel
  2409. #define POTRF_L_PARALLEL xpotrf_L_parallel
  2410. #define LAUUM_U_SINGLE xlauum_U_single
  2411. #define LAUUM_L_SINGLE xlauum_L_single
  2412. #define LAUUM_U_PARALLEL xlauum_U_parallel
  2413. #define LAUUM_L_PARALLEL xlauum_L_parallel
  2414. #define TRTI2_UU xtrti2_UU
  2415. #define TRTI2_UN xtrti2_UN
  2416. #define TRTI2_LU xtrti2_LU
  2417. #define TRTI2_LN xtrti2_LN
  2418. #define TRTRI_UU_SINGLE xtrtri_UU_single
  2419. #define TRTRI_UN_SINGLE xtrtri_UN_single
  2420. #define TRTRI_LU_SINGLE xtrtri_LU_single
  2421. #define TRTRI_LN_SINGLE xtrtri_LN_single
  2422. #define TRTRI_UU_PARALLEL xtrtri_UU_parallel
  2423. #define TRTRI_UN_PARALLEL xtrtri_UN_parallel
  2424. #define TRTRI_LU_PARALLEL xtrtri_LU_parallel
  2425. #define TRTRI_LN_PARALLEL xtrtri_LN_parallel
  2426. #elif defined(DOUBLE)
  2427. #define POTF2_U zpotf2_U
  2428. #define POTF2_L zpotf2_L
  2429. #define LAUU2_U zlauu2_U
  2430. #define LAUU2_L zlauu2_L
  2431. #define POTRF_U_SINGLE zpotrf_U_single
  2432. #define POTRF_L_SINGLE zpotrf_L_single
  2433. #define POTRF_U_PARALLEL zpotrf_U_parallel
  2434. #define POTRF_L_PARALLEL zpotrf_L_parallel
  2435. #define LAUUM_U_SINGLE zlauum_U_single
  2436. #define LAUUM_L_SINGLE zlauum_L_single
  2437. #define LAUUM_U_PARALLEL zlauum_U_parallel
  2438. #define LAUUM_L_PARALLEL zlauum_L_parallel
  2439. #define TRTI2_UU ztrti2_UU
  2440. #define TRTI2_UN ztrti2_UN
  2441. #define TRTI2_LU ztrti2_LU
  2442. #define TRTI2_LN ztrti2_LN
  2443. #define TRTRI_UU_SINGLE ztrtri_UU_single
  2444. #define TRTRI_UN_SINGLE ztrtri_UN_single
  2445. #define TRTRI_LU_SINGLE ztrtri_LU_single
  2446. #define TRTRI_LN_SINGLE ztrtri_LN_single
  2447. #define TRTRI_UU_PARALLEL ztrtri_UU_parallel
  2448. #define TRTRI_UN_PARALLEL ztrtri_UN_parallel
  2449. #define TRTRI_LU_PARALLEL ztrtri_LU_parallel
  2450. #define TRTRI_LN_PARALLEL ztrtri_LN_parallel
  2451. #else
  2452. #define POTF2_U cpotf2_U
  2453. #define POTF2_L cpotf2_L
  2454. #define LAUU2_U clauu2_U
  2455. #define LAUU2_L clauu2_L
  2456. #define POTRF_U_SINGLE cpotrf_U_single
  2457. #define POTRF_L_SINGLE cpotrf_L_single
  2458. #define POTRF_U_PARALLEL cpotrf_U_parallel
  2459. #define POTRF_L_PARALLEL cpotrf_L_parallel
  2460. #define LAUUM_U_SINGLE clauum_U_single
  2461. #define LAUUM_L_SINGLE clauum_L_single
  2462. #define LAUUM_U_PARALLEL clauum_U_parallel
  2463. #define LAUUM_L_PARALLEL clauum_L_parallel
  2464. #define TRTI2_UU ctrti2_UU
  2465. #define TRTI2_UN ctrti2_UN
  2466. #define TRTI2_LU ctrti2_LU
  2467. #define TRTI2_LN ctrti2_LN
  2468. #define TRTRI_UU_SINGLE ctrtri_UU_single
  2469. #define TRTRI_UN_SINGLE ctrtri_UN_single
  2470. #define TRTRI_LU_SINGLE ctrtri_LU_single
  2471. #define TRTRI_LN_SINGLE ctrtri_LN_single
  2472. #define TRTRI_UU_PARALLEL ctrtri_UU_parallel
  2473. #define TRTRI_UN_PARALLEL ctrtri_UN_parallel
  2474. #define TRTRI_LU_PARALLEL ctrtri_LU_parallel
  2475. #define TRTRI_LN_PARALLEL ctrtri_LN_parallel
  2476. #endif
  2477. #endif
  2478. #endif