Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
Jean-Eric Campagne
LagSHT
Commits
f523f5e2
Commit
f523f5e2
authored
Apr 11, 2015
by
Jean-Eric Campagne
Browse files
(JEC/MR) 11/4/15 transpose the matrix LnkMtx in the LaguerreTransform::MultiAnalysis function
parent
d7584663
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
4 additions
and
2 deletions
+4
-2
laguerreTransform.cc
laguerreTransform.cc
+4
-2
No files found.
laguerreTransform.cc
View file @
f523f5e2
...
...
@@ -96,7 +96,8 @@ void LaguerreTransform::MultiAnalysis(const vector< complex<r_8> >& fi,
r_8
rk
=
nodes_
[
k
];
lag
.
Values
(
rk
,
LnAll
);
for
(
int
n
=
0
;
n
<
N_
;
n
++
){
LnkMtx
[
n
*
N_
+
k
]
=
LnAll
[
n
]
*
facts
[
n
];
// LnkMtx[n*N_+k] = LnAll[n]*facts[n];
LnkMtx
[
n
+
N_
*
k
]
=
LnAll
[
n
]
*
facts
[
n
];
}
}
...
...
@@ -110,7 +111,8 @@ void LaguerreTransform::MultiAnalysis(const vector< complex<r_8> >& fi,
complex
<
r_8
>
fli
=
fi
[
l
+
i
*
stride
];
r_8
wi
=
weights_
[
i
];
for
(
int
n
=
0
;
n
<
N_
;
n
++
){
vtmp
[
n
]
+=
fli
*
wi
*
LnkMtx
[
n
*
N_
+
i
];
// vtmp[n] += fli * wi * LnkMtx[n*N_+i];
vtmp
[
n
]
+=
fli
*
wi
*
LnkMtx
[
n
+
N_
*
i
];
}
//loop on k
}
//loop on n
for
(
int
n
=
0
;
n
<
N_
;
n
++
)
{
...
...
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