NUMEV
struct specialev spev[NUMEV];
extern struct specialev spev[NUMEV];
for (i = 0; i < NUMEV; i++) {
v1 = vwd % (NUMEV + 1) - 1;
vwd /= (NUMEV + 1);
v1 += NUMEV + 1;
for (i = 0; i < NUMEV; i++) {
i = NUMEV + 1;
if (i > NUMEV)
for (i = 0; i < NUMEV; i++) {
i = NUMEV + 1;
i = NUMEV + 1;
if (i > NUMEV) {
val += (NUMEV + 1) * var;