Fix translation coefficient magnitude factor for power norm.

Former-commit-id: 645b9b3517af9d2c2a9ef3e0223307d21f3c89fa
This commit is contained in:
Marek Nečada 2018-05-06 20:38:33 +00:00
parent 1cf9eac0ba
commit 1665474b3d
1 changed files with 3 additions and 1 deletions

View File

@ -152,7 +152,9 @@ static inline double qpms_trans_normfac(qpms_normalisation_t norm,
double normfac = 1.;
switch(norm) {
case QPMS_NORMALISATION_KRISTENSSON:
normfac *= sqrt((nu*(nu+1.))/(n*(n+1.)));
normfac *= sqrt((n*(n+1.))/(nu*(nu+1.)));
normfac *= sqrt((2.*n+1)/(2.*nu+1));
break;
case QPMS_NORMALISATION_TAYLOR:
normfac *= sqrt((2.*n+1)/(2.*nu+1));
break;