Adds Tabellion's old properties.

1 files changed, 64 insertions, 0 deletions

diff --git a/property/CNE_05100.pro b/property/CNE_05100.pro
new file mode 100644
index 0000000..c8184b3
--- /dev/null
+++ b/property/CNE_05100.pro
@@ -0,0 +1,64 @@
+(seek
+   (
+      (wfm waveform)
+   )
+   (exists ps process
+      (and
+         (is_explicit_process ps)
+         (forall sl1 waveform
+            (and
+               (CTL_verifies ps
+                  (implies
+                     (EF (expr_writes sl1))
+                     (AF (expr_writes sl1))
+                  )
+               )
+               (implies
+                  (exists target waveform
+                     (CTL_verifies ps
+                        (EF
+                           (and
+                              (is_read_element _ sl1)
+                              (not
+                                 (and
+                                    (expr_writes target)
+                                    (AX
+                                       (AF
+                                          (expr_writes target)
+                                       )
+                                    )
+                                 )
+                              )
+                           )
+                        )
+                     )
+                  )
+                  (is_in_sensitivity_list sl1 ps)
+               )
+            )
+         )
+         (CTL_verifies ps
+            (AF
+               (and
+                  (or
+                     (kind "case")
+                     (kind "if")
+                  )
+                  (does_not_reach_parent_before
+                     (and
+                        (expr_writes wfm)
+                        (AX
+                           (not
+                              (EF
+                                 (expr_writes wfm)
+                              )
+                           )
+                        )
+                     )
+                  )
+               )
+            )
+         )
+      )
+   )
+)