9 void atou1(
double *a,
int m,
int n)
11 double *p0, *p, *
q, *
w;
17 w = (
double *)calloc(m,
sizeof(
double));
27 for (; i >= 0; --i, ++mm, p0 -= n + 1) {
29 for (j = 0, p = p0 + n; j < mm; p +=
n)
33 for (j = 0, p = p0 + n; j < mm; p +=
n)
35 for (k = i + 1, q = p0 + 1; k <
n; ++k) {
36 for (j = 0, p = q + n, s = 0.; j < mm; p +=
n)
39 for (j = 0, p = q + n; j < mm; p +=
n)
46 for (j = 0, p = p0 + n, q = p0 + 1; j < mm; ++j, p +=
n)
void atou1(double *a, int m, int n)
tuple h
panel.defaultSize = wx.CheckBox(panel, id = wx.ID_ANY, label = _("Use default size")) panel...