Dirty fix of the otherwise non-literal arrays.
This commit is contained in:
parent
0078f4db56
commit
227aaf4021
|
@ -2096,6 +2096,9 @@ qpms_errno_t qpms_scatsysw_scattered_field_basis(
|
|||
ssw->wavenumber, where);
|
||||
}
|
||||
|
||||
|
||||
const qpms_uvswfi_t ELDIPILIST[] = {6, 10, 14};
|
||||
|
||||
#define DIPSPECN 3 // We have three basis vectors
|
||||
// Evaluates the regular electric dipole waves in the origin. The returned
|
||||
// value is not to be freed as in the usual case.
|
||||
|
@ -2104,11 +2107,15 @@ static inline const qpms_vswf_set_spec_t qpms_fill_regdipoles_0(
|
|||
// bspec containing only electric dipoles
|
||||
const qpms_vswf_set_spec_t dipspec = {
|
||||
.n = DIPSPECN,
|
||||
#if 0
|
||||
.ilist = (qpms_uvswfi_t[]){
|
||||
qpms_tmn2uvswfi(QPMS_VSWF_ELECTRIC, -1, 1),
|
||||
qpms_tmn2uvswfi(QPMS_VSWF_ELECTRIC, 0, 1),
|
||||
qpms_tmn2uvswfi(QPMS_VSWF_ELECTRIC, +1, 1),
|
||||
},
|
||||
#else
|
||||
.ilist = ELDIPILIST,
|
||||
#endif
|
||||
.lMax=1, .lMax_M=0, .lMax_N=1, .lMax_L=-1,
|
||||
.capacity=0,
|
||||
.norm = normalisation,
|
||||
|
|
Loading…
Reference in New Issue