Project

General

Profile

Revision 65f71d05 test/src/kind_fmcad08/misc/durationThm_3.lus

View differences:

test/src/kind_fmcad08/misc/durationThm_3.lus
18 18
-- ((p -k-> q and ([[q]] => length <= m))  => ([[p]] => length <= k+m)
19 19

  
20 20
-- Not provable in luke-*
21
--@ ensures OK;
21 22
node top (k0, m0: int; p, q : bool) returns (OK: bool);
22 23
var k,m: int;
23 24
    env : bool;

Also available in: Unified diff