| 92 |
|
register int c; |
| 93 |
|
register VERTEX *lastv = NULL; |
| 94 |
|
|
| 95 |
+ |
printf("# T-mesh from: %s\n", fname); |
| 96 |
+ |
|
| 97 |
|
picfile[0] = '\0'; |
| 98 |
|
strcpy(matname, "void"); |
| 99 |
|
|
| 176 |
|
printf("4 dx dy dz %s\n", CALNAME); |
| 177 |
|
printf("0\n21\n"); |
| 178 |
|
put_baryc(bvecs); |
| 179 |
< |
printf("\t%f %f %f\n", v1->nor[0], v1->nor[1], v1->nor[2]); |
| 180 |
< |
printf("\t%f %f %f\n", v2->nor[0], v2->nor[1], v2->nor[2]); |
| 181 |
< |
printf("\t%f %f %f\n", v3->nor[0], v3->nor[1], v3->nor[2]); |
| 179 |
> |
printf("\t%14.12g %14.12g %14.12g\n", |
| 180 |
> |
v1->nor[0], v2->nor[0], v3->nor[0]); |
| 181 |
> |
printf("\t%14.12g %14.12g %14.12g\n", |
| 182 |
> |
v1->nor[1], v2->nor[1], v3->nor[1]); |
| 183 |
> |
printf("\t%14.12g %14.12g %14.12g\n", |
| 184 |
> |
v1->nor[2], v2->nor[2], v3->nor[2]); |
| 185 |
|
} |
| 186 |
|
/* put out pattern (if any) */ |
| 187 |
|
if (*pn && (v1->flags & v2->flags & v3->flags & V_HASINDX)) { |
| 190 |
|
printf("7 noneg noneg noneg %s %s u v\n", pn, CALNAME); |
| 191 |
|
printf("0\n18\n"); |
| 192 |
|
put_baryc(bvecs); |
| 193 |
< |
printf("\t%f %f\n", v1->ndx[0], v1->ndx[1]); |
| 194 |
< |
printf("\t%f %f\n", v2->ndx[0], v2->ndx[1]); |
| 190 |
< |
printf("\t%f %f\n", v3->ndx[0], v3->ndx[1]); |
| 193 |
> |
printf("\t%f %f %f\n", v1->ndx[0], v2->ndx[0], v3->ndx[0]); |
| 194 |
> |
printf("\t%f %f %f\n", v1->ndx[1], v2->ndx[1], v3->ndx[1]); |
| 195 |
|
} |
| 196 |
|
/* put out triangle */ |
| 197 |
|
printf("\n%s polygon t%d\n", mod, ++ntri); |