Block(JumpLoop(
  Execute(
    Set(
      10000
      0
      Greater(
        Get(
          1001
          2
        )
        0
      )
    )
    If(
      Get(
        10000
        0
      )
      1
      2
    )
  )
  Execute(
    Set(
      10000
      0
      Get(
        2000
        0
      )
    )
    Set(
      10000
      0
      Add(
        Get(
          10000
          0
        )
        1
      )
    )
    Set(
      2000
      0
      Get(
        10000
        0
      )
    )
    Set(
      10000
      0
      Get(
        2000
        0
      )
    )
    Set(
      10000
      0
      Mod(
        Get(
          10000
          0
        )
        7
      )
    )
    Set(
      2000
      0
      Get(
        10000
        0
      )
    )
    Set(
      2000
      1
      Get(
        1001
        0
      )
    )
    3
  )
  Execute(
    Set(
      10000
      0
      Get(
        2000
        0
      )
    )
    Set(
      10000
      0
      Subtract(
        Get(
          10000
          0
        )
        1
      )
    )
    Set(
      2000
      0
      Get(
        10000
        0
      )
    )
    Set(
      10000
      0
      Get(
        2000
        0
      )
    )
    Set(
      10000
      0
      Mod(
        Get(
          10000
          0
        )
        7
      )
    )
    Set(
      2000
      0
      Get(
        10000
        0
      )
    )
    Set(
      2000
      1
      Get(
        1001
        0
      )
    )
    3
  )
  Execute(4)
  0
))