Home
last modified time | relevance | path

Searched refs:s3coef (Results 1 – 2 of 2) sorted by relevance

/dports/math/sisl/SISL-SISL-4.6.0-44-g9114631/src/
H A Dmake3D.c101 double *s3coef=SISL_NULL; /* 3-D coeff */ local
122 if((s3coef = newarray(kn1*kn2*3,DOUBLE)) == SISL_NULL) goto err101;
136 for (ki=0,kl=0,sp=s3coef ; ki<kn1 ; ki++,kl+=3,sp+=3)
157 for (ki=0,sp=s3coef+1 ; ki< kn2 ; ki++)
174 for (kj=0,sp=s3coef+2,sq=scoef ; kj < kn2 ; kj++)
180 if(((*rsnew) = newSurf(kn1,kn2,kk1,kk2,st1,st2,s3coef,1,3,1)) == SISL_NULL) goto err101;
204 if (s3coef) freearray(s3coef);
H A Ds1787.c146 double *s3coef=SISL_NULL; /* 3-D coeff */ local
171 if((s3coef = newarray(kn1*kn2*3,DOUBLE)) == SISL_NULL) goto err101;
199 for (ki=0,kl=0,sp=s3coef ; ki<kn1 ; ki++,kl+=3,sp+=3)
224 for (ki=0,sp=s3coef+1 ; ki< kn2 ; ki++)
241 for (kj=0,sp=s3coef+2,sq=scoef ; kj < kn2 ; kj++)
247 if((qs = newSurf(kn1,kn2,kk1,kk2,st1,st2,s3coef,1,3,1)) == SISL_NULL) goto err101;
450 if (s3coef != SISL_NULL) freearray(s3coef);