VMANY
vundkind = VMANY;
vundkind = VMANY;
vundkind = VMANY;
vundkind = VMANY, cursor = 0;
vundkind = VMANY;
vundkind = VMANY;
forbid (vundkind == VMANY && undkind==UNDALL);
case VMANY:
vundkind = VMANY;
vundkind = VMANY;
vundkind = VMANY;