Searched refs:ebder2 (Results 1 – 2 of 2) sorted by relevance
/dports/math/sisl/SISL-SISL-4.6.0-44-g9114631/src/ |
H A D | s1506.c | 130 double *ebder2=SISL_NULL; /* Triple array of dimension (ider+1)*k2*m2 local 165 ebder2 = newarray((ider+1)*k2*m2,DOUBLE); 166 if(ebder2 == SISL_NULL) goto err101; 170 s1504(et2,k2,n2,y,m2,ider,ebder2,ileft2,&kstat); 175 s1505(ps1,ider,m1,m2,ebder1,ebder2, 217 if(ebder2 != SISL_NULL) freearray(ebder2);
|
H A D | s1505.c | 54 *ebder2, int *ileft1,int *ileft2,double eder[],double norm[],int *jstat) in s1505() argument 56 void s1505(ps1,ider,m1,m2,ebder1,ebder2,ileft1,ileft2,eder,norm,jstat) in s1505() 62 double *ebder2; 256 tt = ebder2[kih2++]; kl2 = kl1;
|