Nek5000
SEM for Incompressible NS
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Macros Modules Pages
poly_test.c
Go to the documentation of this file.
1 #include <stdio.h>
2 #include <float.h>
3 #include "c99.h"
4 #include "name.h"
5 #include "types.h"
6 #include "poly.h"
7 
8 int main()
9 {
10  int i, n=13;
11  double z[50], w[50];
12  lobatto_quad(z,w,n);
13  /*
14  for(i=0;i<n;++i)
15  printf("%+20.*Lg\t%+20.*Lg\n",LDBL_DIG+1,(long double)z[i],
16  LDBL_DIG+1,(long double)w[i]);
17  */
18  for(i=0;i<n;++i)
19  printf("%+20.*g\t%+20.*g\n",DBL_DIG+1,z[i],
20  DBL_DIG+1,w[i]);
21  return 0;
22 }
23 
#define lobatto_quad
Definition: poly.c:16
n
Definition: xxt_test.m:73
int main()
Definition: poly_test.c:8
for i
Definition: xxt_test.m:74
establishes some macros to establish naming conventions
static double z[NR *NS *NT *N]
Definition: obbox_test.c:31