Skip to content

Commit 733d97b

Browse files
thrasibulethrasibule
committed
add files
1 parent ea747cf commit 733d97b

File tree

2 files changed

+376
-0
lines changed

2 files changed

+376
-0
lines changed

‎lapack/trtrs/Makefile

Lines changed: 308 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,308 @@
1+
TOPDIR = ../..
2+
include ../../Makefile.system
3+
4+
SBLASOBJS = strtrs_UNU_single.$(SUFFIX) strtrs_UNN_single.$(SUFFIX) strtrs_UTU_single.$(SUFFIX) strtrs_UTN_single.$(SUFFIX) strtrs_LNU_single.$(SUFFIX) strtrs_LNN_single.$(SUFFIX) strtrs_LTU_single.$(SUFFIX) strtrs_LTN_single.$(SUFFIX)
5+
DBLASOBJS = dtrtrs_UNU_single.$(SUFFIX) dtrtrs_UNN_single.$(SUFFIX) dtrtrs_UTU_single.$(SUFFIX) dtrtrs_UTN_single.$(SUFFIX) dtrtrs_LNU_single.$(SUFFIX) dtrtrs_LNN_single.$(SUFFIX) dtrtrs_LTU_single.$(SUFFIX) dtrtrs_LTN_single.$(SUFFIX)
6+
QBLASOBJS = qtrtrs_UNU_single.$(SUFFIX) qtrtrs_UNN_single.$(SUFFIX) qtrtrs_UTU_single.$(SUFFIX) qtrtrs_UTN_single.$(SUFFIX) qtrtrs_LNU_single.$(SUFFIX) qtrtrs_LNN_single.$(SUFFIX) qtrtrs_LTU_single.$(SUFFIX) qtrtrs_LTN_single.$(SUFFIX)
7+
CBLASOBJS = cgetrs_N_single.$(SUFFIX) cgetrs_T_single.$(SUFFIX) cgetrs_R_single.$(SUFFIX) cgetrs_C_single.$(SUFFIX)
8+
ZBLASOBJS = zgetrs_N_single.$(SUFFIX) zgetrs_T_single.$(SUFFIX) zgetrs_R_single.$(SUFFIX) zgetrs_C_single.$(SUFFIX)
9+
XBLASOBJS = xgetrs_N_single.$(SUFFIX) xgetrs_T_single.$(SUFFIX) xgetrs_R_single.$(SUFFIX) xgetrs_C_single.$(SUFFIX)
10+
11+
ifdef SMP
12+
SBLASOBJS += sgetrs_N_parallel.$(SUFFIX) sgetrs_T_parallel.$(SUFFIX)
13+
DBLASOBJS += dgetrs_N_parallel.$(SUFFIX) dgetrs_T_parallel.$(SUFFIX)
14+
QBLASOBJS += qgetrs_N_parallel.$(SUFFIX) qgetrs_T_parallel.$(SUFFIX)
15+
CBLASOBJS += cgetrs_N_parallel.$(SUFFIX) cgetrs_T_parallel.$(SUFFIX) cgetrs_R_parallel.$(SUFFIX) cgetrs_C_parallel.$(SUFFIX)
16+
ZBLASOBJS += zgetrs_N_parallel.$(SUFFIX) zgetrs_T_parallel.$(SUFFIX) zgetrs_R_parallel.$(SUFFIX) zgetrs_C_parallel.$(SUFFIX)
17+
XBLASOBJS += xgetrs_N_parallel.$(SUFFIX) xgetrs_T_parallel.$(SUFFIX) xgetrs_R_parallel.$(SUFFIX) xgetrs_C_parallel.$(SUFFIX)
18+
endif
19+
20+
strtrs_UNU_single.$(SUFFIX) : trtrs_single.c
21+
$(CC) -c $(CFLAGS) -UCOMPLEX -UDOUBLE -UUPLO -UTRANS -UDIAG $< -o $(@F)
22+
23+
strtrs_UNN_single.$(SUFFIX) : trtrs_single.c
24+
$(CC) -c $(CFLAGS) -UCOMPLEX -UDOUBLE -UUPLO -UTRANS -DDIAG $< -o $(@F)
25+
26+
strtrs_UTU_single.$(SUFFIX) : trtrs_single.c
27+
$(CC) -c $(CFLAGS) -UCOMPLEX -UDOUBLE -UUPLO -DTRANS -UDIAG $< -o $(@F)
28+
29+
strtrs_UTN_single.$(SUFFIX) : trtrs_single.c
30+
$(CC) -c $(CFLAGS) -UCOMPLEX -UDOUBLE -UUPLO -DTRANS -DDIAG $< -o $(@F)
31+
32+
strtrs_LNU_single.$(SUFFIX) : trtrs_single.c
33+
$(CC) -c $(CFLAGS) -UCOMPLEX -UDOUBLE -DUPLO -UTRANS -UDIAG $< -o $(@F)
34+
35+
strtrs_LNN_single.$(SUFFIX) : trtrs_single.c
36+
$(CC) -c $(CFLAGS) -UCOMPLEX -UDOUBLE -DUPLO -UTRANS -DDIAG $< -o $(@F)
37+
38+
strtrs_LTU_single.$(SUFFIX) : trtrs_single.c
39+
$(CC) -c $(CFLAGS) -UCOMPLEX -UDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
40+
41+
strtrs_LTN_single.$(SUFFIX) : trtrs_single.c
42+
$(CC) -c $(CFLAGS) -UCOMPLEX -UDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
43+
44+
strtrs_UNU_parallel.$(SUFFIX) : trtrs_parallel.c
45+
$(CC) -c $(CFLAGS) -UCOMPLEX -UDOUBLE -UUPLO -UTRANS -UDIAG $< -o $(@F)
46+
47+
strtrs_UNN_parallel.$(SUFFIX) : trtrs_parallel.c
48+
$(CC) -c $(CFLAGS) -UCOMPLEX -UDOUBLE -UUPLO -UTRANS -DDIAG $< -o $(@F)
49+
50+
strtrs_UTU_parallel.$(SUFFIX) : trtrs_parallel.c
51+
$(CC) -c $(CFLAGS) -UCOMPLEX -UDOUBLE -UUPLO -DTRANS -UDIAG $< -o $(@F)
52+
53+
strtrs_UTN_parallel.$(SUFFIX) : trtrs_parallel.c
54+
$(CC) -c $(CFLAGS) -UCOMPLEX -UDOUBLE -UUPLO -DTRANS -DDIAG $< -o $(@F)
55+
56+
strtrs_LNU_parallel.$(SUFFIX) : trtrs_parallel.c
57+
$(CC) -c $(CFLAGS) -UCOMPLEX -UDOUBLE -DUPLO -UTRANS -UDIAG $< -o $(@F)
58+
59+
strtrs_LNN_parallel.$(SUFFIX) : trtrs_parallel.c
60+
$(CC) -c $(CFLAGS) -UCOMPLEX -UDOUBLE -DUPLO -UTRANS -DDIAG $< -o $(@F)
61+
62+
strtrs_LTU_parallel.$(SUFFIX) : trtrs_parallel.c
63+
$(CC) -c $(CFLAGS) -UCOMPLEX -UDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
64+
65+
strtrs_LTN_parallel.$(SUFFIX) : trtrs_parallel.c
66+
$(CC) -c $(CFLAGS) -UCOMPLEX -UDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
67+
68+
dtrtrs_UNU_single.$(SUFFIX) : trtrs_single.c
69+
$(CC) -c $(CFLAGS) -UCOMPLEX -DDOUBLE -UUPLO -UTRANS -UDIAG $< -o $(@F)
70+
71+
dtrtrs_UNN_single.$(SUFFIX) : trtrs_single.c
72+
$(CC) -c $(CFLAGS) -UCOMPLEX -DDOUBLE -UUPLO -UTRANS -DDIAG $< -o $(@F)
73+
74+
dtrtrs_UTU_single.$(SUFFIX) : trtrs_single.c
75+
$(CC) -c $(CFLAGS) -UCOMPLEX -DDOUBLE -UUPLO -DTRANS -UDIAG $< -o $(@F)
76+
77+
dtrtrs_UTN_single.$(SUFFIX) : trtrs_single.c
78+
$(CC) -c $(CFLAGS) -UCOMPLEX -DDOUBLE -UUPLO -DTRANS -DDIAG $< -o $(@F)
79+
80+
dtrtrs_LNU_single.$(SUFFIX) : trtrs_single.c
81+
$(CC) -c $(CFLAGS) -UCOMPLEX -DDOUBLE -DUPLO -UTRANS -UDIAG $< -o $(@F)
82+
83+
dtrtrs_LNN_single.$(SUFFIX) : trtrs_single.c
84+
$(CC) -c $(CFLAGS) -UCOMPLEX -DDOUBLE -DUPLO -UTRANS -DDIAG $< -o $(@F)
85+
86+
dtrtrs_LTU_single.$(SUFFIX) : trtrs_single.c
87+
$(CC) -c $(CFLAGS) -UCOMPLEX -DDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
88+
89+
dtrtrs_LTN_single.$(SUFFIX) : trtrs_single.c
90+
$(CC) -c $(CFLAGS) -UCOMPLEX -DDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
91+
92+
dtrtrs_UNU_parallel.$(SUFFIX) : trtrs_parallel.c
93+
$(CC) -c $(CFLAGS) -UCOMPLEX -DDOUBLE -UUPLO -UTRANS -UDIAG $< -o $(@F)
94+
95+
dtrtrs_UNN_parallel.$(SUFFIX) : trtrs_parallel.c
96+
$(CC) -c $(CFLAGS) -UCOMPLEX -DDOUBLE -UUPLO -UTRANS -DDIAG $< -o $(@F)
97+
98+
dtrtrs_UTU_parallel.$(SUFFIX) : trtrs_parallel.c
99+
$(CC) -c $(CFLAGS) -UCOMPLEX -DDOUBLE -UUPLO -DTRANS -UDIAG $< -o $(@F)
100+
101+
dtrtrs_UTN_parallel.$(SUFFIX) : trtrs_parallel.c
102+
$(CC) -c $(CFLAGS) -UCOMPLEX -DDOUBLE -UUPLO -DTRANS -DDIAG $< -o $(@F)
103+
104+
dtrtrs_LNU_parallel.$(SUFFIX) : trtrs_parallel.c
105+
$(CC) -c $(CFLAGS) -UCOMPLEX -DDOUBLE -DUPLO -UTRANS -UDIAG $< -o $(@F)
106+
107+
dtrtrs_LNN_parallel.$(SUFFIX) : trtrs_parallel.c
108+
$(CC) -c $(CFLAGS) -UCOMPLEX -DDOUBLE -DUPLO -UTRANS -DDIAG $< -o $(@F)
109+
110+
dtrtrs_LTU_parallel.$(SUFFIX) : trtrs_parallel.c
111+
$(CC) -c $(CFLAGS) -UCOMPLEX -DDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
112+
113+
dtrtrs_LTN_parallel.$(SUFFIX) : trtrs_parallel.c
114+
$(CC) -c $(CFLAGS) -UCOMPLEX -DDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
115+
116+
qtrtrs_UNU_single.$(SUFFIX) : trtrs_single.c
117+
$(CC) -c $(CFLAGS) -UCOMPLEX -DXDOUBLE -UUPLO -UTRANS -UDIAG $< -o $(@F)
118+
119+
qtrtrs_UNN_single.$(SUFFIX) : trtrs_single.c
120+
$(CC) -c $(CFLAGS) -UCOMPLEX -DXDOUBLE -UUPLO -UTRANS -DDIAG $< -o $(@F)
121+
122+
qtrtrs_UTU_single.$(SUFFIX) : trtrs_single.c
123+
$(CC) -c $(CFLAGS) -UCOMPLEX -DXDOUBLE -UUPLO -DTRANS -UDIAG $< -o $(@F)
124+
125+
qtrtrs_UTN_single.$(SUFFIX) : trtrs_single.c
126+
$(CC) -c $(CFLAGS) -UCOMPLEX -DXDOUBLE -UUPLO -DTRANS -DDIAG $< -o $(@F)
127+
128+
qtrtrs_LNU_single.$(SUFFIX) : trtrs_single.c
129+
$(CC) -c $(CFLAGS) -UCOMPLEX -DXDOUBLE -DUPLO -UTRANS -UDIAG $< -o $(@F)
130+
131+
qtrtrs_LNN_single.$(SUFFIX) : trtrs_single.c
132+
$(CC) -c $(CFLAGS) -UCOMPLEX -DXDOUBLE -DUPLO -UTRANS -DDIAG $< -o $(@F)
133+
134+
qtrtrs_LTU_single.$(SUFFIX) : trtrs_single.c
135+
$(CC) -c $(CFLAGS) -UCOMPLEX -DXDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
136+
137+
qtrtrs_LTN_single.$(SUFFIX) : trtrs_single.c
138+
$(CC) -c $(CFLAGS) -UCOMPLEX -DXDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
139+
140+
qtrtrs_UNU_parallel.$(SUFFIX) : trtrs_parallel.c
141+
$(CC) -c $(CFLAGS) -UCOMPLEX -DXDOUBLE -UUPLO -UTRANS -UDIAG $< -o $(@F)
142+
143+
qtrtrs_UNN_parallel.$(SUFFIX) : trtrs_parallel.c
144+
$(CC) -c $(CFLAGS) -UCOMPLEX -DXDOUBLE -UUPLO -UTRANS -DDIAG $< -o $(@F)
145+
146+
qtrtrs_UTU_parallel.$(SUFFIX) : trtrs_parallel.c
147+
$(CC) -c $(CFLAGS) -UCOMPLEX -DXDOUBLE -UUPLO -DTRANS -UDIAG $< -o $(@F)
148+
149+
qtrtrs_UTN_parallel.$(SUFFIX) : trtrs_parallel.c
150+
$(CC) -c $(CFLAGS) -UCOMPLEX -DXDOUBLE -UUPLO -DTRANS -DDIAG $< -o $(@F)
151+
152+
qtrtrs_LNU_parallel.$(SUFFIX) : trtrs_parallel.c
153+
$(CC) -c $(CFLAGS) -UCOMPLEX -DXDOUBLE -DUPLO -UTRANS -UDIAG $< -o $(@F)
154+
155+
qtrtrs_LNN_parallel.$(SUFFIX) : trtrs_parallel.c
156+
$(CC) -c $(CFLAGS) -UCOMPLEX -DXDOUBLE -DUPLO -UTRANS -DDIAG $< -o $(@F)
157+
158+
qtrtrs_LTU_parallel.$(SUFFIX) : trtrs_parallel.c
159+
$(CC) -c $(CFLAGS) -UCOMPLEX -DXDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
160+
161+
qtrtrs_LTN_parallel.$(SUFFIX) : trtrs_parallel.c
162+
$(CC) -c $(CFLAGS) -UCOMPLEX -DXDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
163+
164+
ctrtrs_UNU_single.$(SUFFIX) : trtrs_single.c
165+
$(CC) -c $(CFLAGS) -DCOMPLEX -UDOUBLE -UUPLO -UTRANS -UDIAG $< -o $(@F)
166+
167+
ctrtrs_UNN_single.$(SUFFIX) : trtrs_single.c
168+
$(CC) -c $(CFLAGS) -DCOMPLEX -UDOUBLE -UUPLO -UTRANS -DDIAG $< -o $(@F)
169+
170+
ctrtrs_UTU_single.$(SUFFIX) : trtrs_single.c
171+
$(CC) -c $(CFLAGS) -DCOMPLEX -UDOUBLE -UUPLO -DTRANS -UDIAG $< -o $(@F)
172+
173+
ctrtrs_UTN_single.$(SUFFIX) : trtrs_single.c
174+
$(CC) -c $(CFLAGS) -DCOMPLEX -UDOUBLE -UUPLO -DTRANS -DDIAG $< -o $(@F)
175+
176+
ctrtrs_LNU_single.$(SUFFIX) : trtrs_single.c
177+
$(CC) -c $(CFLAGS) -DCOMPLEX -UDOUBLE -DUPLO -UTRANS -UDIAG $< -o $(@F)
178+
179+
ctrtrs_LNN_single.$(SUFFIX) : trtrs_single.c
180+
$(CC) -c $(CFLAGS) -DCOMPLEX -UDOUBLE -DUPLO -UTRANS -DDIAG $< -o $(@F)
181+
182+
ctrtrs_LTU_single.$(SUFFIX) : trtrs_single.c
183+
$(CC) -c $(CFLAGS) -DCOMPLEX -UDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
184+
185+
ctrtrs_LTN_single.$(SUFFIX) : trtrs_single.c
186+
$(CC) -c $(CFLAGS) -DCOMPLEX -UDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
187+
188+
ctrtrs_UNU_parallel.$(SUFFIX) : trtrs_parallel.c
189+
$(CC) -c $(CFLAGS) -DCOMPLEX -UDOUBLE -UUPLO -UTRANS -UDIAG $< -o $(@F)
190+
191+
ctrtrs_UNN_parallel.$(SUFFIX) : trtrs_parallel.c
192+
$(CC) -c $(CFLAGS) -DCOMPLEX -UDOUBLE -UUPLO -UTRANS -DDIAG $< -o $(@F)
193+
194+
ctrtrs_UTU_parallel.$(SUFFIX) : trtrs_parallel.c
195+
$(CC) -c $(CFLAGS) -DCOMPLEX -UDOUBLE -UUPLO -DTRANS -UDIAG $< -o $(@F)
196+
197+
ctrtrs_UTN_parallel.$(SUFFIX) : trtrs_parallel.c
198+
$(CC) -c $(CFLAGS) -DCOMPLEX -UDOUBLE -UUPLO -DTRANS -DDIAG $< -o $(@F)
199+
200+
ctrtrs_LNU_parallel.$(SUFFIX) : trtrs_parallel.c
201+
$(CC) -c $(CFLAGS) -DCOMPLEX -UDOUBLE -DUPLO -UTRANS -UDIAG $< -o $(@F)
202+
203+
ctrtrs_LNN_parallel.$(SUFFIX) : trtrs_parallel.c
204+
$(CC) -c $(CFLAGS) -DCOMPLEX -UDOUBLE -DUPLO -UTRANS -DDIAG $< -o $(@F)
205+
206+
ctrtrs_LTU_parallel.$(SUFFIX) : trtrs_parallel.c
207+
$(CC) -c $(CFLAGS) -DCOMPLEX -UDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
208+
209+
ctrtrs_LTN_parallel.$(SUFFIX) : trtrs_parallel.c
210+
$(CC) -c $(CFLAGS) -DCOMPLEX -UDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
211+
212+
ztrtrs_UNU_single.$(SUFFIX) : trtrs_single.c
213+
$(CC) -c $(CFLAGS) -DCOMPLEX -DDOUBLE -UUPLO -UTRANS -UDIAG $< -o $(@F)
214+
215+
ztrtrs_UNN_single.$(SUFFIX) : trtrs_single.c
216+
$(CC) -c $(CFLAGS) -DCOMPLEX -DDOUBLE -UUPLO -UTRANS -DDIAG $< -o $(@F)
217+
218+
ztrtrs_UTU_single.$(SUFFIX) : trtrs_single.c
219+
$(CC) -c $(CFLAGS) -DCOMPLEX -DDOUBLE -UUPLO -DTRANS -UDIAG $< -o $(@F)
220+
221+
ztrtrs_UTN_single.$(SUFFIX) : trtrs_single.c
222+
$(CC) -c $(CFLAGS) -DCOMPLEX -DDOUBLE -UUPLO -DTRANS -DDIAG $< -o $(@F)
223+
224+
ztrtrs_LNU_single.$(SUFFIX) : trtrs_single.c
225+
$(CC) -c $(CFLAGS) -DCOMPLEX -DDOUBLE -DUPLO -UTRANS -UDIAG $< -o $(@F)
226+
227+
ztrtrs_LNN_single.$(SUFFIX) : trtrs_single.c
228+
$(CC) -c $(CFLAGS) -DCOMPLEX -DDOUBLE -DUPLO -UTRANS -DDIAG $< -o $(@F)
229+
230+
ztrtrs_LTU_single.$(SUFFIX) : trtrs_single.c
231+
$(CC) -c $(CFLAGS) -DCOMPLEX -DDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
232+
233+
ztrtrs_LTN_single.$(SUFFIX) : trtrs_single.c
234+
$(CC) -c $(CFLAGS) -DCOMPLEX -DDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
235+
236+
ztrtrs_UNU_parallel.$(SUFFIX) : trtrs_parallel.c
237+
$(CC) -c $(CFLAGS) -DCOMPLEX -DDOUBLE -UUPLO -UTRANS -UDIAG $< -o $(@F)
238+
239+
ztrtrs_UNN_parallel.$(SUFFIX) : trtrs_parallel.c
240+
$(CC) -c $(CFLAGS) -DCOMPLEX -DDOUBLE -UUPLO -UTRANS -DDIAG $< -o $(@F)
241+
242+
ztrtrs_UTU_parallel.$(SUFFIX) : trtrs_parallel.c
243+
$(CC) -c $(CFLAGS) -DCOMPLEX -DDOUBLE -UUPLO -DTRANS -UDIAG $< -o $(@F)
244+
245+
ztrtrs_UTN_parallel.$(SUFFIX) : trtrs_parallel.c
246+
$(CC) -c $(CFLAGS) -DCOMPLEX -DDOUBLE -UUPLO -DTRANS -DDIAG $< -o $(@F)
247+
248+
ztrtrs_LNU_parallel.$(SUFFIX) : trtrs_parallel.c
249+
$(CC) -c $(CFLAGS) -DCOMPLEX -DDOUBLE -DUPLO -UTRANS -UDIAG $< -o $(@F)
250+
251+
ztrtrs_LNN_parallel.$(SUFFIX) : trtrs_parallel.c
252+
$(CC) -c $(CFLAGS) -DCOMPLEX -DDOUBLE -DUPLO -UTRANS -DDIAG $< -o $(@F)
253+
254+
ztrtrs_LTU_parallel.$(SUFFIX) : trtrs_parallel.c
255+
$(CC) -c $(CFLAGS) -DCOMPLEX -DDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
256+
257+
ztrtrs_LTN_parallel.$(SUFFIX) : trtrs_parallel.c
258+
$(CC) -c $(CFLAGS) -DCOMPLEX -DDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
259+
260+
qtrtrs_UNU_single.$(SUFFIX) : trtrs_single.c
261+
$(CC) -c $(CFLAGS) -DCOMPLEX -DXDOUBLE -UUPLO -UTRANS -UDIAG $< -o $(@F)
262+
263+
qtrtrs_UNN_single.$(SUFFIX) : trtrs_single.c
264+
$(CC) -c $(CFLAGS) -DCOMPLEX -DXDOUBLE -UUPLO -UTRANS -DDIAG $< -o $(@F)
265+
266+
qtrtrs_UTU_single.$(SUFFIX) : trtrs_single.c
267+
$(CC) -c $(CFLAGS) -DCOMPLEX -DXDOUBLE -UUPLO -DTRANS -UDIAG $< -o $(@F)
268+
269+
qtrtrs_UTN_single.$(SUFFIX) : trtrs_single.c
270+
$(CC) -c $(CFLAGS) -DCOMPLEX -DXDOUBLE -UUPLO -DTRANS -DDIAG $< -o $(@F)
271+
272+
qtrtrs_LNU_single.$(SUFFIX) : trtrs_single.c
273+
$(CC) -c $(CFLAGS) -DCOMPLEX -DXDOUBLE -DUPLO -UTRANS -UDIAG $< -o $(@F)
274+
275+
qtrtrs_LNN_single.$(SUFFIX) : trtrs_single.c
276+
$(CC) -c $(CFLAGS) -DCOMPLEX -DXDOUBLE -DUPLO -UTRANS -DDIAG $< -o $(@F)
277+
278+
qtrtrs_LTU_single.$(SUFFIX) : trtrs_single.c
279+
$(CC) -c $(CFLAGS) -DCOMPLEX -DXDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
280+
281+
qtrtrs_LTN_single.$(SUFFIX) : trtrs_single.c
282+
$(CC) -c $(CFLAGS) -DCOMPLEX -DXDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
283+
284+
qtrtrs_UNU_parallel.$(SUFFIX) : trtrs_parallel.c
285+
$(CC) -c $(CFLAGS) -DCOMPLEX -DXDOUBLE -UUPLO -UTRANS -UDIAG $< -o $(@F)
286+
287+
qtrtrs_UNN_parallel.$(SUFFIX) : trtrs_parallel.c
288+
$(CC) -c $(CFLAGS) -DCOMPLEX -DXDOUBLE -UUPLO -UTRANS -DDIAG $< -o $(@F)
289+
290+
qtrtrs_UTU_parallel.$(SUFFIX) : trtrs_parallel.c
291+
$(CC) -c $(CFLAGS) -DCOMPLEX -DXDOUBLE -UUPLO -DTRANS -UDIAG $< -o $(@F)
292+
293+
qtrtrs_UTN_parallel.$(SUFFIX) : trtrs_parallel.c
294+
$(CC) -c $(CFLAGS) -DCOMPLEX -DXDOUBLE -UUPLO -DTRANS -DDIAG $< -o $(@F)
295+
296+
qtrtrs_LNU_parallel.$(SUFFIX) : trtrs_parallel.c
297+
$(CC) -c $(CFLAGS) -DCOMPLEX -DXDOUBLE -DUPLO -UTRANS -UDIAG $< -o $(@F)
298+
299+
qtrtrs_LNN_parallel.$(SUFFIX) : trtrs_parallel.c
300+
$(CC) -c $(CFLAGS) -DCOMPLEX -DXDOUBLE -DUPLO -UTRANS -DDIAG $< -o $(@F)
301+
302+
qtrtrs_LTU_parallel.$(SUFFIX) : trtrs_parallel.c
303+
$(CC) -c $(CFLAGS) -DCOMPLEX -DXDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
304+
305+
qtrtrs_LTN_parallel.$(SUFFIX) : trtrs_parallel.c
306+
$(CC) -c $(CFLAGS) -DCOMPLEX -DXDOUBLE -DUPLO -DTRANS -DDIAG $< -o $(@F)
307+
308+
include ../../Makefile.tail

