98 #define spSMALL_PIVOT 1
101 #define spNO_MEMORY 4
127 #define spREAL double
157 #define spDEFAULT_PARTITION 0
158 #define spDIRECT_PARTITION 1
159 #define spINDIRECT_PARTITION 2
160 #define spAUTO_PARTITION 3
191 #define spADD_REAL_ELEMENT(element,real) *(element) += real
193 #define spADD_IMAG_ELEMENT(element,imag) *(element+1) += imag
195 #define spADD_COMPLEX_ELEMENT(element,real,imag) \
196 { *(element) += real; \
197 *(element+1) += imag; \
200 #define spADD_REAL_QUAD(template,real) \
201 { *((template).Element1) += real; \
202 *((template).Element2) += real; \
203 *((template).Element3Negated) -= real; \
204 *((template).Element4Negated) -= real; \
207 #define spADD_IMAG_QUAD(template,imag) \
208 { *((template).Element1+1) += imag; \
209 *((template).Element2+1) += imag; \
210 *((template).Element3Negated+1) -= imag; \
211 *((template).Element4Negated+1) -= imag; \
214 #define spADD_COMPLEX_QUAD(template,real,imag) \
215 { *((template).Element1) += real; \
216 *((template).Element2) += real; \
217 *((template).Element3Negated) -= real; \
218 *((template).Element4Negated) -= real; \
219 *((template).Element1+1) += imag; \
220 *((template).Element2+1) += imag; \
221 *((template).Element3Negated+1) -= imag; \
222 *((template).Element4Negated+1) -= imag; \
267 #if defined(__STDC__) || defined(__cplusplus)
273 extern char *
spCreate(
int,
int,
int* );
279 extern int spFileMatrix(
char*,
char*,
char*,
int,
int,
int );
295 extern void spPrint(
char*,
int,
int,
int );
311 #if spCOMPLEX && spSEPARATED_COMPLEX_VECTORS
spREAL spLargestElement()
spREAL spPseudoCondition()
spREAL * spGetElement(char *, int, int)