Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
AGULLO Emmanuel
Chameleon
Commits
8919ad8c
Commit
8919ad8c
authored
Nov 21, 2014
by
PRUVOST Florent
Browse files
it is not a multiple precision file, PRECISION_s/d/c/z will never be defined
parent
35bbf523
Changes
1
Hide whitespace changes
Inline
Side-by-side
control/tile.c
View file @
8919ad8c
...
...
@@ -68,29 +68,21 @@ int MORSE_Lapack_to_Tile(void *Af77, int LDA, MORSE_desc_t *A)
}
morse_sequence_create
(
morse
,
&
sequence
);
switch
(
A
->
dtyp
)
{
#if defined(PRECISION_s)
case
MorseRealFloat
:
morse_pslapack_to_tile
(
Af77
,
LDA
,
A
,
sequence
,
&
request
);
break
;
#endif
#if defined(PRECISION_d)
case
MorseRealDouble
:
morse_pdlapack_to_tile
(
Af77
,
LDA
,
A
,
sequence
,
&
request
);
break
;
#endif
#if defined(PRECISION_c)
case
MorseComplexFloat
:
morse_pclapack_to_tile
(
Af77
,
LDA
,
A
,
sequence
,
&
request
);
break
;
#endif
#if defined(PRECISION_z)
case
MorseComplexDouble
:
morse_pzlapack_to_tile
(
Af77
,
LDA
,
A
,
sequence
,
&
request
);
break
;
#endif
default:
morse_error
(
"MORSE_Lapack_to_Tile"
,
"Type unknown"
);
...
...
@@ -143,29 +135,21 @@ int MORSE_Tile_to_Lapack(MORSE_desc_t *A, void *Af77, int LDA)
}
morse_sequence_create
(
morse
,
&
sequence
);
switch
(
A
->
dtyp
)
{
#if defined(PRECISION_s)
case
MorseRealFloat
:
morse_pstile_to_lapack
(
A
,
Af77
,
LDA
,
sequence
,
&
request
);
break
;
#endif
#if defined(PRECISION_d)
case
MorseRealDouble
:
morse_pdtile_to_lapack
(
A
,
Af77
,
LDA
,
sequence
,
&
request
);
break
;
#endif
#if defined(PRECISION_c)
case
MorseComplexFloat
:
morse_pctile_to_lapack
(
A
,
Af77
,
LDA
,
sequence
,
&
request
);
break
;
#endif
#if defined(PRECISION_z)
case
MorseComplexDouble
:
morse_pztile_to_lapack
(
A
,
Af77
,
LDA
,
sequence
,
&
request
);
break
;
#endif
default:
morse_error
(
"MORSE_Tile_to_Lapack"
,
"Type unknown"
);
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new 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