This completes the first pass of changes so that GSLL will load with
GSL 2.0 and above. It is not tested. It will still give an error when
trying to load with GSL 2.
"Compute the radial j-th kind Mathieu functions Mc_n^{(j)}(q,x) of
order n. The allowed values of j are 1 and 2. The functions for j =
3,4 can be computed as M_n^{(3)} = M_n^{(1)} + iM_n^{(2)} and
M_n^{(4)} = M_n^{(1)} - iM_n^{(2)}, where M_n^{(j)} = Mc_n^{(j)} or
Ms_n^{(j)}.")
#+gsl2
(defmfunmathieu-Mc(jnqx)
"gsl_sf_mathieu_Mc"
((j:int)(n:int)(q:double)(x:double))
:c-return:double
:gsl-version(20)
:documentation; GSL texi
"Compute the radial j-th kind Mathieu functions Mc_n^{(j)}(q,x) of order n. The allowed values of j are 1 and 2. The functions for j = 3,4 can be computed as M_n^{(3)} = M_n^{(1)} + iM_n^{(2)} and M_n^{(4)} = M_n^{(1)} - iM_n^{(2)}, where M_n^{(j)} = Mc_n^{(j)} or Ms_n^{(j)}.")
"Compute the radial j-th kind Mathieu functions Ms_n^{(j)}(q,x) of order n.
The allowed values of j are 1 and 2. The functions for j = 3,4 can
be computed as M_n^{(3)} = M_n^{(1)} + iM_n^{(2)} and M_n^{(4)} =
M_n^{(1)} - iM_n^{(2)}, where M_n^{(j)} = Mc_n^{(j)} or
Ms_n^{(j)}.")
#+gsl2
(defmfunmathieu-Ms(jnqx)
"gsl_sf_mathieu_Ms"
((j:int)(n:int)(q:double)(x:double))
:c-return:double
:gsl-version(20)
:documentation; GSL texi
"Compute the radial j-th kind Mathieu functions Ms_n^{(j)}(q,x) of order n. The allowed values of j are 1 and 2. The functions for j = 3,4 can be computed as M_n^{(3)} = M_n^{(1)} + iM_n^{(2)} and M_n^{(4)} = M_n^{(1)} - iM_n^{(2)}, where M_n^{(j)} = Mc_n^{(j)} or Ms_n^{(j)}.")