QPMS
/
qpms
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Fix syntax error which gcc tolerated 

Former-commit-id: 696ccbfad8997a9c8935def2ce4406a21a51dcf8
This commit is contained in:
Marek Nečada 2020-04-11 10:01:58 +03:00
parent 2ccf9e2c5d
commit 63aa338891
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
qpms/ewald.h
View File

@ -152,7 +152,7 @@ static inline complex double clilgamma(complex double z) {
* even if `z1 == z2`, because `-0 == 0` according to IEEE 754. * even if `z1 == z2`, because `-0 == 0` according to IEEE 754.
* The side of the branch cut can be determined using `signbit(creal(z))`. * The side of the branch cut can be determined using `signbit(creal(z))`.
*/ */
int cx_gamma_inc_series_e(double a, complex z, qpms_csf_result * result); int cx_gamma_inc_series_e(double a, complex double z, qpms_csf_result * result);
/// Incomplete Gamma function as continued fractions. /// Incomplete Gamma function as continued fractions.
/** /**
@ -164,7 +164,7 @@ int cx_gamma_inc_series_e(double a, complex z, qpms_csf_result * result);
* even if `z1 == z2`, because `-0 == 0` according to IEEE 754. * even if `z1 == z2`, because `-0 == 0` according to IEEE 754.
* The side of the branch cut can be determined using `signbit(creal(z))`. * The side of the branch cut can be determined using `signbit(creal(z))`.
*/ */
int cx_gamma_inc_CF_e(double a, complex z, qpms_csf_result * result); int cx_gamma_inc_CF_e(double a, complex double z, qpms_csf_result * result);
/// Incomplete gamma for complex second argument. /// Incomplete gamma for complex second argument.
/** /**

4
qpms/tmatrices.h
View File

@ -442,13 +442,13 @@ typedef struct qpms_arc_cylinder_params_t {
/// Arc parametrisation of cylindrical particle; for qpms_arc_function_t. /// Arc parametrisation of cylindrical particle; for qpms_arc_function_t.
qpms_arc_function_retval_t qpms_arc_cylinder(double theta, qpms_arc_function_retval_t qpms_arc_cylinder(double theta,
const void *params; ///< Points to qpms_arc_cylinder_params_t const void *params ///< Points to qpms_arc_cylinder_params_t
); );
/// Arc parametrisation of spherical particle; for qpms_arc_function_t. /// Arc parametrisation of spherical particle; for qpms_arc_function_t.
/** Useful mostly only for benchmarks or debugging, as one can use the Mie-Lorentz solution. */ /** Useful mostly only for benchmarks or debugging, as one can use the Mie-Lorentz solution. */
qpms_arc_function_retval_t qpms_arc_sphere(double theta, qpms_arc_function_retval_t qpms_arc_sphere(double theta,
const void *R; ///< Points to double containing particle's radius. const void *R ///< Points to double containing particle's radius.
); );