Add imap type, which is like map but may have have infinite size

1 files changed, 8 insertions, 0 deletions

diff --git a/Test/dafny0/IMaps2.dfy b/Test/dafny0/IMaps2.dfy
new file mode 100644
index 00000000..a1b155ac
--- /dev/null
+++ b/Test/dafny0/IMaps2.dfy
@@ -0,0 +1,8 @@
+// RUN: %dafny /compile:0 /print:"%t.print" /dprint:"%t.dprint" "%s" > "%t"

+// RUN: %diff "%s.expect" "%t"

+

+function domain<U, V>(m: imap<U,V>): set<U>

+   ensures forall i :: i in domain(m) <==> i in m;

+{

+   set s | s in m // UNSAFE, m may have infinite domain

+}