main.c
Go to the documentation of this file.
1 #include "arith.h"
2 
3 main()
4 {
5  static double c[15][6]={
6  { 0.000000,0.000000,1.000000,-1.500000,-1.000000,0.000000},
7  { -1.000000,0.000000,0.000000,0.000000,5.000000,1.500000},
8  { 0.000000,-1.000000,0.000000,-5.000000,0.000000,-1.000000},
9  { 0.000000,0.000000,1.000000,1.500000,-1.000000,0.000000},
10  { 1.000000,0.000000,0.000000,0.000000,-5.000000,-1.500000},
11  { 0.000000,-1.000000,0.000000,-5.000000,0.000000,1.000000},
12  { 0.000000,0.000000,1.000000,1.500000,1.000000,0.000000},
13  { 1.000000,0.000000,0.000000,0.000000,-2.000000,1.500000},
14  { 0.000000,1.000000,0.000000,2.000000,0.000000,-1.000000},
15  { -1.000000,0.000000,0.000000,0.000000,2.000000,-1.500000},
16  { 0.000000,1.000000,0.000000,2.000000,0.000000,1.000000},
17  { -1.000000,0.000000,0.000000,0.000000,2.000000,1.500000},
18  { 0.000000,-1.000000,0.000000,-2.000000,0.000000,-1.000000},
19  { 1.000000,0.000000,0.000000,0.000000,-2.000000,-1.500000},
20  { 0.000000,-1.000000,0.000000,-2.000000,0.000000,1.000000}};
21 
22  MATRIX x;
23  int n,p,job,info;
24 
25  int i,j,en;
26  REAL w[MAXRANK][MAXEDGE];
27 
28  for(i=0; i<15; i++)
29  for(j=0; j<6; j++)
30  x[i][j]=c[i][j];
31 
32  n=15;
33  p=6;
34  job=11;
35 
36  en=cone(x,n,p,w);
37 
38  printf("cone edge\n");
39  for(i=0; i<en; i++){
40  printf("w[%d]= ",i);
41  for(j=0; j<MAXRANK; j++){
42  printf("%f ",w[j][i]);
43  }
44  printf("\n");
45  }
46 
47 }
GLfloat n[6][3]
Definition: cube.c:15
double REAL
Definition: arith.h:25
#define MAXEDGE
Definition: arith.h:14
cone(MATRIX x, int n, int p, w)
Definition: cone.c:3
#define MAXRANK
Definition: arith.h:13
main()
Definition: main.c:3
VECTOR MATRIX[MAX]
Definition: arith.h:27


euslisp
Author(s): Toshihiro Matsui
autogenerated on Fri Feb 21 2020 03:20:54