summaryrefslogtreecommitdiff
blob: 6e2beffd5cb07bca10a55a1482bac7b0ec191c0a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
(tag_existing
   (
      (x_r waveform CNE_01900_HAS_BAD_NAME)
   )
   (and
      (not (string_matches [identifier [is_waveform_of x_r]] ".*_r[0-9]*"))
      (exists x waveform
         (and
            (not (eq x x_r))
            (exists ps1 process
               (and
                  (is_accessed_by x_r ps1)
                  (is_accessed_by x ps1)
                  (is_explicit_process ps1)
                  (exists clk1 waveform
                     (and
                        (is_in_sensitivity_list clk1 ps1)
                        (not (eq clk1 x_r))
                        (not (eq clk1 x))
                        (or
                           (CTL_verifies ps1
                              (AF
                                 (and
                                    (kind "if")
                                    (is_read_structure "(??)")
                                    (or
                                       (is_read_element "0" "falling_edge")
                                       (is_read_element "0" "rising_edge")
                                    )
                                    (is_read_element "1" clk1)
                                    (EX
                                       (and
                                          (has_option "cond_was_true")
                                          (does_not_reach_parent_before
                                             (and
                                                (expr_writes x_r)
                                                (is_read_structure "?")
                                                (is_read_element "0" x)
                                                (AX
                                                   (not
                                                      (EF
                                                         (expr_writes x_r)
                                                      )
                                                   )
                                                )
                                             )
                                          )
                                       )
                                    )
                                 )
                              )
                           )
                           (exists rst1 waveform
                              (and
                                 (is_in_sensitivity_list rst1 ps1)
                                 (not (eq rst1 x_r))
                                 (not (eq rst1 x))
                                 (not (eq rst1 clk1))
                                 (CTL_verifies ps1
                                    (AF
                                       (and
                                          (kind "if")
                                          (is_read_structure "(???)")
                                          (is_read_element "0" "=")
                                          (is_read_element _ rst1)
                                          (EX
                                             (and
                                                (not (has_option "cond_was_true"))
                                                (kind "if")
                                                (is_read_structure "(??)")
                                                (or
                                                   (is_read_element "0" "falling_edge")
                                                   (is_read_element "0" "rising_edge")
                                                )
                                                (is_read_element "1" clk1)
                                                (EX
                                                   (and
                                                      (has_option "cond_was_true")
                                                      (does_not_reach_parent_before
                                                         (and
                                                            (expr_writes x_r)
                                                            (is_read_structure "?")
                                                            (is_read_element "0" x)
                                                            (AX
                                                               (not
                                                                  (EF
                                                                     (expr_writes x_r)
                                                                  )
                                                               )
                                                            )
                                                         )
                                                      )
                                                   )
                                                )
                                             )
                                          )
                                       )
                                    )
                                 )
                              )
                           )
                        )
                     )
                  )
               )
            )
         )
      )
   )
)