version 1.24, 2020/10/06 06:31:19 |
version 1.25, 2021/01/11 08:37:44 |
|
|
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* |
* |
* $OpenXM: OpenXM_contrib2/asir2018/engine/dist.c,v 1.23 2020/06/19 10:18:13 noro Exp $ |
* $OpenXM: OpenXM_contrib2/asir2018/engine/dist.c,v 1.24 2020/10/06 06:31:19 noro Exp $ |
*/ |
*/ |
#include "ca.h" |
#include "ca.h" |
|
|
Line 581 void _adddl(int n,DL d1,DL d2,DL d3) |
|
Line 581 void _adddl(int n,DL d1,DL d2,DL d3) |
|
for ( i = 0; i < n; i++ ) |
for ( i = 0; i < n; i++ ) |
d3->d[i] = d1->d[i]+d2->d[i]; |
d3->d[i] = d1->d[i]+d2->d[i]; |
} |
} |
|
|
|
void _subdl(int n,DL d1,DL d2,DL d3) |
|
{ |
|
int i; |
|
|
|
d3->td = d1->td-d2->td; |
|
for ( i = 0; i < n; i++ ) |
|
d3->d[i] = d1->d[i]-d2->d[i]; |
|
} |
|
|
|
|
void _addtodl(int n,DL d1,DL d2) |
void _addtodl(int n,DL d1,DL d2) |
{ |
{ |