Changeset 51 for trunk/ADOLC/src/drivers
 Timestamp:
 Nov 9, 2009 6:43:13 AM (10 years ago)
 File:

 1 edited
Legend:
 Unmodified
 Added
 Removed

trunk/ADOLC/src/drivers/taylor.c
r49 r51 118 118 119 119 long binomi(int n, int k) { 120 long double accum = 1; 121 unsigned int i; 120 122 121 123 if (k > n) … … 125 127 k = nk; 126 128 127 long double accum = 1;128 unsigned int i;129 129 for (i = 1; i <= k; i++) 130 130 accum = accum * (nk+i) / i; … … 590 590 for (j=0; j<n; j++) 591 591 if (nonzero[i][j]>1) { 592 int indj = j; 593 int indX = l; 592 594 Aij = A[i][j]; 593 int indj = j;594 595 indexA = l1; 595 596 Xj = X[j]+l; 596 int indX = l;597 597 indexX = 1; 598 598 if (da == l1)
Note: See TracChangeset
for help on using the changeset viewer.