Mercurial Mercurial > hg > afl-material / annotate
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Attic/mand.prs
author Christian Urban <christian.urban@kcl.ac.uk>
Mon, 30 Aug 2021 14:18:08 +0100
changeset 826 e340b32c30a2
parent 710 ba35058db273
permissions -rw-r--r--
updated
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
710
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
     1
 
val mand = List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
     2
 
  ArrayDef("mem", 30000),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
     3
 
  Assign("ptr", Num(15000)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
     4
 
  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(13))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
     5
 
  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
     6
 
    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
     7
 
    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
     8
 
      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
     9
 
      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    10
 
      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    11
 
      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    12
 
      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    13
 
      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    14
 
      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    15
 
      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    16
 
      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    17
 
      Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    18
 
      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    19
 
    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    20
 
  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    21
 
  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    22
 
  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    23
 
  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    24
 
  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    25
 
  Assign("ptr", Aop("+", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    26
 
  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(15))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    27
 
  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    28
 
    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    29
 
    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    30
 
      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    31
 
        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    32
 
        List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    33
 
      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    34
 
      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    35
 
      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    36
 
        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    37
 
        List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    38
 
      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    39
 
      Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    40
 
      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    41
 
      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    42
 
    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    43
 
  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    44
 
  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    45
 
  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    46
 
    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    47
 
    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    48
 
      Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    49
 
      AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    50
 
      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    51
 
      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    52
 
    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    53
 
  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    54
 
  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    55
 
  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    56
 
    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    57
 
    List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    58
 
  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    59
 
  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    60
 
  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    61
 
  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    62
 
  Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    63
 
  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    64
 
  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    65
 
    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    66
 
    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    67
 
      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    68
 
      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    69
 
        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    70
 
        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    71
 
          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    72
 
          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    73
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    74
 
          Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    75
 
          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    76
 
        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    77
 
      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    78
 
      Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    79
 
      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    80
 
    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    81
 
  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    82
 
  Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    83
 
  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    84
 
  Assign("ptr", Aop("+", Var("ptr"), Num(26))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    85
 
  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    86
 
  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    87
 
  Assign("ptr", Aop("-", Var("ptr"), Num(17))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    88
 
  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    89
 
    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    90
 
    List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    91
 
  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    92
 
  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    93
 
  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    94
 
  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    95
 
  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    96
 
    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    97
 
    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    98
 
      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
    99
 
      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   100
 
        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   101
 
        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   102
 
          Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   103
 
          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   104
 
          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   105
 
          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   106
 
        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   107
 
      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   108
 
      Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   109
 
      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   110
 
        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   111
 
        List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   112
 
      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   113
 
      Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   114
 
      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   115
 
      AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   116
 
      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   117
 
      Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   118
 
      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   119
 
      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   120
 
        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   121
 
        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   122
 
          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   123
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   124
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   125
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   126
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   127
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   128
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   129
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   130
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   131
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   132
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   133
 
          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   134
 
          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   135
 
        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   136
 
      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   137
 
      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   138
 
      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   139
 
      Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   140
 
      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   141
 
      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   142
 
        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   143
 
        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   144
 
          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   145
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   146
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   147
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   148
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   149
 
              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   150
 
              Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   151
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   152
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   153
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   154
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   155
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   156
 
          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   157
 
          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   158
 
        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   159
 
      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   160
 
      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   161
 
      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   162
 
      Assign("ptr", Aop("-", Var("ptr"), Num(16))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   163
 
      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   164
 
        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   165
 
        List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   166
 
      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   167
 
      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   168
 
      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   169
 
        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   170
 
        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   171
 
          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   172
 
          Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   173
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   174
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   175
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   176
 
              Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   177
 
              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   178
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   179
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   180
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   181
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   182
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   183
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   184
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   185
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   186
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   187
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   188
 
              Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   189
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   190
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   191
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   192
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   193
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   194
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   195
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   196
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   197
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   198
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   199
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   200
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   201
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   202
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   203
 
              Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   204
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   205
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   206
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   207
 
          Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   208
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   209
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   210
 
            List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   211
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   212
 
          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   213
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   214
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   215
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   216
 
              Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   217
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   218
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   219
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   220
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   221
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   222
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   223
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   224
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   225
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   226
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   227
 
              Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   228
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   229
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   230
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   231
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   232
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   233
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   234
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   235
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   236
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   237
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   238
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   239
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   240
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   241
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   242
 
              Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   243
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   244
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   245
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   246
 
          Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   247
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   248
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   249
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   250
 
              Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   251
 
              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   252
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   253
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   254
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   255
 
          Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   256
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   257
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   258
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   259
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   260
 
              Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   261
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   262
 
              Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   263
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   264
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   265
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   266
 
          Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   267
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   268
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   269
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   270
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   271
 
              Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   272
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   273
 
              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   274
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   275
 
              Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   276
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   277
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   278
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   279
 
          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   280
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(15))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   281
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   282
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   283
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   284
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   285
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   286
 
                List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   287
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   288
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   289
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   290
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   291
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   292
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   293
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   294
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   295
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   296
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   297
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   298
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   299
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   300
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   301
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   302
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   303
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   304
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   305
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   306
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   307
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   308
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   309
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   310
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   311
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   312
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   313
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   314
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   315
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   316
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   317
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   318
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   319
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   320
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   321
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   322
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   323
 
              Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   324
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   325
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   326
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   327
 
          Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   328
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   329
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   330
 
            List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   331
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   332
 
          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   333
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   334
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   335
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   336
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   337
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   338
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   339
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   340
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   341
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   342
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   343
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   344
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   345
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   346
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   347
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   348
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   349
 
              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   350
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   351
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   352
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   353
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   354
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   355
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   356
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   357
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   358
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   359
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   360
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   361
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   362
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   363
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   364
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   365
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   366
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   367
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   368
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   369
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   370
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   371
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   372
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   373
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   374
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   375
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   376
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   377
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   378
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   379
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   380
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   381
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   382
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   383
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   384
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   385
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   386
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   387
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   388
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   389
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   390
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   391
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   392
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   393
 
                    List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   394
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   395
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   396
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   397
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   398
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   399
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   400
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   401
 
                List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   402
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   403
 
              Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   404
 
              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   405
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   406
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   407
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   408
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   409
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   410
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   411
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   412
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   413
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   414
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   415
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   416
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   417
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   418
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   419
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   420
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   421
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   422
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   423
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   424
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   425
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   426
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   427
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   428
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   429
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   430
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   431
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   432
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   433
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   434
 
              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   435
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   436
 
              Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   437
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   438
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   439
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   440
 
          Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   441
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   442
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   443
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   444
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   445
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   446
 
              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   447
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   448
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   449
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   450
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   451
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   452
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   453
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   454
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   455
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   456
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   457
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   458
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   459
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   460
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   461
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   462
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   463
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   464
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   465
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   466
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   467
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   468
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   469
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   470
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   471
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   472
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   473
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   474
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   475
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   476
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   477
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   478
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   479
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   480
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   481
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   482
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   483
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   484
 
              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   485
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   486
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   487
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   488
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   489
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   490
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   491
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   492
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   493
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   494
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   495
 
              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   496
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   497
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   498
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   499
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   500
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   501
 
          Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   502
 
          Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   503
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   504
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   505
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   506
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   507
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   508
 
              Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   509
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   510
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   511
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   512
 
          Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   513
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   514
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   515
 
            List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   516
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   517
 
          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   518
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   519
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   520
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   521
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   522
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   523
 
              Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   524
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   525
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   526
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   527
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   528
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   529
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   530
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   531
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   532
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   533
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   534
 
              Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   535
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   536
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   537
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   538
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   539
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   540
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   541
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   542
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   543
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   544
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   545
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   546
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   547
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   548
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   549
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   550
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   551
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   552
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   553
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   554
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   555
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   556
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   557
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   558
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   559
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   560
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   561
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   562
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   563
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   564
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   565
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   566
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   567
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   568
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   569
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   570
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   571
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   572
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   573
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   574
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   575
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   576
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   577
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   578
 
                    List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   579
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   580
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   581
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   582
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   583
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   584
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   585
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   586
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   587
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   588
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   589
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   590
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   591
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   592
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   593
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   594
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   595
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   596
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   597
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   598
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   599
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   600
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   601
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   602
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   603
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   604
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   605
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   606
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   607
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   608
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   609
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   610
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   611
 
              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   612
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   613
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   614
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   615
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   616
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   617
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   618
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   619
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   620
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   621
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   622
 
              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   623
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   624
 
              Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   625
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   626
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   627
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   628
 
          Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   629
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   630
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   631
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   632
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   633
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   634
 
              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   635
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   636
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   637
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   638
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   639
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   640
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   641
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   642
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   643
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   644
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   645
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   646
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   647
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   648
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   649
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   650
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   651
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   652
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   653
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   654
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   655
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   656
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   657
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   658
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   659
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   660
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   661
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   662
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   663
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   664
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   665
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   666
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   667
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   668
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   669
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   670
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   671
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   672
 
              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   673
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   674
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   675
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   676
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   677
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   678
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   679
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   680
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   681
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   682
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   683
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   684
 
              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   685
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   686
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   687
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   688
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   689
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   690
 
          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   691
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   692
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   693
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   694
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   695
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   696
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   697
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   698
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   699
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(36))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   700
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   701
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(13))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   702
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(23))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   703
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   704
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   705
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   706
 
              Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   707
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   708
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   709
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   710
 
          Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   711
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   712
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   713
 
            List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   714
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   715
 
          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   716
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(15))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   717
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   718
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   719
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   720
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   721
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   722
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   723
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   724
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   725
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   726
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   727
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   728
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   729
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   730
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   731
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   732
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   733
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   734
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   735
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   736
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   737
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   738
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   739
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   740
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   741
 
          Assign("ptr", Aop("+", Var("ptr"), Num(21))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   742
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   743
 
          Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   744
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   745
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   746
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   747
 
              Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   748
 
              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   749
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   750
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   751
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   752
 
          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   753
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   754
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   755
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   756
 
              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   757
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   758
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   759
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   760
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   761
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   762
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   763
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   764
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   765
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   766
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   767
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   768
 
              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   769
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   770
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   771
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   772
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   773
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   774
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   775
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   776
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   777
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   778
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   779
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   780
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   781
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   782
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   783
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   784
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   785
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   786
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   787
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   788
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   789
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   790
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   791
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   792
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   793
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(13))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   794
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   795
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   796
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   797
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   798
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   799
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   800
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   801
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   802
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   803
 
                      AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   804
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   805
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   806
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   807
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   808
 
                        List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   809
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   810
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   811
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   812
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   813
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   814
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   815
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   816
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   817
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   818
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   819
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   820
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   821
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   822
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   823
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   824
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   825
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   826
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   827
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   828
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   829
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   830
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   831
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   832
 
              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   833
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   834
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   835
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   836
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   837
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   838
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   839
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   840
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   841
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   842
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   843
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   844
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   845
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   846
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   847
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   848
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   849
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   850
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   851
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   852
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   853
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   854
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   855
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   856
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   857
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   858
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(12))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   859
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   860
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   861
 
                        List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   862
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   863
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   864
 
                      AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   865
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   866
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   867
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   868
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   869
 
                        List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   870
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   871
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   872
 
                      AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   873
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   874
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   875
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   876
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   877
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   878
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   879
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   880
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   881
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   882
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   883
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   884
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   885
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   886
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   887
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   888
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   889
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   890
 
                    List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   891
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   892
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   893
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   894
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   895
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   896
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   897
 
              Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   898
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   899
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   900
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   901
 
          Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   902
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   903
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   904
 
            List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   905
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   906
 
          Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   907
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   908
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   909
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   910
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   911
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   912
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   913
 
              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   914
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   915
 
              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   916
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   917
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   918
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   919
 
          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   920
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(19))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   921
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   922
 
          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   923
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   924
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   925
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   926
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   927
 
              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   928
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   929
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   930
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   931
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   932
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   933
 
          Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   934
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   935
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   936
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   937
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   938
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   939
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   940
 
              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   941
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   942
 
              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   943
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   944
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   945
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   946
 
          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   947
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   948
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   949
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   950
 
              Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   951
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   952
 
              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   953
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   954
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   955
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   956
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   957
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   958
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   959
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   960
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   961
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   962
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   963
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   964
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   965
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   966
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   967
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   968
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   969
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   970
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   971
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   972
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   973
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   974
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   975
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   976
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   977
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   978
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   979
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   980
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   981
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   982
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   983
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   984
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   985
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   986
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   987
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   988
 
              Assign("ptr", Aop("+", Var("ptr"), Num(13))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   989
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   990
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   991
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   992
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   993
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   994
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   995
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   996
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   997
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   998
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
   999
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1000
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1001
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1002
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1003
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1004
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1005
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1006
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1007
 
              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1008
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1009
 
              Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1010
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1011
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1012
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1013
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1014
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1015
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1016
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1017
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1018
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1019
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1020
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1021
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1022
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1023
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1024
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1025
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1026
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1027
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1028
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1029
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1030
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1031
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1032
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1033
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1034
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1035
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1036
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1037
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1038
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1039
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1040
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1041
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1042
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1043
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1044
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1045
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1046
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1047
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1048
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1049
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1050
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1051
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1052
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1053
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1054
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1055
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1056
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1057
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1058
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1059
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1060
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1061
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1062
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1063
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1064
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1065
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1066
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1067
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1068
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1069
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1070
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1071
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1072
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(15))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1073
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1074
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1075
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1076
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1077
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1078
 
                    List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1079
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1080
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1081
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1082
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1083
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1084
 
                    List(AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1085
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1086
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1087
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1088
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1089
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1090
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1091
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1092
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1093
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1094
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1095
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1096
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1097
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1098
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1099
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1100
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1101
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1102
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1103
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1104
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1105
 
                    List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1106
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1107
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1108
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1109
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1110
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1111
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1112
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1113
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1114
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1115
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1116
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1117
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1118
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1119
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1120
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1121
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1122
 
              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1123
 
              Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1124
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1125
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1126
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1127
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1128
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1129
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1130
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1131
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1132
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1133
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1134
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1135
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1136
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1137
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1138
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1139
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1140
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1141
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1142
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1143
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1144
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1145
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1146
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1147
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1148
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1149
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1150
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1151
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1152
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1153
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1154
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1155
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1156
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1157
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1158
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1159
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1160
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1161
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1162
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1163
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1164
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1165
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1166
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1167
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1168
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1169
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1170
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1171
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1172
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1173
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1174
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1175
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1176
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1177
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1178
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1179
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1180
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1181
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1182
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1183
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1184
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1185
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1186
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1187
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1188
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1189
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1190
 
                        List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1191
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1192
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1193
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1194
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1195
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1196
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1197
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1198
 
                    List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1199
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1200
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1201
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1202
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1203
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1204
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1205
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1206
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1207
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1208
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1209
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1210
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1211
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1212
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1213
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1214
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1215
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1216
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1217
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1218
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1219
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1220
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1221
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1222
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1223
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1224
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1225
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1226
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1227
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1228
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1229
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1230
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1231
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1232
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1233
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1234
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1235
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1236
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1237
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1238
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1239
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1240
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1241
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1242
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1243
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1244
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1245
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1246
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1247
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1248
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1249
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1250
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1251
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1252
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1253
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1254
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1255
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1256
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1257
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1258
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1259
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1260
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1261
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1262
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1263
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1264
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1265
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1266
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1267
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1268
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1269
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1270
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1271
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1272
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1273
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1274
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1275
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1276
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1277
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1278
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1279
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1280
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1281
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1282
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1283
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1284
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1285
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1286
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1287
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1288
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1289
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1290
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1291
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1292
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1293
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1294
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1295
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1296
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1297
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1298
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1299
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1300
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1301
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1302
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1303
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1304
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1305
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1306
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1307
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1308
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1309
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1310
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1311
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1312
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1313
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1314
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1315
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1316
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1317
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1318
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1319
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1320
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1321
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1322
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1323
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1324
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1325
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1326
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1327
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1328
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1329
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1330
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1331
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1332
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1333
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1334
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1335
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1336
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1337
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1338
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1339
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1340
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1341
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1342
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1343
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1344
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1345
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1346
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1347
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1348
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1349
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1350
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1351
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1352
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1353
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1354
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1355
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1356
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1357
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1358
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1359
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1360
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1361
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1362
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1363
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1364
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1365
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1366
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1367
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1368
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1369
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1370
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1371
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1372
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1373
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1374
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1375
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1376
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1377
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1378
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1379
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1380
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1381
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1382
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1383
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1384
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1385
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1386
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1387
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1388
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1389
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1390
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1391
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1392
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1393
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1394
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1395
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1396
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1397
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1398
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1399
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1400
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1401
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1402
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1403
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1404
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1405
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1406
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1407
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1408
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1409
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1410
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1411
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1412
 
                        List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1413
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1414
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1415
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1416
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1417
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1418
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1419
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1420
 
                    List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1421
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1422
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1423
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1424
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1425
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1426
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1427
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1428
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1429
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1430
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1431
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1432
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1433
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1434
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1435
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1436
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1437
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1438
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1439
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1440
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1441
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1442
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1443
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1444
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1445
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1446
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1447
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1448
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1449
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1450
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1451
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1452
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1453
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1454
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1455
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1456
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1457
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1458
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1459
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1460
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1461
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1462
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1463
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1464
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1465
 
                    List(AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1466
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1467
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1468
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1469
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1470
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1471
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1472
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1473
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1474
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1475
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1476
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1477
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1478
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1479
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1480
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1481
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1482
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1483
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1484
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1485
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1486
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1487
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1488
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1489
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1490
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1491
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1492
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1493
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1494
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1495
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1496
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1497
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1498
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1499
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1500
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1501
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1502
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1503
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1504
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1505
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1506
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1507
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1508
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1509
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1510
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1511
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1512
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1513
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1514
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1515
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1516
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1517
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1518
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1519
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1520
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1521
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1522
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1523
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1524
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1525
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1526
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1527
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1528
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1529
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1530
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1531
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(36))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1532
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1533
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(36))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1534
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1535
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1536
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1537
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1538
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1539
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1540
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1541
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1542
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1543
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1544
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1545
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1546
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1547
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1548
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1549
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1550
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1551
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1552
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1553
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1554
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1555
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(36))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1556
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1557
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1558
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(35))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1559
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1560
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1561
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1562
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1563
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1564
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1565
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1566
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1567
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1568
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1569
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1570
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1571
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1572
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1573
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1574
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1575
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1576
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1577
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1578
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1579
 
                    List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1580
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1581
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1582
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1583
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1584
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1585
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1586
 
                    List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1587
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1588
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1589
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1590
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1591
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1592
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1593
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1594
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1595
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1596
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1597
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1598
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1599
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1600
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1601
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1602
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1603
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1604
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1605
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1606
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1607
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1608
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1609
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1610
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1611
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1612
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1613
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1614
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1615
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1616
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1617
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1618
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1619
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1620
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1621
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1622
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1623
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1624
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1625
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1626
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1627
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1628
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1629
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1630
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1631
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1632
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1633
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1634
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1635
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1636
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1637
 
                    List(AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1638
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1639
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1640
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1641
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1642
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1643
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1644
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1645
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1646
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1647
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1648
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1649
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1650
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1651
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1652
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1653
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1654
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1655
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1656
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1657
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1658
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1659
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1660
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1661
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1662
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1663
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1664
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1665
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1666
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1667
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1668
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1669
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1670
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1671
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1672
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1673
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1674
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1675
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1676
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1677
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1678
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1679
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1680
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1681
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1682
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1683
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1684
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1685
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1686
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1687
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1688
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1689
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1690
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1691
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1692
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1693
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1694
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1695
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1696
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1697
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1698
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1699
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1700
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1701
 
              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1702
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1703
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1704
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1705
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1706
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1707
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1708
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1709
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1710
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1711
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1712
 
              Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1713
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1714
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1715
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1716
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1717
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1718
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1719
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1720
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1721
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1722
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1723
 
              Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1724
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1725
 
              Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1726
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1727
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1728
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1729
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1730
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1731
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1732
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1733
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1734
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1735
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1736
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1737
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1738
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1739
 
              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1740
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1741
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1742
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1743
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1744
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1745
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1746
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1747
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1748
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1749
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1750
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1751
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1752
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1753
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1754
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1755
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1756
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1757
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1758
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1759
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1760
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1761
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1762
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1763
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1764
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1765
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1766
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1767
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1768
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1769
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1770
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1771
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1772
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1773
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1774
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1775
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1776
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1777
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1778
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1779
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1780
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1781
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1782
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1783
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1784
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1785
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1786
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1787
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(12))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1788
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1789
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1790
 
                                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1791
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1792
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1793
 
                              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1794
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1795
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1796
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1797
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1798
 
                                List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1799
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1800
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1801
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1802
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1803
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1804
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1805
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1806
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1807
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1808
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1809
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1810
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1811
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1812
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1813
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1814
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1815
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1816
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1817
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1818
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1819
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1820
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1821
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1822
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1823
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1824
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1825
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1826
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1827
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1828
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1829
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1830
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1831
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1832
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1833
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1834
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1835
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1836
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1837
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1838
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1839
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1840
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1841
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1842
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1843
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1844
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1845
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1846
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1847
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1848
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1849
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1850
 
                                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1851
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1852
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1853
 
                                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1854
 
                                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1855
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1856
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1857
 
                              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1858
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1859
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1860
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1861
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1862
 
                                List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1863
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1864
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1865
 
                              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1866
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1867
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1868
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1869
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1870
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1871
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1872
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1873
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1874
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1875
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1876
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1877
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1878
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1879
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1880
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1881
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1882
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1883
 
                            List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1884
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1885
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1886
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1887
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1888
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1889
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1890
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1891
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1892
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1893
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1894
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1895
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1896
 
                    List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1897
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1898
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1899
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1900
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1901
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1902
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1903
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1904
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1905
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1906
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1907
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1908
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1909
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1910
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1911
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1912
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1913
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1914
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1915
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1916
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1917
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1918
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1919
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1920
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1921
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1922
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1923
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1924
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1925
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1926
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1927
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1928
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1929
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1930
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1931
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1932
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1933
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1934
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1935
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1936
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1937
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1938
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1939
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1940
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1941
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1942
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1943
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1944
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1945
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1946
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1947
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1948
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1949
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1950
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1951
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1952
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1953
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1954
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1955
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1956
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1957
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1958
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1959
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1960
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1961
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1962
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1963
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1964
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1965
 
                                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1966
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1967
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1968
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1969
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1970
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1971
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1972
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1973
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1974
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1975
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1976
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1977
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(14))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1978
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1979
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1980
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1981
 
                                    Aop("+", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1982
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1983
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1984
 
                                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1985
 
                                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1986
 
                                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1987
 
                                      AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1988
 
                                        "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1989
 
                                        Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1990
 
                                        Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1991
 
                                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1992
 
                                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1993
 
                                      AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1994
 
                                        "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1995
 
                                        Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1996
 
                                        Aop("+", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1997
 
                                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1998
 
                                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  1999
 
                                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2000
 
                                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2001
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2002
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2003
 
                                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2004
 
                                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2005
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2006
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2007
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2008
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2009
 
                                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2010
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2011
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2012
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2013
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2014
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2015
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2016
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2017
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2018
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2019
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2020
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2021
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2022
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2023
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2024
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2025
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2026
 
                                    Aop("+", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2027
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2028
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2029
 
                                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2030
 
                                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2031
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2032
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2033
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2034
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2035
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2036
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2037
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2038
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2039
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2040
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2041
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2042
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2043
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2044
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2045
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2046
 
                                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2047
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2048
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2049
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2050
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2051
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2052
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2053
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2054
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2055
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2056
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2057
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2058
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(14))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2059
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2060
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2061
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2062
 
                                    Aop("+", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2063
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2064
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2065
 
                                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2066
 
                                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2067
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2068
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2069
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2070
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2071
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2072
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2073
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2074
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2075
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2076
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2077
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2078
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2079
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2080
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2081
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2082
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2083
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2084
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2085
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2086
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2087
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2088
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2089
 
                      AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2090
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2091
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2092
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2093
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2094
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2095
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2096
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2097
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2098
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2099
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2100
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2101
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2102
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2103
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2104
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2105
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2106
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2107
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2108
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2109
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2110
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2111
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2112
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2113
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2114
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2115
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2116
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2117
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2118
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2119
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2120
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2121
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2122
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2123
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2124
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2125
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2126
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2127
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2128
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2129
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2130
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2131
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2132
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2133
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2134
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2135
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2136
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2137
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2138
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2139
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2140
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2141
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2142
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2143
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2144
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2145
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2146
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2147
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2148
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2149
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2150
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2151
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2152
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2153
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2154
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2155
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2156
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2157
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2158
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2159
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2160
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2161
 
                                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2162
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2163
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2164
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2165
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2166
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2167
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2168
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2169
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2170
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2171
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2172
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2173
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(14))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2174
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2175
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2176
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2177
 
                                    Aop("+", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2178
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2179
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2180
 
                                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2181
 
                                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2182
 
                                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2183
 
                                      AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2184
 
                                        "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2185
 
                                        Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2186
 
                                        Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2187
 
                                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2188
 
                                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2189
 
                                      AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2190
 
                                        "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2191
 
                                        Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2192
 
                                        Aop("+", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2193
 
                                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2194
 
                                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2195
 
                                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2196
 
                                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2197
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2198
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2199
 
                                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2200
 
                                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2201
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2202
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2203
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2204
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2205
 
                                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2206
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2207
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2208
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2209
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2210
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2211
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2212
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2213
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2214
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2215
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2216
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2217
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2218
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2219
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2220
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2221
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2222
 
                                    Aop("+", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2223
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2224
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2225
 
                                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2226
 
                                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2227
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2228
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2229
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2230
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2231
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2232
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2233
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2234
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2235
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2236
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2237
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2238
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2239
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2240
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2241
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2242
 
                                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2243
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2244
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2245
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2246
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2247
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2248
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2249
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2250
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2251
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2252
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2253
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2254
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(14))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2255
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2256
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2257
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2258
 
                                    Aop("+", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2259
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2260
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2261
 
                                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2262
 
                                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2263
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2264
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2265
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2266
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2267
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2268
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2269
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2270
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2271
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2272
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2273
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2274
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2275
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2276
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2277
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2278
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2279
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2280
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2281
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2282
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2283
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2284
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2285
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2286
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2287
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2288
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2289
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2290
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2291
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2292
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2293
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2294
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2295
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2296
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2297
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2298
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2299
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2300
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2301
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2302
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2303
 
              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2304
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2305
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2306
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2307
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2308
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2309
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2310
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2311
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2312
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2313
 
                    List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2314
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2315
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2316
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2317
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2318
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2319
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2320
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2321
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2322
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2323
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2324
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2325
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2326
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2327
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2328
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2329
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2330
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2331
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2332
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2333
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(14))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2334
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2335
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2336
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2337
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2338
 
                                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2339
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2340
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2341
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2342
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2343
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2344
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2345
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2346
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2347
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2348
 
                                    Aop("+", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2349
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2350
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2351
 
                                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2352
 
                                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2353
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2354
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2355
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2356
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2357
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2358
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2359
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2360
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2361
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2362
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2363
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2364
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2365
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(14))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2366
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2367
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2368
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2369
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2370
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2371
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2372
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2373
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2374
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2375
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2376
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2377
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2378
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2379
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2380
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2381
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2382
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2383
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2384
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2385
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2386
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2387
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2388
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2389
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(14))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2390
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2391
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2392
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2393
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2394
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2395
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2396
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2397
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2398
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2399
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2400
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2401
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2402
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2403
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2404
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2405
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2406
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2407
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2408
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2409
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2410
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2411
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2412
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2413
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2414
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2415
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2416
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2417
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2418
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2419
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2420
 
              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2421
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2422
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2423
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2424
 
              Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2425
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2426
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2427
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2428
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2429
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2430
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2431
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2432
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2433
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2434
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2435
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2436
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2437
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2438
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2439
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2440
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2441
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2442
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2443
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2444
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2445
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2446
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2447
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2448
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2449
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2450
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2451
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2452
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2453
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2454
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2455
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2456
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2457
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2458
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2459
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2460
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2461
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2462
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2463
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2464
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2465
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2466
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2467
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2468
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2469
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2470
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2471
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2472
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2473
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2474
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2475
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2476
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2477
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2478
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2479
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2480
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(15))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2481
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2482
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2483
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2484
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2485
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2486
 
                    List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2487
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2488
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2489
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2490
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2491
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2492
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2493
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2494
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2495
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2496
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2497
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2498
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2499
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2500
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2501
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2502
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2503
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2504
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2505
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2506
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2507
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2508
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2509
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2510
 
                    List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2511
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2512
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2513
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2514
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2515
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2516
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2517
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2518
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2519
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2520
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2521
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2522
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2523
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2524
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2525
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2526
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2527
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2528
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2529
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2530
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2531
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2532
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2533
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2534
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2535
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2536
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2537
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2538
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2539
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2540
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2541
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2542
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2543
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2544
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2545
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2546
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2547
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2548
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2549
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2550
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2551
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2552
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2553
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2554
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2555
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2556
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2557
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2558
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2559
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2560
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2561
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2562
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2563
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2564
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2565
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2566
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2567
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2568
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2569
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2570
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2571
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2572
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2573
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2574
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2575
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2576
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2577
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2578
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2579
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2580
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2581
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2582
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2583
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2584
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2585
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2586
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2587
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2588
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2589
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2590
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2591
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2592
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2593
 
                        List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2594
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2595
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2596
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2597
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2598
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2599
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2600
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2601
 
                    List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2602
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2603
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2604
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2605
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2606
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2607
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2608
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2609
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2610
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2611
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2612
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2613
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2614
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2615
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2616
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2617
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2618
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2619
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2620
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2621
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2622
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2623
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2624
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2625
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2626
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2627
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2628
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2629
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2630
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2631
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2632
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2633
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2634
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2635
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2636
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2637
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2638
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2639
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2640
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2641
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2642
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2643
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2644
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2645
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2646
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2647
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2648
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2649
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2650
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2651
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2652
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2653
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2654
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2655
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2656
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2657
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2658
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2659
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2660
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2661
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2662
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2663
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2664
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2665
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2666
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2667
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2668
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2669
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2670
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2671
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2672
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2673
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2674
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2675
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2676
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2677
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2678
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2679
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2680
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2681
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2682
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2683
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2684
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2685
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2686
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2687
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2688
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2689
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2690
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2691
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2692
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2693
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2694
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2695
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2696
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2697
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2698
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2699
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2700
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2701
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2702
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2703
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2704
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2705
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2706
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2707
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2708
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2709
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2710
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(36))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2711
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2712
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(36))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2713
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2714
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2715
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2716
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2717
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2718
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2719
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2720
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2721
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2722
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2723
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2724
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2725
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2726
 
              Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2727
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2728
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2729
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(15))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2730
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2731
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2732
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2733
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2734
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2735
 
                    List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2736
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2737
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2738
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2739
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2740
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2741
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2742
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2743
 
                    List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2744
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2745
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2746
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2747
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2748
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2749
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2750
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2751
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2752
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2753
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2754
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2755
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2756
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2757
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2758
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2759
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2760
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2761
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2762
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2763
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2764
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2765
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2766
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2767
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2768
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2769
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2770
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2771
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2772
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2773
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2774
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2775
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2776
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2777
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2778
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2779
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2780
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2781
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2782
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2783
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2784
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2785
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2786
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2787
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2788
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2789
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2790
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2791
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2792
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2793
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2794
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2795
 
                            List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2796
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2797
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2798
 
                          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2799
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2800
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2801
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2802
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2803
 
                            List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2804
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2805
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2806
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2807
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2808
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2809
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2810
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2811
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2812
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2813
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2814
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2815
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2816
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2817
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2818
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2819
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2820
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2821
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2822
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2823
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2824
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2825
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2826
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2827
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2828
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2829
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2830
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2831
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2832
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2833
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2834
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2835
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2836
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2837
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2838
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2839
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2840
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2841
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2842
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2843
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2844
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2845
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2846
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2847
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2848
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2849
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2850
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2851
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2852
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(12))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2853
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2854
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2855
 
                            List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2856
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2857
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2858
 
                          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2859
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2860
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2861
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2862
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2863
 
                            List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2864
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2865
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2866
 
                          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2867
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2868
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2869
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2870
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2871
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2872
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2873
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2874
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2875
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2876
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2877
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2878
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2879
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2880
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2881
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2882
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2883
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2884
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2885
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2886
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2887
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2888
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2889
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2890
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2891
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2892
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2893
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2894
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2895
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2896
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2897
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2898
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2899
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2900
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2901
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2902
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2903
 
              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2904
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2905
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2906
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2907
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2908
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2909
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2910
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2911
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2912
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2913
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2914
 
              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2915
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2916
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2917
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2918
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2919
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2920
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2921
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2922
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2923
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2924
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2925
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2926
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2927
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2928
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2929
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2930
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2931
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2932
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2933
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2934
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2935
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2936
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2937
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2938
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2939
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2940
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2941
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2942
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2943
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2944
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2945
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2946
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2947
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2948
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2949
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2950
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2951
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2952
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2953
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2954
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2955
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2956
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2957
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2958
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2959
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2960
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2961
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2962
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2963
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2964
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2965
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2966
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2967
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2968
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2969
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2970
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2971
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2972
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2973
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2974
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2975
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(12))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2976
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2977
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2978
 
                                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2979
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2980
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2981
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2982
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2983
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2984
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2985
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2986
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2987
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2988
 
                                    Aop("+", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2989
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2990
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2991
 
                                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2992
 
                                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2993
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2994
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2995
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2996
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2997
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2998
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  2999
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3000
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3001
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3002
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3003
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3004
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3005
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3006
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3007
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(12))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3008
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3009
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3010
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3011
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3012
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3013
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3014
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3015
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3016
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3017
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3018
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3019
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3020
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3021
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3022
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3023
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3024
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3025
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3026
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3027
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3028
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3029
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3030
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3031
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(12))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3032
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3033
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3034
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3035
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3036
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3037
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3038
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3039
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3040
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3041
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3042
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3043
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3044
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3045
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3046
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3047
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3048
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3049
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3050
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(13))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3051
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3052
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3053
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3054
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3055
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3056
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3057
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3058
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3059
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3060
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3061
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3062
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3063
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3064
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3065
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3066
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3067
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3068
 
              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3069
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3070
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3071
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3072
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3073
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3074
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3075
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3076
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3077
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3078
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3079
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3080
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3081
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3082
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3083
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3084
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3085
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3086
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3087
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3088
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3089
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3090
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3091
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3092
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3093
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3094
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3095
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3096
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3097
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3098
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3099
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3100
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3101
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3102
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3103
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3104
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3105
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3106
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3107
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3108
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3109
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3110
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3111
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3112
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3113
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3114
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3115
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3116
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3117
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3118
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3119
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3120
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3121
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3122
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3123
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3124
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3125
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3126
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3127
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3128
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3129
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3130
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3131
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3132
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3133
 
                                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3134
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3135
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3136
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3137
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3138
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3139
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3140
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3141
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3142
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3143
 
                                    Aop("+", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3144
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3145
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3146
 
                                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3147
 
                                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3148
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3149
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3150
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3151
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3152
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3153
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3154
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3155
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3156
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3157
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3158
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3159
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3160
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3161
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3162
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3163
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3164
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3165
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3166
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3167
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3168
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3169
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3170
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3171
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3172
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3173
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3174
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3175
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3176
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3177
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3178
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3179
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3180
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3181
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3182
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3183
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3184
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3185
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3186
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3187
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3188
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3189
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3190
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3191
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3192
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3193
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3194
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3195
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3196
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3197
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3198
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3199
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3200
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3201
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3202
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3203
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3204
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3205
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3206
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(12))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3207
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3208
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3209
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3210
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3211
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3212
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3213
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3214
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3215
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3216
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3217
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3218
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3219
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3220
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3221
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3222
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3223
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3224
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3225
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3226
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3227
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3228
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3229
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3230
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3231
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3232
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3233
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3234
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3235
 
              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3236
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3237
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3238
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3239
 
              Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3240
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3241
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3242
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3243
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3244
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3245
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3246
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3247
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3248
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3249
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3250
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3251
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3252
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3253
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3254
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3255
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3256
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3257
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3258
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3259
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3260
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3261
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3262
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3263
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3264
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3265
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3266
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3267
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3268
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3269
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3270
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3271
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3272
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3273
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3274
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3275
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3276
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3277
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3278
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3279
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3280
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3281
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3282
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3283
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3284
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3285
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3286
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3287
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3288
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3289
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3290
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3291
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3292
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3293
 
              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3294
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3295
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3296
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3297
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3298
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3299
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3300
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3301
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3302
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3303
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3304
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3305
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3306
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3307
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3308
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3309
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3310
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3311
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3312
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3313
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3314
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3315
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3316
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3317
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3318
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3319
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3320
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3321
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3322
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3323
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3324
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3325
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3326
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3327
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3328
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3329
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3330
 
              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3331
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3332
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3333
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3334
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3335
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3336
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3337
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3338
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3339
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3340
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3341
 
              Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3342
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3343
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3344
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3345
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3346
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3347
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3348
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3349
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3350
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3351
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3352
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3353
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3354
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3355
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3356
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3357
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3358
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3359
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3360
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3361
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3362
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3363
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3364
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3365
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3366
 
              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3367
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3368
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3369
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3370
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3371
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3372
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3373
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3374
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3375
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3376
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3377
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3378
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3379
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3380
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3381
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3382
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3383
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3384
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3385
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3386
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3387
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3388
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3389
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3390
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3391
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3392
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3393
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3394
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3395
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3396
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3397
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3398
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3399
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3400
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3401
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3402
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3403
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3404
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3405
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3406
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3407
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3408
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3409
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3410
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3411
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3412
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3413
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3414
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3415
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3416
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3417
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3418
 
                                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3419
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3420
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3421
 
                              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3422
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3423
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3424
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3425
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3426
 
                                List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3427
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3428
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3429
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3430
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3431
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3432
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3433
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3434
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3435
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3436
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3437
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3438
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3439
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3440
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3441
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3442
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3443
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3444
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3445
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3446
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3447
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3448
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3449
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3450
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3451
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3452
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3453
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3454
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3455
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3456
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3457
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3458
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3459
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3460
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3461
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3462
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3463
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3464
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3465
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3466
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3467
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3468
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3469
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3470
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3471
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3472
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3473
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3474
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3475
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3476
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(12))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3477
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3478
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3479
 
                                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3480
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3481
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3482
 
                              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3483
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3484
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3485
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3486
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3487
 
                                List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3488
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3489
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3490
 
                              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3491
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3492
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3493
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3494
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3495
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3496
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3497
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3498
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3499
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3500
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3501
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3502
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3503
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3504
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3505
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3506
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3507
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3508
 
                            List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3509
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3510
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3511
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3512
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3513
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3514
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3515
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3516
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3517
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3518
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3519
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3520
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3521
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3522
 
                    List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3523
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3524
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3525
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3526
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3527
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3528
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3529
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3530
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3531
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3532
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3533
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3534
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3535
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3536
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3537
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3538
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3539
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3540
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3541
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3542
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3543
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3544
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3545
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3546
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3547
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3548
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3549
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3550
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3551
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3552
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3553
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3554
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3555
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3556
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3557
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3558
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3559
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3560
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3561
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3562
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3563
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3564
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3565
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3566
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3567
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3568
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3569
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3570
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3571
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3572
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3573
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3574
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3575
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3576
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3577
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3578
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3579
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3580
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3581
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3582
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3583
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3584
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3585
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3586
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3587
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3588
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3589
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3590
 
                                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3591
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3592
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3593
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3594
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3595
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3596
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3597
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3598
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3599
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3600
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3601
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3602
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(13))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3603
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3604
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3605
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3606
 
                                    Aop("+", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3607
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3608
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3609
 
                                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3610
 
                                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3611
 
                                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3612
 
                                      AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3613
 
                                        "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3614
 
                                        Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3615
 
                                        Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3616
 
                                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3617
 
                                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3618
 
                                      AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3619
 
                                        "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3620
 
                                        Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3621
 
                                        Aop("+", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3622
 
                                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3623
 
                                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3624
 
                                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3625
 
                                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3626
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3627
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3628
 
                                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3629
 
                                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3630
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3631
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3632
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3633
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3634
 
                                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3635
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3636
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3637
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3638
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3639
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3640
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3641
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3642
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3643
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3644
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3645
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3646
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(13))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3647
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3648
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3649
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3650
 
                                    Aop("+", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3651
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3652
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3653
 
                                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3654
 
                                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3655
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3656
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3657
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3658
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3659
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3660
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3661
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3662
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3663
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3664
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3665
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3666
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3667
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3668
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3669
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3670
 
                                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3671
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3672
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3673
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3674
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3675
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3676
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3677
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3678
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3679
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3680
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3681
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3682
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(13))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3683
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3684
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3685
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3686
 
                                    Aop("+", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3687
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3688
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3689
 
                                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3690
 
                                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3691
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3692
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3693
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3694
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3695
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3696
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3697
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3698
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3699
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3700
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3701
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3702
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3703
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3704
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3705
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3706
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3707
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3708
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3709
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3710
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3711
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3712
 
                      AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3713
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3714
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3715
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3716
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3717
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3718
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3719
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3720
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3721
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3722
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3723
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3724
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3725
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3726
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3727
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3728
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3729
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3730
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3731
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3732
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3733
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3734
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3735
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3736
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3737
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3738
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3739
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3740
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3741
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3742
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3743
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3744
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3745
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3746
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3747
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3748
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3749
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3750
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3751
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3752
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3753
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3754
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3755
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3756
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3757
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3758
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3759
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3760
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3761
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3762
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3763
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3764
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3765
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3766
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3767
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3768
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3769
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3770
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3771
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3772
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3773
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3774
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3775
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3776
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3777
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3778
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3779
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3780
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3781
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3782
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3783
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3784
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3785
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3786
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3787
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3788
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3789
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3790
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3791
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3792
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3793
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3794
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3795
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3796
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3797
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3798
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3799
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3800
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3801
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3802
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3803
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3804
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3805
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3806
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3807
 
                                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3808
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3809
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3810
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3811
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3812
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3813
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3814
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3815
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3816
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3817
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3818
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3819
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(13))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3820
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3821
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3822
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3823
 
                                    Aop("+", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3824
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3825
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3826
 
                                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3827
 
                                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3828
 
                                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3829
 
                                      AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3830
 
                                        "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3831
 
                                        Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3832
 
                                        Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3833
 
                                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3834
 
                                      Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3835
 
                                      AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3836
 
                                        "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3837
 
                                        Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3838
 
                                        Aop("+", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3839
 
                                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3840
 
                                      Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3841
 
                                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3842
 
                                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3843
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3844
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3845
 
                                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3846
 
                                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3847
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3848
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3849
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3850
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3851
 
                                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3852
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3853
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3854
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3855
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3856
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3857
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3858
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3859
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3860
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3861
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3862
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3863
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(13))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3864
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3865
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3866
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3867
 
                                    Aop("+", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3868
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3869
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3870
 
                                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3871
 
                                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3872
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3873
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3874
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3875
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3876
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3877
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3878
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3879
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3880
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3881
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3882
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3883
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3884
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3885
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3886
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3887
 
                                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3888
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3889
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3890
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3891
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3892
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3893
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3894
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3895
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3896
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3897
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3898
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3899
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(13))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3900
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3901
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3902
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3903
 
                                    Aop("+", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3904
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3905
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3906
 
                                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3907
 
                                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3908
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3909
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3910
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3911
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3912
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3913
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3914
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3915
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3916
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3917
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3918
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3919
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3920
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3921
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3922
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3923
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3924
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(12))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3925
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3926
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3927
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3928
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3929
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3930
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3931
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3932
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3933
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3934
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3935
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3936
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3937
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3938
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3939
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3940
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3941
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3942
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3943
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3944
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3945
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3946
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3947
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3948
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3949
 
              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3950
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3951
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3952
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3953
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3954
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3955
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3956
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3957
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3958
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3959
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3960
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3961
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3962
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3963
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3964
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3965
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3966
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3967
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3968
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3969
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3970
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3971
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3972
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3973
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3974
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3975
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3976
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3977
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3978
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3979
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3980
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3981
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3982
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3983
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3984
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3985
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3986
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3987
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3988
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3989
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3990
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3991
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3992
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3993
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3994
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3995
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3996
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3997
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3998
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  3999
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4000
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4001
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4002
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4003
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4004
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4005
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4006
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4007
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4008
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4009
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(13))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4010
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4011
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4012
 
                              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4013
 
                                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4014
 
                                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4015
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4016
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4017
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4018
 
                                    Aop("-", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4019
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4020
 
                                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4021
 
                                  AssignA(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4022
 
                                    "mem",
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4023
 
                                    Var("ptr"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4024
 
                                    Aop("+", Ref("mem", Var("ptr")), Num(1))
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4025
 
                                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4026
 
                                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4027
 
                                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4028
 
                                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4029
 
                              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4030
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4031
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4032
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4033
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4034
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4035
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4036
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4037
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4038
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4039
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4040
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4041
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4042
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4043
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4044
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4045
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4046
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4047
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4048
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4049
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4050
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4051
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4052
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4053
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4054
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4055
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4056
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4057
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4058
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4059
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4060
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4061
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4062
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4063
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4064
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4065
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4066
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(13))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4067
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4068
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4069
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4070
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4071
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4072
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4073
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4074
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4075
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4076
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4077
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4078
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4079
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4080
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4081
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4082
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4083
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4084
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4085
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4086
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4087
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4088
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4089
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4090
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4091
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4092
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4093
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4094
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4095
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4096
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4097
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4098
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4099
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4100
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4101
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4102
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4103
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4104
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4105
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4106
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4107
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4108
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4109
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4110
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4111
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4112
 
              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4113
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4114
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4115
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4116
 
              Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4117
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4118
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4119
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4120
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4121
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4122
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4123
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4124
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4125
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4126
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4127
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4128
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4129
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4130
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4131
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4132
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4133
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4134
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4135
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4136
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4137
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4138
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4139
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4140
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4141
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4142
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4143
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4144
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4145
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4146
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4147
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4148
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4149
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4150
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4151
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4152
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4153
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4154
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4155
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4156
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4157
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4158
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4159
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4160
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4161
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4162
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4163
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4164
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4165
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4166
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4167
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4168
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4169
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4170
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4171
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4172
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4173
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4174
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4175
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4176
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4177
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4178
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4179
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4180
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4181
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4182
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4183
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4184
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4185
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4186
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4187
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4188
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4189
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4190
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4191
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(15))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4192
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4193
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4194
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4195
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4196
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4197
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4198
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4199
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4200
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4201
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4202
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4203
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4204
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4205
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4206
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4207
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4208
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4209
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4210
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4211
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4212
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4213
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4214
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4215
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4216
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4217
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4218
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4219
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4220
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4221
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4222
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4223
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4224
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4225
 
                    List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4226
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4227
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4228
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4229
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4230
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4231
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4232
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4233
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4234
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4235
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4236
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4237
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4238
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4239
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4240
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4241
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4242
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4243
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4244
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4245
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4246
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4247
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4248
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4249
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4250
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4251
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4252
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4253
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4254
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4255
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4256
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4257
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4258
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4259
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4260
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4261
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4262
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4263
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4264
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4265
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4266
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4267
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4268
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4269
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4270
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4271
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4272
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4273
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4274
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4275
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4276
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4277
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4278
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4279
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4280
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4281
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4282
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4283
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4284
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4285
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4286
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4287
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4288
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4289
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4290
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4291
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4292
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4293
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4294
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4295
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4296
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4297
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4298
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4299
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4300
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4301
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4302
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4303
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4304
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4305
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4306
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4307
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4308
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4309
 
                        List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4310
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4311
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4312
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4313
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4314
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4315
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4316
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4317
 
                    List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4318
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4319
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4320
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4321
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4322
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4323
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4324
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4325
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4326
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4327
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4328
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4329
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4330
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4331
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4332
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4333
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4334
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4335
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4336
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4337
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4338
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4339
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4340
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4341
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4342
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4343
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4344
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4345
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4346
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4347
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4348
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4349
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4350
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4351
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4352
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4353
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4354
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4355
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4356
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4357
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4358
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4359
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4360
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4361
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4362
 
                    List(AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4363
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4364
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4365
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4366
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4367
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4368
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4369
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4370
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4371
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4372
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4373
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4374
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4375
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4376
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4377
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4378
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4379
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4380
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4381
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4382
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4383
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4384
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4385
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4386
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4387
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4388
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4389
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4390
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4391
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4392
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4393
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4394
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4395
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4396
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4397
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4398
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4399
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4400
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4401
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4402
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4403
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4404
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4405
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4406
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4407
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4408
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4409
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4410
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4411
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4412
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4413
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4414
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4415
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4416
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4417
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4418
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4419
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4420
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4421
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4422
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4423
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4424
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4425
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4426
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4427
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4428
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4429
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4430
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4431
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4432
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4433
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4434
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4435
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4436
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4437
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4438
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4439
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4440
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4441
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4442
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4443
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4444
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4445
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4446
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4447
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4448
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4449
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4450
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4451
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4452
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4453
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4454
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4455
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4456
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4457
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4458
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4459
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4460
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4461
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4462
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4463
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4464
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4465
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4466
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4467
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4468
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4469
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4470
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4471
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4472
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4473
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4474
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4475
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4476
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4477
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4478
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4479
 
                              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4480
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4481
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4482
 
                              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4483
 
                              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4484
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4485
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4486
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4487
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4488
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4489
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4490
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4491
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4492
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4493
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4494
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4495
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4496
 
                        List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4497
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4498
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4499
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4500
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4501
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4502
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4503
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4504
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4505
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4506
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4507
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4508
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4509
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4510
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4511
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4512
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4513
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4514
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4515
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4516
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4517
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4518
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4519
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4520
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4521
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4522
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4523
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4524
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4525
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4526
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4527
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4528
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4529
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4530
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4531
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4532
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4533
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4534
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4535
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4536
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4537
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4538
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4539
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4540
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4541
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4542
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4543
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4544
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4545
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4546
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4547
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4548
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4549
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4550
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4551
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4552
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4553
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4554
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4555
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4556
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4557
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4558
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4559
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4560
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4561
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4562
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4563
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4564
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4565
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4566
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4567
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4568
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4569
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4570
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4571
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4572
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4573
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4574
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4575
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4576
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4577
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4578
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4579
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4580
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4581
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4582
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4583
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4584
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4585
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4586
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4587
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4588
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4589
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4590
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4591
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4592
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4593
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4594
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4595
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4596
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4597
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4598
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4599
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4600
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4601
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4602
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4603
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4604
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4605
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4606
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4607
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4608
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4609
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4610
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4611
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4612
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4613
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4614
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4615
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4616
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4617
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(36))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4618
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4619
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(17))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4620
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(19))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4621
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4622
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4623
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4624
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4625
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4626
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4627
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4628
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4629
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4630
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4631
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4632
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4633
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4634
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(15))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4635
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4636
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4637
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4638
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4639
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4640
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4641
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4642
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4643
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4644
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4645
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4646
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4647
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4648
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4649
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4650
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4651
 
                    List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4652
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4653
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4654
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4655
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4656
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4657
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4658
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4659
 
              Assign("ptr", Aop("+", Var("ptr"), Num(21))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4660
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4661
 
              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4662
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4663
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4664
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4665
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4666
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4667
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4668
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4669
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4670
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4671
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4672
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4673
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4674
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4675
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4676
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4677
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4678
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4679
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4680
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4681
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4682
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4683
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4684
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4685
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4686
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4687
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4688
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4689
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4690
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4691
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4692
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4693
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4694
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4695
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4696
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4697
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4698
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4699
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4700
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4701
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4702
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4703
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4704
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4705
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4706
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4707
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(13))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4708
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4709
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4710
 
                            List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4711
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4712
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4713
 
                          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4714
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4715
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4716
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4717
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4718
 
                            List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4719
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4720
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4721
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4722
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4723
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4724
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4725
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4726
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4727
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4728
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4729
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4730
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4731
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4732
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4733
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4734
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4735
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4736
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4737
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4738
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4739
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4740
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4741
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4742
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4743
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4744
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4745
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4746
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4747
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4748
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4749
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4750
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4751
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4752
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4753
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4754
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4755
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4756
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4757
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4758
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4759
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4760
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4761
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4762
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4763
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4764
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4765
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4766
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4767
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4768
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4769
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4770
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4771
 
                            List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4772
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4773
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4774
 
                          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4775
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4776
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4777
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4778
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4779
 
                            List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4780
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4781
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4782
 
                          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4783
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4784
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4785
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4786
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4787
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4788
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4789
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4790
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4791
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4792
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4793
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4794
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4795
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4796
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4797
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4798
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4799
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4800
 
                        List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4801
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4802
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4803
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4804
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4805
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4806
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4807
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4808
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4809
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4810
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4811
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4812
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4813
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4814
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4815
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4816
 
              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4817
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4818
 
              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4819
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4820
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4821
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4822
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4823
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4824
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4825
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4826
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4827
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4828
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4829
 
              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4830
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4831
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4832
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4833
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4834
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4835
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4836
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4837
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4838
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4839
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4840
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4841
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4842
 
              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4843
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4844
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4845
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4846
 
          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4847
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4848
 
          Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4849
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4850
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4851
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4852
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4853
 
              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4854
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4855
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4856
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4857
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4858
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4859
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4860
 
          Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4861
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4862
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4863
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4864
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4865
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4866
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4867
 
              Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4868
 
              Assign("x", Ref("mem", Var("ptr"))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4869
 
              Write("x"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4870
 
              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4871
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4872
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4873
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4874
 
          Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4875
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4876
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4877
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4878
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4879
 
              Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4880
 
              Assign("x", Ref("mem", Var("ptr"))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4881
 
              Write("x"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4882
 
              Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4883
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4884
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4885
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4886
 
          Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4887
 
          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4888
 
          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4889
 
          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4890
 
          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4891
 
          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4892
 
          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4893
 
          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4894
 
          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4895
 
          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4896
 
          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4897
 
          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4898
 
          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4899
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4900
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4901
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4902
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4903
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4904
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4905
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4906
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4907
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4908
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4909
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4910
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4911
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4912
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4913
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4914
 
              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4915
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4916
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4917
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4918
 
          Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4919
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4920
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4921
 
            List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4922
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4923
 
          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4924
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4925
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4926
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4927
 
              Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4928
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4929
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4930
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4931
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4932
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4933
 
          Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4934
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4935
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4936
 
            List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4937
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4938
 
          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4939
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(11))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4940
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4941
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4942
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4943
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4944
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4945
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4946
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4947
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4948
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4949
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4950
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4951
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4952
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4953
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4954
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4955
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4956
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4957
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4958
 
          Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4959
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4960
 
          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4961
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4962
 
          Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4963
 
          Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4964
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4965
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4966
 
            List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4967
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4968
 
          Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4969
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4970
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4971
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4972
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4973
 
              Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4974
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4975
 
              Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4976
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4977
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4978
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4979
 
          Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4980
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4981
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4982
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4983
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4984
 
              Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4985
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4986
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4987
 
              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4988
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4989
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4990
 
                List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4991
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4992
 
              Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4993
 
              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4994
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4995
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4996
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4997
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4998
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  4999
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5000
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5001
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5002
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5003
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5004
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5005
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5006
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5007
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5008
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5009
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5010
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5011
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5012
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5013
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5014
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5015
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5016
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5017
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5018
 
                        List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5019
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5020
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5021
 
                      AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5022
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5023
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5024
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5025
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5026
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5027
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5028
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5029
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5030
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5031
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5032
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5033
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5034
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5035
 
          Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5036
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5037
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5038
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5039
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5040
 
              Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5041
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5042
 
              Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5043
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5044
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5045
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5046
 
          Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5047
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5048
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5049
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5050
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5051
 
              Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5052
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5053
 
              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5054
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5055
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5056
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5057
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5058
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5059
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5060
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5061
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5062
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5063
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5064
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5065
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5066
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5067
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5068
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5069
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5070
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5071
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5072
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5073
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5074
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5075
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5076
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5077
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5078
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5079
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5080
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5081
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5082
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5083
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5084
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5085
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5086
 
              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5087
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5088
 
              Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5089
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5090
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5091
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5092
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5093
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5094
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5095
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5096
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5097
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5098
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5099
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5100
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5101
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5102
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5103
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(14))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5104
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5105
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5106
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5107
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5108
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5109
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5110
 
                List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5111
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5112
 
              Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5113
 
              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5114
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5115
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5116
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5117
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5118
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5119
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5120
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5121
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5122
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5123
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5124
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5125
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5126
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5127
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5128
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5129
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5130
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5131
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5132
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5133
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5134
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5135
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5136
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5137
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5138
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5139
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5140
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5141
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5142
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5143
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5144
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5145
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5146
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5147
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5148
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5149
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5150
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5151
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5152
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5153
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5154
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5155
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5156
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5157
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5158
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5159
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5160
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5161
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5162
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5163
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5164
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5165
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5166
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5167
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5168
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5169
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5170
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5171
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5172
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5173
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5174
 
              Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5175
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5176
 
              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5177
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5178
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5179
 
              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5180
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5181
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5182
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5183
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5184
 
          Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5185
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5186
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5187
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5188
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5189
 
              Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5190
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5191
 
              Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5192
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5193
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5194
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5195
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5196
 
          Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5197
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5198
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5199
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5200
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5201
 
              Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5202
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5203
 
              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5204
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5205
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5206
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5207
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5208
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5209
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5210
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5211
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5212
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5213
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5214
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5215
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5216
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5217
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5218
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5219
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5220
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5221
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5222
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5223
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5224
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5225
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5226
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5227
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5228
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5229
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5230
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5231
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5232
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5233
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5234
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5235
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5236
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5237
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5238
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5239
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5240
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5241
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5242
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5243
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5244
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5245
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5246
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5247
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5248
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5249
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5250
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5251
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5252
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5253
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5254
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5255
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5256
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5257
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5258
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5259
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5260
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5261
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5262
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5263
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5264
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5265
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5266
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5267
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5268
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5269
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5270
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5271
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5272
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5273
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5274
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5275
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5276
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5277
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5278
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5279
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5280
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5281
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5282
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5283
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5284
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5285
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5286
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5287
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5288
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5289
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5290
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5291
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5292
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5293
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5294
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5295
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5296
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5297
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5298
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5299
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5300
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5301
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5302
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5303
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5304
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5305
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5306
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5307
 
              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5308
 
              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5309
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5310
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5311
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5312
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5313
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5314
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5315
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5316
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5317
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5318
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5319
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5320
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5321
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5322
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5323
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5324
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5325
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5326
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5327
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5328
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5329
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5330
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5331
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5332
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5333
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5334
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5335
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5336
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5337
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5338
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5339
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5340
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5341
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5342
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5343
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5344
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5345
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5346
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5347
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5348
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5349
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5350
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5351
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5352
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5353
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5354
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5355
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(16))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5356
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5357
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5358
 
                            List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5359
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5360
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5361
 
                          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5362
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5363
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5364
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5365
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5366
 
                            List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5367
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5368
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5369
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5370
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5371
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5372
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5373
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5374
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5375
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5376
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5377
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5378
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5379
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5380
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5381
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5382
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5383
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5384
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5385
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5386
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5387
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5388
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5389
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5390
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5391
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5392
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5393
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5394
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5395
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5396
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5397
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5398
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5399
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5400
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5401
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5402
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5403
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5404
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5405
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5406
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5407
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5408
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5409
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5410
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5411
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5412
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5413
 
                          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5414
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5415
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5416
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(14))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5417
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5418
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5419
 
                            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5420
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5421
 
                              Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5422
 
                              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5423
 
                            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5424
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5425
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5426
 
                          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5427
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5428
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5429
 
                          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5430
 
                            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5431
 
                            List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5432
 
                          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5433
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5434
 
                          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5435
 
                          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5436
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5437
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5438
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5439
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5440
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5441
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5442
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5443
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5444
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5445
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5446
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5447
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5448
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5449
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5450
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5451
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5452
 
                        List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5453
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5454
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5455
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5456
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5457
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5458
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5459
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5460
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5461
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5462
 
              Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5463
 
              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5464
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5465
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5466
 
                List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5467
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5468
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5469
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5470
 
              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5471
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5472
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5473
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5474
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5475
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5476
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5477
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5478
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5479
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5480
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5481
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5482
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5483
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5484
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5485
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5486
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5487
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5488
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5489
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5490
 
              Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5491
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5492
 
              Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5493
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5494
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5495
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5496
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5497
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5498
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5499
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5500
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5501
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5502
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5503
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5504
 
          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5505
 
          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5506
 
        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5507
 
      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5508
 
      Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5509
 
      Assign("x", Ref("mem", Var("ptr"))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5510
 
      Write("x"),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5511
 
      Assign("ptr", Aop("+", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5512
 
      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5513
 
        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5514
 
        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5515
 
          Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5516
 
          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5517
 
          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5518
 
          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5519
 
        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5520
 
      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5521
 
      Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5522
 
      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5523
 
        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5524
 
        List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5525
 
      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5526
 
      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5527
 
      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5528
 
      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5529
 
        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5530
 
        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5531
 
          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5532
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5533
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5534
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5535
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5536
 
              Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5537
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5538
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5539
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5540
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5541
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5542
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5543
 
          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5544
 
          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5545
 
        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5546
 
      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5547
 
      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5548
 
      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5549
 
      Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5550
 
      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5551
 
      Assign("ptr", Aop("-", Var("ptr"), Num(15))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5552
 
      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5553
 
        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5554
 
        List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5555
 
      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5556
 
      Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5557
 
      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5558
 
        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5559
 
        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5560
 
          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5561
 
          Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5562
 
          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5563
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5564
 
          Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5565
 
          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5566
 
        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5567
 
      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5568
 
      Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5569
 
      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5570
 
        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5571
 
        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5572
 
          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5573
 
          Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5574
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5575
 
          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5576
 
          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5577
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5578
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5579
 
            List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5580
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5581
 
          Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5582
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5583
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5584
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5585
 
              Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5586
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5587
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5588
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5589
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5590
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5591
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5592
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5593
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5594
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5595
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5596
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5597
 
              Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5598
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5599
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5600
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5601
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5602
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5603
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5604
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5605
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5606
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5607
 
                    List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5608
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5609
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5610
 
                  AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5611
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5612
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5613
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5614
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5615
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5616
 
              Assign("ptr", Aop("-", Var("ptr"), Num(10))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5617
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5618
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5619
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5620
 
          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5621
 
        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5622
 
      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5623
 
      Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5624
 
      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5625
 
        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5626
 
        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5627
 
          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5628
 
          Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5629
 
          Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5630
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5631
 
          Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5632
 
          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5633
 
        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5634
 
      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5635
 
      Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5636
 
      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5637
 
        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5638
 
        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5639
 
          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5640
 
          Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5641
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5642
 
          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5643
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5644
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5645
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5646
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5647
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5648
 
              Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5649
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5650
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5651
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5652
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5653
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5654
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5655
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5656
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5657
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5658
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5659
 
              Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5660
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5661
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5662
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5663
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5664
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5665
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5666
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5667
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5668
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5669
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5670
 
              Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5671
 
              Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5672
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5673
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5674
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5675
 
          Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5676
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5677
 
          Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5678
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5679
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5680
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5681
 
              Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5682
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5683
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5684
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5685
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5686
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5687
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5688
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5689
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5690
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5691
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5692
 
              Assign("ptr", Aop("-", Var("ptr"), Num(15))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5693
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5694
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5695
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5696
 
          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5697
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5698
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5699
 
            List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5700
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5701
 
          Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5702
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5703
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5704
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5705
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5706
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5707
 
              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5708
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5709
 
              Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5710
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5711
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5712
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5713
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5714
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5715
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5716
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5717
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5718
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5719
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5720
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5721
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5722
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5723
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5724
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5725
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5726
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5727
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5728
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5729
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5730
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5731
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5732
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5733
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5734
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5735
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5736
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5737
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5738
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5739
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5740
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5741
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5742
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5743
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5744
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5745
 
              Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5746
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5747
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5748
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5749
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5750
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5751
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5752
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5753
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5754
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5755
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5756
 
              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5757
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5758
 
              Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5759
 
              Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5760
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5761
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5762
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5763
 
          Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5764
 
          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5765
 
          Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5766
 
          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5767
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5768
 
          Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5769
 
          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5770
 
        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5771
 
      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5772
 
      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5773
 
      Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5774
 
      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5775
 
        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5776
 
        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5777
 
          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5778
 
          Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5779
 
          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5780
 
          Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5781
 
          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5782
 
        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5783
 
      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5784
 
      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5785
 
      Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5786
 
      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5787
 
        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5788
 
        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5789
 
          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5790
 
          Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5791
 
          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5792
 
          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5793
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5794
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5795
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5796
 
              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5797
 
              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5798
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5799
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5800
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5801
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5802
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5803
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5804
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5805
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5806
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5807
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5808
 
              Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5809
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5810
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5811
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5812
 
          Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5813
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5814
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5815
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5816
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5817
 
              AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5818
 
              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5819
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5820
 
              Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5821
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5822
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5823
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5824
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5825
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5826
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5827
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5828
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5829
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5830
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5831
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5832
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5833
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5834
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5835
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5836
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5837
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5838
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5839
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5840
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5841
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5842
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5843
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5844
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5845
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5846
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5847
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5848
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5849
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5850
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5851
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5852
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5853
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5854
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5855
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5856
 
              Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5857
 
              Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5858
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5859
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5860
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5861
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5862
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5863
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5864
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5865
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5866
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5867
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5868
 
              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5869
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5870
 
              Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5871
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5872
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5873
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5874
 
          Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5875
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5876
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5877
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5878
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5879
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5880
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5881
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5882
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5883
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5884
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5885
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5886
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5887
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5888
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5889
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5890
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5891
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5892
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5893
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5894
 
          Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5895
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5896
 
          Assign("ptr", Aop("+", Var("ptr"), Num(27))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5897
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5898
 
          Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5899
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5900
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5901
 
            List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5902
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5903
 
          Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5904
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5905
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5906
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5907
 
              Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5908
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5909
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5910
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5911
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5912
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5913
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5914
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5915
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5916
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5917
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5918
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5919
 
              Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5920
 
              Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5921
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5922
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5923
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5924
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5925
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5926
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5927
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5928
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5929
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5930
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5931
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5932
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5933
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5934
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5935
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5936
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5937
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5938
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5939
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5940
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5941
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5942
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5943
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5944
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5945
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(17))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5946
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5947
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5948
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5949
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(7))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5950
 
                          Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5951
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5952
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5953
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5954
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5955
 
                      AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5956
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5957
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5958
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5959
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5960
 
                        List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5961
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5962
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5963
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5964
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5965
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5966
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5967
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5968
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5969
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5970
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5971
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5972
 
              Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5973
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5974
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5975
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5976
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5977
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5978
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5979
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5980
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5981
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5982
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5983
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5984
 
              Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5985
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5986
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5987
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5988
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5989
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5990
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5991
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(2))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5992
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5993
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5994
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5995
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5996
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5997
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5998
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  5999
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6000
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6001
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6002
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6003
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6004
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6005
 
                    List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6006
 
                      AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6007
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6008
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6009
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(15))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6010
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6011
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6012
 
                        List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6013
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6014
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6015
 
                      AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6016
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6017
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6018
 
                      While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6019
 
                        Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6020
 
                        List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6021
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6022
 
                          Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6023
 
                          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6024
 
                        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6025
 
                      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6026
 
                      Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6027
 
                      AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6028
 
                      AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6029
 
                      Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6030
 
                      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6031
 
                    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6032
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6033
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6034
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6035
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6036
 
              AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6037
 
              Assign("ptr", Aop("+", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6038
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6039
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6040
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6041
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6042
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6043
 
                  While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6044
 
                    Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6045
 
                    List(Assign("ptr", Aop("+", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6046
 
                  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6047
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6048
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6049
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6050
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6051
 
              Assign("ptr", Aop("+", Var("ptr"), Num(8))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6052
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6053
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6054
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6055
 
          Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6056
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6057
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6058
 
            List(Assign("ptr", Aop("-", Var("ptr"), Num(9))), Skip)
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6059
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6060
 
          Assign("ptr", Aop("+", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6061
 
          AssignA("mem", Var("ptr"), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6062
 
          Assign("ptr", Aop("-", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6063
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6064
 
          AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6065
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6066
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6067
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6068
 
              AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6069
 
              While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6070
 
                Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6071
 
                List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6072
 
                  AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6073
 
                  Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6074
 
                  AssignA("mem", Var("ptr"), Aop("+", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6075
 
                  Assign("ptr", Aop("-", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6076
 
                  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6077
 
                )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6078
 
              ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6079
 
              Assign("ptr", Aop("+", Var("ptr"), Num(9))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6080
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6081
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6082
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6083
 
          Assign("ptr", Aop("+", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6084
 
          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6085
 
          Assign("ptr", Aop("+", Var("ptr"), Num(27))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6086
 
          AssignA("mem", Var("ptr"), Aop("-", Ref("mem", Var("ptr")), Num(1))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6087
 
          Assign("ptr", Aop("-", Var("ptr"), Num(6))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6088
 
          While(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6089
 
            Bop("!=", Ref("mem", Var("ptr")), Num(0)),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6090
 
            List(
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6091
 
              Assign("ptr", Aop("-", Var("ptr"), Num(4))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6092
 
              Assign("ptr", Aop("-", Var("ptr"), Num(5))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6093
 
              Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6094
 
            )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6095
 
          ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6096
 
          Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6097
 
        )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6098
 
      ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6099
 
      Assign("ptr", Aop("+", Var("ptr"), Num(3))),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6100
 
      Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6101
 
    )
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6102
 
  ),
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6103
 
  Skip
ba35058db273 updated
Christian Urban <urbanc@in.tum.de>
parents:
diff changeset 
  6104
 
)
afl-material