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 82 kB

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

OpenBLAS is an optimized BLAS library based on GotoBLAS2 1.13 BSD version.