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

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