Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
7
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Open sidebar
AGULLO Emmanuel
Chameleon
Commits
876646d9
Commit
876646d9
authored
Jan 31, 2018
by
Mathieu Faverge
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Add new kernels to parsec
parent
e0f5d6e5
Changes
12
Hide whitespace changes
Inline
Side-by-side
Showing
12 changed files
with
41 additions
and
41 deletions
+41
-41
runtime/parsec/codelets/codelet_zgeqrt.c
runtime/parsec/codelets/codelet_zgeqrt.c
+4
-4
runtime/parsec/codelets/codelet_ztpmqrt.c
runtime/parsec/codelets/codelet_ztpmqrt.c
+1
-1
runtime/parsec/codelets/codelet_ztpqrt.c
runtime/parsec/codelets/codelet_ztpqrt.c
+2
-2
runtime/parsec/codelets/codelet_ztsmlq.c
runtime/parsec/codelets/codelet_ztsmlq.c
+2
-2
runtime/parsec/codelets/codelet_ztsmlq_hetra1.c
runtime/parsec/codelets/codelet_ztsmlq_hetra1.c
+4
-4
runtime/parsec/codelets/codelet_ztsmqr.c
runtime/parsec/codelets/codelet_ztsmqr.c
+6
-6
runtime/parsec/codelets/codelet_ztsmqr_hetra1.c
runtime/parsec/codelets/codelet_ztsmqr_hetra1.c
+4
-4
runtime/parsec/codelets/codelet_zttlqt.c
runtime/parsec/codelets/codelet_zttlqt.c
+1
-1
runtime/parsec/codelets/codelet_zttmlq.c
runtime/parsec/codelets/codelet_zttmlq.c
+2
-2
runtime/parsec/codelets/codelet_zttmqr.c
runtime/parsec/codelets/codelet_zttmqr.c
+7
-7
runtime/parsec/codelets/codelet_zunmlq.c
runtime/parsec/codelets/codelet_zunmlq.c
+2
-2
runtime/parsec/codelets/codelet_zunmqr.c
runtime/parsec/codelets/codelet_zunmqr.c
+6
-6
No files found.
runtime/parsec/codelets/codelet_zgeqrt.c
View file @
876646d9
...
...
@@ -121,11 +121,11 @@ void MORSE_TASK_zgeqrt(const MORSE_option_t *options,
sizeof
(
int
),
&
m
,
VALUE
,
sizeof
(
int
),
&
n
,
VALUE
,
sizeof
(
int
),
&
ib
,
VALUE
,
PASSED_BY_REF
,
RTBLKADDR
(
A
,
MORSE_Complex64_t
,
Am
,
An
),
INOUT
,
PASSED_BY_REF
,
RTBLKADDR
(
A
,
MORSE_Complex64_t
,
Am
,
An
),
INOUT
,
sizeof
(
int
),
&
lda
,
VALUE
,
PASSED_BY_REF
,
RTBLKADDR
(
T
,
MORSE_Complex64_t
,
Tm
,
Tn
),
OUTPUT
,
PASSED_BY_REF
,
RTBLKADDR
(
T
,
MORSE_Complex64_t
,
Tm
,
Tn
),
OUTPUT
,
sizeof
(
int
),
&
ldt
,
VALUE
,
sizeof
(
MORSE_Complex64_t
)
*
nb
,
NULL
,
SCRATCH
,
sizeof
(
MORSE_Complex64_t
)
*
ib
*
nb
,
NULL
,
SCRATCH
,
sizeof
(
MORSE_Complex64_t
)
*
nb
,
NULL
,
SCRATCH
,
sizeof
(
MORSE_Complex64_t
)
*
ib
*
nb
,
NULL
,
SCRATCH
,
PARSEC_DTD_ARG_END
);
}
runtime/parsec/codelets/codelet_ztpmqrt.c
View file @
876646d9
...
...
@@ -48,7 +48,7 @@ CORE_ztpmqrt_parsec( parsec_execution_stream_t *context,
MORSE_Complex64_t
*
WORK
;
parsec_dtd_unpack_args
(
this_task
,
&
side
,
&
trans
,
&
M
,
&
N
,
&
K
,
&
L
,
&
ib
,
&
V
,
&
ldv
,
&
T
,
&
ldt
,
&
A
,
&
lda
,
&
B
,
&
ldb
,
&
WORK
);
this_task
,
&
side
,
&
trans
,
&
M
,
&
N
,
&
K
,
&
L
,
&
ib
,
&
V
,
&
ldv
,
&
T
,
&
ldt
,
&
A
,
&
lda
,
&
B
,
&
ldb
,
&
WORK
);
CORE_ztpmqrt
(
side
,
trans
,
M
,
N
,
K
,
L
,
ib
,
V
,
ldv
,
T
,
ldt
,
A
,
lda
,
B
,
ldb
,
WORK
);
...
...
runtime/parsec/codelets/codelet_ztpqrt.c
View file @
876646d9
...
...
@@ -43,7 +43,7 @@ CORE_ztpqrt_parsec( parsec_execution_stream_t *context,
MORSE_Complex64_t
*
WORK
;
parsec_dtd_unpack_args
(
this_task
,
&
M
,
&
N
,
&
L
,
&
ib
,
&
A
,
&
lda
,
&
B
,
&
ldb
,
&
T
,
&
ldt
,
&
WORK
);
this_task
,
&
M
,
&
N
,
&
L
,
&
ib
,
&
A
,
&
lda
,
&
B
,
&
ldb
,
&
T
,
&
ldt
,
&
WORK
);
CORE_ztpqrt
(
M
,
N
,
L
,
ib
,
A
,
lda
,
B
,
ldb
,
T
,
ldt
,
WORK
);
...
...
@@ -72,6 +72,6 @@ void MORSE_TASK_ztpqrt( const MORSE_option_t *options,
sizeof
(
int
),
&
ldb
,
VALUE
,
PASSED_BY_REF
,
RTBLKADDR
(
T
,
MORSE_Complex64_t
,
Tm
,
Tn
),
OUTPUT
,
sizeof
(
int
),
&
ldt
,
VALUE
,
sizeof
(
MORSE_Complex64_t
)
*
ib
*
nb
,
NULL
,
SCRATCH
,
sizeof
(
MORSE_Complex64_t
)
*
(
ib
+
1
)
*
nb
,
NULL
,
SCRATCH
,
PARSEC_DTD_ARG_END
);
}
runtime/parsec/codelets/codelet_ztsmlq.c
View file @
876646d9
...
...
@@ -48,10 +48,10 @@ CORE_ztsmlq_parsec( parsec_execution_stream_t *context,
int
ldwork
;
parsec_dtd_unpack_args
(
this_task
,
&
side
,
&
trans
,
&
m1
,
&
n1
,
&
m2
,
&
n2
,
&
k
,
&
ib
,
&
A1
,
&
lda1
,
&
A2
,
&
lda2
,
&
V
,
&
ldv
,
&
T
,
&
ldt
,
&
WORK
,
&
ldwork
);
this_task
,
&
side
,
&
trans
,
&
m1
,
&
n1
,
&
m2
,
&
n2
,
&
k
,
&
ib
,
&
A1
,
&
lda1
,
&
A2
,
&
lda2
,
&
V
,
&
ldv
,
&
T
,
&
ldt
,
&
WORK
,
&
ldwork
);
CORE_ztsmlq
(
side
,
trans
,
m1
,
n1
,
m2
,
n2
,
k
,
ib
,
A1
,
lda1
,
A2
,
lda2
,
V
,
ldv
,
T
,
ldt
,
WORK
,
ldwork
);
A1
,
lda1
,
A2
,
lda2
,
V
,
ldv
,
T
,
ldt
,
WORK
,
ldwork
);
(
void
)
context
;
return
PARSEC_HOOK_RETURN_DONE
;
...
...
runtime/parsec/codelets/codelet_ztsmlq_hetra1.c
View file @
876646d9
...
...
@@ -53,12 +53,12 @@ CORE_ztsmlq_hetra1_parsec( parsec_execution_stream_t *context,
int
ldwork
;
parsec_dtd_unpack_args
(
this_task
,
&
side
,
&
trans
,
&
m1
,
&
n1
,
&
m2
,
&
n2
,
&
k
,
&
ib
,
&
A1
,
&
lda1
,
&
A2
,
&
lda2
,
&
V
,
&
ldv
,
&
T
,
&
ldt
,
&
WORK
,
&
ldwork
);
this_task
,
&
side
,
&
trans
,
&
m1
,
&
n1
,
&
m2
,
&
n2
,
&
k
,
&
ib
,
&
A1
,
&
lda1
,
&
A2
,
&
lda2
,
&
V
,
&
ldv
,
&
T
,
&
ldt
,
&
WORK
,
&
ldwork
);
CORE_ztsmlq_hetra1
(
side
,
trans
,
m1
,
n1
,
m2
,
n2
,
k
,
ib
,
A1
,
lda1
,
A2
,
lda2
,
V
,
ldv
,
T
,
ldt
,
WORK
,
ldwork
);
A1
,
lda1
,
A2
,
lda2
,
V
,
ldv
,
T
,
ldt
,
WORK
,
ldwork
);
(
void
)
context
;
return
PARSEC_HOOK_RETURN_DONE
;
...
...
runtime/parsec/codelets/codelet_ztsmqr.c
View file @
876646d9
...
...
@@ -48,10 +48,10 @@ CORE_ztsmqr_parsec( parsec_execution_stream_t *context,
int
ldwork
;
parsec_dtd_unpack_args
(
this_task
,
&
side
,
&
trans
,
&
m1
,
&
n1
,
&
m2
,
&
n2
,
&
k
,
&
ib
,
&
A1
,
&
lda1
,
&
A2
,
&
lda2
,
&
V
,
&
ldv
,
&
T
,
&
ldt
,
&
WORK
,
&
ldwork
);
this_task
,
&
side
,
&
trans
,
&
m1
,
&
n1
,
&
m2
,
&
n2
,
&
k
,
&
ib
,
&
A1
,
&
lda1
,
&
A2
,
&
lda2
,
&
V
,
&
ldv
,
&
T
,
&
ldt
,
&
WORK
,
&
ldwork
);
CORE_ztsmqr
(
side
,
trans
,
m1
,
n1
,
m2
,
n2
,
k
,
ib
,
A1
,
lda1
,
A2
,
lda2
,
V
,
ldv
,
T
,
ldt
,
WORK
,
ldwork
);
A1
,
lda1
,
A2
,
lda2
,
V
,
ldv
,
T
,
ldt
,
WORK
,
ldwork
);
(
void
)
context
;
return
PARSEC_HOOK_RETURN_DONE
;
...
...
@@ -79,13 +79,13 @@ void MORSE_TASK_ztsmqr(const MORSE_option_t *options,
sizeof
(
int
),
&
n2
,
VALUE
,
sizeof
(
int
),
&
k
,
VALUE
,
sizeof
(
int
),
&
ib
,
VALUE
,
PASSED_BY_REF
,
RTBLKADDR
(
A1
,
MORSE_Complex64_t
,
A1m
,
A1n
),
INOUT
,
PASSED_BY_REF
,
RTBLKADDR
(
A1
,
MORSE_Complex64_t
,
A1m
,
A1n
),
INOUT
,
sizeof
(
int
),
&
lda1
,
VALUE
,
PASSED_BY_REF
,
RTBLKADDR
(
A2
,
MORSE_Complex64_t
,
A2m
,
A2n
),
INOUT
,
PASSED_BY_REF
,
RTBLKADDR
(
A2
,
MORSE_Complex64_t
,
A2m
,
A2n
),
INOUT
,
sizeof
(
int
),
&
lda2
,
VALUE
,
PASSED_BY_REF
,
RTBLKADDR
(
V
,
MORSE_Complex64_t
,
Vm
,
Vn
),
INPUT
,
PASSED_BY_REF
,
RTBLKADDR
(
V
,
MORSE_Complex64_t
,
Vm
,
Vn
),
INPUT
,
sizeof
(
int
),
&
ldv
,
VALUE
,
PASSED_BY_REF
,
RTBLKADDR
(
T
,
MORSE_Complex64_t
,
Tm
,
Tn
),
INPUT
,
PASSED_BY_REF
,
RTBLKADDR
(
T
,
MORSE_Complex64_t
,
Tm
,
Tn
),
INPUT
,
sizeof
(
int
),
&
ldt
,
VALUE
,
sizeof
(
MORSE_Complex64_t
)
*
ib
*
nb
,
NULL
,
SCRATCH
,
sizeof
(
int
),
&
ldwork
,
VALUE
,
...
...
runtime/parsec/codelets/codelet_ztsmqr_hetra1.c
View file @
876646d9
...
...
@@ -53,12 +53,12 @@ CORE_ztsmqr_hetra1_parsec( parsec_execution_stream_t *context,
int
ldwork
;
parsec_dtd_unpack_args
(
this_task
,
&
side
,
&
trans
,
&
m1
,
&
n1
,
&
m2
,
&
n2
,
&
k
,
&
ib
,
&
A1
,
&
lda1
,
&
A2
,
&
lda2
,
&
V
,
&
ldv
,
&
T
,
&
ldt
,
&
WORK
,
&
ldwork
);
this_task
,
&
side
,
&
trans
,
&
m1
,
&
n1
,
&
m2
,
&
n2
,
&
k
,
&
ib
,
&
A1
,
&
lda1
,
&
A2
,
&
lda2
,
&
V
,
&
ldv
,
&
T
,
&
ldt
,
&
WORK
,
&
ldwork
);
CORE_ztsmqr_hetra1
(
side
,
trans
,
m1
,
n1
,
m2
,
n2
,
k
,
ib
,
A1
,
lda1
,
A2
,
lda2
,
V
,
ldv
,
T
,
ldt
,
WORK
,
ldwork
);
A1
,
lda1
,
A2
,
lda2
,
V
,
ldv
,
T
,
ldt
,
WORK
,
ldwork
);
(
void
)
context
;
return
PARSEC_HOOK_RETURN_DONE
;
...
...
runtime/parsec/codelets/codelet_zttlqt.c
View file @
876646d9
...
...
@@ -41,7 +41,7 @@ CORE_zttlqt_parsec( parsec_execution_stream_t *context,
MORSE_Complex64_t
*
WORK
;
parsec_dtd_unpack_args
(
this_task
,
&
m
,
&
n
,
&
ib
,
&
A1
,
&
lda1
,
&
A2
,
&
lda2
,
&
T
,
&
ldt
,
&
TAU
,
&
WORK
);
this_task
,
&
m
,
&
n
,
&
ib
,
&
A1
,
&
lda1
,
&
A2
,
&
lda2
,
&
T
,
&
ldt
,
&
TAU
,
&
WORK
);
CORE_zttlqt
(
m
,
n
,
ib
,
A1
,
lda1
,
A2
,
lda2
,
T
,
ldt
,
TAU
,
WORK
);
...
...
runtime/parsec/codelets/codelet_zttmlq.c
View file @
876646d9
...
...
@@ -48,10 +48,10 @@ CORE_zttmlq_parsec( parsec_execution_stream_t *context,
int
ldwork
;
parsec_dtd_unpack_args
(
this_task
,
&
side
,
&
trans
,
&
m1
,
&
n1
,
&
m2
,
&
n2
,
&
k
,
&
ib
,
&
A1
,
&
lda1
,
&
A2
,
&
lda2
,
&
V
,
&
ldv
,
&
T
,
&
ldt
,
&
WORK
,
&
ldwork
);
this_task
,
&
side
,
&
trans
,
&
m1
,
&
n1
,
&
m2
,
&
n2
,
&
k
,
&
ib
,
&
A1
,
&
lda1
,
&
A2
,
&
lda2
,
&
V
,
&
ldv
,
&
T
,
&
ldt
,
&
WORK
,
&
ldwork
);
CORE_zttmlq
(
side
,
trans
,
m1
,
n1
,
m2
,
n2
,
k
,
ib
,
A1
,
lda1
,
A2
,
lda2
,
V
,
ldv
,
T
,
ldt
,
WORK
,
ldwork
);
A2
,
lda2
,
V
,
ldv
,
T
,
ldt
,
WORK
,
ldwork
);
(
void
)
context
;
return
PARSEC_HOOK_RETURN_DONE
;
...
...
runtime/parsec/codelets/codelet_zttmqr.c
View file @
876646d9
...
...
@@ -48,10 +48,10 @@ CORE_zttmqr_parsec( parsec_execution_stream_t *context,
int
ldwork
;
parsec_dtd_unpack_args
(
this_task
,
&
side
,
&
trans
,
&
m1
,
&
n1
,
&
m2
,
&
n2
,
&
k
,
&
ib
,
&
A1
,
&
lda1
,
&
A2
,
&
lda2
,
&
V
,
&
ldv
,
&
T
,
&
ldt
,
&
WORK
,
&
ldwork
);
this_task
,
&
side
,
&
trans
,
&
m1
,
&
n1
,
&
m2
,
&
n2
,
&
k
,
&
ib
,
&
A1
,
&
lda1
,
&
A2
,
&
lda2
,
&
V
,
&
ldv
,
&
T
,
&
ldt
,
&
WORK
,
&
ldwork
);
CORE_zttmqr
(
side
,
trans
,
m1
,
n1
,
m2
,
n2
,
k
,
ib
,
A1
,
lda1
,
A2
,
lda2
,
V
,
ldv
,
T
,
ldt
,
WORK
,
ldwork
);
A1
,
lda1
,
A2
,
lda2
,
V
,
ldv
,
T
,
ldt
,
WORK
,
ldwork
);
(
void
)
context
;
return
PARSEC_HOOK_RETURN_DONE
;
...
...
@@ -80,15 +80,15 @@ void MORSE_TASK_zttmqr(const MORSE_option_t *options,
sizeof
(
int
),
&
n2
,
VALUE
,
sizeof
(
int
),
&
k
,
VALUE
,
sizeof
(
int
),
&
ib
,
VALUE
,
PASSED_BY_REF
,
RTBLKADDR
(
A1
,
MORSE_Complex64_t
,
A1m
,
A1n
),
INOUT
,
PASSED_BY_REF
,
RTBLKADDR
(
A1
,
MORSE_Complex64_t
,
A1m
,
A1n
),
INOUT
,
sizeof
(
int
),
&
lda1
,
VALUE
,
PASSED_BY_REF
,
RTBLKADDR
(
A2
,
MORSE_Complex64_t
,
A2m
,
A2n
),
INOUT
,
PASSED_BY_REF
,
RTBLKADDR
(
A2
,
MORSE_Complex64_t
,
A2m
,
A2n
),
INOUT
,
sizeof
(
int
),
&
lda2
,
VALUE
,
PASSED_BY_REF
,
RTBLKADDR
(
V
,
MORSE_Complex64_t
,
Vm
,
Vn
),
INPUT
,
PASSED_BY_REF
,
RTBLKADDR
(
V
,
MORSE_Complex64_t
,
Vm
,
Vn
),
INPUT
,
sizeof
(
int
),
&
ldv
,
VALUE
,
PASSED_BY_REF
,
RTBLKADDR
(
T
,
MORSE_Complex64_t
,
Tm
,
Tn
),
INPUT
,
PASSED_BY_REF
,
RTBLKADDR
(
T
,
MORSE_Complex64_t
,
Tm
,
Tn
),
INPUT
,
sizeof
(
int
),
&
ldt
,
VALUE
,
sizeof
(
MORSE_Complex64_t
)
*
ib
*
nb
,
NULL
,
SCRATCH
,
sizeof
(
MORSE_Complex64_t
)
*
ib
*
nb
,
NULL
,
SCRATCH
,
sizeof
(
int
),
&
ldwork
,
VALUE
,
PARSEC_DTD_ARG_END
);
}
runtime/parsec/codelets/codelet_zunmlq.c
View file @
876646d9
...
...
@@ -44,10 +44,10 @@ CORE_zunmlq_parsec( parsec_execution_stream_t *context,
int
ldwork
;
parsec_dtd_unpack_args
(
this_task
,
&
side
,
&
trans
,
&
m
,
&
n
,
&
k
,
&
ib
,
&
A
,
&
lda
,
&
T
,
&
ldt
,
&
C
,
&
ldc
,
&
WORK
,
&
ldwork
);
this_task
,
&
side
,
&
trans
,
&
m
,
&
n
,
&
k
,
&
ib
,
&
A
,
&
lda
,
&
T
,
&
ldt
,
&
C
,
&
ldc
,
&
WORK
,
&
ldwork
);
CORE_zunmlq
(
side
,
trans
,
m
,
n
,
k
,
ib
,
A
,
lda
,
T
,
ldt
,
C
,
ldc
,
WORK
,
ldwork
);
A
,
lda
,
T
,
ldt
,
C
,
ldc
,
WORK
,
ldwork
);
(
void
)
context
;
return
PARSEC_HOOK_RETURN_DONE
;
...
...
runtime/parsec/codelets/codelet_zunmqr.c
View file @
876646d9
...
...
@@ -44,10 +44,10 @@ CORE_zunmqr_parsec( parsec_execution_stream_t *context,
int
ldwork
;
parsec_dtd_unpack_args
(
this_task
,
&
side
,
&
trans
,
&
m
,
&
n
,
&
k
,
&
ib
,
&
A
,
&
lda
,
&
T
,
&
ldt
,
&
C
,
&
ldc
,
&
WORK
,
&
ldwork
);
this_task
,
&
side
,
&
trans
,
&
m
,
&
n
,
&
k
,
&
ib
,
&
A
,
&
lda
,
&
T
,
&
ldt
,
&
C
,
&
ldc
,
&
WORK
,
&
ldwork
);
CORE_zunmqr
(
side
,
trans
,
m
,
n
,
k
,
ib
,
A
,
lda
,
T
,
ldt
,
C
,
ldc
,
WORK
,
ldwork
);
A
,
lda
,
T
,
ldt
,
C
,
ldc
,
WORK
,
ldwork
);
(
void
)
context
;
return
PARSEC_HOOK_RETURN_DONE
;
...
...
@@ -70,13 +70,13 @@ void MORSE_TASK_zunmqr(const MORSE_option_t *options,
sizeof
(
int
),
&
n
,
VALUE
,
sizeof
(
int
),
&
k
,
VALUE
,
sizeof
(
int
),
&
ib
,
VALUE
,
PASSED_BY_REF
,
RTBLKADDR
(
A
,
MORSE_Complex64_t
,
Am
,
An
),
INPUT
,
PASSED_BY_REF
,
RTBLKADDR
(
A
,
MORSE_Complex64_t
,
Am
,
An
),
INPUT
,
sizeof
(
int
),
&
lda
,
VALUE
,
PASSED_BY_REF
,
RTBLKADDR
(
T
,
MORSE_Complex64_t
,
Tm
,
Tn
),
INPUT
,
PASSED_BY_REF
,
RTBLKADDR
(
T
,
MORSE_Complex64_t
,
Tm
,
Tn
),
INPUT
,
sizeof
(
int
),
&
ldt
,
VALUE
,
PASSED_BY_REF
,
RTBLKADDR
(
C
,
MORSE_Complex64_t
,
Cm
,
Cn
),
INOUT
,
PASSED_BY_REF
,
RTBLKADDR
(
C
,
MORSE_Complex64_t
,
Cm
,
Cn
),
INOUT
,
sizeof
(
int
),
&
ldc
,
VALUE
,
sizeof
(
MORSE_Complex64_t
)
*
ib
*
nb
,
NULL
,
SCRATCH
,
sizeof
(
MORSE_Complex64_t
)
*
ib
*
nb
,
NULL
,
SCRATCH
,
sizeof
(
int
),
&
nb
,
VALUE
,
PARSEC_DTD_ARG_END
);
}
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment