aboutsummaryrefslogtreecommitdiff
path: root/lib/SATS/init.sats
diff options
context:
space:
mode:
Diffstat (limited to 'lib/SATS/init.sats')
-rw-r--r--lib/SATS/init.sats4
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/SATS/init.sats b/lib/SATS/init.sats
new file mode 100644
index 0000000..83b5e8d
--- /dev/null
+++ b/lib/SATS/init.sats
@@ -0,0 +1,4 @@
+viewtypedef enablable (vt:viewt@ype) =
+ [enabled: bool] @{ enabled = bool enabled, obj = opt (vt, enabled) }
+
+fun {vt:viewt@ype} empty (v : opt(vt,false)): enablable vt