‎lapack/trtrs/trtrs_single.c

Lines changed: 68 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,68 @@
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+
39+
#include <stdio.h>
40+
#include "common.h"
41+
42+
blasint CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa, FLOAT *sb, BLASLONG mypos) {
43+
44+
#ifndef TRANS
45+
LASWP_PLUS(args -> n, 1, args -> m, ZERO, args -> b, args -> ldb, NULL, 0, args -> c, 1);
46+
47+
if (args -> n == 1){
48+
TRSV_NLU (args -> m, args -> a, args -> lda, args -> b, 1, sb);
49+
TRSV_NUN (args -> m, args -> a, args -> lda, args -> b, 1, sb);
50+
} else {
51+
TRSM_LNLU (args, range_m, range_n, sa, sb, 0);
52+
TRSM_LNUN (args, range_m, range_n, sa, sb, 0);
53+
}
54+
55+
#else
56+
57+
if (args -> n == 1){
58+
TRSV_TUN (args -> m, args -> a, args -> lda, args -> b, 1, sb);
59+
TRSV_TLU (args -> m, args -> a, args -> lda, args -> b, 1, sb);
60+
} else {
61+
TRSM_LTUN (args, range_m, range_n, sa, sb, 0);
62+
TRSM_LTLU (args, range_m, range_n, sa, sb, 0);
63+
}
64+
65+
LASWP_MINUS(args -> n, 1, args -> m, ZERO, args -> b, args -> ldb, NULL, 0, args -> c, -1);
66+
#endif
67+
68+
return 0; }

0 commit comments

Comments
 (0)