| /dports/math/sisl/SISL-SISL-4.6.0-44-g9114631/src/ |
| H A D | sh6idkpt.c | 59 sh6idkpt (pintdat, pintpt, join, jstat) in sh6idkpt()
61 SISLIntpt **pintpt;
124 if ((*pintpt) == SISL_NULL)
133 if (sh6ismain(*pintpt))
171 for (; (*pintpt)->no_of_curves;)
174 sh6disconnect (*pintpt, (*pintpt)->pnext[0], &kstat);
203 freeIntpt (*pintpt);
204 (*pintpt) = SISL_NULL;
215 if ((*pintdat)->vpoint[ki] == (*pintpt))
240 freeIntpt (*pintpt);
[all …]
|
| H A D | s6idnpt.c | 55 s6idnpt(SISLIntdat **pintdat,SISLIntpt **pintpt,int itest,int *jstat) in s6idnpt() argument
57 void s6idnpt(pintdat,pintpt,itest,jstat) in s6idnpt()
59 SISLIntpt **pintpt;
119 if ((*pintdat)->vpoint[ki] == (*pintpt))
124 else if (itest && (*pintpt)->iinter != 2)
126 for (kj=0; kj<(*pintpt)->ipar; kj++)
127 if (DNEQUAL((*pintpt)->epar[kj],(*pintdat)->vpoint[ki]->epar[kj]))
130 if (kj == (*pintpt)->ipar)
132 freeIntpt(*pintpt);
133 (*pintpt) = (*pintdat)->vpoint[ki];
[all …]
|
| H A D | sh6idnpt.c | 56 sh6idnpt(SISLIntdat **pintdat,SISLIntpt **pintpt,int itest,int *jstat) in sh6idnpt() argument
58 void sh6idnpt(pintdat,pintpt,itest,jstat) in sh6idnpt()
60 SISLIntpt **pintpt;
122 if ((*pintdat)->vpoint[ki] == (*pintpt))
129 for (kj=0; kj<(*pintpt)->ipar; kj++)
130 if (DNEQUAL((*pintpt)->epar[kj],(*pintdat)->vpoint[ki]->epar[kj]))
133 if (kj == (*pintpt)->ipar)
135 freeIntpt(*pintpt);
136 (*pintpt) = (*pintdat)->vpoint[ki];
157 (*pintdat)->vpoint[ki] = (*pintpt);
|
| H A D | s6idcpt.c | 55 s6idcpt(SISLIntdat *pintdat,SISLIntpt *pintpt,SISLIntpt **rintpt) in s6idcpt() argument
57 void s6idcpt(pintdat,pintpt,rintpt) in s6idcpt()
59 SISLIntpt *pintpt;
101 if (pintpt == pintdat->vpoint[0])
104 tdist = s6dist(pintdat->vpoint[0]->epar,pintpt->epar,pintpt->ipar);
108 if (pintpt == pintdat->vpoint[ki])
111 td = s6dist(pintdat->vpoint[ki]->epar,pintpt->epar,pintpt->ipar);
|
| H A D | s6idkpt.c | 55 s6idkpt(SISLIntdat **pintdat,SISLIntpt **pintpt,SISLIntpt **rtpt,SISLIntpt **rfpt,int *jstat) in s6idkpt() argument
57 void s6idkpt(pintdat,pintpt,rtpt,rfpt,jstat) in s6idkpt()
59 SISLIntpt **pintpt;
116 if ((*pintpt) == SISL_NULL)
128 if ((*pintdat)->vpoint[ki] == (*pintpt))
131 if ((*pintdat)->vpoint[ki] == (*pintpt)->pcurve)
134 if ((*pintdat)->vpoint[ki]->pcurve == (*pintpt))
157 freeIntpt(*pintpt);
158 (*pintpt) = SISL_NULL;
|
| H A D | sh1779.c | 57 SISLIntdat ** rintdat, SISLIntpt * pintpt, in sh1779() argument
61 sh1779 (po1, po2, aepsge, rintdat, pintpt, jnewpt, jstat) in sh1779()
66 SISLIntpt *pintpt;
156 if (sh6ishelp (pintpt))
208 pintpt, &ret_val, &ret_norm, aepsge, &kstat);
218 pintpt, &ret_val, &ret_norm, aepsge, &kstat);
246 sh6getnhbrs (pintpt, &qpt1, &qpt2, &kstat);
346 sh6getnhbrs (pintpt, &qpt1, &qpt2, &kstat);
456 sh6settop (uintpt[ki], -1, *(pintpt->left_obj_1), *(pintpt->right_obj_1),
457 *(pintpt->left_obj_2), *(pintpt->right_obj_2), &kstat);
[all …]
|
| H A D | sh1781_at.c | 58 SISLIntpt * pintpt, in sh1781_at() argument
62 sh1781_at (po1, po2, pintpt, jstat) in sh1781_at()
65 SISLIntpt *pintpt;
106 double *sptpar = pintpt->epar;/* Pointer to parameter array of int.pt. */
113 if (sh6ishelp (pintpt))
137 sh6gettop (pintpt, -1, lleft, lright, lleft + 1, lright + 1, &kstat);
163 sh6settop (pintpt, -1, lleft[0], lright[0], lleft[1], lright[1], &kstat);
|
| H A D | sh1780_at.c | 57 SISLIntpt * pintpt, int *jstat) in sh1780_at() argument
60 sh1780_at (po1, po2, pintpt, jstat) in sh1780_at()
63 SISLIntpt *pintpt;
107 double *sptpar = pintpt->epar;/* Parameter array of int.pt. */
111 if (sh6ishelp (pintpt))
129 sh6gettop (pintpt, -1, lleft, lright, lleft + 1, lright + 1, &kstat);
151 sh6settop (pintpt, -1, lleft[0], lright[0], lleft[1], lright[1], &kstat);
|
| H A D | sh1780.c | 56 SISLIntdat ** rintdat, SISLIntpt * pintpt, int *jnewpt, int *jstat) in sh1780() argument
59 sh1780 (po1, po2, aepsge, rintdat, pintpt, jnewpt, jstat) in sh1780()
64 SISLIntpt *pintpt;
138 double *sptpar = pintpt->epar;/* Parameter array of int.pt. */
143 if (sh6ishelp (pintpt))
168 sh6gettop (pintpt, -1, lleft, lright, lleft + 1, lright + 1, &kstat);
171 sh6getgeom (po1, 1, pintpt, &ret_val, &ret_norm, aepsge, &kstat);
179 sh6getgeom (po2, 2, pintpt, &ret_val, &ret_norm, aepsge, &kstat);
398 sh6settop (uintpt[ki], -1, *(pintpt->left_obj_1), *(pintpt->right_obj_1),
399 *(pintpt->left_obj_2), *(pintpt->right_obj_2), &kstat);
[all …]
|
| H A D | sh1779_at.c | 56 sh1779_at (SISLObject * po1, SISLObject * po2, SISLIntpt * pintpt, in sh1779_at() argument
60 sh1779_at (po1, po2, pintpt, jstat) in sh1779_at()
63 SISLIntpt *pintpt;
109 double *sptpar = pintpt->epar;/* Pointer to parameter values of int.pt. */
116 if (sh6ishelp (pintpt))
157 sh6gettop (pintpt, -1, lleft, lright, lleft + 1, lright + 1, &kstat);
168 sh6settop (pintpt, -1, lleft[0], lright[0], lleft[1], lright[1], &kstat);
|
| H A D | sh1781.c | 57 SISLIntdat ** rintdat, SISLIntpt * pintpt, int *jnewpt, in sh1781() argument
61 sh1781 (po1, po2, aepsge, rintdat, pintpt, jnewpt, jstat) in sh1781()
66 SISLIntpt *pintpt;
130 double *sptpar = pintpt->epar;/* Pointer to parameter array of int.pt. */
140 if (sh6ishelp (pintpt))
164 sh6gettop (pintpt, -1, lleft, lright, lleft + 1, lright + 1, &kstat);
192 pintpt, &ret_val, &ret_norm, aepsge, &kstat);
201 pintpt, &ret_val, &ret_norm, aepsge, &kstat);
403 sh6settop (pintpt, -1, lleft[0], lright[0], lleft[1], lright[1], &kstat);
407 sh6tomain (pintpt, &kstat);
[all …]
|
| H A D | sh1787.c | 58 SISLIntdat ** rintdat, SISLIntpt * pintpt, int *jnewpt, in sh1787() argument
62 sh1787 (po1, po2, aepsge, rintdat, pintpt, jnewpt, jstat) in sh1787()
67 SISLIntpt *pintpt;
158 sh6gettop (pintpt, -1, lleft, lright, lleft + 1, lright + 1, &kstat);
186 pintpt, &ret_val, &ret_norm, aepsge, &kstat);
197 pintpt, &ret_val, &ret_norm, aepsge, &kstat);
278 sh6settop (pintpt, -1, lleft[0], lright[0], lleft[1], lright[1], &kstat);
|
| H A D | sh1786.c | 57 SISLIntdat ** rintdat, SISLIntpt * pintpt, int *jnewpt, in sh1786() argument
61 sh1786 (po1, po2, aepsge, rintdat, pintpt, jnewpt, jstat) in sh1786()
66 SISLIntpt *pintpt;
126 double *sptpar = pintpt->epar;/* Pointer to parameter array of int.pt. */
140 if (sh6ishelp (pintpt))
170 pintpt, &ret_val, &ret_norm, aepsge, &kstat);
180 pintpt, &ret_val, &ret_norm, aepsge, &kstat);
344 sh6idcon (rintdat, &uintpt[ki], &pintpt, &kstat);
|
| H A D | sh_1d_div.c | 476 SISLIntpt **pintpt, int itest, double aepsge, int *jstat) in sh_1d_div_sh9idnpt() argument
479 sh_1d_div_sh9idnpt(surf,point,pintdat,pintpt,itest, aepsge, jstat) in sh_1d_div_sh9idnpt()
483 SISLIntpt **pintpt;
552 if ((*pintdat)->vpoint[ki] == (*pintpt))
564 s6identify(surf,(*pintpt)->epar,
570 freeIntpt(*pintpt);
571 (*pintpt) = (*pintdat)->vpoint[ki];
592 (*pintdat)->vpoint[ki] = (*pintpt);
|
| H A D | sh1762.c | 1742 sh1762_is_taboo(SISLSurf *psurf1, SISLSurf *psurf2, SISLIntpt *pintpt, in sh1762_is_taboo() argument
1746 sh1762_is_taboo(psurf1, psurf2 ,pintpt, idir, jstat) in sh1762_is_taboo()
1749 SISLIntpt *pintpt;
1814 s1421(psurf1, 1, &pintpt->epar[0], &ilfs, &ilft, derivs1, norm, &kstat);
1818 s1421(psurf2, 1, &pintpt->epar[2], &ilfs, &ilft, derivs2, norm, jstat);
1854 s1421(psurf1, 1, &pintpt->epar[0], &ilfs, &ilft, derivs1, norm, &kstat);
1902 sh1762_is_taboo2(SISLObject *po1, SISLObject *po2, SISLIntpt *pintpt, in sh1762_is_taboo2() argument
1906 sh1762_is_taboo2(po1, po2, pintpt, idir, pintdat, ipar) in sh1762_is_taboo2()
1909 SISLIntpt *pintpt;
|