; This file is auto-generated. Do not edit manually: changes may be erased.
; Generated by Aqua compiler: https://github.com/fluencelabs/aqua/.
; If you find any bugs, please write an issue on GitHub: https://github.com/fluencelabs/aqua/issues
; Aqua version: 0.9.1-0.9.2

(xor
 (xor
  (seq
   (seq
    (call %init_peer_id% ("peer" "timestamp_sec") [] t)
    (call %init_peer_id% ("registry" "get_stale_local_records") [t] res)
   )
   (par
    (fold res.$.result! r-0
     (par
      (seq
       (seq
        (seq
         (new $signature
          (seq
           (seq
            (xor
             (mismatch r-0.$.metadata.peer_id! %init_peer_id%
              (xor
               (xor
                (seq
                 (call r-0.$.metadata.peer_id! ("registry" "get_record_bytes") [r-0.$.metadata! t] bytes)
                 (call r-0.$.metadata.peer_id! ("sig" "sign") [bytes] $signature)
                )
                (call %init_peer_id% ("errorHandlingSrv" "error") [%last_error% 1])
               )
               (call %init_peer_id% ("errorHandlingSrv" "error") [%last_error% 2])
              )
             )
             (xor
              (seq
               (call %init_peer_id% ("registry" "get_record_bytes") [r-0.$.metadata! t] bytess)
               (xor
                (call %init_peer_id% ("sig" "sign") [bytess] $signature)
                (call %init_peer_id% ("errorHandlingSrv" "error") [%last_error% 3])
               )
              )
              (call %init_peer_id% ("errorHandlingSrv" "error") [%last_error% 4])
             )
            )
            (new $signature_test
             (seq
              (seq
               (seq
                (call %init_peer_id% ("math" "add") [0 1] signature_incr)
                (fold $signature s
                 (seq
                  (seq
                   (ap s $signature_test)
                   (canon %init_peer_id% $signature_test  #signature_iter_canon)
                  )
                  (xor
                   (match #signature_iter_canon.length signature_incr
                    (null)
                   )
                   (next s)
                  )
                 )
                 (never)
                )
               )
               (canon %init_peer_id% $signature_test  #signature_result_canon)
              )
              (ap #signature_result_canon signature_gate)
             )
            )
           )
           (ap signature_gate.$.[0]! signature_gate-0)
          )
         )
         (call %init_peer_id% ("peer" "timestamp_sec") [] t-0)
        )
        (call %init_peer_id% ("trust-graph" "get_weight") [r-0.$.metadata.issued_by! t-0] weight)
       )
       (call %init_peer_id% ("registry" "put_record") [r-0.$.metadata! t signature_gate-0.$.signature.[0]! weight t-0] result)
      )
      (next r-0)
     )
     (never)
    )
    (null)
   )
  )
  (call %init_peer_id% ("errorHandlingSrv" "error") [%last_error% 5])
 )
 (call %init_peer_id% ("errorHandlingSrv" "error") [%last_error% 6])
)