summaryrefslogtreecommitdiff
path: root/test/regress/regress1/quantifiers/recfact.cvc
blob: b2ea3304f94b88a9a11ef0f6e0a481fc0a1f24c9 (plain) 
1
2
3
4
5
6
7

% EXPECT: unsat
OPTION "fmf-fun";
x : INT;
REC-FUN fact : (INT) -> INT = LAMBDA (x : INT) : IF (x > 0) THEN x * fact (x - 1) ELSE 1 ENDIF;
ASSERT fact(0) = 2;
ASSERT x = fact(3);
CHECKSAT;
generated by cgit on debian on lair
contact matthew@masot.net with questions or feedback