From 980e281e4d16500fa0013f3ccec2dd18915e20e6 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Marek=20Ne=C4=8Dada?= <marek@necada.org>
Date: Mon, 25 Feb 2019 21:39:20 +0200
Subject: [PATCH] Fix call arguments at qpms_vswf_irot_elem_from_irot3()

Former-commit-id: ba1937b78ed4d525ec9e00b722fcb3b8a24e7940
---
 qpms/wigner.c | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/qpms/wigner.c b/qpms/wigner.c
index 80cf86b..7f7cfab 100644
--- a/qpms/wigner.c
+++ b/qpms/wigner.c
@@ -54,12 +54,12 @@ complex double qpms_wignerD_elem(const qpms_quat_t R,
   }
 }
 
-complex double qpms_vswf_irot_elem_from_irot3(const_qpms_irot3_t q,
-    qpms_l_t l, qpms_m_t mp, qpms_m_t m, bool pseudo) {
+complex double qpms_vswf_irot_elem_from_irot3(const qpms_irot3_t q,
+    const qpms_l_t l, const qpms_m_t mp, const qpms_m_t m, bool pseudo) {
 #ifndef NDEBUG
   qpms_irot3_checkdet(q);
 #endif
-  complex double res = qpms_wignerD_elem(q.rot, l, mp);
+  complex double res = qpms_wignerD_elem(q.rot, l, mp, m);
   if (q.det == -1) {
     res *= min1pow(l);
     if (pseudo)