summaryrefslogtreecommitdiff
path: root/sys/src/libsat/satmore.c
blob: 7a316f1ab645992f8481840855c84dada2c6a55a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
#include <u.h>
#include <libc.h>
#include <sat.h>
#include "impl.h"

int
satmore(SATSolve *s)
{
	int *a, i, n;

	if(s == nil) return 1;
	s->scrap = a = satrealloc(s, nil, s->nvar * sizeof(int));
	n = 0;
	for(i = 0; i < s->nvar; i++)
		switch(s->lit[2*i].val){
		case 0: a[n++] = i+1; break;
		case 1: a[n++] = -(i+1); break;
		}
	if(n > 0)
		satadd1(s, a, n);
	free(a);
	s->scrap = nil;
	return satsolve(s);
}