w8 · tx · 4Au···TaA

tx · 4AuVnjMa3L4kzTpKR6YDskDiEcWCKdMEKcxwMQw6KTaA

3MwstV5kwngSR99soeemi1AV7VXiZXRHVnX:  -0.03500000 Waves

2022.08.31 13:57 [2208529] smart account 3MwstV5kwngSR99soeemi1AV7VXiZXRHVnX > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "4AuVnjMa3L4kzTpKR6YDskDiEcWCKdMEKcxwMQw6KTaA",
    "fee": 3500000,
    "feeAssetId": null,
    "timestamp": 1661943419616,
    "version": 2,
    "chainId": 84,
    "sender": "3MwstV5kwngSR99soeemi1AV7VXiZXRHVnX",
    "senderPublicKey": "7kYMgWAteuXyagbkwuPuripHt5mbmodGS8SuEhyXSgBY",
    "proofs": [
        "4VVTNpQokKShF9iyrCqcuZTEog9zWwcqTMKPZo9Gtj1g3c8fMycpntf7YX9UkK8CjRhZe17ww56CgzrGnUfQBSP1",
        "5udq6Ewha8KweaeRMpNijDkL9sHkBQqXZeZYD3K31kc2zLXVnA5k2Q5Uc7n7yC8aFjAb44mhx4xBmfDvtevvFSvV"
    ],
    "script": "base64:BgJXCAISBAoCEQESBQoDCAEEEgQKAgEEEgMKAQESBgoECAgBCBIECgIIARIECgIRARIFCgMBCAgSBQoDCAEBEgASABIECgIRBBIECgIBARIAEgASABIDCgEBWwAJUFJFQ0lTSU9OAMCEPQAFTUFYX0EAwIQ9AAxNQVhfQV9DSEFOR0UACgAIREVDSU1BTFMABgANTUlOX1JBTVBfVElNRQkAaQIAgKMFADwAB2tBc3NldHMCCWFzc2V0X2lkcwANa0Fzc2V0QmFsYW5jZQIIX2JhbGFuY2UAB2tBY3RpdmUCBmFjdGl2ZQAGa0NhdXNlAg5zaHV0ZG93bl9jYXVzZQANa1NoYXJlQXNzZXRJZAIOc2hhcmVfYXNzZXRfaWQAEWtTaGFyZUFzc2V0U3VwcGx5AhJzaGFyZV9hc3NldF9zdXBwbHkABGtGZWUCCmNvbW1pc3Npb24AEmtEQXBwVGhyZXNob2xkQ29lZgIRZEFwcFRocmVzaG9sZENvZWYADGtVU0ROQWRkcmVzcwIYc3Rha2luZ191c2RubnNidF9hZGRyZXNzAAprRGlzY291bnRzAglkaXNjb3VudHMAD2tEaXNjb3VudFZhbHVlcwIPZGlzY291bnRfdmFsdWVzAA5rVXNlclN3b3BJbkdvdgIMX1NXT1BfYW1vdW50AA1rRmlyc3RIYXJ2ZXN0Ag1maXJzdF9oYXJ2ZXN0ABNrRmlyc3RIYXJ2ZXN0SGVpZ2h0AhRmaXJzdF9oYXJ2ZXN0X2hlaWdodAALa1NoYXJlTGltaXQCHHNoYXJlX2xpbWl0X29uX2ZpcnN0X2hhcnZlc3QAC2tCYXNlUGVyaW9kAgtiYXNlX3BlcmlvZAANa1BlcmlvZExlbmd0aAINcGVyaW9kX2xlbmd0aAAMa1N0YXJ0SGVpZ2h0AgxzdGFydF9oZWlnaHQADWtBZG1pblB1YktleTECC2FkbWluX3B1Yl8xAA1rQWRtaW5QdWJLZXkyAgthZG1pbl9wdWJfMgANa0FkbWluUHViS2V5MwILYWRtaW5fcHViXzMAEmtBZG1pbkludm9rZVB1YktleQIQYWRtaW5faW52b2tlX3B1YgAQa01vbmV5Qm94QWRkcmVzcwIRbW9uZXlfYm94X2FkZHJlc3MAC2tHb3ZBZGRyZXNzAhJnb3Zlcm5hbmNlX2FkZHJlc3MADmtWb3RpbmdBZGRyZXNzAg52b3RpbmdfYWRkcmVzcwAPa0Zhcm1pbmdBZGRyZXNzAg9mYXJtaW5nX2FkZHJlc3MABm9yYWNsZQkBB0FkZHJlc3MBARoBVOlFqh6QLzqu8boO5i6akl8amITh82KzCAETZ2V0QmFzZTU4RnJvbU9yYWNsZQEDa2V5BAckbWF0Y2gwCQCdCAIFBm9yYWNsZQUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQGc3RyaW5nBQckbWF0Y2gwCQDZBAEFBnN0cmluZwQHbm90aGluZwUHJG1hdGNoMAkAAgEJAKwCAgUDa2V5AghpcyBlbXB0eQAMYWRtaW5QdWJLZXkxCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFDWtBZG1pblB1YktleTEADGFkbWluUHViS2V5MgkBE2dldEJhc2U1OEZyb21PcmFjbGUBBQ1rQWRtaW5QdWJLZXkyAAxhZG1pblB1YktleTMJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUNa0FkbWluUHViS2V5MwARYWRtaW5QdWJLZXlJbnZva2UJARNnZXRCYXNlNThGcm9tT3JhY2xlAQUSa0FkbWluSW52b2tlUHViS2V5AA9tb25leUJveEFkZHJlc3MJAQdBZGRyZXNzAQkBE2dldEJhc2U1OEZyb21PcmFjbGUBBRBrTW9uZXlCb3hBZGRyZXNzAApnb3ZBZGRyZXNzCQEHQWRkcmVzcwEJARNnZXRCYXNlNThGcm9tT3JhY2xlAQULa0dvdkFkZHJlc3MAEnN0YWtpbmdVU0ROQWRkcmVzcwkBB0FkZHJlc3MBCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFDGtVU0ROQWRkcmVzcwANdm90aW5nQWRkcmVzcwkBB0FkZHJlc3MBCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFDmtWb3RpbmdBZGRyZXNzAA5mYXJtaW5nQWRkcmVzcwkBB0FkZHJlc3MBCQETZ2V0QmFzZTU4RnJvbU9yYWNsZQEFD2tGYXJtaW5nQWRkcmVzcwASY2FwTW9uZXlCb3hBZGRyZXNzCQEHQWRkcmVzcwEBGgFUXmlqF+mqIH0+j69gu0TO8ei+zt5lnFLzAARVU0ROASBvJKPKqzDcUimY6CxhWu5afyNNwi11u+mdqlTg0tAHwQANc3Rha2luZ0Fzc2V0cwkAzAgCCQDYBAEFBFVTRE4FA25pbAAKYmFzZVBlcmlvZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFDXZvdGluZ0FkZHJlc3MFC2tCYXNlUGVyaW9kAhFFbXB0eSBrQmFzZVBlcmlvZAALc3RhcnRIZWlnaHQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQ12b3RpbmdBZGRyZXNzBQxrU3RhcnRIZWlnaHQCEkVtcHR5IGtTdGFydEhlaWdodAAMcGVyaW9kTGVuZ3RoCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUNdm90aW5nQWRkcmVzcwUNa1BlcmlvZExlbmd0aAITRW1wdHkga1BlcmlvZExlbmd0aAAVZmlyc3RIYXJ2ZXN0RW5kUGVyaW9kCQBkAgkAZAIFCmJhc2VQZXJpb2QJAGkCCQBlAgUGaGVpZ2h0BQtzdGFydEhlaWdodAUMcGVyaW9kTGVuZ3RoAAMABmFjdGl2ZQkBEUBleHRyTmF0aXZlKDEwNTEpAgUEdGhpcwUHa0FjdGl2ZQAMc2hhcmVBc3NldElkCQDZBAEJARFAZXh0ck5hdGl2ZSgxMDUzKQIFBHRoaXMFDWtTaGFyZUFzc2V0SWQAC3NoYXJlU3VwcGx5CQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzBRFrU2hhcmVBc3NldFN1cHBseQAJZmVlU2NhbGU2AMCEPQADZmVlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzBQRrRmVlAA1mZWVHb3Zlcm5hbmNlCQBrAwAoBQlmZWVTY2FsZTYAZAAJaW5pdGlhbF9BCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzAglpbml0aWFsX0EACGZ1dHVyZV9BCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzAghmdXR1cmVfQQAOaW5pdGlhbF9BX3RpbWUJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwIOaW5pdGlhbF9BX3RpbWUAAAANZnV0dXJlX0FfdGltZQkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzAg1mdXR1cmVfQV90aW1lAAAACGFzc2V0SWRzCQC1CQIJARFAZXh0ck5hdGl2ZSgxMDUzKQIFBHRoaXMFB2tBc3NldHMCASwABm5Db2lucwkAkAMBBQhhc3NldElkcwEHc3VzcGVuZAEFY2F1c2UJAMwIAgkBDEJvb2xlYW5FbnRyeQIFB2tBY3RpdmUHCQDMCAIJAQtTdHJpbmdFbnRyeQIFBmtDYXVzZQUFY2F1c2UFA25pbAENdGhyb3dJc0FjdGl2ZQAJAAIBAhZEQXBwIGlzIGFscmVhZHkgYWN0aXZlAQhpc0FjdGl2ZQADBQZhY3RpdmUFBHVuaXQJAAIBAh9EQXBwIGlzIGluYWN0aXZlIGF0IHRoaXMgbW9tZW50AQtpc0FkbWluQ2FsbAEBaQMJAQ9jb250YWluc0VsZW1lbnQCCQDMCAIFDGFkbWluUHViS2V5MQkAzAgCBQxhZG1pblB1YktleTIJAMwIAgUMYWRtaW5QdWJLZXkzBQNuaWwIBQFpD2NhbGxlclB1YmxpY0tleQUEdW5pdAkAAgECIU9ubHkgYWRtaW4gY2FuIGNhbGwgdGhpcyBmdW5jdGlvbgEKaXNTZWxmQ2FsbAEBaQMJAAACBQR0aGlzCAUBaQZjYWxsZXIFBHVuaXQJAAIBAitPbmx5IGNvbnRyYWN0IGl0c2VsZiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uAARiaWcyCQC2AgEAAgAOYmxvY2tUaW1lc3RhbXAFBmhlaWdodAEGYXNzZXJ0AQFhAwUBYQcGARRjYWxjdWxhdGVGZWVEaXNjb3VudAEIdXNlckFkZHIECnN3b3BBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAJoIAgUKZ292QWRkcmVzcwkArAICCQClCAEFCHVzZXJBZGRyBQ5rVXNlclN3b3BJbkdvdgAABA5kaXNjb3VudFZhbHVlcwkAtQkCCQERQGV4dHJOYXRpdmUoMTA1MykCBQZvcmFjbGUFD2tEaXNjb3VudFZhbHVlcwIBLAQJZGlzY291bnRzCQC1CQIJARFAZXh0ck5hdGl2ZSgxMDUzKQIFBm9yYWNsZQUKa0Rpc2NvdW50cwIBLAMDCQBnAgUKc3dvcEFtb3VudAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFDmRpc2NvdW50VmFsdWVzAAAJAGYCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUOZGlzY291bnRWYWx1ZXMAAQUKc3dvcEFtb3VudAcJAGUCBQlmZWVTY2FsZTYJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQlkaXNjb3VudHMAAAMDCQBnAgUKc3dvcEFtb3VudAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFDmRpc2NvdW50VmFsdWVzAAEJAGYCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUOZGlzY291bnRWYWx1ZXMAAgUKc3dvcEFtb3VudAcJAGUCBQlmZWVTY2FsZTYJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQlkaXNjb3VudHMAAQMDCQBnAgUKc3dvcEFtb3VudAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFDmRpc2NvdW50VmFsdWVzAAIJAGYCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUOZGlzY291bnRWYWx1ZXMAAwUKc3dvcEFtb3VudAcJAGUCBQlmZWVTY2FsZTYJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQlkaXNjb3VudHMAAgMDCQBnAgUKc3dvcEFtb3VudAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFDmRpc2NvdW50VmFsdWVzAAMJAGYCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUOZGlzY291bnRWYWx1ZXMABAUKc3dvcEFtb3VudAcJAGUCBQlmZWVTY2FsZTYJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQlkaXNjb3VudHMAAwMJAGcCBQpzd29wQW1vdW50CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUOZGlzY291bnRWYWx1ZXMABAkAZQIFCWZlZVNjYWxlNgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCWRpc2NvdW50cwAEBQlmZWVTY2FsZTYBAl9BAAQCdDEFDWZ1dHVyZV9BX3RpbWUEAkExBQhmdXR1cmVfQQMJAGYCBQJ0MQUOYmxvY2tUaW1lc3RhbXAEAkEwBQlpbml0aWFsX0EEAnQwBQ5pbml0aWFsX0FfdGltZQMJAGYCBQJBMQUCQTAJAGQCBQJBMAkAaQIJAGgCCQBlAgUCQTEFAkEwCQBlAgUOYmxvY2tUaW1lc3RhbXAFAnQwCQBlAgUCdDEFAnQwCQBlAgUCQTAJAGkCCQBoAgkAZQIFAkEwBQJBMQkAZQIFDmJsb2NrVGltZXN0YW1wBQJ0MAkAZQIFAnQxBQJ0MAUCQTEBA194cAAKAQ1hc3NldEJhbGFuY2VzAgNhY2MHYXNzZXRJZAkAzQgCBQNhY2MJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICBQdhc3NldElkBQ1rQXNzZXRCYWxhbmNlAAAKAAIkbAUIYXNzZXRJZHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBDWFzc2V0QmFsYW5jZXMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDE1CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPAQdfeHBfbWVtAQJ4cAUCeHABB3N1bUxpc3QCA2FjYwdlbGVtZW50CQBkAgUDYWNjBQdlbGVtZW50AQVnZXRfRAICeHADYW1wCgABQAkA/AcEBQR0aGlzAgFECQDMCAIFAnhwCQDMCAIFA2FtcAUDbmlsBQNuaWwDCQABAgUBQAIDSW50BQFACQACAQkArAICCQADAQkA/AcEBQR0aGlzAgFECQDMCAIFAnhwCQDMCAIFA2FtcAUDbmlsBQNuaWwCGCBjb3VsZG4ndCBiZSBjYXN0IHRvIEludAEOZ2V0X0RfaW50ZXJuYWwCAnhwA2FtcAQBUwoAAiRsBQJ4cAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHc3VtTGlzdAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8DCQAAAgUBUwAAAAAEA0FubgkAaAIFA2FtcAUGbkNvaW5zBARBbm5TCQC5AgIJALYCAQUDQW5uCQC2AgEFAVMEBEFubjEJALYCAQkAZQIFA0FubgABCgEFRHByb2MCA2FjYwFpAwkAAAIIBQNhY2MCXzIGBQNhY2MEBURwcmV2CAUDYWNjAl8xCgEHRF9QUHJvYwIDRF9QAWkDCQBmAgUGbkNvaW5zBQFpCQC6AgIJALkCAgUDRF9QBQVEcHJldgkAuQICCQC2AgEJAJEDAgUCeHAFAWkJALYCAQUGbkNvaW5zBQNEX1AEA0RfUAoAAiRsCQDMCAIAAAkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFCQDMCAIABgkAzAgCAAcJAMwIAgAICQDMCAIACQkAzAgCAAoJAMwIAgALCQDMCAIADAkAzAgCAA0JAMwIAgAOBQNuaWwKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQVEcHJldgoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEHRF9QUHJvYwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMV8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTUJAQUkZjFfMgIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8EAUQJALwCAwkAtwICBQRBbm5TCQC5AgIJALYCAQUGbkNvaW5zBQNEX1AFBURwcmV2CQC3AgIJALkCAgUEQW5uMQUFRHByZXYJALkCAgkAtgIBCQBkAgUGbkNvaW5zAAEFA0RfUAMJAL8CAgUBRAUFRHByZXYDCQBnAgABCQCgAwEJALgCAgUBRAUFRHByZXYJAJQKAgUBRAYJAJQKAgUBRAcDCQBnAgABCQCgAwEJALgCAgUFRHByZXYFAUQJAJQKAgUBRAYJAJQKAgUBRAcECyR0MDY2Mjk2NzQxCgACJGwJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUJAMwIAgAGCQDMCAIABwkAzAgCAAgJAMwIAgAJCQDMCAIACgkAzAgCAAsJAMwIAgAMCQDMCAIADQkAzAgCAA4FA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgkAtgIBBQFTBwoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFRHByb2MCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDE1CQEFJGYxXzICCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPBAFECAULJHQwNjYyOTY3NDECXzEECGZpbmlzaGVkCAULJHQwNjYyOTY3NDECXzIDCQAAAgUIZmluaXNoZWQHCQACAQkArAICAhpnZXRfRCgpIG5vdCBmaW5pc2hlZCB3aXRoIAkApgMBBQFECQCgAwEFAUQBB2dldERNZW0CAnhwA2FtcAkBBWdldF9EAgkBB194cF9tZW0BBQJ4cAUDYW1wAQRnZXRZBAJpbgNvdXQBeAN4cF8DCQEGYXNzZXJ0AQkBAiE9AgUCaW4FA291dAkAAgECCXNhbWUgY29pbgMJAQZhc3NlcnQBAwkAZwIFA291dAAACQBnAgUCaW4AAAcJAAIBAgpiZWxvdyB6ZXJvAwkBBmFzc2VydAEDCQBmAgUGbkNvaW5zBQNvdXQJAGYCBQZuQ29pbnMFAmluBwkAAgECDWFib3ZlIE5fQ09JTlMEA2FtcAkBAl9BAAQBRAkBBWdldF9EAgUDeHBfBQNhbXAEA0FubgkAaAIFA2FtcAUGbkNvaW5zCgEDU19jAgNhY2MBaQQLJHQwNzMxMjczMjkFA2FjYwQCU18IBQskdDA3MzEyNzMyOQJfMQQBYwgFCyR0MDczMTI3MzI5Al8yBAJ4XwMJAAACBQJpbgUBaQUBeAkAkQMCBQN4cF8FAWkDAwkBAiE9AgUBaQUDb3V0CQBmAgUGbkNvaW5zBQFpBwkAlAoCCQBkAgUCU18FAnhfCQC8AgMFAWMJALYCAQUBRAkAtgIBCQBoAgUCeF8FBm5Db2lucwkAlAoCBQJTXwUBYwQLJHQwNzUzNzc2MzgKAAIkbAkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQkAzAgCAAYJAMwIAgAHCQDMCAIACAkAzAgCAAkJAMwIAgAKCQDMCAIACwkAzAgCAAwJAMwIAgANCQDMCAIADgUDbmlsCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCAAAJALYCAQUBRAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEDU19jAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwQCU18IBQskdDA3NTM3NzYzOAJfMQQCY18IBQskdDA3NTM3NzYzOAJfMgQBYwkAvAIDBQJjXwkAtgIBBQFECQC2AgEJAGgCBQNBbm4FBm5Db2lucwQCYkQJALYCAQkAZQIJAGQCBQJTXwkAaQIFAUQFA0FubgUBRAoBBnlfcHJvYwIDYWNjAl9pAwkAAAIIBQNhY2MCXzIGBQNhY2MEBnlfcHJldggFA2FjYwJfMQQBeQkAugICCQC3AgIJALkCAgUGeV9wcmV2BQZ5X3ByZXYFAWMJALcCAgkAuQICBQRiaWcyBQZ5X3ByZXYFAmJEAwkAvwICBQF5BQZ5X3ByZXYDCQBnAgABCQCgAwEJALgCAgUBeQUGeV9wcmV2CQCUCgIFAXkGCQCUCgIFAXkHAwkAZwIAAQkAoAMBCQC4AgIFBnlfcHJldgUBeQkAlAoCBQF5BgkAlAoCBQF5BwQLJHQwODEyMDgyMzcKAAIkbAkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQkAzAgCAAYJAMwIAgAHCQDMCAIACAkAzAgCAAkJAMwIAgAKCQDMCAIACwkAzAgCAAwJAMwIAgANCQDMCAIADgkAzAgCAA8FA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgkAtgIBBQFEBwoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEGeV9wcm9jAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxNgkBBSRmMV8yAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQBAF5CAULJHQwODEyMDgyMzcCXzEECGZpbmlzaGVkCAULJHQwODEyMDgyMzcCXzIDCQAAAgUIZmluaXNoZWQHCQACAQkArAICAhlnZXRZKCkgbm90IGZpbmlzaGVkIHdpdGggCQCmAwEFAXkJAKADAQUBeQEHZ2V0X3lfRAQCQV8CaW4CeHABRAMJAQZhc3NlcnQBCQBnAgUCaW4AAAkAAgECDGkgYmVsb3cgemVybwMJAQZhc3NlcnQBCQBmAgUGbkNvaW5zBQJpbgkAAgECD2kgYWJvdmUgTl9DT0lOUwQDQW5uCQBoAgUCQV8FBm5Db2lucwoBA1NfYwIDYWNjAWkECyR0MDg2MTY4NjMzBQNhY2MEAlNfCAULJHQwODYxNjg2MzMCXzEEAWMIBQskdDA4NjE2ODYzMwJfMgQCeF8DAwkBAiE9AgUCaW4FAWkJAGYCBQZuQ29pbnMFAWkHCQCRAwIFAnhwBQFpAAADAwkAZgIFBm5Db2lucwUBaQkBAiE9AgUCaW4FAWkHCQCUCgIJAGQCBQJTXwUCeF8JALwCAwUBYwkAtgIBBQFECQC2AgEJAGgCBQJ4XwUGbkNvaW5zCQCUCgIFAlNfBQFjBAskdDA4ODUzODk1NAoAAiRsCQDMCAIAAAkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFCQDMCAIABgkAzAgCAAcJAMwIAgAICQDMCAIACQkAzAgCAAoJAMwIAgALCQDMCAIADAkAzAgCAA0JAMwIAgAOBQNuaWwKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIAAAkAtgIBBQFECgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNTX2MCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDE1CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPBAJTXwgFCyR0MDg4NTM4OTU0Al8xBAJjXwgFCyR0MDg4NTM4OTU0Al8yBAFjCQC8AgMFAmNfCQC2AgEFAUQJALYCAQkAaAIFA0FubgUGbkNvaW5zBAJiRAkAtgIBCQBlAgkAZAIFAlNfCQBpAgUBRAUDQW5uBQFECgEIeV9EX3Byb2MCA2FjYwFpAwkAAAIIBQNhY2MCXzIGBQNhY2MEBnlfcHJldggFA2FjYwJfMQQBeQkAugICCQC3AgIJALkCAgUGeV9wcmV2BQZ5X3ByZXYFAWMJALcCAgkAuQICBQRiaWcyBQZ5X3ByZXYFAmJEAwkAvwICBQF5BQZ5X3ByZXYDCQBnAgABCQCgAwEJALgCAgUBeQUGeV9wcmV2CQCUCgIFAXkGCQCUCgIFAXkHAwkAZwIAAQkAoAMBCQC4AgIFBnlfcHJldgUBeQkAlAoCBQF5BgkAlAoCBQF5BwQLJHQwOTQzNzk1NTYKAAIkbAkAzAgCAAAJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQkAzAgCAAYJAMwIAgAHCQDMCAIACAkAzAgCAAkJAMwIAgAKCQDMCAIACwkAzAgCAAwJAMwIAgANCQDMCAIADgkAzAgCAA8FA25pbAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgkAtgIBBQFEBwoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEIeV9EX3Byb2MCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDE2CQEFJGYxXzICCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAEAXkIBQskdDA5NDM3OTU1NgJfMQQIZmluaXNoZWQIBQskdDA5NDM3OTU1NgJfMgMJAAACBQhmaW5pc2hlZAcJAAIBCQCsAgICHGdldF95X0QoKSBub3QgZmluaXNoZWQgd2l0aCAJAKYDAQUBeQkAoAMBBQF5ARRfY2FsY1dpdGhkcmF3T25lQ29pbgQCeHANX3Rva2VuX2Ftb3VudAFpBmNhbGxlcgQLZmVlRGlzY291bnQJARRjYWxjdWxhdGVGZWVEaXNjb3VudAEFBmNhbGxlcgQDYW1wCQECX0EABARfZmVlCQBpAgkAaAIJAG4EBQNmZWUFC2ZlZURpc2NvdW50BQlmZWVTY2FsZTYFB0NFSUxJTkcFBm5Db2lucwkAaAIABAkAZQIFBm5Db2lucwABBAx0b3RhbF9zdXBwbHkFC3NoYXJlU3VwcGx5BAJEMAkBBWdldF9EAgUCeHAFA2FtcAQCRDEJAGUCBQJEMAkAawMFDV90b2tlbl9hbW91bnQFAkQwBQx0b3RhbF9zdXBwbHkEBW5ld195CQEHZ2V0X3lfRAQFA2FtcAUBaQUCeHAFAkQxBARkeV8wCQBlAgkAkQMCBQJ4cAUBaQUFbmV3X3kKAQ94cF9yZWR1Y2VkX3Byb2MCA2FjYwR4cF9qBA0kdDAxMDE5NzEwMjI2BQNhY2MECnhwX3JlZHVjZWQIBQ0kdDAxMDE5NzEwMjI2Al8xBAVpbmRleAgFDSR0MDEwMTk3MTAyMjYCXzIEC2R4X2V4cGVjdGVkAwkAAAIFBWluZGV4BQFpCQBlAgkAawMFBHhwX2oFAkQxBQJEMAUFbmV3X3kJAGUCBQR4cF9qCQBrAwUEeHBfagUCRDEFAkQwCQCUCgIJAM0IAgUKeHBfcmVkdWNlZAkAZQIFBHhwX2oJAGsDBQRfZmVlBQtkeF9leHBlY3RlZAUJZmVlU2NhbGU2CQBkAgUFaW5kZXgAAQQNJHQwMTA0ODgxMDU1MgoAAiRsBQJ4cAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUDbmlsAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBD3hwX3JlZHVjZWRfcHJvYwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8ECnhwX3JlZHVjZWQIBQ0kdDAxMDQ4ODEwNTUyAl8xBAVpbmRleAgFDSR0MDEwNDg4MTA1NTICXzIEDHhwX3JlZHVjZWRfaQkAkQMCBQp4cF9yZWR1Y2VkBQFpBAJkeQkAZQIJAGUCBQx4cF9yZWR1Y2VkX2kJAQdnZXRfeV9EBAUDYW1wBQFpBQp4cF9yZWR1Y2VkBQJEMQABCQCUCgIFAmR5CQBlAgUEZHlfMAUCZHkBDWdldFN0ckFzc2V0SWQBB2Fzc2V0SWQEByRtYXRjaDAFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQCaWQFByRtYXRjaDAJANgEAQUCaWQDCQABAgUHJG1hdGNoMAIEVW5pdAQFd2F2ZXMFByRtYXRjaDACBVdBVkVTCQACAQILTWF0Y2ggZXJyb3IBGGNhbGNTdGFraW5nRnVuY0FuZEFkZHJlcwIFc3Rha2UHYXNzZXRJZAMFBXN0YWtlCQCUCgICDGxvY2tOZXV0cmlubwUSc3Rha2luZ1VTRE5BZGRyZXNzCQCUCgICDnVubG9ja05ldXRyaW5vBRJzdGFraW5nVVNETkFkZHJlc3MBEWNhbGNTdGFraW5nUGFyYW1zAwVzdGFrZQZhbW91bnQHYXNzZXRJZAMFBXN0YWtlBA0kdDAxMTExNjExMTgyCQEYY2FsY1N0YWtpbmdGdW5jQW5kQWRkcmVzAgUFc3Rha2UFB2Fzc2V0SWQEBGNhbGwIBQ0kdDAxMTExNjExMTgyAl8xBAtzdGFraW5nQWRkcggFDSR0MDExMTE2MTExODICXzIJAJYKBAUEY2FsbAULc3Rha2luZ0FkZHIFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUHYXNzZXRJZAUGYW1vdW50BQNuaWwEDSR0MDExMjY4MTEzMzQJARhjYWxjU3Rha2luZ0Z1bmNBbmRBZGRyZXMCBQVzdGFrZQUHYXNzZXRJZAQEY2FsbAgFDSR0MDExMjY4MTEzMzQCXzEEC3N0YWtpbmdBZGRyCAUNJHQwMTEyNjgxMTMzNAJfMgkAlgoEBQRjYWxsBQtzdGFraW5nQWRkcgkAzAgCBQZhbW91bnQJAMwIAgkA2AQBBQdhc3NldElkBQNuaWwFA25pbAEFc3Rha2UCBmFtb3VudA1hc3NldElkU3RyaW5nAwkBD2NvbnRhaW5zRWxlbWVudAIFDXN0YWtpbmdBc3NldHMFDWFzc2V0SWRTdHJpbmcEDSR0MDExNTIxMTE2MjMJARFjYWxjU3Rha2luZ1BhcmFtcwMGBQZhbW91bnQJANkEAQUNYXNzZXRJZFN0cmluZwQEY2FsbAgFDSR0MDExNTIxMTE2MjMCXzEEBGFkZHIIBQ0kdDAxMTUyMTExNjIzAl8yBAZwYXJhbXMIBQ0kdDAxMTUyMTExNjIzAl8zBAhwYXltZW50cwgFDSR0MDExNTIxMTE2MjMCXzQJAPwHBAUEYWRkcgUEY2FsbAUGcGFyYW1zBQhwYXltZW50cwAAAQd1bnN0YWtlAgZhbW91bnQNYXNzZXRJZFN0cmluZwMJAQ9jb250YWluc0VsZW1lbnQCBQ1zdGFraW5nQXNzZXRzBQ1hc3NldElkU3RyaW5nBA0kdDAxMTgwODExOTExCQERY2FsY1N0YWtpbmdQYXJhbXMDBwUGYW1vdW50CQDZBAEFDWFzc2V0SWRTdHJpbmcEBGNhbGwIBQ0kdDAxMTgwODExOTExAl8xBARhZGRyCAUNJHQwMTE4MDgxMTkxMQJfMgQGcGFyYW1zCAUNJHQwMTE4MDgxMTkxMQJfMwQIcGF5bWVudHMIBQ0kdDAxMTgwODExOTExAl80CQD8BwQFBGFkZHIFBGNhbGwFBnBhcmFtcwUIcGF5bWVudHMAAAEMc3Rha2VkQW1vdW50AQdhc3NldElkBBZzdGFrZWRBbW91bnRDYWxjdWxhdGVkBAckbWF0Y2gwBQdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEA2FJZAUHJG1hdGNoMAMJAAACBQNhSWQFBFVTRE4JAJoIAgUSc3Rha2luZ1VTRE5BZGRyZXNzCQCsAgIJAKwCAgkArAICAgxycGRfYmFsYW5jZV8JANgEAQUDYUlkAgFfCQClCAEFBHRoaXMAAAMJAAECBQckbWF0Y2gwAgRVbml0AAAJAAIBAgtNYXRjaCBlcnJvcgQHJG1hdGNoMAUWc3Rha2VkQW1vdW50Q2FsY3VsYXRlZAMJAAECBQckbWF0Y2gwAgNJbnQEAWkFByRtYXRjaDAFAWkAAAEPY2hlY2tTdXNwaWNpb3VzAAQQY29udHJhY3RCYWxhbmNlcwkBA194cAAKAQxjaGVja0JhbGFuY2UCA2FjYwdhc3NldElkBA0kdDAxMjUyMjEyNTQ3BQNhY2MECnN1c3BpY2lvdXMIBQ0kdDAxMjUyMjEyNTQ3Al8xBAFpCAUNJHQwMTI1MjIxMjU0NwJfMgMFCnN1c3BpY2lvdXMJAJQKAgUKc3VzcGljaW91cwUBaQQIYUJhbGFuY2UJAGQCCQDwBwIFBHRoaXMJANkEAQUHYXNzZXRJZAkBDHN0YWtlZEFtb3VudAEJANkEAQUHYXNzZXRJZAMJAGYCCQCRAwIFEGNvbnRyYWN0QmFsYW5jZXMFAWkFCGFCYWxhbmNlCQCUCgIGBQFpCQCUCgIHCQBkAgUBaQABCgACJGwFCGFzc2V0SWRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBwAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQxjaGVja0JhbGFuY2UCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDE1CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPARFzdXNwZW5kU3VzcGljaW91cwEBaQkBB3N1c3BlbmQBCQCsAgICHVN1c3BpY2lvdXMgc3RhdGUgd2l0aCBhc3NldDogCQCRAwIFCGFzc2V0SWRzBQFpAQ5yZXR1cm5QYXltZW50cwIGY2FsbGVyCHBheW1lbnRzCgENcGFyc2VQYXltZW50cwIDYWNjB3BheW1lbnQJAM0IAgUDYWNjCQEOU2NyaXB0VHJhbnNmZXIDBQZjYWxsZXIIBQdwYXltZW50BmFtb3VudAgFB3BheW1lbnQHYXNzZXRJZAoAAiRsBQhwYXltZW50cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQENcGFyc2VQYXltZW50cwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8BEmNoZWNrREFwcFRocmVzaG9sZAELbmV3QmFsYW5jZXMEEWRBcHBUaHJlc2hvbGRDb2VmCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUEdGhpcwUSa0RBcHBUaHJlc2hvbGRDb2VmAhhObyBkQXBwVGhyZXNob2xkQ29lZiBrZXkEDnRocmVzaG9sZFNjYWxlAJBOBAptYXhCYWxhbmNlCQCWAwEFC25ld0JhbGFuY2VzBAptaW5CYWxhbmNlCQCXAwEFC25ld0JhbGFuY2VzBAVyYXRpbwkAawMFCm1heEJhbGFuY2UFDnRocmVzaG9sZFNjYWxlBQptaW5CYWxhbmNlAwkAZgIFBXJhdGlvCQBoAgURZEFwcFRocmVzaG9sZENvZWYFDnRocmVzaG9sZFNjYWxlCQACAQI4TmV3IGJhbGFuY2UgaW4gYXNzZXRzIG9mIHRoZSBEQXBwIGlzIGxlc3MgdGhhbiB0aHJlc2hvbGQHAQpjaGVja0NvaW5zAQhhc3NldElkcwQFY29pbnMJALUJAgUIYXNzZXRJZHMCASwKAQljaGVja0NvaW4CBWVycm9yB2Fzc2V0SWQEBWFzc2V0CQETdmFsdWVPckVycm9yTWVzc2FnZQIJANkEAQUHYXNzZXRJZAkArAICAhJmcm9tQmFzZTU4U3RyaW5nOiAFB2Fzc2V0SWQECGRlY2ltYWxzCAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEFBWFzc2V0CQCsAgICC2Fzc2V0SW5mbzogBQdhc3NldElkCGRlY2ltYWxzAwkBAiE9AgUIZGVjaW1hbHMFCERFQ0lNQUxTCQACAQIOd3JvbmcgZGVjaW1hbHMHCgACJGwFBWNvaW5zCgACJHMJAJADAQUCJGwKAAUkYWNjMAcKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWNoZWNrQ29pbgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8RA21zZwEBRAICeHADYW1wBAFECQEOZ2V0X0RfaW50ZXJuYWwCBQJ4cAUDYW1wCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQICAUQFAUQFA25pbAUBRANtc2cBBGluaXQDCGFzc2V0SWRzAl9BDGZpcnN0SGFydmVzdAMJAQEhAQkAnggBBQR0aGlzCQACAQITQWxyZWFkeSBpbml0aWFsaXplZAQJc2hhcmVOYW1lAgtzX011bHRpX1VTRAQQc2hhcmVEZXNjcmlwdGlvbgkArAICAkJTaGFyZVRva2VuIG9mIFN3b3BGaSBwcm90b2NvbCBmb3IgTXVsdGlTdGFibGUgVVNEIHBvb2wgYXQgYWRkcmVzcyAJAKUIAQUEdGhpcwQKaXNzdWVUb2tlbgkAwggFBQlzaGFyZU5hbWUFEHNoYXJlRGVzY3JpcHRpb24AAAAGBgQHdG9rZW5JZAkAuAgBBQppc3N1ZVRva2VuAwkBCmNoZWNrQ29pbnMBBQhhc3NldElkcwkBBXRocm93AAQJYmFzZUVudHJ5CQDMCAIJAQtTdHJpbmdFbnRyeQIFB2tBc3NldHMFCGFzc2V0SWRzCQDMCAIJAQxJbnRlZ2VyRW50cnkCAglpbml0aWFsX0EFAl9BCQDMCAIJAQxJbnRlZ2VyRW50cnkCAghmdXR1cmVfQQUCX0EJAMwIAgkBDEludGVnZXJFbnRyeQIFBGtGZWUJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBm9yYWNsZQINYmFzZV9mZWVfZmxhdAkAzAgCCQELU3RyaW5nRW50cnkCBQ1rU2hhcmVBc3NldElkCQDYBAEFB3Rva2VuSWQJAMwIAgkBDEludGVnZXJFbnRyeQIFEWtTaGFyZUFzc2V0U3VwcGx5AAAJAMwIAgkBDEludGVnZXJFbnRyeQIFEmtEQXBwVGhyZXNob2xkQ29lZgAPCQDMCAIJAQxCb29sZWFuRW50cnkCBQdrQWN0aXZlBgkAzAgCBQppc3N1ZVRva2VuBQNuaWwDBQxmaXJzdEhhcnZlc3QJAM4IAgUJYmFzZUVudHJ5CQDMCAIJAQxCb29sZWFuRW50cnkCBQ1rRmlyc3RIYXJ2ZXN0BQxmaXJzdEhhcnZlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIFE2tGaXJzdEhhcnZlc3RIZWlnaHQJAGQCBQtzdGFydEhlaWdodAkAaAIFFWZpcnN0SGFydmVzdEVuZFBlcmlvZAUMcGVyaW9kTGVuZ3RoBQNuaWwFCWJhc2VFbnRyeQNtc2cBDGFkZExpcXVpZGl0eQINbWluTWludEFtb3VudAxzdGFrZUZhcm1pbmcJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQAEA2FtcAkBAl9BAAQCeHAJAQNfeHAABAJEMAMJAAACBQtzaGFyZVN1cHBseQAAAAAJAQdnZXRETWVtAgUCeHAFA2FtcAQIcGF5bWVudHMIBQNtc2cIcGF5bWVudHMEAW4JAJADAQUIcGF5bWVudHMKAQ12YWxpZFBheW1lbnRzAQFuAwkAZgIFAW4FBm5Db2lucwkAAgEJAKwCAgIQcGF5bWVudHMgc2l6ZSA+IAkApAMBBQZuQ29pbnMDCQBmAgABBQFuCQACAQIRcGF5bWVudHMgc2l6ZSA8IDEDAwkAAAIFC3NoYXJlU3VwcGx5AAAJAQIhPQIFBm5Db2lucwUBbgcJAAIBAiJpbml0aWFsIGRlcG9zaXQgcmVxdWlyZXMgYWxsIGNvaW5zCgEMcGF5bWFudFZhbGlkAgNhY2MHcGF5bWVudAMJAQ9jb250YWluc0VsZW1lbnQCBQhhc3NldElkcwkBDWdldFN0ckFzc2V0SWQBCAUHcGF5bWVudAdhc3NldElkBgkAAgECGEludmFsaWQgYXNzZXQgaW4gcGF5bWVudAoAAiRsBQhwYXltZW50cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAHCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQxwYXltYW50VmFsaWQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDE1CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPAwkBASEBCQENdmFsaWRQYXltZW50cwEFAW4JAQV0aHJvdwAECnN1c3BpY2lvdXMJAQ9jaGVja1N1c3BpY2lvdXMAAwgFCnN1c3BpY2lvdXMCXzEJAM4IAgkBEXN1c3BlbmRTdXNwaWNpb3VzAQgFCnN1c3BpY2lvdXMCXzIJAQ5yZXR1cm5QYXltZW50cwIIBQNtc2cGY2FsbGVyBQhwYXltZW50cwQMcGF5bWVudHNTaXplCQCQAwEFCHBheW1lbnRzCgENcGFyc2VQYXltZW50cwIDYWNjB2Fzc2V0SWQEDSR0MDE2NjE5MTY2NDgFA2FjYwQLbmV3QmFsYW5jZXMIBQ0kdDAxNjYxOTE2NjQ4Al8xBAFpCAUNJHQwMTY2MTkxNjY0OAJfMgQBaggFDSR0MDE2NjE5MTY2NDgCXzMDAwkAZgIFDHBheW1lbnRzU2l6ZQUBagkAAAIJAQ1nZXRTdHJBc3NldElkAQgJAJEDAgUIcGF5bWVudHMFAWoHYXNzZXRJZAUHYXNzZXRJZAcEAXMJAQVzdGFrZQIICQCRAwIFCHBheW1lbnRzBQFqBmFtb3VudAkBDWdldFN0ckFzc2V0SWQBCAkAkQMCBQhwYXltZW50cwUBagdhc3NldElkAwkAAAIFAXMFAXMJAJUKAwkAzQgCBQtuZXdCYWxhbmNlcwkAZAIJAJEDAgUCeHAFAWkICQCRAwIFCHBheW1lbnRzBQFqBmFtb3VudAkAZAIFAWkAAQkAZAIFAWoAAQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAlQoDCQDNCAIFC25ld0JhbGFuY2VzCQCRAwIFAnhwBQFpCQBkAgUBaQABBQFqBA0kdDAxNjk1NDE3MDQwCgACJGwFCGFzc2V0SWRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlQoDBQNuaWwAAAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQ1wYXJzZVBheW1lbnRzAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwQLbmV3QmFsYW5jZXMIBQ0kdDAxNjk1NDE3MDQwAl8xBAFrCAUNJHQwMTY5NTQxNzA0MAJfMgQOcGFyc2VkUGF5bWVudHMIBQ0kdDAxNjk1NDE3MDQwAl8zAwkAZgIJAGUCBQxwYXltZW50c1NpemUAAQUOcGFyc2VkUGF5bWVudHMJAAIBAhdJbmNvcmVjdCBwYXltZW50cyBvcmRlcgMJARJjaGVja0RBcHBUaHJlc2hvbGQBBQtuZXdCYWxhbmNlcwkBBXRocm93AAQCRDEJAQdnZXRETWVtAgULbmV3QmFsYW5jZXMFA2FtcAMJAQZhc3NlcnQBCQBmAgUCRDEFAkQwCQACAQIHRDEgPiBEMAQLZmVlRGlzY291bnQJARRjYWxjdWxhdGVGZWVEaXNjb3VudAEIBQNtc2cGY2FsbGVyCgERY2FsY1NjcmlwdEFjdGlvbnMCA2FjYwpuZXdCYWxhbmNlBA0kdDAxNzQ0NTE3NDg2BQNhY2MEC2ludkJhbGFuY2VzCAUNJHQwMTc0NDUxNzQ4NgJfMQQNc2NyaXB0QWN0aW9ucwgFDSR0MDE3NDQ1MTc0ODYCXzIEAWkIBQ0kdDAxNzQ0NTE3NDg2Al8zAwkAZgIFC3NoYXJlU3VwcGx5AAAEBF9mZWUJAGkCCQBoAgkAbgQFA2ZlZQULZmVlRGlzY291bnQFCWZlZVNjYWxlNgUHQ0VJTElORwUGbkNvaW5zCQBoAgAECQBlAgUGbkNvaW5zAAEEBGZlZXMEDGlkZWFsQmFsYW5jZQkAawMFAkQxCQCRAwIFAnhwBQFpBQJEMAQKZGlmZmVyZW5jZQMJAGYCBQxpZGVhbEJhbGFuY2UFCm5ld0JhbGFuY2UJAGUCBQxpZGVhbEJhbGFuY2UFCm5ld0JhbGFuY2UJAGUCBQpuZXdCYWxhbmNlBQxpZGVhbEJhbGFuY2UJAGsDBQRfZmVlBQpkaWZmZXJlbmNlBQlmZWVTY2FsZTYEDmdvdmVybmFuY2VGZWVzCQBrAwUEZmVlcwUNZmVlR292ZXJuYW5jZQUJZmVlU2NhbGU2BAxmaW5hbEJhbGFuY2UJAGUCBQpuZXdCYWxhbmNlBQ5nb3Zlcm5hbmNlRmVlcwQQaW52YXJpYW50QmFsYW5jZQkAZQIFCm5ld0JhbGFuY2UFBGZlZXMEAnVzCQEHdW5zdGFrZQIFBGZlZXMJAJEDAgUIYXNzZXRJZHMFAWkDCQAAAgUCdXMFAnVzCQCVCgMJAM0IAgULaW52QmFsYW5jZXMFEGludmFyaWFudEJhbGFuY2UJAM4IAgUNc2NyaXB0QWN0aW9ucwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBRJjYXBNb25leUJveEFkZHJlc3MJAGUCBQRmZWVzBQ5nb3Zlcm5hbmNlRmVlcwkA2QQBCQCRAwIFCGFzc2V0SWRzBQFpCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFD21vbmV5Qm94QWRkcmVzcwUOZ292ZXJuYW5jZUZlZXMJANkEAQkAkQMCBQhhc3NldElkcwUBaQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCRAwIFCGFzc2V0SWRzBQFpBQ1rQXNzZXRCYWxhbmNlBQxmaW5hbEJhbGFuY2UFA25pbAkAZAIFAWkAAQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAlQoDCQDNCAIFC2ludkJhbGFuY2VzBQpuZXdCYWxhbmNlCQDNCAIFDXNjcmlwdEFjdGlvbnMJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAJEDAgUIYXNzZXRJZHMFAWkFDWtBc3NldEJhbGFuY2UFCm5ld0JhbGFuY2UJAGQCBQFpAAEEDSR0MDE4ODIzMTg5MTEKAAIkbAULbmV3QmFsYW5jZXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCVCgMFA25pbAUDbmlsAAAKAQUkZjFfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBEWNhbGNTY3JpcHRBY3Rpb25zAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxNQkBBSRmMV8yAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwQLaW52QmFsYW5jZXMIBQ0kdDAxODgyMzE4OTExAl8xBA1zY3JpcHRBY3Rpb25zCAUNJHQwMTg4MjMxODkxMQJfMgQCRDIJAQdnZXRETWVtAgULaW52QmFsYW5jZXMFA2FtcAQLbWludF9hbW91bnQDCQAAAgULc2hhcmVTdXBwbHkAAAUCRDEJAGsDBQtzaGFyZVN1cHBseQkAZQIFAkQyBQJEMAUCRDADCQEGYXNzZXJ0AQkAZwIFC21pbnRfYW1vdW50BQ1taW5NaW50QW1vdW50CQACAQIUU2xpcHBhZ2Ugc2NyZXdlZCB5b3UDBQxzdGFrZUZhcm1pbmcEAnJlCQD8BwQFBHRoaXMCDHJlaXNzdWVTaGFyZQkAzAgCBQttaW50X2Ftb3VudAUDbmlsBQNuaWwDCQAAAgUCcmUFAnJlBAFzCQD8BwQFDmZhcm1pbmdBZGRyZXNzAg9sb2NrU2hhcmVUb2tlbnMJAMwIAgkApQgBBQR0aGlzBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFDHNoYXJlQXNzZXRJZAULbWludF9hbW91bnQFA25pbAMJAAACBQFzBQFzCQDNCAIFDXNjcmlwdEFjdGlvbnMJAQxJbnRlZ2VyRW50cnkCBRFrU2hhcmVBc3NldFN1cHBseQkAZAIFC3NoYXJlU3VwcGx5BQttaW50X2Ftb3VudAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAzggCBQ1zY3JpcHRBY3Rpb25zCQDMCAIJAQdSZWlzc3VlAwUMc2hhcmVBc3NldElkBQttaW50X2Ftb3VudAYJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFA21zZwZjYWxsZXIFC21pbnRfYW1vdW50BQxzaGFyZUFzc2V0SWQJAMwIAgkBDEludGVnZXJFbnRyeQIFEWtTaGFyZUFzc2V0U3VwcGx5CQBkAgULc2hhcmVTdXBwbHkFC21pbnRfYW1vdW50BQNuaWwDbXNnAQxyZWlzc3VlU2hhcmUBBmFtb3VudAkBC3ZhbHVlT3JFbHNlAgkBCmlzU2VsZkNhbGwBBQNtc2cJAMwIAgkBB1JlaXNzdWUDBQxzaGFyZUFzc2V0SWQFBmFtb3VudAYFA25pbANtc2cBBWdldER5BAlhc3NldEZyb20HYXNzZXRUbwJkeAt1c2VyQWRkcmVzcwQCeHAJAQNfeHAABAlmcm9tSW5kZXgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAzwgCBQhhc3NldElkcwUJYXNzZXRGcm9tAhB1bmtub3duIHRva2VuIGluBAd0b0luZGV4CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAM8IAgUIYXNzZXRJZHMFB2Fzc2V0VG8CEXVua25vd24gdG9rZW4gb3V0BAF4CQBkAgkAkQMCBQJ4cAUJZnJvbUluZGV4BQJkeAQBeQkBBGdldFkEBQlmcm9tSW5kZXgFB3RvSW5kZXgFAXgFAnhwBAJkeQkAZQIJAGUCCQCRAwIFAnhwBQd0b0luZGV4BQF5AAEEC2ZlZURpc2NvdW50CQEUY2FsY3VsYXRlRmVlRGlzY291bnQBCQEHQWRkcmVzcwEJANkEAQULdXNlckFkZHJlc3MEBF9mZWUJAGsDCQBuBAUDZmVlBQtmZWVEaXNjb3VudAUJZmVlU2NhbGU2BQdDRUlMSU5HBQJkeQUJZmVlU2NhbGU2CQCUCgIFA25pbAkAlAoCCQBlAgUCZHkFBF9mZWUFBF9mZWUDbXNnAQhleGNoYW5nZQIIdG9rZW5PdXQGbWluX2R5CQELdmFsdWVPckVsc2UCCQEIaXNBY3RpdmUAAwkBAiE9AgkAkAMBCAUDbXNnCHBheW1lbnRzAAEJAAIBAhNzaXplKHBheW1lbnRzKSAhPSAxBApzdXNwaWNpb3VzCQEPY2hlY2tTdXNwaWNpb3VzAAMIBQpzdXNwaWNpb3VzAl8xCQDOCAIJARFzdXNwZW5kU3VzcGljaW91cwEIBQpzdXNwaWNpb3VzAl8yCQEOcmV0dXJuUGF5bWVudHMCCAUDbXNnBmNhbGxlcggFA21zZwhwYXltZW50cwQHcGF5bWVudAkAkQMCCAUDbXNnCHBheW1lbnRzAAAEB3Rva2VuSW4JAQ1nZXRTdHJBc3NldElkAQgFB3BheW1lbnQHYXNzZXRJZAQLdG9rZW5PdXRCNTgJANkEAQUIdG9rZW5PdXQEAmR4CAUHcGF5bWVudAZhbW91bnQECWZyb21JbmRleAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDPCAIFCGFzc2V0SWRzBQd0b2tlbkluAhB1bmtub3duIHRva2VuIGluBAd0b0luZGV4CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAM8IAgUIYXNzZXRJZHMFCHRva2VuT3V0AhF1bmtub3duIHRva2VuIG91dAQCeHAJAQNfeHAABAF4CQBkAgkAkQMCBQJ4cAUJZnJvbUluZGV4BQJkeAQBeQkBBGdldFkEBQlmcm9tSW5kZXgFB3RvSW5kZXgFAXgFAnhwBANfZHkJAGUCCQBlAgkAkQMCBQJ4cAUHdG9JbmRleAUBeQABBAtmZWVEaXNjb3VudAkBFGNhbGN1bGF0ZUZlZURpc2NvdW50AQgFA21zZwZjYWxsZXIEBF9mZWUJAGsDBQNfZHkJAG4EBQNmZWUFC2ZlZURpc2NvdW50BQlmZWVTY2FsZTYFB0NFSUxJTkcFCWZlZVNjYWxlNgQCZHkJAGUCBQNfZHkFBF9mZWUEDmdvdmVybmFuY2VGZWVzCQBrAwUEX2ZlZQUNZmVlR292ZXJuYW5jZQUJZmVlU2NhbGU2AwkBBmFzc2VydAEJAGcCBQJkeQUGbWluX2R5CQACAQIuRXhjaGFuZ2UgcmVzdWx0ZWQgaW4gZmV3ZXIgY29pbnMgdGhhbiBleHBlY3RlZAoBD21ha2VOZXdCYWxhbmNlcwIDYWNjDHRva2VuQmFsYW5jZQQNJHQwMjE2MjMyMTY0OQUDYWNjBAtuZXdCYWxhbmNlcwgFDSR0MDIxNjIzMjE2NDkCXzEEAWkIBQ0kdDAyMTYyMzIxNjQ5Al8yAwkAAAIFAWkFCWZyb21JbmRleAkAlAoCCQDNCAIFC25ld0JhbGFuY2VzCQBkAgUMdG9rZW5CYWxhbmNlBQJkeAkAZAIFAWkAAQMJAAACBQFpBQd0b0luZGV4CQCUCgIJAM0IAgULbmV3QmFsYW5jZXMJAGQCBQx0b2tlbkJhbGFuY2UFAmR5CQBkAgUBaQABCQCUCgIJAM0IAgULbmV3QmFsYW5jZXMFDHRva2VuQmFsYW5jZQkAZAIFAWkAAQQNJHQwMjE4OTkyMTk2MAoAAiRsBQJ4cAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUDbmlsAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBD21ha2VOZXdCYWxhbmNlcwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8EC25ld0JhbGFuY2VzCAUNJHQwMjE4OTkyMTk2MAJfMQQBaQgFDSR0MDIxODk5MjE5NjACXzIDCQESY2hlY2tEQXBwVGhyZXNob2xkAQULbmV3QmFsYW5jZXMJAQV0aHJvdwAEAXMJAQVzdGFrZQIIBQdwYXltZW50BmFtb3VudAkBDWdldFN0ckFzc2V0SWQBCAUHcGF5bWVudAdhc3NldElkAwkAAAIFAXMFAXMEAnVzCQEHdW5zdGFrZQIJAGQCBQJkeQUEX2ZlZQUIdG9rZW5PdXQDCQAAAgUCdXMFAnVzCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUHdG9rZW5JbgUNa0Fzc2V0QmFsYW5jZQUBeAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQh0b2tlbk91dAUNa0Fzc2V0QmFsYW5jZQkAZQIJAGUCCQCRAwIFAnhwBQd0b0luZGV4BQJkeQUOZ292ZXJuYW5jZUZlZXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFA21zZwZjYWxsZXIFAmR5BQt0b2tlbk91dEI1OAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQ9tb25leUJveEFkZHJlc3MFDmdvdmVybmFuY2VGZWVzBQt0b2tlbk91dEI1OAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQ9tb25leUJveEFkZHJlc3MJAGUCBQRfZmVlBQ5nb3Zlcm5hbmNlRmVlcwULdG9rZW5PdXRCNTgFA25pbAkAlAoCBQJkeQULdG9rZW5PdXRCNTgJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4DbXNnAQh3aXRoZHJhdwIKbWluQW1vdW50cwx1bmxvY2tBbW91bnQJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQADCQECIT0CCQCQAwEIBQNtc2cIcGF5bWVudHMAAQkAAgECE3NpemUocGF5bWVudHMpICE9IDEECnN1c3BpY2lvdXMJAQ9jaGVja1N1c3BpY2lvdXMAAwgFCnN1c3BpY2lvdXMCXzEJAM4IAgkBEXN1c3BlbmRTdXNwaWNpb3VzAQgFCnN1c3BpY2lvdXMCXzIJAQ5yZXR1cm5QYXltZW50cwIIBQNtc2cGY2FsbGVyCAUDbXNnCHBheW1lbnRzBAdwYXltZW50CQCRAwIIBQNtc2cIcGF5bWVudHMAAAQHdG9rZW5JbggFB3BheW1lbnQHYXNzZXRJZAMJAQIhPQIFB3Rva2VuSW4FDHNoYXJlQXNzZXRJZAkAAgECDXVua25vd24gdG9rZW4EB19hbW91bnQIBQdwYXltZW50BmFtb3VudAQMdG90YWxfc3VwcGx5BQtzaGFyZVN1cHBseQQGdW5sb2NrAwkAZgIFDHVubG9ja0Ftb3VudAAACQD8BwQFDmZhcm1pbmdBZGRyZXNzAhN3aXRoZHJhd1NoYXJlVG9rZW5zCQDMCAIJAKUIAQUEdGhpcwkAzAgCBQx1bmxvY2tBbW91bnQFA25pbAUDbmlsAAADCQAAAgUGdW5sb2NrBQZ1bmxvY2sEDndpdGhkcmF3QW1vdW50CQBkAgUHX2Ftb3VudAUMdW5sb2NrQW1vdW50CgERY2FsY1NjcmlwdEFjdGlvbnMCA2FjYwdiYWxhbmNlBA0kdDAyMzM2NTIzMzkzBQNhY2MEDXNjcmlwdEFjdGlvbnMIBQ0kdDAyMzM2NTIzMzkzAl8xBAFpCAUNJHQwMjMzNjUyMzM5MwJfMgQHd0Ftb3VudAkAawMFB2JhbGFuY2UFDndpdGhkcmF3QW1vdW50BQx0b3RhbF9zdXBwbHkDCQEGYXNzZXJ0AQkAZwIFB3dBbW91bnQJAJEDAgUKbWluQW1vdW50cwUBaQkAAgECMFdpdGhkcmF3YWwgcmVzdWx0ZWQgaW4gZmV3ZXIgY29pbnMgdGhhbiBleHBlY3RlZAQCdXMJAQd1bnN0YWtlAgUHd0Ftb3VudAkAkQMCBQhhc3NldElkcwUBaQMJAAACBQJ1cwUCdXMJAJQKAgkAzggCBQ1zY3JpcHRBY3Rpb25zCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAJEDAgUIYXNzZXRJZHMFAWkFDWtBc3NldEJhbGFuY2UJAGUCBQdiYWxhbmNlBQd3QW1vdW50CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQNtc2cGY2FsbGVyBQd3QW1vdW50CQDZBAEJAJEDAgUIYXNzZXRJZHMFAWkFA25pbAkAZAIFAWkAAQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgQNJHQwMjM4ODMyMzk1MQoAAiRsCQEDX3hwAAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUDbmlsAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBEWNhbGNTY3JpcHRBY3Rpb25zAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwQNc2NyaXB0QWN0aW9ucwgFDSR0MDIzODgzMjM5NTECXzEEAWkIBQ0kdDAyMzg4MzIzOTUxAl8yCQDOCAIFDXNjcmlwdEFjdGlvbnMJAMwIAgkBBEJ1cm4CBQxzaGFyZUFzc2V0SWQFDndpdGhkcmF3QW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCBRFrU2hhcmVBc3NldFN1cHBseQkAZQIFC3NoYXJlU3VwcGx5BQ53aXRoZHJhd0Ftb3VudAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuA21zZwETY2FsY1dpdGhkcmF3T25lQ29pbgMLdG9rZW5BbW91bnQIdG9rZW5PdXQEdXNlcgQBaQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDPCAIFCGFzc2V0SWRzBQh0b2tlbk91dAIRdW5rbm93biB0b2tlbiBvdXQJAJQKAgUDbmlsCAkBFF9jYWxjV2l0aGRyYXdPbmVDb2luBAkBA194cAAFC3Rva2VuQW1vdW50BQFpCQEHQWRkcmVzcwEJANkEAQUEdXNlcgJfMQNtc2cBD3dpdGhkcmF3T25lQ29pbgMIdG9rZW5PdXQJbWluQW1vdW50DHVubG9ja0Ftb3VudAkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAMJAQIhPQIJAJADAQgFA21zZwhwYXltZW50cwABCQACAQITc2l6ZShwYXltZW50cykgIT0gMQQKc3VzcGljaW91cwkBD2NoZWNrU3VzcGljaW91cwADCAUKc3VzcGljaW91cwJfMQkAzggCCQERc3VzcGVuZFN1c3BpY2lvdXMBCAUKc3VzcGljaW91cwJfMgkBDnJldHVyblBheW1lbnRzAggFA21zZwZjYWxsZXIIBQNtc2cIcGF5bWVudHMEB3BheW1lbnQJAJEDAggFA21zZwhwYXltZW50cwAABAd0b2tlbkluCAUHcGF5bWVudAdhc3NldElkAwkBAiE9AgUHdG9rZW5JbgUMc2hhcmVBc3NldElkCQACAQINdW5rbm93biB0b2tlbgQIb3V0SW5kZXgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAzwgCBQhhc3NldElkcwUIdG9rZW5PdXQCEXVua25vd24gdG9rZW4gb3V0BAxfdG9rZW5BbW91bnQIBQdwYXltZW50BmFtb3VudAQGdW5sb2NrAwkAZgIFDHVubG9ja0Ftb3VudAAACQD8BwQFDmZhcm1pbmdBZGRyZXNzAhN3aXRoZHJhd1NoYXJlVG9rZW5zCQDMCAIJAKUIAQUEdGhpcwkAzAgCBQx1bmxvY2tBbW91bnQFA25pbAUDbmlsAAADCQAAAgUGdW5sb2NrBQZ1bmxvY2sEDndpdGhkcmF3QW1vdW50CQBkAgUMX3Rva2VuQW1vdW50BQx1bmxvY2tBbW91bnQEAnhwCQEDX3hwAAQNJHQwMjUxODIyNTI2MwkBFF9jYWxjV2l0aGRyYXdPbmVDb2luBAUCeHAFDndpdGhkcmF3QW1vdW50BQhvdXRJbmRleAgFA21zZwZjYWxsZXIEAmR5CAUNJHQwMjUxODIyNTI2MwJfMQQGZHlfZmVlCAUNJHQwMjUxODIyNTI2MwJfMgMJAQZhc3NlcnQBCQBnAgUCZHkFCW1pbkFtb3VudAkAAgECGE5vdCBlbm91Z2ggY29pbnMgcmVtb3ZlZAQOZ292ZXJuYW5jZUZlZXMJAGsDBQZkeV9mZWUFDWZlZUdvdmVybmFuY2UFCWZlZVNjYWxlNgQKZHlfYW5kX2ZlZQkAZAIFAmR5BQZkeV9mZWUKAQ9tYWtlTmV3QmFsYW5jZXMCA2FjYwx0b2tlbkJhbGFuY2UEDSR0MDI1NTIxMjU1NDcFA2FjYwQLbmV3QmFsYW5jZXMIBQ0kdDAyNTUyMTI1NTQ3Al8xBAFpCAUNJHQwMjU1MjEyNTU0NwJfMgMJAAACBQFpBQhvdXRJbmRleAkAlAoCCQDNCAIFC25ld0JhbGFuY2VzCQBlAgUMdG9rZW5CYWxhbmNlBQpkeV9hbmRfZmVlCQBkAgUBaQABCQCUCgIJAM0IAgULbmV3QmFsYW5jZXMFDHRva2VuQmFsYW5jZQkAZAIFAWkAAQQNJHQwMjU3MTQyNTc3NQoAAiRsBQJ4cAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUDbmlsAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBD21ha2VOZXdCYWxhbmNlcwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8EC25ld0JhbGFuY2VzCAUNJHQwMjU3MTQyNTc3NQJfMQQBaQgFDSR0MDI1NzE0MjU3NzUCXzIDCQESY2hlY2tEQXBwVGhyZXNob2xkAQULbmV3QmFsYW5jZXMJAQV0aHJvdwAEAnVzCQEHdW5zdGFrZQIFCmR5X2FuZF9mZWUFCHRva2VuT3V0AwkAAAIFAnVzBQJ1cwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUDbXNnBmNhbGxlcgUCZHkJANkEAQUIdG9rZW5PdXQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkAkQMCBQhhc3NldElkcwUBaQUNa0Fzc2V0QmFsYW5jZQkAZQIJAJEDAgUCeHAFAWkFCmR5X2FuZF9mZWUJAMwIAgkBBEJ1cm4CBQxzaGFyZUFzc2V0SWQFDndpdGhkcmF3QW1vdW50CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFD21vbmV5Qm94QWRkcmVzcwUOZ292ZXJuYW5jZUZlZXMJANkEAQUIdG9rZW5PdXQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUSY2FwTW9uZXlCb3hBZGRyZXNzCQBlAgUGZHlfZmVlBQ5nb3Zlcm5hbmNlRmVlcwkA2QQBBQh0b2tlbk91dAkAzAgCCQEMSW50ZWdlckVudHJ5AgURa1NoYXJlQXNzZXRTdXBwbHkJAGUCBQtzaGFyZVN1cHBseQUOd2l0aGRyYXdBbW91bnQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgNtc2cBAUEACQCUCgIFA25pbAkBAl9BAANtc2cBD2dldFZpcnR1YWxQcmljZQAEAUQJAQVnZXRfRAIJAQNfeHAACQECX0EACQCUCgIFA25pbAkAawMFAUQFCVBSRUNJU0lPTgULc2hhcmVTdXBwbHkDbXNnAQ9jYWxjVG9rZW5BbW91bnQCB2Ftb3VudHMHZGVwb3NpdAQDYW1wCQECX0EABAhiYWxhbmNlcwkBA194cAAEAkQwCQEHZ2V0RE1lbQIFCGJhbGFuY2VzBQNhbXAKAQ9jYWxjTmV3QmFsYW5jZXMCA2FjYwdiYWxhbmNlBA0kdDAyNjczNjI2NzYyBQNhY2MEC25ld0JhbGFuY2VzCAUNJHQwMjY3MzYyNjc2MgJfMQQBaQgFDSR0MDI2NzM2MjY3NjICXzIECm5ld0JhbGFuY2UJAGQCBQdiYWxhbmNlAwUHZGVwb3NpdAkAkQMCBQdhbW91bnRzBQFpCQEBLQEJAJEDAgUHYW1vdW50cwUBaQkAlAoCCQDNCAIFC25ld0JhbGFuY2VzBQpuZXdCYWxhbmNlCQBkAgUBaQABBAtuZXdCYWxhbmNlcwgKAAIkbAUIYmFsYW5jZXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFA25pbAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQ9jYWxjTmV3QmFsYW5jZXMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDE1CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPAl8xBAJEMQkBB2dldERNZW0CBQtuZXdCYWxhbmNlcwUDYW1wBARkaWZmAwUHZGVwb3NpdAkAZQIFAkQxBQJEMAkAZQIFAkQwBQJEMQkAlAoCBQNuaWwJAGsDBQRkaWZmBQtzaGFyZVN1cHBseQUCRDADbXNnAQVyYW1wQQIIX2Z1dHVyZUELX2Z1dHVyZVRpbWUJAQt2YWx1ZU9yRWxzZQIJAQhpc0FjdGl2ZQAJAQt2YWx1ZU9yRWxzZQIJAQtpc0FkbWluQ2FsbAEFA21zZwMJAQZhc3NlcnQBCQBnAgUOYmxvY2tUaW1lc3RhbXAJAGQCBQ5pbml0aWFsX0FfdGltZQUNTUlOX1JBTVBfVElNRQkAAgECCXRvbyBvZnRlbgMJAQZhc3NlcnQBCQBnAgULX2Z1dHVyZVRpbWUJAGQCBQ5ibG9ja1RpbWVzdGFtcAUNTUlOX1JBTVBfVElNRQkAAgECEWluc3VmZmljaWVudCB0aW1lBApfaW5pdGlhbF9BCQECX0EAAwkBBmFzc2VydAEDCQBmAgUIX2Z1dHVyZUEAAAkAZgIFBU1BWF9BBQhfZnV0dXJlQQcJAAIBAhFvdXQgb2YgYmFzZSByYW5nZQMJAQZhc3NlcnQBAwMJAGcCBQhfZnV0dXJlQQUKX2luaXRpYWxfQQkAZwIJAGgCBQpfaW5pdGlhbF9BBQxNQVhfQV9DSEFOR0UFCF9mdXR1cmVBBwYDCQBmAgUKX2luaXRpYWxfQQUIX2Z1dHVyZUEJAGcCCQBoAgUIX2Z1dHVyZUEFDE1BWF9BX0NIQU5HRQUKX2luaXRpYWxfQQcJAAIBAgxvdXQgb2YgcmFuZ2UJAMwIAgkBDEludGVnZXJFbnRyeQICCWluaXRpYWxfQQUKX2luaXRpYWxfQQkAzAgCCQEMSW50ZWdlckVudHJ5AgIIZnV0dXJlX0EFCF9mdXR1cmVBCQDMCAIJAQxJbnRlZ2VyRW50cnkCAg5pbml0aWFsX0FfdGltZQUOYmxvY2tUaW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQICDWZ1dHVyZV9BX3RpbWUFC19mdXR1cmVUaW1lBQNuaWwDbXNnAQlzdG9wUmFtcEEACQELdmFsdWVPckVsc2UCCQEIaXNBY3RpdmUACQELdmFsdWVPckVsc2UCCQELaXNBZG1pbkNhbGwBBQNtc2cECGN1cnJlbnRBCQECX0EACQDMCAIJAQxJbnRlZ2VyRW50cnkCAglpbml0aWFsX0EFCGN1cnJlbnRBCQDMCAIJAQxJbnRlZ2VyRW50cnkCAghmdXR1cmVfQQUIY3VycmVudEEJAMwIAgkBDEludGVnZXJFbnRyeQICDmluaXRpYWxfQV90aW1lBQ5ibG9ja1RpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgINZnV0dXJlX0FfdGltZQUOYmxvY2tUaW1lc3RhbXAFA25pbANtc2cBCHNodXRkb3duAAkBC3ZhbHVlT3JFbHNlAgkBC2lzQWRtaW5DYWxsAQUDbXNnAwkBASEBBQZhY3RpdmUJAAIBCQCsAgICIkRBcHAgaXMgYWxyZWFkeSBzdXNwZW5kZWQuIENhdXNlOiAJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwUGa0NhdXNlAhp0aGUgY2F1c2Ugd2Fzbid0IHNwZWNpZmllZAkBB3N1c3BlbmQBAg9QYXVzZWQgYnkgYWRtaW4DbXNnAQhhY3RpdmF0ZQAJAQt2YWx1ZU9yRWxzZQIJAQtpc0FkbWluQ2FsbAEFA21zZwMFBmFjdGl2ZQkBDXRocm93SXNBY3RpdmUACQDMCAIJAQxCb29sZWFuRW50cnkCBQdrQWN0aXZlBgkAzAgCCQELRGVsZXRlRW50cnkBBQZrQ2F1c2UFA25pbANtc2cBGGtlZXBMaW1pdEZvckZpcnN0SGFydmVzdAEKc2hhcmVMaW1pdAkBC3ZhbHVlT3JFbHNlAgkBCGlzQWN0aXZlAAkBC3ZhbHVlT3JFbHNlAgkBC2lzQWRtaW5DYWxsAQUDbXNnCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQtrU2hhcmVMaW1pdAUKc2hhcmVMaW1pdAUDbmlsAQJ0eAEGdmVyaWZ5AAQTbXVsdGlTaWduZWRCeUFkbWlucwQSYWRtaW5QdWJLZXkxU2lnbmVkAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAUMYWRtaW5QdWJLZXkxAAEAAAQSYWRtaW5QdWJLZXkyU2lnbmVkAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAQUMYWRtaW5QdWJLZXkyAAEAAAQSYWRtaW5QdWJLZXkzU2lnbmVkAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAgUMYWRtaW5QdWJLZXkzAAEAAAkAZwIJAGQCCQBkAgUSYWRtaW5QdWJLZXkxU2lnbmVkBRJhZG1pblB1YktleTJTaWduZWQFEmFkbWluUHViS2V5M1NpZ25lZAACBAckbWF0Y2gwBQJ0eAMJAAECBQckbWF0Y2gwAhdJbnZva2VTY3JpcHRUcmFuc2FjdGlvbgQDaW52BQckbWF0Y2gwBBNjYWxsVGFrZUludG9BY2NvdW50AwkAAAIIBQNpbnYEZEFwcAUEdGhpcwkAAAIIBQNpbnYIZnVuY3Rpb24CGXRha2VJbnRvQWNjb3VudEV4dHJhRnVuZHMHBA1zaWduZWRCeUFkbWluAwMDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAABQxhZG1pblB1YktleTEGCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAABQxhZG1pblB1YktleTIGCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAABQxhZG1pblB1YktleTMGCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAABRFhZG1pblB1YktleUludm9rZQMDBRNjYWxsVGFrZUludG9BY2NvdW50BQ1zaWduZWRCeUFkbWluBwYFE211bHRpU2lnbmVkQnlBZG1pbnMFE211bHRpU2lnbmVkQnlBZG1pbnNrj+7c",
    "height": 2208529,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: AC5nvQNEV3xTDZp4XrdVKkmYkKDXVsf7JrbU7A96AaCK
Next: none

Diff: 
Old New Differences
6 6  let MAX_A = 1000000
7 7  
8 8  let MAX_A_CHANGE = 10
9 + 
10 + let DECIMALS = 6
9 11  
10 12  let MIN_RAMP_TIME = (86400 / 60)
11 13  
283 285                              else $Tuple2(D, false)
284 286                      }
285 287  
286 -             let $t066126724 = {
288 +             let $t066296741 = {
287 289                  let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14]
288 290                  let $s = size($l)
289 291                  let $acc0 = $Tuple2(toBigInt(S), false)
297 299  
298 300                  $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
299 301                  }
300 -             let D = $t066126724._1
301 -             let finished = $t066126724._2
302 +             let D = $t066296741._1
303 +             let finished = $t066296741._2
302 304              if ((finished == false))
303 305                  then throw(("get_D() not finished with " + toString(D)))
304 306                  else toInt(D)
324 326                  let D = get_D(xp_, amp)
325 327                  let Ann = (amp * nCoins)
326 328                  func S_c (acc,i) =                 {
327 -                     let $t072957312 = acc
328 -                     let S_ = $t072957312._1
329 -                     let c = $t072957312._2
329 +                     let $t073127329 = acc
330 +                     let S_ = $t073127329._1
331 +                     let c = $t073127329._2
330 332                      let x_ = if ((in == i))
331 333                          then x
332 334                          else xp_[i]
337 339                          else $Tuple2(S_, c)
338 340                      }
339 341  
340 -                 let $t075207621 = {
342 +                 let $t075377638 = {
341 343                      let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14]
342 344                      let $s = size($l)
343 345                      let $acc0 = $Tuple2(0, toBigInt(D))
351 353  
352 354                      $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
353 355                      }
354 -                 let S_ = $t075207621._1
355 -                 let c_ = $t075207621._2
356 +                 let S_ = $t075377638._1
357 +                 let c_ = $t075377638._2
356 358                  let c = fraction(c_, toBigInt(D), toBigInt((Ann * nCoins)))
357 359                  let bD = toBigInt(((S_ + (D / Ann)) - D))
358 360                  func y_proc (acc,_i) =                 if ((acc._2 == true))
369 371                                  else $Tuple2(y, false)
370 372                          }
371 373  
372 -                 let $t081038220 = {
374 +                 let $t081208237 = {
373 375                      let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15]
374 376                      let $s = size($l)
375 377                      let $acc0 = $Tuple2(toBigInt(D), false)
383 385  
384 386                      $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16)
385 387                      }
386 -                 let y = $t081038220._1
387 -                 let finished = $t081038220._2
388 +                 let y = $t081208237._1
389 +                 let finished = $t081208237._2
388 390                  if ((finished == false))
389 391                      then throw(("getY() not finished with " + toString(y)))
390 392                      else toInt(y)
398 400          else {
399 401              let Ann = (A_ * nCoins)
400 402              func S_c (acc,i) =             {
401 -                 let $t085998616 = acc
402 -                 let S_ = $t085998616._1
403 -                 let c = $t085998616._2
403 +                 let $t086168633 = acc
404 +                 let S_ = $t086168633._1
405 +                 let c = $t086168633._2
404 406                  let x_ = if (if ((in != i))
405 407                      then (nCoins > i)
406 408                      else false)
413 415                      else $Tuple2(S_, c)
414 416                  }
415 417  
416 -             let $t088368937 = {
418 +             let $t088538954 = {
417 419                  let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14]
418 420                  let $s = size($l)
419 421                  let $acc0 = $Tuple2(0, toBigInt(D))
427 429  
428 430                  $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
429 431                  }
430 -             let S_ = $t088368937._1
431 -             let c_ = $t088368937._2
432 +             let S_ = $t088538954._1
433 +             let c_ = $t088538954._2
432 434              let c = fraction(c_, toBigInt(D), toBigInt((Ann * nCoins)))
433 435              let bD = toBigInt(((S_ + (D / Ann)) - D))
434 436              func y_D_proc (acc,i) =             if ((acc._2 == true))
445 447                              else $Tuple2(y, false)
446 448                      }
447 449  
448 -             let $t094209539 = {
450 +             let $t094379556 = {
449 451                  let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15]
450 452                  let $s = size($l)
451 453                  let $acc0 = $Tuple2(toBigInt(D), false)
459 461  
460 462                  $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16)
461 463                  }
462 -             let y = $t094209539._1
463 -             let finished = $t094209539._2
464 +             let y = $t094379556._1
465 +             let finished = $t094379556._2
464 466              if ((finished == false))
465 467                  then throw(("get_y_D() not finished with " + toString(y)))
466 468                  else toInt(y)
477 479      let new_y = get_y_D(amp, i, xp, D1)
478 480      let dy_0 = (xp[i] - new_y)
479 481      func xp_reduced_proc (acc,xp_j) =     {
480 -         let $t01018010209 = acc
481 -         let xp_reduced = $t01018010209._1
482 -         let index = $t01018010209._2
482 +         let $t01019710226 = acc
483 +         let xp_reduced = $t01019710226._1
484 +         let index = $t01019710226._2
483 485          let dx_expected = if ((index == i))
484 486              then (fraction(xp_j, D1, D0) - new_y)
485 487              else (xp_j - fraction(xp_j, D1, D0))
486 488          $Tuple2((xp_reduced :+ (xp_j - fraction(_fee, dx_expected, feeScale6))), (index + 1))
487 489          }
488 490  
489 -     let $t01047110535 = {
491 +     let $t01048810552 = {
490 492          let $l = xp
491 493          let $s = size($l)
492 494          let $acc0 = $Tuple2(nil, 0)
500 502  
501 503          $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
502 504          }
503 -     let xp_reduced = $t01047110535._1
504 -     let index = $t01047110535._2
505 +     let xp_reduced = $t01048810552._1
506 +     let index = $t01048810552._2
505 507      let xp_reduced_i = xp_reduced[i]
506 508      let dy = ((xp_reduced_i - get_y_D(amp, i, xp_reduced, D1)) - 1)
507 509      $Tuple2(dy, (dy_0 - dy))
525 527  
526 528  func calcStakingParams (stake,amount,assetId) = if (stake)
527 529      then {
528 -         let $t01109911165 = calcStakingFuncAndAddres(stake, assetId)
529 -         let call = $t01109911165._1
530 -         let stakingAddr = $t01109911165._2
530 +         let $t01111611182 = calcStakingFuncAndAddres(stake, assetId)
531 +         let call = $t01111611182._1
532 +         let stakingAddr = $t01111611182._2
531 533          $Tuple4(call, stakingAddr, nil, [AttachedPayment(assetId, amount)])
532 534          }
533 535      else {
534 -         let $t01125111317 = calcStakingFuncAndAddres(stake, assetId)
535 -         let call = $t01125111317._1
536 -         let stakingAddr = $t01125111317._2
536 +         let $t01126811334 = calcStakingFuncAndAddres(stake, assetId)
537 +         let call = $t01126811334._1
538 +         let stakingAddr = $t01126811334._2
537 539          $Tuple4(call, stakingAddr, [amount, toBase58String(assetId)], nil)
538 540          }
539 541  
540 542  
541 543  func stake (amount,assetIdString) = if (containsElement(stakingAssets, assetIdString))
542 544      then {
543 -         let $t01150411606 = calcStakingParams(true, amount, fromBase58String(assetIdString))
544 -         let call = $t01150411606._1
545 -         let addr = $t01150411606._2
546 -         let params = $t01150411606._3
547 -         let payments = $t01150411606._4
545 +         let $t01152111623 = calcStakingParams(true, amount, fromBase58String(assetIdString))
546 +         let call = $t01152111623._1
547 +         let addr = $t01152111623._2
548 +         let params = $t01152111623._3
549 +         let payments = $t01152111623._4
548 550          invoke(addr, call, params, payments)
549 551          }
550 552      else 0
552 554  
553 555  func unstake (amount,assetIdString) = if (containsElement(stakingAssets, assetIdString))
554 556      then {
555 -         let $t01179111894 = calcStakingParams(false, amount, fromBase58String(assetIdString))
556 -         let call = $t01179111894._1
557 -         let addr = $t01179111894._2
558 -         let params = $t01179111894._3
559 -         let payments = $t01179111894._4
557 +         let $t01180811911 = calcStakingParams(false, amount, fromBase58String(assetIdString))
558 +         let call = $t01180811911._1
559 +         let addr = $t01180811911._2
560 +         let params = $t01180811911._3
561 +         let payments = $t01180811911._4
560 562          invoke(addr, call, params, payments)
561 563          }
562 564      else 0
585 587  func checkSuspicious () = {
586 588      let contractBalances = _xp()
587 589      func checkBalance (acc,assetId) =     {
588 -         let $t01250512530 = acc
589 -         let suspicious = $t01250512530._1
590 -         let i = $t01250512530._2
590 +         let $t01252212547 = acc
591 +         let suspicious = $t01252212547._1
592 +         let i = $t01252212547._2
591 593          if (suspicious)
592 594              then $Tuple2(suspicious, i)
593 595              else {
637 639  func checkDAppThreshold (newBalances) = {
638 640      let dAppThresholdCoef = valueOrErrorMessage(getInteger(this, kDAppThresholdCoef), "No dAppThresholdCoef key")
639 641      let thresholdScale = 10000
640 -     func iterAllBalances (acc,tokenBalance) =     {
641 -         let $t01350913550 = acc
642 -         let thresholdError = $t01350913550._1
643 -         let cutedBalances = $t01350913550._2
644 -         func iterCutedBalances (checkRatio,checkedBalance) =         {
645 -             let ratio = fraction(tokenBalance, thresholdScale, checkedBalance)
646 -             if (if ((ratio > (dAppThresholdCoef * thresholdScale)))
647 -                 then true
648 -                 else (fraction(1, thresholdScale, dAppThresholdCoef) > ratio))
649 -                 then throw("New balance in assets of the DApp is less than threshold")
650 -                 else false
651 -             }
642 +     let maxBalance = max(newBalances)
643 +     let minBalance = min(newBalances)
644 +     let ratio = fraction(maxBalance, thresholdScale, minBalance)
645 +     if ((ratio > (dAppThresholdCoef * thresholdScale)))
646 +         then throw("New balance in assets of the DApp is less than threshold")
647 +         else false
648 +     }
652 649  
653 -         $Tuple2({
654 -             let $l = cutedBalances
655 -             let $s = size($l)
656 -             let $acc0 = thresholdError
657 -             func $f0_1 ($a,$i) =             if (($i >= $s))
658 -                 then $a
659 -                 else iterCutedBalances($a, $l[$i])
660 650  
661 -             func $f0_2 ($a,$i) =             if (($i >= $s))
662 -                 then $a
663 -                 else throw("List size exceeds 15")
664 - 
665 -             $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
666 -             }, removeByIndex(cutedBalances, 0))
651 + func checkCoins (assetIds) = {
652 +     let coins = split(assetIds, ",")
653 +     func checkCoin (error,assetId) =     {
654 +         let asset = valueOrErrorMessage(fromBase58String(assetId), ("fromBase58String: " + assetId))
655 +         let decimals = valueOrErrorMessage(assetInfo(asset), ("assetInfo: " + assetId)).decimals
656 +         if ((decimals != DECIMALS))
657 +             then throw("wrong decimals")
658 +             else false
667 659          }
668 660  
669 -     let $t01407214175 = {
670 -         let $l = newBalances
671 -         let $s = size($l)
672 -         let $acc0 = $Tuple2(false, removeByIndex(newBalances, 0))
673 -         func $f0_1 ($a,$i) =         if (($i >= $s))
674 -             then $a
675 -             else iterAllBalances($a, $l[$i])
661 +     let $l = coins
662 +     let $s = size($l)
663 +     let $acc0 = false
664 +     func $f0_1 ($a,$i) =     if (($i >= $s))
665 +         then $a
666 +         else checkCoin($a, $l[$i])
676 667  
677 -         func $f0_2 ($a,$i) =         if (($i >= $s))
678 -             then $a
679 -             else throw("List size exceeds 15")
668 +     func $f0_2 ($a,$i) =     if (($i >= $s))
669 +         then $a
670 +         else throw("List size exceeds 15")
680 671  
681 -         $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
682 -         }
683 -     let thresholdError = $t01407214175._1
684 -     let b = $t01407214175._2
685 -     thresholdError
672 +     $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
686 673      }
687 674  
688 675  
695 682  
696 683  
697 684  @Callable(msg)
698 - func init (coins,_A,firstHarvest) = if (!(isDataStorageUntouched(this)))
685 + func init (assetIds,_A,firstHarvest) = if (!(isDataStorageUntouched(this)))
699 686      then throw("Already initialized")
700 687      else {
701 688          let shareName = "s_Multi_USD"
702 689          let shareDescription = ("ShareToken of SwopFi protocol for MultiStable USD pool at address " + toString(this))
703 690          let issueToken = Issue(shareName, shareDescription, 0, 6, true)
704 691          let tokenId = calculateAssetId(issueToken)
705 -         let baseEntry = [StringEntry(kAssets, coins), IntegerEntry("initial_A", _A), IntegerEntry("future_A", _A), IntegerEntry(kFee, getIntegerValue(oracle, "base_fee_flat")), StringEntry(kShareAssetId, toBase58String(tokenId)), IntegerEntry(kShareAssetSupply, 0), IntegerEntry(kDAppThresholdCoef, 15), BooleanEntry(kActive, true), issueToken]
706 -         if (firstHarvest)
707 -             then (baseEntry ++ [BooleanEntry(kFirstHarvest, firstHarvest), IntegerEntry(kFirstHarvestHeight, (startHeight + (firstHarvestEndPeriod * periodLength)))])
708 -             else baseEntry
692 +         if (checkCoins(assetIds))
693 +             then throw()
694 +             else {
695 +                 let baseEntry = [StringEntry(kAssets, assetIds), IntegerEntry("initial_A", _A), IntegerEntry("future_A", _A), IntegerEntry(kFee, getIntegerValue(oracle, "base_fee_flat")), StringEntry(kShareAssetId, toBase58String(tokenId)), IntegerEntry(kShareAssetSupply, 0), IntegerEntry(kDAppThresholdCoef, 15), BooleanEntry(kActive, true), issueToken]
696 +                 if (firstHarvest)
697 +                     then (baseEntry ++ [BooleanEntry(kFirstHarvest, firstHarvest), IntegerEntry(kFirstHarvestHeight, (startHeight + (firstHarvestEndPeriod * periodLength)))])
698 +                     else baseEntry
699 +                 }
709 700          }
710 701  
711 702  
755 746                  else {
756 747                      let paymentsSize = size(payments)
757 748                      func parsePayments (acc,assetId) =                     {
758 -                         let $t01658116610 = acc
759 -                         let newBalances = $t01658116610._1
760 -                         let i = $t01658116610._2
761 -                         let j = $t01658116610._3
749 +                         let $t01661916648 = acc
750 +                         let newBalances = $t01661916648._1
751 +                         let i = $t01661916648._2
752 +                         let j = $t01661916648._3
762 753                          if (if ((paymentsSize > j))
763 754                              then (getStrAssetId(payments[j].assetId) == assetId)
764 755                              else false)
771 762                              else $Tuple3((newBalances :+ xp[i]), (i + 1), j)
772 763                          }
773 764  
774 -                     let $t01691617002 = {
765 +                     let $t01695417040 = {
775 766                          let $l = assetIds
776 767                          let $s = size($l)
777 768                          let $acc0 = $Tuple3(nil, 0, 0)
785 776  
786 777                          $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
787 778                          }
788 -                     let newBalances = $t01691617002._1
789 -                     let k = $t01691617002._2
790 -                     let parsedPayments = $t01691617002._3
779 +                     let newBalances = $t01695417040._1
780 +                     let k = $t01695417040._2
781 +                     let parsedPayments = $t01695417040._3
791 782                      if (((paymentsSize - 1) > parsedPayments))
792 783                          then throw("Incorect payments order")
793 784                          else if (checkDAppThreshold(newBalances))
799 790                                      else {
800 791                                          let feeDiscount = calculateFeeDiscount(msg.caller)
801 792                                          func calcScriptActions (acc,newBalance) =                                         {
802 -                                             let $t01740717448 = acc
803 -                                             let invBalances = $t01740717448._1
804 -                                             let scriptActions = $t01740717448._2
805 -                                             let i = $t01740717448._3
793 +                                             let $t01744517486 = acc
794 +                                             let invBalances = $t01744517486._1
795 +                                             let scriptActions = $t01744517486._2
796 +                                             let i = $t01744517486._3
806 797                                              if ((shareSupply > 0))
807 798                                                  then {
808 799                                                      let _fee = ((fraction(fee, feeDiscount, feeScale6, CEILING) * nCoins) / (4 * (nCoins - 1)))
824 815                                                  else $Tuple3((invBalances :+ newBalance), (scriptActions :+ IntegerEntry((assetIds[i] + kAssetBalance), newBalance)), (i + 1))
825 816                                              }
826 817  
827 -                                         let $t01878518873 = {
818 +                                         let $t01882318911 = {
828 819                                              let $l = newBalances
829 820                                              let $s = size($l)
830 821                                              let $acc0 = $Tuple3(nil, nil, 0)
838 829  
839 830                                              $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
840 831                                              }
841 -                                         let invBalances = $t01878518873._1
842 -                                         let scriptActions = $t01878518873._2
832 +                                         let invBalances = $t01882318911._1
833 +                                         let scriptActions = $t01882318911._2
843 834                                          let D2 = getDMem(invBalances, amp)
844 835                                          let mint_amount = if ((shareSupply == 0))
845 836                                              then D1
913 904                      then throw("Exchange resulted in fewer coins than expected")
914 905                      else {
915 906                          func makeNewBalances (acc,tokenBalance) =                         {
916 -                             let $t02158521611 = acc
917 -                             let newBalances = $t02158521611._1
918 -                             let i = $t02158521611._2
907 +                             let $t02162321649 = acc
908 +                             let newBalances = $t02162321649._1
909 +                             let i = $t02162321649._2
919 910                              if ((i == fromIndex))
920 911                                  then $Tuple2((newBalances :+ (tokenBalance + dx)), (i + 1))
921 912                                  else if ((i == toIndex))
923 914                                      else $Tuple2((newBalances :+ tokenBalance), (i + 1))
924 915                              }
925 916  
926 -                         let $t02186121922 = {
917 +                         let $t02189921960 = {
927 918                              let $l = xp
928 919                              let $s = size($l)
929 920                              let $acc0 = $Tuple2(nil, 0)
937 928  
938 929                              $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
939 930                              }
940 -                         let newBalances = $t02186121922._1
941 -                         let i = $t02186121922._2
931 +                         let newBalances = $t02189921960._1
932 +                         let i = $t02189921960._2
942 933                          if (checkDAppThreshold(newBalances))
943 934                              then throw()
944 935                              else {
980 971                              then {
981 972                                  let withdrawAmount = (_amount + unlockAmount)
982 973                                  func calcScriptActions (acc,balance) =                                 {
983 -                                     let $t02332723355 = acc
984 -                                     let scriptActions = $t02332723355._1
985 -                                     let i = $t02332723355._2
974 +                                     let $t02336523393 = acc
975 +                                     let scriptActions = $t02336523393._1
976 +                                     let i = $t02336523393._2
986 977                                      let wAmount = fraction(balance, withdrawAmount, total_supply)
987 978                                      if (assert((wAmount >= minAmounts[i])))
988 979                                          then throw("Withdrawal resulted in fewer coins than expected")
994 985                                              }
995 986                                      }
996 987  
997 -                                 let $t02384523913 = {
988 +                                 let $t02388323951 = {
998 989                                      let $l = _xp()
999 990                                      let $s = size($l)
1000 991                                      let $acc0 = $Tuple2(nil, 0)
1008 999  
1009 1000                                      $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
1010 1001                                      }
1011 -                                 let scriptActions = $t02384523913._1
1012 -                                 let i = $t02384523913._2
1002 +                                 let scriptActions = $t02388323951._1
1003 +                                 let i = $t02388323951._2
1013 1004                                  (scriptActions ++ [Burn(shareAssetId, withdrawAmount), IntegerEntry(kShareAssetSupply, (shareSupply - withdrawAmount))])
1014 1005                                  }
1015 1006                              else throw("Strict value is not equal to itself.")
1049 1040                              then {
1050 1041                                  let withdrawAmount = (_tokenAmount + unlockAmount)
1051 1042                                  let xp = _xp()
1052 -                                 let $t02514425225 = _calcWithdrawOneCoin(xp, withdrawAmount, outIndex, msg.caller)
1053 -                                 let dy = $t02514425225._1
1054 -                                 let dy_fee = $t02514425225._2
1043 +                                 let $t02518225263 = _calcWithdrawOneCoin(xp, withdrawAmount, outIndex, msg.caller)
1044 +                                 let dy = $t02518225263._1
1045 +                                 let dy_fee = $t02518225263._2
1055 1046                                  if (assert((dy >= minAmount)))
1056 1047                                      then throw("Not enough coins removed")
1057 1048                                      else {
1058 1049                                          let governanceFees = fraction(dy_fee, feeGovernance, feeScale6)
1059 1050                                          let dy_and_fee = (dy + dy_fee)
1060 1051                                          func makeNewBalances (acc,tokenBalance) =                                         {
1061 -                                             let $t02548325509 = acc
1062 -                                             let newBalances = $t02548325509._1
1063 -                                             let i = $t02548325509._2
1052 +                                             let $t02552125547 = acc
1053 +                                             let newBalances = $t02552125547._1
1054 +                                             let i = $t02552125547._2
1064 1055                                              if ((i == outIndex))
1065 1056                                                  then $Tuple2((newBalances :+ (tokenBalance - dy_and_fee)), (i + 1))
1066 1057                                                  else $Tuple2((newBalances :+ tokenBalance), (i + 1))
1067 1058                                              }
1068 1059  
1069 -                                         let $t02567625737 = {
1060 +                                         let $t02571425775 = {
1070 1061                                              let $l = xp
1071 1062                                              let $s = size($l)
1072 1063                                              let $acc0 = $Tuple2(nil, 0)
1080 1071  
1081 1072                                              $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
1082 1073                                              }
1083 -                                         let newBalances = $t02567625737._1
1084 -                                         let i = $t02567625737._2
1074 +                                         let newBalances = $t02571425775._1
1075 +                                         let i = $t02571425775._2
1085 1076                                          if (checkDAppThreshold(newBalances))
1086 1077                                              then throw()
1087 1078                                              else {
1118 1109      let balances = _xp()
1119 1110      let D0 = getDMem(balances, amp)
1120 1111      func calcNewBalances (acc,balance) =     {
1121 -         let $t02669826724 = acc
1122 -         let newBalances = $t02669826724._1
1123 -         let i = $t02669826724._2
1112 +         let $t02673626762 = acc
1113 +         let newBalances = $t02673626762._1
1114 +         let i = $t02673626762._2
1124 1115          let newBalance = (balance + (if (deposit)
1125 1116              then amounts[i]
1126 1117              else -(amounts[i])))
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let PRECISION = 1000000
5 5  
6 6  let MAX_A = 1000000
7 7  
8 8  let MAX_A_CHANGE = 10
9 + 
10 + let DECIMALS = 6
9 11  
10 12  let MIN_RAMP_TIME = (86400 / 60)
11 13  
12 14  let kAssets = "asset_ids"
13 15  
14 16  let kAssetBalance = "_balance"
15 17  
16 18  let kActive = "active"
17 19  
18 20  let kCause = "shutdown_cause"
19 21  
20 22  let kShareAssetId = "share_asset_id"
21 23  
22 24  let kShareAssetSupply = "share_asset_supply"
23 25  
24 26  let kFee = "commission"
25 27  
26 28  let kDAppThresholdCoef = "dAppThresholdCoef"
27 29  
28 30  let kUSDNAddress = "staking_usdnnsbt_address"
29 31  
30 32  let kDiscounts = "discounts"
31 33  
32 34  let kDiscountValues = "discount_values"
33 35  
34 36  let kUserSwopInGov = "_SWOP_amount"
35 37  
36 38  let kFirstHarvest = "first_harvest"
37 39  
38 40  let kFirstHarvestHeight = "first_harvest_height"
39 41  
40 42  let kShareLimit = "share_limit_on_first_harvest"
41 43  
42 44  let kBasePeriod = "base_period"
43 45  
44 46  let kPeriodLength = "period_length"
45 47  
46 48  let kStartHeight = "start_height"
47 49  
48 50  let kAdminPubKey1 = "admin_pub_1"
49 51  
50 52  let kAdminPubKey2 = "admin_pub_2"
51 53  
52 54  let kAdminPubKey3 = "admin_pub_3"
53 55  
54 56  let kAdminInvokePubKey = "admin_invoke_pub"
55 57  
56 58  let kMoneyBoxAddress = "money_box_address"
57 59  
58 60  let kGovAddress = "governance_address"
59 61  
60 62  let kVotingAddress = "voting_address"
61 63  
62 64  let kFarmingAddress = "farming_address"
63 65  
64 66  let oracle = Address(base58'3NBBWfzZtZtszaXbitTKnrB2xXwv26Bn7H9')
65 67  
66 68  func getBase58FromOracle (key) = match getString(oracle, key) {
67 69      case string: String => 
68 70          fromBase58String(string)
69 71      case nothing => 
70 72          throw((key + "is empty"))
71 73  }
72 74  
73 75  
74 76  let adminPubKey1 = getBase58FromOracle(kAdminPubKey1)
75 77  
76 78  let adminPubKey2 = getBase58FromOracle(kAdminPubKey2)
77 79  
78 80  let adminPubKey3 = getBase58FromOracle(kAdminPubKey3)
79 81  
80 82  let adminPubKeyInvoke = getBase58FromOracle(kAdminInvokePubKey)
81 83  
82 84  let moneyBoxAddress = Address(getBase58FromOracle(kMoneyBoxAddress))
83 85  
84 86  let govAddress = Address(getBase58FromOracle(kGovAddress))
85 87  
86 88  let stakingUSDNAddress = Address(getBase58FromOracle(kUSDNAddress))
87 89  
88 90  let votingAddress = Address(getBase58FromOracle(kVotingAddress))
89 91  
90 92  let farmingAddress = Address(getBase58FromOracle(kFarmingAddress))
91 93  
92 94  let capMoneyBoxAddress = Address(base58'3MxXHaGvmKQHH3kNrPBunhve1sDXf7M5RZt')
93 95  
94 96  let USDN = base58'8UrfDVd5GreeUwm7uPk7eYz1eMv376kzR52C6sANPkwS'
95 97  
96 98  let stakingAssets = [toBase58String(USDN)]
97 99  
98 100  let basePeriod = valueOrErrorMessage(getInteger(votingAddress, kBasePeriod), "Empty kBasePeriod")
99 101  
100 102  let startHeight = valueOrErrorMessage(getInteger(votingAddress, kStartHeight), "Empty kStartHeight")
101 103  
102 104  let periodLength = valueOrErrorMessage(getInteger(votingAddress, kPeriodLength), "Empty kPeriodLength")
103 105  
104 106  let firstHarvestEndPeriod = ((basePeriod + ((height - startHeight) / periodLength)) + 3)
105 107  
106 108  let active = getBooleanValue(this, kActive)
107 109  
108 110  let shareAssetId = fromBase58String(getStringValue(this, kShareAssetId))
109 111  
110 112  let shareSupply = getIntegerValue(this, kShareAssetSupply)
111 113  
112 114  let feeScale6 = 1000000
113 115  
114 116  let fee = getIntegerValue(this, kFee)
115 117  
116 118  let feeGovernance = fraction(40, feeScale6, 100)
117 119  
118 120  let initial_A = getIntegerValue(this, "initial_A")
119 121  
120 122  let future_A = getIntegerValue(this, "future_A")
121 123  
122 124  let initial_A_time = valueOrElse(getInteger(this, "initial_A_time"), 0)
123 125  
124 126  let future_A_time = valueOrElse(getInteger(this, "future_A_time"), 0)
125 127  
126 128  let assetIds = split(getStringValue(this, kAssets), ",")
127 129  
128 130  let nCoins = size(assetIds)
129 131  
130 132  func suspend (cause) = [BooleanEntry(kActive, false), StringEntry(kCause, cause)]
131 133  
132 134  
133 135  func throwIsActive () = throw("DApp is already active")
134 136  
135 137  
136 138  func isActive () = if (active)
137 139      then unit
138 140      else throw("DApp is inactive at this moment")
139 141  
140 142  
141 143  func isAdminCall (i) = if (containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey))
142 144      then unit
143 145      else throw("Only admin can call this function")
144 146  
145 147  
146 148  func isSelfCall (i) = if ((this == i.caller))
147 149      then unit
148 150      else throw("Only contract itself can call this function")
149 151  
150 152  
151 153  let big2 = toBigInt(2)
152 154  
153 155  let blockTimestamp = height
154 156  
155 157  func assert (a) = if (a)
156 158      then false
157 159      else true
158 160  
159 161  
160 162  func calculateFeeDiscount (userAddr) = {
161 163      let swopAmount = valueOrElse(getInteger(govAddress, (toString(userAddr) + kUserSwopInGov)), 0)
162 164      let discountValues = split(getStringValue(oracle, kDiscountValues), ",")
163 165      let discounts = split(getStringValue(oracle, kDiscounts), ",")
164 166      if (if ((swopAmount >= parseIntValue(discountValues[0])))
165 167          then (parseIntValue(discountValues[1]) > swopAmount)
166 168          else false)
167 169          then (feeScale6 - parseIntValue(discounts[0]))
168 170          else if (if ((swopAmount >= parseIntValue(discountValues[1])))
169 171              then (parseIntValue(discountValues[2]) > swopAmount)
170 172              else false)
171 173              then (feeScale6 - parseIntValue(discounts[1]))
172 174              else if (if ((swopAmount >= parseIntValue(discountValues[2])))
173 175                  then (parseIntValue(discountValues[3]) > swopAmount)
174 176                  else false)
175 177                  then (feeScale6 - parseIntValue(discounts[2]))
176 178                  else if (if ((swopAmount >= parseIntValue(discountValues[3])))
177 179                      then (parseIntValue(discountValues[4]) > swopAmount)
178 180                      else false)
179 181                      then (feeScale6 - parseIntValue(discounts[3]))
180 182                      else if ((swopAmount >= parseIntValue(discountValues[4])))
181 183                          then (feeScale6 - parseIntValue(discounts[4]))
182 184                          else feeScale6
183 185      }
184 186  
185 187  
186 188  func _A () = {
187 189      let t1 = future_A_time
188 190      let A1 = future_A
189 191      if ((t1 > blockTimestamp))
190 192          then {
191 193              let A0 = initial_A
192 194              let t0 = initial_A_time
193 195              if ((A1 > A0))
194 196                  then (A0 + (((A1 - A0) * (blockTimestamp - t0)) / (t1 - t0)))
195 197                  else (A0 - (((A0 - A1) * (blockTimestamp - t0)) / (t1 - t0)))
196 198              }
197 199          else A1
198 200      }
199 201  
200 202  
201 203  func _xp () = {
202 204      func assetBalances (acc,assetId) =     (acc :+ valueOrElse(getInteger(this, (assetId + kAssetBalance)), 0))
203 205  
204 206      let $l = assetIds
205 207      let $s = size($l)
206 208      let $acc0 = nil
207 209      func $f0_1 ($a,$i) =     if (($i >= $s))
208 210          then $a
209 211          else assetBalances($a, $l[$i])
210 212  
211 213      func $f0_2 ($a,$i) =     if (($i >= $s))
212 214          then $a
213 215          else throw("List size exceeds 15")
214 216  
215 217      $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
216 218      }
217 219  
218 220  
219 221  func _xp_mem (xp) = xp
220 222  
221 223  
222 224  func sumList (acc,element) = (acc + element)
223 225  
224 226  
225 227  func get_D (xp,amp) = {
226 228      let @ = invoke(this, "D", [xp, amp], nil)
227 229      if ($isInstanceOf(@, "Int"))
228 230          then @
229 231          else throw(($getType(invoke(this, "D", [xp, amp], nil)) + " couldn't be cast to Int"))
230 232      }
231 233  
232 234  
233 235  func get_D_internal (xp,amp) = {
234 236      let S = {
235 237          let $l = xp
236 238          let $s = size($l)
237 239          let $acc0 = 0
238 240          func $f0_1 ($a,$i) =         if (($i >= $s))
239 241              then $a
240 242              else sumList($a, $l[$i])
241 243  
242 244          func $f0_2 ($a,$i) =         if (($i >= $s))
243 245              then $a
244 246              else throw("List size exceeds 15")
245 247  
246 248          $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
247 249          }
248 250      if ((S == 0))
249 251          then 0
250 252          else {
251 253              let Ann = (amp * nCoins)
252 254              let AnnS = (toBigInt(Ann) * toBigInt(S))
253 255              let Ann1 = toBigInt((Ann - 1))
254 256              func Dproc (acc,i) =             if ((acc._2 == true))
255 257                  then acc
256 258                  else {
257 259                      let Dprev = acc._1
258 260                      func D_PProc (D_P,i) =                     if ((nCoins > i))
259 261                          then ((D_P * Dprev) / (toBigInt(xp[i]) * toBigInt(nCoins)))
260 262                          else D_P
261 263  
262 264                      let D_P = {
263 265                          let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14]
264 266                          let $s = size($l)
265 267                          let $acc0 = Dprev
266 268                          func $f1_1 ($a,$i) =                         if (($i >= $s))
267 269                              then $a
268 270                              else D_PProc($a, $l[$i])
269 271  
270 272                          func $f1_2 ($a,$i) =                         if (($i >= $s))
271 273                              then $a
272 274                              else throw("List size exceeds 15")
273 275  
274 276                          $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
275 277                          }
276 278                      let D = fraction((AnnS + (toBigInt(nCoins) * D_P)), Dprev, ((Ann1 * Dprev) + (toBigInt((nCoins + 1)) * D_P)))
277 279                      if ((D > Dprev))
278 280                          then if ((1 >= toInt((D - Dprev))))
279 281                              then $Tuple2(D, true)
280 282                              else $Tuple2(D, false)
281 283                          else if ((1 >= toInt((Dprev - D))))
282 284                              then $Tuple2(D, true)
283 285                              else $Tuple2(D, false)
284 286                      }
285 287  
286 -             let $t066126724 = {
288 +             let $t066296741 = {
287 289                  let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14]
288 290                  let $s = size($l)
289 291                  let $acc0 = $Tuple2(toBigInt(S), false)
290 292                  func $f1_1 ($a,$i) =                 if (($i >= $s))
291 293                      then $a
292 294                      else Dproc($a, $l[$i])
293 295  
294 296                  func $f1_2 ($a,$i) =                 if (($i >= $s))
295 297                      then $a
296 298                      else throw("List size exceeds 15")
297 299  
298 300                  $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
299 301                  }
300 -             let D = $t066126724._1
301 -             let finished = $t066126724._2
302 +             let D = $t066296741._1
303 +             let finished = $t066296741._2
302 304              if ((finished == false))
303 305                  then throw(("get_D() not finished with " + toString(D)))
304 306                  else toInt(D)
305 307              }
306 308      }
307 309  
308 310  
309 311  func getDMem (xp,amp) = get_D(_xp_mem(xp), amp)
310 312  
311 313  
312 314  func getY (in,out,x,xp_) = if (assert((in != out)))
313 315      then throw("same coin")
314 316      else if (assert(if ((out >= 0))
315 317          then (in >= 0)
316 318          else false))
317 319          then throw("below zero")
318 320          else if (assert(if ((nCoins > out))
319 321              then (nCoins > in)
320 322              else false))
321 323              then throw("above N_COINS")
322 324              else {
323 325                  let amp = _A()
324 326                  let D = get_D(xp_, amp)
325 327                  let Ann = (amp * nCoins)
326 328                  func S_c (acc,i) =                 {
327 -                     let $t072957312 = acc
328 -                     let S_ = $t072957312._1
329 -                     let c = $t072957312._2
329 +                     let $t073127329 = acc
330 +                     let S_ = $t073127329._1
331 +                     let c = $t073127329._2
330 332                      let x_ = if ((in == i))
331 333                          then x
332 334                          else xp_[i]
333 335                      if (if ((i != out))
334 336                          then (nCoins > i)
335 337                          else false)
336 338                          then $Tuple2((S_ + x_), fraction(c, toBigInt(D), toBigInt((x_ * nCoins))))
337 339                          else $Tuple2(S_, c)
338 340                      }
339 341  
340 -                 let $t075207621 = {
342 +                 let $t075377638 = {
341 343                      let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14]
342 344                      let $s = size($l)
343 345                      let $acc0 = $Tuple2(0, toBigInt(D))
344 346                      func $f0_1 ($a,$i) =                     if (($i >= $s))
345 347                          then $a
346 348                          else S_c($a, $l[$i])
347 349  
348 350                      func $f0_2 ($a,$i) =                     if (($i >= $s))
349 351                          then $a
350 352                          else throw("List size exceeds 15")
351 353  
352 354                      $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
353 355                      }
354 -                 let S_ = $t075207621._1
355 -                 let c_ = $t075207621._2
356 +                 let S_ = $t075377638._1
357 +                 let c_ = $t075377638._2
356 358                  let c = fraction(c_, toBigInt(D), toBigInt((Ann * nCoins)))
357 359                  let bD = toBigInt(((S_ + (D / Ann)) - D))
358 360                  func y_proc (acc,_i) =                 if ((acc._2 == true))
359 361                      then acc
360 362                      else {
361 363                          let y_prev = acc._1
362 364                          let y = (((y_prev * y_prev) + c) / ((big2 * y_prev) + bD))
363 365                          if ((y > y_prev))
364 366                              then if ((1 >= toInt((y - y_prev))))
365 367                                  then $Tuple2(y, true)
366 368                                  else $Tuple2(y, false)
367 369                              else if ((1 >= toInt((y_prev - y))))
368 370                                  then $Tuple2(y, true)
369 371                                  else $Tuple2(y, false)
370 372                          }
371 373  
372 -                 let $t081038220 = {
374 +                 let $t081208237 = {
373 375                      let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15]
374 376                      let $s = size($l)
375 377                      let $acc0 = $Tuple2(toBigInt(D), false)
376 378                      func $f1_1 ($a,$i) =                     if (($i >= $s))
377 379                          then $a
378 380                          else y_proc($a, $l[$i])
379 381  
380 382                      func $f1_2 ($a,$i) =                     if (($i >= $s))
381 383                          then $a
382 384                          else throw("List size exceeds 16")
383 385  
384 386                      $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16)
385 387                      }
386 -                 let y = $t081038220._1
387 -                 let finished = $t081038220._2
388 +                 let y = $t081208237._1
389 +                 let finished = $t081208237._2
388 390                  if ((finished == false))
389 391                      then throw(("getY() not finished with " + toString(y)))
390 392                      else toInt(y)
391 393                  }
392 394  
393 395  
394 396  func get_y_D (A_,in,xp,D) = if (assert((in >= 0)))
395 397      then throw("i below zero")
396 398      else if (assert((nCoins > in)))
397 399          then throw("i above N_COINS")
398 400          else {
399 401              let Ann = (A_ * nCoins)
400 402              func S_c (acc,i) =             {
401 -                 let $t085998616 = acc
402 -                 let S_ = $t085998616._1
403 -                 let c = $t085998616._2
403 +                 let $t086168633 = acc
404 +                 let S_ = $t086168633._1
405 +                 let c = $t086168633._2
404 406                  let x_ = if (if ((in != i))
405 407                      then (nCoins > i)
406 408                      else false)
407 409                      then xp[i]
408 410                      else 0
409 411                  if (if ((nCoins > i))
410 412                      then (in != i)
411 413                      else false)
412 414                      then $Tuple2((S_ + x_), fraction(c, toBigInt(D), toBigInt((x_ * nCoins))))
413 415                      else $Tuple2(S_, c)
414 416                  }
415 417  
416 -             let $t088368937 = {
418 +             let $t088538954 = {
417 419                  let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14]
418 420                  let $s = size($l)
419 421                  let $acc0 = $Tuple2(0, toBigInt(D))
420 422                  func $f0_1 ($a,$i) =                 if (($i >= $s))
421 423                      then $a
422 424                      else S_c($a, $l[$i])
423 425  
424 426                  func $f0_2 ($a,$i) =                 if (($i >= $s))
425 427                      then $a
426 428                      else throw("List size exceeds 15")
427 429  
428 430                  $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
429 431                  }
430 -             let S_ = $t088368937._1
431 -             let c_ = $t088368937._2
432 +             let S_ = $t088538954._1
433 +             let c_ = $t088538954._2
432 434              let c = fraction(c_, toBigInt(D), toBigInt((Ann * nCoins)))
433 435              let bD = toBigInt(((S_ + (D / Ann)) - D))
434 436              func y_D_proc (acc,i) =             if ((acc._2 == true))
435 437                  then acc
436 438                  else {
437 439                      let y_prev = acc._1
438 440                      let y = (((y_prev * y_prev) + c) / ((big2 * y_prev) + bD))
439 441                      if ((y > y_prev))
440 442                          then if ((1 >= toInt((y - y_prev))))
441 443                              then $Tuple2(y, true)
442 444                              else $Tuple2(y, false)
443 445                          else if ((1 >= toInt((y_prev - y))))
444 446                              then $Tuple2(y, true)
445 447                              else $Tuple2(y, false)
446 448                      }
447 449  
448 -             let $t094209539 = {
450 +             let $t094379556 = {
449 451                  let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15]
450 452                  let $s = size($l)
451 453                  let $acc0 = $Tuple2(toBigInt(D), false)
452 454                  func $f1_1 ($a,$i) =                 if (($i >= $s))
453 455                      then $a
454 456                      else y_D_proc($a, $l[$i])
455 457  
456 458                  func $f1_2 ($a,$i) =                 if (($i >= $s))
457 459                      then $a
458 460                      else throw("List size exceeds 16")
459 461  
460 462                  $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16)
461 463                  }
462 -             let y = $t094209539._1
463 -             let finished = $t094209539._2
464 +             let y = $t094379556._1
465 +             let finished = $t094379556._2
464 466              if ((finished == false))
465 467                  then throw(("get_y_D() not finished with " + toString(y)))
466 468                  else toInt(y)
467 469              }
468 470  
469 471  
470 472  func _calcWithdrawOneCoin (xp,_token_amount,i,caller) = {
471 473      let feeDiscount = calculateFeeDiscount(caller)
472 474      let amp = _A()
473 475      let _fee = ((fraction(fee, feeDiscount, feeScale6, CEILING) * nCoins) / (4 * (nCoins - 1)))
474 476      let total_supply = shareSupply
475 477      let D0 = get_D(xp, amp)
476 478      let D1 = (D0 - fraction(_token_amount, D0, total_supply))
477 479      let new_y = get_y_D(amp, i, xp, D1)
478 480      let dy_0 = (xp[i] - new_y)
479 481      func xp_reduced_proc (acc,xp_j) =     {
480 -         let $t01018010209 = acc
481 -         let xp_reduced = $t01018010209._1
482 -         let index = $t01018010209._2
482 +         let $t01019710226 = acc
483 +         let xp_reduced = $t01019710226._1
484 +         let index = $t01019710226._2
483 485          let dx_expected = if ((index == i))
484 486              then (fraction(xp_j, D1, D0) - new_y)
485 487              else (xp_j - fraction(xp_j, D1, D0))
486 488          $Tuple2((xp_reduced :+ (xp_j - fraction(_fee, dx_expected, feeScale6))), (index + 1))
487 489          }
488 490  
489 -     let $t01047110535 = {
491 +     let $t01048810552 = {
490 492          let $l = xp
491 493          let $s = size($l)
492 494          let $acc0 = $Tuple2(nil, 0)
493 495          func $f0_1 ($a,$i) =         if (($i >= $s))
494 496              then $a
495 497              else xp_reduced_proc($a, $l[$i])
496 498  
497 499          func $f0_2 ($a,$i) =         if (($i >= $s))
498 500              then $a
499 501              else throw("List size exceeds 15")
500 502  
501 503          $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
502 504          }
503 -     let xp_reduced = $t01047110535._1
504 -     let index = $t01047110535._2
505 +     let xp_reduced = $t01048810552._1
506 +     let index = $t01048810552._2
505 507      let xp_reduced_i = xp_reduced[i]
506 508      let dy = ((xp_reduced_i - get_y_D(amp, i, xp_reduced, D1)) - 1)
507 509      $Tuple2(dy, (dy_0 - dy))
508 510      }
509 511  
510 512  
511 513  func getStrAssetId (assetId) = match assetId {
512 514      case id: ByteVector => 
513 515          toBase58String(id)
514 516      case waves: Unit => 
515 517          "WAVES"
516 518      case _ => 
517 519          throw("Match error")
518 520  }
519 521  
520 522  
521 523  func calcStakingFuncAndAddres (stake,assetId) = if (stake)
522 524      then $Tuple2("lockNeutrino", stakingUSDNAddress)
523 525      else $Tuple2("unlockNeutrino", stakingUSDNAddress)
524 526  
525 527  
526 528  func calcStakingParams (stake,amount,assetId) = if (stake)
527 529      then {
528 -         let $t01109911165 = calcStakingFuncAndAddres(stake, assetId)
529 -         let call = $t01109911165._1
530 -         let stakingAddr = $t01109911165._2
530 +         let $t01111611182 = calcStakingFuncAndAddres(stake, assetId)
531 +         let call = $t01111611182._1
532 +         let stakingAddr = $t01111611182._2
531 533          $Tuple4(call, stakingAddr, nil, [AttachedPayment(assetId, amount)])
532 534          }
533 535      else {
534 -         let $t01125111317 = calcStakingFuncAndAddres(stake, assetId)
535 -         let call = $t01125111317._1
536 -         let stakingAddr = $t01125111317._2
536 +         let $t01126811334 = calcStakingFuncAndAddres(stake, assetId)
537 +         let call = $t01126811334._1
538 +         let stakingAddr = $t01126811334._2
537 539          $Tuple4(call, stakingAddr, [amount, toBase58String(assetId)], nil)
538 540          }
539 541  
540 542  
541 543  func stake (amount,assetIdString) = if (containsElement(stakingAssets, assetIdString))
542 544      then {
543 -         let $t01150411606 = calcStakingParams(true, amount, fromBase58String(assetIdString))
544 -         let call = $t01150411606._1
545 -         let addr = $t01150411606._2
546 -         let params = $t01150411606._3
547 -         let payments = $t01150411606._4
545 +         let $t01152111623 = calcStakingParams(true, amount, fromBase58String(assetIdString))
546 +         let call = $t01152111623._1
547 +         let addr = $t01152111623._2
548 +         let params = $t01152111623._3
549 +         let payments = $t01152111623._4
548 550          invoke(addr, call, params, payments)
549 551          }
550 552      else 0
551 553  
552 554  
553 555  func unstake (amount,assetIdString) = if (containsElement(stakingAssets, assetIdString))
554 556      then {
555 -         let $t01179111894 = calcStakingParams(false, amount, fromBase58String(assetIdString))
556 -         let call = $t01179111894._1
557 -         let addr = $t01179111894._2
558 -         let params = $t01179111894._3
559 -         let payments = $t01179111894._4
557 +         let $t01180811911 = calcStakingParams(false, amount, fromBase58String(assetIdString))
558 +         let call = $t01180811911._1
559 +         let addr = $t01180811911._2
560 +         let params = $t01180811911._3
561 +         let payments = $t01180811911._4
560 562          invoke(addr, call, params, payments)
561 563          }
562 564      else 0
563 565  
564 566  
565 567  func stakedAmount (assetId) = {
566 568      let stakedAmountCalculated =     match assetId {
567 569          case aId: ByteVector => 
568 570              if ((aId == USDN))
569 571                  then getInteger(stakingUSDNAddress, ((("rpd_balance_" + toBase58String(aId)) + "_") + toString(this)))
570 572                  else 0
571 573          case _: Unit => 
572 574              0
573 575          case _ => 
574 576              throw("Match error")
575 577      }
576 578      match stakedAmountCalculated {
577 579          case i: Int => 
578 580              i
579 581          case _ => 
580 582              0
581 583      }
582 584      }
583 585  
584 586  
585 587  func checkSuspicious () = {
586 588      let contractBalances = _xp()
587 589      func checkBalance (acc,assetId) =     {
588 -         let $t01250512530 = acc
589 -         let suspicious = $t01250512530._1
590 -         let i = $t01250512530._2
590 +         let $t01252212547 = acc
591 +         let suspicious = $t01252212547._1
592 +         let i = $t01252212547._2
591 593          if (suspicious)
592 594              then $Tuple2(suspicious, i)
593 595              else {
594 596                  let aBalance = (assetBalance(this, fromBase58String(assetId)) + stakedAmount(fromBase58String(assetId)))
595 597                  if ((contractBalances[i] > aBalance))
596 598                      then $Tuple2(true, i)
597 599                      else $Tuple2(false, (i + 1))
598 600                  }
599 601          }
600 602  
601 603      let $l = assetIds
602 604      let $s = size($l)
603 605      let $acc0 = $Tuple2(false, 0)
604 606      func $f0_1 ($a,$i) =     if (($i >= $s))
605 607          then $a
606 608          else checkBalance($a, $l[$i])
607 609  
608 610      func $f0_2 ($a,$i) =     if (($i >= $s))
609 611          then $a
610 612          else throw("List size exceeds 15")
611 613  
612 614      $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
613 615      }
614 616  
615 617  
616 618  func suspendSuspicious (i) = suspend(("Suspicious state with asset: " + assetIds[i]))
617 619  
618 620  
619 621  func returnPayments (caller,payments) = {
620 622      func parsePayments (acc,payment) =     (acc :+ ScriptTransfer(caller, payment.amount, payment.assetId))
621 623  
622 624      let $l = payments
623 625      let $s = size($l)
624 626      let $acc0 = nil
625 627      func $f0_1 ($a,$i) =     if (($i >= $s))
626 628          then $a
627 629          else parsePayments($a, $l[$i])
628 630  
629 631      func $f0_2 ($a,$i) =     if (($i >= $s))
630 632          then $a
631 633          else throw("List size exceeds 15")
632 634  
633 635      $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
634 636      }
635 637  
636 638  
637 639  func checkDAppThreshold (newBalances) = {
638 640      let dAppThresholdCoef = valueOrErrorMessage(getInteger(this, kDAppThresholdCoef), "No dAppThresholdCoef key")
639 641      let thresholdScale = 10000
640 -     func iterAllBalances (acc,tokenBalance) =     {
641 -         let $t01350913550 = acc
642 -         let thresholdError = $t01350913550._1
643 -         let cutedBalances = $t01350913550._2
644 -         func iterCutedBalances (checkRatio,checkedBalance) =         {
645 -             let ratio = fraction(tokenBalance, thresholdScale, checkedBalance)
646 -             if (if ((ratio > (dAppThresholdCoef * thresholdScale)))
647 -                 then true
648 -                 else (fraction(1, thresholdScale, dAppThresholdCoef) > ratio))
649 -                 then throw("New balance in assets of the DApp is less than threshold")
650 -                 else false
651 -             }
642 +     let maxBalance = max(newBalances)
643 +     let minBalance = min(newBalances)
644 +     let ratio = fraction(maxBalance, thresholdScale, minBalance)
645 +     if ((ratio > (dAppThresholdCoef * thresholdScale)))
646 +         then throw("New balance in assets of the DApp is less than threshold")
647 +         else false
648 +     }
652 649  
653 -         $Tuple2({
654 -             let $l = cutedBalances
655 -             let $s = size($l)
656 -             let $acc0 = thresholdError
657 -             func $f0_1 ($a,$i) =             if (($i >= $s))
658 -                 then $a
659 -                 else iterCutedBalances($a, $l[$i])
660 650  
661 -             func $f0_2 ($a,$i) =             if (($i >= $s))
662 -                 then $a
663 -                 else throw("List size exceeds 15")
664 - 
665 -             $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
666 -             }, removeByIndex(cutedBalances, 0))
651 + func checkCoins (assetIds) = {
652 +     let coins = split(assetIds, ",")
653 +     func checkCoin (error,assetId) =     {
654 +         let asset = valueOrErrorMessage(fromBase58String(assetId), ("fromBase58String: " + assetId))
655 +         let decimals = valueOrErrorMessage(assetInfo(asset), ("assetInfo: " + assetId)).decimals
656 +         if ((decimals != DECIMALS))
657 +             then throw("wrong decimals")
658 +             else false
667 659          }
668 660  
669 -     let $t01407214175 = {
670 -         let $l = newBalances
671 -         let $s = size($l)
672 -         let $acc0 = $Tuple2(false, removeByIndex(newBalances, 0))
673 -         func $f0_1 ($a,$i) =         if (($i >= $s))
674 -             then $a
675 -             else iterAllBalances($a, $l[$i])
661 +     let $l = coins
662 +     let $s = size($l)
663 +     let $acc0 = false
664 +     func $f0_1 ($a,$i) =     if (($i >= $s))
665 +         then $a
666 +         else checkCoin($a, $l[$i])
676 667  
677 -         func $f0_2 ($a,$i) =         if (($i >= $s))
678 -             then $a
679 -             else throw("List size exceeds 15")
668 +     func $f0_2 ($a,$i) =     if (($i >= $s))
669 +         then $a
670 +         else throw("List size exceeds 15")
680 671  
681 -         $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
682 -         }
683 -     let thresholdError = $t01407214175._1
684 -     let b = $t01407214175._2
685 -     thresholdError
672 +     $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
686 673      }
687 674  
688 675  
689 676  @Callable(msg)
690 677  func D (xp,amp) = {
691 678      let D = get_D_internal(xp, amp)
692 679      $Tuple2([IntegerEntry("D", D)], D)
693 680      }
694 681  
695 682  
696 683  
697 684  @Callable(msg)
698 - func init (coins,_A,firstHarvest) = if (!(isDataStorageUntouched(this)))
685 + func init (assetIds,_A,firstHarvest) = if (!(isDataStorageUntouched(this)))
699 686      then throw("Already initialized")
700 687      else {
701 688          let shareName = "s_Multi_USD"
702 689          let shareDescription = ("ShareToken of SwopFi protocol for MultiStable USD pool at address " + toString(this))
703 690          let issueToken = Issue(shareName, shareDescription, 0, 6, true)
704 691          let tokenId = calculateAssetId(issueToken)
705 -         let baseEntry = [StringEntry(kAssets, coins), IntegerEntry("initial_A", _A), IntegerEntry("future_A", _A), IntegerEntry(kFee, getIntegerValue(oracle, "base_fee_flat")), StringEntry(kShareAssetId, toBase58String(tokenId)), IntegerEntry(kShareAssetSupply, 0), IntegerEntry(kDAppThresholdCoef, 15), BooleanEntry(kActive, true), issueToken]
706 -         if (firstHarvest)
707 -             then (baseEntry ++ [BooleanEntry(kFirstHarvest, firstHarvest), IntegerEntry(kFirstHarvestHeight, (startHeight + (firstHarvestEndPeriod * periodLength)))])
708 -             else baseEntry
692 +         if (checkCoins(assetIds))
693 +             then throw()
694 +             else {
695 +                 let baseEntry = [StringEntry(kAssets, assetIds), IntegerEntry("initial_A", _A), IntegerEntry("future_A", _A), IntegerEntry(kFee, getIntegerValue(oracle, "base_fee_flat")), StringEntry(kShareAssetId, toBase58String(tokenId)), IntegerEntry(kShareAssetSupply, 0), IntegerEntry(kDAppThresholdCoef, 15), BooleanEntry(kActive, true), issueToken]
696 +                 if (firstHarvest)
697 +                     then (baseEntry ++ [BooleanEntry(kFirstHarvest, firstHarvest), IntegerEntry(kFirstHarvestHeight, (startHeight + (firstHarvestEndPeriod * periodLength)))])
698 +                     else baseEntry
699 +                 }
709 700          }
710 701  
711 702  
712 703  
713 704  @Callable(msg)
714 705  func addLiquidity (minMintAmount,stakeFarming) = valueOrElse(isActive(), {
715 706      let amp = _A()
716 707      let xp = _xp()
717 708      let D0 = if ((shareSupply == 0))
718 709          then 0
719 710          else getDMem(xp, amp)
720 711      let payments = msg.payments
721 712      let n = size(payments)
722 713      func validPayments (n) =     if ((n > nCoins))
723 714          then throw(("payments size > " + toString(nCoins)))
724 715          else if ((1 > n))
725 716              then throw("payments size < 1")
726 717              else if (if ((shareSupply == 0))
727 718                  then (nCoins != n)
728 719                  else false)
729 720                  then throw("initial deposit requires all coins")
730 721                  else {
731 722                      func paymantValid (acc,payment) =                     if (containsElement(assetIds, getStrAssetId(payment.assetId)))
732 723                          then true
733 724                          else throw("Invalid asset in payment")
734 725  
735 726                      let $l = payments
736 727                      let $s = size($l)
737 728                      let $acc0 = false
738 729                      func $f0_1 ($a,$i) =                     if (($i >= $s))
739 730                          then $a
740 731                          else paymantValid($a, $l[$i])
741 732  
742 733                      func $f0_2 ($a,$i) =                     if (($i >= $s))
743 734                          then $a
744 735                          else throw("List size exceeds 15")
745 736  
746 737                      $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
747 738                      }
748 739  
749 740      if (!(validPayments(n)))
750 741          then throw()
751 742          else {
752 743              let suspicious = checkSuspicious()
753 744              if (suspicious._1)
754 745                  then (suspendSuspicious(suspicious._2) ++ returnPayments(msg.caller, payments))
755 746                  else {
756 747                      let paymentsSize = size(payments)
757 748                      func parsePayments (acc,assetId) =                     {
758 -                         let $t01658116610 = acc
759 -                         let newBalances = $t01658116610._1
760 -                         let i = $t01658116610._2
761 -                         let j = $t01658116610._3
749 +                         let $t01661916648 = acc
750 +                         let newBalances = $t01661916648._1
751 +                         let i = $t01661916648._2
752 +                         let j = $t01661916648._3
762 753                          if (if ((paymentsSize > j))
763 754                              then (getStrAssetId(payments[j].assetId) == assetId)
764 755                              else false)
765 756                              then {
766 757                                  let s = stake(payments[j].amount, getStrAssetId(payments[j].assetId))
767 758                                  if ((s == s))
768 759                                      then $Tuple3((newBalances :+ (xp[i] + payments[j].amount)), (i + 1), (j + 1))
769 760                                      else throw("Strict value is not equal to itself.")
770 761                                  }
771 762                              else $Tuple3((newBalances :+ xp[i]), (i + 1), j)
772 763                          }
773 764  
774 -                     let $t01691617002 = {
765 +                     let $t01695417040 = {
775 766                          let $l = assetIds
776 767                          let $s = size($l)
777 768                          let $acc0 = $Tuple3(nil, 0, 0)
778 769                          func $f0_1 ($a,$i) =                         if (($i >= $s))
779 770                              then $a
780 771                              else parsePayments($a, $l[$i])
781 772  
782 773                          func $f0_2 ($a,$i) =                         if (($i >= $s))
783 774                              then $a
784 775                              else throw("List size exceeds 15")
785 776  
786 777                          $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
787 778                          }
788 -                     let newBalances = $t01691617002._1
789 -                     let k = $t01691617002._2
790 -                     let parsedPayments = $t01691617002._3
779 +                     let newBalances = $t01695417040._1
780 +                     let k = $t01695417040._2
781 +                     let parsedPayments = $t01695417040._3
791 782                      if (((paymentsSize - 1) > parsedPayments))
792 783                          then throw("Incorect payments order")
793 784                          else if (checkDAppThreshold(newBalances))
794 785                              then throw()
795 786                              else {
796 787                                  let D1 = getDMem(newBalances, amp)
797 788                                  if (assert((D1 > D0)))
798 789                                      then throw("D1 > D0")
799 790                                      else {
800 791                                          let feeDiscount = calculateFeeDiscount(msg.caller)
801 792                                          func calcScriptActions (acc,newBalance) =                                         {
802 -                                             let $t01740717448 = acc
803 -                                             let invBalances = $t01740717448._1
804 -                                             let scriptActions = $t01740717448._2
805 -                                             let i = $t01740717448._3
793 +                                             let $t01744517486 = acc
794 +                                             let invBalances = $t01744517486._1
795 +                                             let scriptActions = $t01744517486._2
796 +                                             let i = $t01744517486._3
806 797                                              if ((shareSupply > 0))
807 798                                                  then {
808 799                                                      let _fee = ((fraction(fee, feeDiscount, feeScale6, CEILING) * nCoins) / (4 * (nCoins - 1)))
809 800                                                      let fees = {
810 801                                                          let idealBalance = fraction(D1, xp[i], D0)
811 802                                                          let difference = if ((idealBalance > newBalance))
812 803                                                              then (idealBalance - newBalance)
813 804                                                              else (newBalance - idealBalance)
814 805                                                          fraction(_fee, difference, feeScale6)
815 806                                                          }
816 807                                                      let governanceFees = fraction(fees, feeGovernance, feeScale6)
817 808                                                      let finalBalance = (newBalance - governanceFees)
818 809                                                      let invariantBalance = (newBalance - fees)
819 810                                                      let us = unstake(fees, assetIds[i])
820 811                                                      if ((us == us))
821 812                                                          then $Tuple3((invBalances :+ invariantBalance), (scriptActions ++ [ScriptTransfer(capMoneyBoxAddress, (fees - governanceFees), fromBase58String(assetIds[i])), ScriptTransfer(moneyBoxAddress, governanceFees, fromBase58String(assetIds[i])), IntegerEntry((assetIds[i] + kAssetBalance), finalBalance)]), (i + 1))
822 813                                                          else throw("Strict value is not equal to itself.")
823 814                                                      }
824 815                                                  else $Tuple3((invBalances :+ newBalance), (scriptActions :+ IntegerEntry((assetIds[i] + kAssetBalance), newBalance)), (i + 1))
825 816                                              }
826 817  
827 -                                         let $t01878518873 = {
818 +                                         let $t01882318911 = {
828 819                                              let $l = newBalances
829 820                                              let $s = size($l)
830 821                                              let $acc0 = $Tuple3(nil, nil, 0)
831 822                                              func $f1_1 ($a,$i) =                                             if (($i >= $s))
832 823                                                  then $a
833 824                                                  else calcScriptActions($a, $l[$i])
834 825  
835 826                                              func $f1_2 ($a,$i) =                                             if (($i >= $s))
836 827                                                  then $a
837 828                                                  else throw("List size exceeds 15")
838 829  
839 830                                              $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
840 831                                              }
841 -                                         let invBalances = $t01878518873._1
842 -                                         let scriptActions = $t01878518873._2
832 +                                         let invBalances = $t01882318911._1
833 +                                         let scriptActions = $t01882318911._2
843 834                                          let D2 = getDMem(invBalances, amp)
844 835                                          let mint_amount = if ((shareSupply == 0))
845 836                                              then D1
846 837                                              else fraction(shareSupply, (D2 - D0), D0)
847 838                                          if (assert((mint_amount >= minMintAmount)))
848 839                                              then throw("Slippage screwed you")
849 840                                              else if (stakeFarming)
850 841                                                  then {
851 842                                                      let re = invoke(this, "reissueShare", [mint_amount], nil)
852 843                                                      if ((re == re))
853 844                                                          then {
854 845                                                              let s = invoke(farmingAddress, "lockShareTokens", [toString(this)], [AttachedPayment(shareAssetId, mint_amount)])
855 846                                                              if ((s == s))
856 847                                                                  then (scriptActions :+ IntegerEntry(kShareAssetSupply, (shareSupply + mint_amount)))
857 848                                                                  else throw("Strict value is not equal to itself.")
858 849                                                              }
859 850                                                          else throw("Strict value is not equal to itself.")
860 851                                                      }
861 852                                                  else (scriptActions ++ [Reissue(shareAssetId, mint_amount, true), ScriptTransfer(msg.caller, mint_amount, shareAssetId), IntegerEntry(kShareAssetSupply, (shareSupply + mint_amount))])
862 853                                          }
863 854                                  }
864 855                      }
865 856              }
866 857      })
867 858  
868 859  
869 860  
870 861  @Callable(msg)
871 862  func reissueShare (amount) = valueOrElse(isSelfCall(msg), [Reissue(shareAssetId, amount, true)])
872 863  
873 864  
874 865  
875 866  @Callable(msg)
876 867  func getDy (assetFrom,assetTo,dx,userAddress) = {
877 868      let xp = _xp()
878 869      let fromIndex = valueOrErrorMessage(indexOf(assetIds, assetFrom), "unknown token in")
879 870      let toIndex = valueOrErrorMessage(indexOf(assetIds, assetTo), "unknown token out")
880 871      let x = (xp[fromIndex] + dx)
881 872      let y = getY(fromIndex, toIndex, x, xp)
882 873      let dy = ((xp[toIndex] - y) - 1)
883 874      let feeDiscount = calculateFeeDiscount(Address(fromBase58String(userAddress)))
884 875      let _fee = fraction(fraction(fee, feeDiscount, feeScale6, CEILING), dy, feeScale6)
885 876      $Tuple2(nil, $Tuple2((dy - _fee), _fee))
886 877      }
887 878  
888 879  
889 880  
890 881  @Callable(msg)
891 882  func exchange (tokenOut,min_dy) = valueOrElse(isActive(), if ((size(msg.payments) != 1))
892 883      then throw("size(payments) != 1")
893 884      else {
894 885          let suspicious = checkSuspicious()
895 886          if (suspicious._1)
896 887              then (suspendSuspicious(suspicious._2) ++ returnPayments(msg.caller, msg.payments))
897 888              else {
898 889                  let payment = msg.payments[0]
899 890                  let tokenIn = getStrAssetId(payment.assetId)
900 891                  let tokenOutB58 = fromBase58String(tokenOut)
901 892                  let dx = payment.amount
902 893                  let fromIndex = valueOrErrorMessage(indexOf(assetIds, tokenIn), "unknown token in")
903 894                  let toIndex = valueOrErrorMessage(indexOf(assetIds, tokenOut), "unknown token out")
904 895                  let xp = _xp()
905 896                  let x = (xp[fromIndex] + dx)
906 897                  let y = getY(fromIndex, toIndex, x, xp)
907 898                  let _dy = ((xp[toIndex] - y) - 1)
908 899                  let feeDiscount = calculateFeeDiscount(msg.caller)
909 900                  let _fee = fraction(_dy, fraction(fee, feeDiscount, feeScale6, CEILING), feeScale6)
910 901                  let dy = (_dy - _fee)
911 902                  let governanceFees = fraction(_fee, feeGovernance, feeScale6)
912 903                  if (assert((dy >= min_dy)))
913 904                      then throw("Exchange resulted in fewer coins than expected")
914 905                      else {
915 906                          func makeNewBalances (acc,tokenBalance) =                         {
916 -                             let $t02158521611 = acc
917 -                             let newBalances = $t02158521611._1
918 -                             let i = $t02158521611._2
907 +                             let $t02162321649 = acc
908 +                             let newBalances = $t02162321649._1
909 +                             let i = $t02162321649._2
919 910                              if ((i == fromIndex))
920 911                                  then $Tuple2((newBalances :+ (tokenBalance + dx)), (i + 1))
921 912                                  else if ((i == toIndex))
922 913                                      then $Tuple2((newBalances :+ (tokenBalance + dy)), (i + 1))
923 914                                      else $Tuple2((newBalances :+ tokenBalance), (i + 1))
924 915                              }
925 916  
926 -                         let $t02186121922 = {
917 +                         let $t02189921960 = {
927 918                              let $l = xp
928 919                              let $s = size($l)
929 920                              let $acc0 = $Tuple2(nil, 0)
930 921                              func $f0_1 ($a,$i) =                             if (($i >= $s))
931 922                                  then $a
932 923                                  else makeNewBalances($a, $l[$i])
933 924  
934 925                              func $f0_2 ($a,$i) =                             if (($i >= $s))
935 926                                  then $a
936 927                                  else throw("List size exceeds 15")
937 928  
938 929                              $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
939 930                              }
940 -                         let newBalances = $t02186121922._1
941 -                         let i = $t02186121922._2
931 +                         let newBalances = $t02189921960._1
932 +                         let i = $t02189921960._2
942 933                          if (checkDAppThreshold(newBalances))
943 934                              then throw()
944 935                              else {
945 936                                  let s = stake(payment.amount, getStrAssetId(payment.assetId))
946 937                                  if ((s == s))
947 938                                      then {
948 939                                          let us = unstake((dy + _fee), tokenOut)
949 940                                          if ((us == us))
950 941                                              then $Tuple2([IntegerEntry((tokenIn + kAssetBalance), x), IntegerEntry((tokenOut + kAssetBalance), ((xp[toIndex] - dy) - governanceFees)), ScriptTransfer(msg.caller, dy, tokenOutB58), ScriptTransfer(moneyBoxAddress, governanceFees, tokenOutB58), ScriptTransfer(moneyBoxAddress, (_fee - governanceFees), tokenOutB58)], $Tuple2(dy, tokenOutB58))
951 942                                              else throw("Strict value is not equal to itself.")
952 943                                          }
953 944                                      else throw("Strict value is not equal to itself.")
954 945                                  }
955 946                          }
956 947                  }
957 948          })
958 949  
959 950  
960 951  
961 952  @Callable(msg)
962 953  func withdraw (minAmounts,unlockAmount) = valueOrElse(isActive(), if ((size(msg.payments) != 1))
963 954      then throw("size(payments) != 1")
964 955      else {
965 956          let suspicious = checkSuspicious()
966 957          if (suspicious._1)
967 958              then (suspendSuspicious(suspicious._2) ++ returnPayments(msg.caller, msg.payments))
968 959              else {
969 960                  let payment = msg.payments[0]
970 961                  let tokenIn = payment.assetId
971 962                  if ((tokenIn != shareAssetId))
972 963                      then throw("unknown token")
973 964                      else {
974 965                          let _amount = payment.amount
975 966                          let total_supply = shareSupply
976 967                          let unlock = if ((unlockAmount > 0))
977 968                              then invoke(farmingAddress, "withdrawShareTokens", [toString(this), unlockAmount], nil)
978 969                              else 0
979 970                          if ((unlock == unlock))
980 971                              then {
981 972                                  let withdrawAmount = (_amount + unlockAmount)
982 973                                  func calcScriptActions (acc,balance) =                                 {
983 -                                     let $t02332723355 = acc
984 -                                     let scriptActions = $t02332723355._1
985 -                                     let i = $t02332723355._2
974 +                                     let $t02336523393 = acc
975 +                                     let scriptActions = $t02336523393._1
976 +                                     let i = $t02336523393._2
986 977                                      let wAmount = fraction(balance, withdrawAmount, total_supply)
987 978                                      if (assert((wAmount >= minAmounts[i])))
988 979                                          then throw("Withdrawal resulted in fewer coins than expected")
989 980                                          else {
990 981                                              let us = unstake(wAmount, assetIds[i])
991 982                                              if ((us == us))
992 983                                                  then $Tuple2((scriptActions ++ [IntegerEntry((assetIds[i] + kAssetBalance), (balance - wAmount)), ScriptTransfer(msg.caller, wAmount, fromBase58String(assetIds[i]))]), (i + 1))
993 984                                                  else throw("Strict value is not equal to itself.")
994 985                                              }
995 986                                      }
996 987  
997 -                                 let $t02384523913 = {
988 +                                 let $t02388323951 = {
998 989                                      let $l = _xp()
999 990                                      let $s = size($l)
1000 991                                      let $acc0 = $Tuple2(nil, 0)
1001 992                                      func $f0_1 ($a,$i) =                                     if (($i >= $s))
1002 993                                          then $a
1003 994                                          else calcScriptActions($a, $l[$i])
1004 995  
1005 996                                      func $f0_2 ($a,$i) =                                     if (($i >= $s))
1006 997                                          then $a
1007 998                                          else throw("List size exceeds 15")
1008 999  
1009 1000                                      $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
1010 1001                                      }
1011 -                                 let scriptActions = $t02384523913._1
1012 -                                 let i = $t02384523913._2
1002 +                                 let scriptActions = $t02388323951._1
1003 +                                 let i = $t02388323951._2
1013 1004                                  (scriptActions ++ [Burn(shareAssetId, withdrawAmount), IntegerEntry(kShareAssetSupply, (shareSupply - withdrawAmount))])
1014 1005                                  }
1015 1006                              else throw("Strict value is not equal to itself.")
1016 1007                          }
1017 1008                  }
1018 1009          })
1019 1010  
1020 1011  
1021 1012  
1022 1013  @Callable(msg)
1023 1014  func calcWithdrawOneCoin (tokenAmount,tokenOut,user) = {
1024 1015      let i = valueOrErrorMessage(indexOf(assetIds, tokenOut), "unknown token out")
1025 1016      $Tuple2(nil, _calcWithdrawOneCoin(_xp(), tokenAmount, i, Address(fromBase58String(user)))._1)
1026 1017      }
1027 1018  
1028 1019  
1029 1020  
1030 1021  @Callable(msg)
1031 1022  func withdrawOneCoin (tokenOut,minAmount,unlockAmount) = valueOrElse(isActive(), if ((size(msg.payments) != 1))
1032 1023      then throw("size(payments) != 1")
1033 1024      else {
1034 1025          let suspicious = checkSuspicious()
1035 1026          if (suspicious._1)
1036 1027              then (suspendSuspicious(suspicious._2) ++ returnPayments(msg.caller, msg.payments))
1037 1028              else {
1038 1029                  let payment = msg.payments[0]
1039 1030                  let tokenIn = payment.assetId
1040 1031                  if ((tokenIn != shareAssetId))
1041 1032                      then throw("unknown token")
1042 1033                      else {
1043 1034                          let outIndex = valueOrErrorMessage(indexOf(assetIds, tokenOut), "unknown token out")
1044 1035                          let _tokenAmount = payment.amount
1045 1036                          let unlock = if ((unlockAmount > 0))
1046 1037                              then invoke(farmingAddress, "withdrawShareTokens", [toString(this), unlockAmount], nil)
1047 1038                              else 0
1048 1039                          if ((unlock == unlock))
1049 1040                              then {
1050 1041                                  let withdrawAmount = (_tokenAmount + unlockAmount)
1051 1042                                  let xp = _xp()
1052 -                                 let $t02514425225 = _calcWithdrawOneCoin(xp, withdrawAmount, outIndex, msg.caller)
1053 -                                 let dy = $t02514425225._1
1054 -                                 let dy_fee = $t02514425225._2
1043 +                                 let $t02518225263 = _calcWithdrawOneCoin(xp, withdrawAmount, outIndex, msg.caller)
1044 +                                 let dy = $t02518225263._1
1045 +                                 let dy_fee = $t02518225263._2
1055 1046                                  if (assert((dy >= minAmount)))
1056 1047                                      then throw("Not enough coins removed")
1057 1048                                      else {
1058 1049                                          let governanceFees = fraction(dy_fee, feeGovernance, feeScale6)
1059 1050                                          let dy_and_fee = (dy + dy_fee)
1060 1051                                          func makeNewBalances (acc,tokenBalance) =                                         {
1061 -                                             let $t02548325509 = acc
1062 -                                             let newBalances = $t02548325509._1
1063 -                                             let i = $t02548325509._2
1052 +                                             let $t02552125547 = acc
1053 +                                             let newBalances = $t02552125547._1
1054 +                                             let i = $t02552125547._2
1064 1055                                              if ((i == outIndex))
1065 1056                                                  then $Tuple2((newBalances :+ (tokenBalance - dy_and_fee)), (i + 1))
1066 1057                                                  else $Tuple2((newBalances :+ tokenBalance), (i + 1))
1067 1058                                              }
1068 1059  
1069 -                                         let $t02567625737 = {
1060 +                                         let $t02571425775 = {
1070 1061                                              let $l = xp
1071 1062                                              let $s = size($l)
1072 1063                                              let $acc0 = $Tuple2(nil, 0)
1073 1064                                              func $f0_1 ($a,$i) =                                             if (($i >= $s))
1074 1065                                                  then $a
1075 1066                                                  else makeNewBalances($a, $l[$i])
1076 1067  
1077 1068                                              func $f0_2 ($a,$i) =                                             if (($i >= $s))
1078 1069                                                  then $a
1079 1070                                                  else throw("List size exceeds 15")
1080 1071  
1081 1072                                              $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
1082 1073                                              }
1083 -                                         let newBalances = $t02567625737._1
1084 -                                         let i = $t02567625737._2
1074 +                                         let newBalances = $t02571425775._1
1075 +                                         let i = $t02571425775._2
1085 1076                                          if (checkDAppThreshold(newBalances))
1086 1077                                              then throw()
1087 1078                                              else {
1088 1079                                                  let us = unstake(dy_and_fee, tokenOut)
1089 1080                                                  if ((us == us))
1090 1081                                                      then [ScriptTransfer(msg.caller, dy, fromBase58String(tokenOut)), IntegerEntry((assetIds[i] + kAssetBalance), (xp[i] - dy_and_fee)), Burn(shareAssetId, withdrawAmount), ScriptTransfer(moneyBoxAddress, governanceFees, fromBase58String(tokenOut)), ScriptTransfer(capMoneyBoxAddress, (dy_fee - governanceFees), fromBase58String(tokenOut)), IntegerEntry(kShareAssetSupply, (shareSupply - withdrawAmount))]
1091 1082                                                      else throw("Strict value is not equal to itself.")
1092 1083                                                  }
1093 1084                                          }
1094 1085                                  }
1095 1086                              else throw("Strict value is not equal to itself.")
1096 1087                          }
1097 1088                  }
1098 1089          })
1099 1090  
1100 1091  
1101 1092  
1102 1093  @Callable(msg)
1103 1094  func A () = $Tuple2(nil, _A())
1104 1095  
1105 1096  
1106 1097  
1107 1098  @Callable(msg)
1108 1099  func getVirtualPrice () = {
1109 1100      let D = get_D(_xp(), _A())
1110 1101      $Tuple2(nil, fraction(D, PRECISION, shareSupply))
1111 1102      }
1112 1103  
1113 1104  
1114 1105  
1115 1106  @Callable(msg)
1116 1107  func calcTokenAmount (amounts,deposit) = {
1117 1108      let amp = _A()
1118 1109      let balances = _xp()
1119 1110      let D0 = getDMem(balances, amp)
1120 1111      func calcNewBalances (acc,balance) =     {
1121 -         let $t02669826724 = acc
1122 -         let newBalances = $t02669826724._1
1123 -         let i = $t02669826724._2
1112 +         let $t02673626762 = acc
1113 +         let newBalances = $t02673626762._1
1114 +         let i = $t02673626762._2
1124 1115          let newBalance = (balance + (if (deposit)
1125 1116              then amounts[i]
1126 1117              else -(amounts[i])))
1127 1118          $Tuple2((newBalances :+ newBalance), (i + 1))
1128 1119          }
1129 1120  
1130 1121      let newBalances = (    let $l = balances
1131 1122      let $s = size($l)
1132 1123      let $acc0 = $Tuple2(nil, 0)
1133 1124      func $f0_1 ($a,$i) =     if (($i >= $s))
1134 1125          then $a
1135 1126          else calcNewBalances($a, $l[$i])
1136 1127  
1137 1128      func $f0_2 ($a,$i) =     if (($i >= $s))
1138 1129          then $a
1139 1130          else throw("List size exceeds 15")
1140 1131  
1141 1132      $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15))._1
1142 1133      let D1 = getDMem(newBalances, amp)
1143 1134      let diff = if (deposit)
1144 1135          then (D1 - D0)
1145 1136          else (D0 - D1)
1146 1137      $Tuple2(nil, fraction(diff, shareSupply, D0))
1147 1138      }
1148 1139  
1149 1140  
1150 1141  
1151 1142  @Callable(msg)
1152 1143  func rampA (_futureA,_futureTime) = valueOrElse(isActive(), valueOrElse(isAdminCall(msg), if (assert((blockTimestamp >= (initial_A_time + MIN_RAMP_TIME))))
1153 1144      then throw("too often")
1154 1145      else if (assert((_futureTime >= (blockTimestamp + MIN_RAMP_TIME))))
1155 1146          then throw("insufficient time")
1156 1147          else {
1157 1148              let _initial_A = _A()
1158 1149              if (assert(if ((_futureA > 0))
1159 1150                  then (MAX_A > _futureA)
1160 1151                  else false))
1161 1152                  then throw("out of base range")
1162 1153                  else if (assert(if (if ((_futureA >= _initial_A))
1163 1154                      then ((_initial_A * MAX_A_CHANGE) >= _futureA)
1164 1155                      else false)
1165 1156                      then true
1166 1157                      else if ((_initial_A > _futureA))
1167 1158                          then ((_futureA * MAX_A_CHANGE) >= _initial_A)
1168 1159                          else false))
1169 1160                      then throw("out of range")
1170 1161                      else [IntegerEntry("initial_A", _initial_A), IntegerEntry("future_A", _futureA), IntegerEntry("initial_A_time", blockTimestamp), IntegerEntry("future_A_time", _futureTime)]
1171 1162              }))
1172 1163  
1173 1164  
1174 1165  
1175 1166  @Callable(msg)
1176 1167  func stopRampA () = valueOrElse(isActive(), valueOrElse(isAdminCall(msg), {
1177 1168      let currentA = _A()
1178 1169  [IntegerEntry("initial_A", currentA), IntegerEntry("future_A", currentA), IntegerEntry("initial_A_time", blockTimestamp), IntegerEntry("future_A_time", blockTimestamp)]
1179 1170      }))
1180 1171  
1181 1172  
1182 1173  
1183 1174  @Callable(msg)
1184 1175  func shutdown () = valueOrElse(isAdminCall(msg), if (!(active))
1185 1176      then throw(("DApp is already suspended. Cause: " + valueOrElse(getString(this, kCause), "the cause wasn't specified")))
1186 1177      else suspend("Paused by admin"))
1187 1178  
1188 1179  
1189 1180  
1190 1181  @Callable(msg)
1191 1182  func activate () = valueOrElse(isAdminCall(msg), if (active)
1192 1183      then throwIsActive()
1193 1184      else [BooleanEntry(kActive, true), DeleteEntry(kCause)])
1194 1185  
1195 1186  
1196 1187  
1197 1188  @Callable(msg)
1198 1189  func keepLimitForFirstHarvest (shareLimit) = valueOrElse(isActive(), valueOrElse(isAdminCall(msg), [IntegerEntry(kShareLimit, shareLimit)]))
1199 1190  
1200 1191  
1201 1192  @Verifier(tx)
1202 1193  func verify () = {
1203 1194      let multiSignedByAdmins = {
1204 1195          let adminPubKey1Signed = if (sigVerify(tx.bodyBytes, tx.proofs[0], adminPubKey1))
1205 1196              then 1
1206 1197              else 0
1207 1198          let adminPubKey2Signed = if (sigVerify(tx.bodyBytes, tx.proofs[1], adminPubKey2))
1208 1199              then 1
1209 1200              else 0
1210 1201          let adminPubKey3Signed = if (sigVerify(tx.bodyBytes, tx.proofs[2], adminPubKey3))
1211 1202              then 1
1212 1203              else 0
1213 1204          (((adminPubKey1Signed + adminPubKey2Signed) + adminPubKey3Signed) >= 2)
1214 1205          }
1215 1206      match tx {
1216 1207          case inv: InvokeScriptTransaction => 
1217 1208              let callTakeIntoAccount = if ((inv.dApp == this))
1218 1209                  then (inv.function == "takeIntoAccountExtraFunds")
1219 1210                  else false
1220 1211              let signedByAdmin = if (if (if (sigVerify(tx.bodyBytes, tx.proofs[0], adminPubKey1))
1221 1212                  then true
1222 1213                  else sigVerify(tx.bodyBytes, tx.proofs[0], adminPubKey2))
1223 1214                  then true
1224 1215                  else sigVerify(tx.bodyBytes, tx.proofs[0], adminPubKey3))
1225 1216                  then true
1226 1217                  else sigVerify(tx.bodyBytes, tx.proofs[0], adminPubKeyInvoke)
1227 1218              if (if (callTakeIntoAccount)
1228 1219                  then signedByAdmin
1229 1220                  else false)
1230 1221                  then true
1231 1222                  else multiSignedByAdmins
1232 1223          case _ => 
1233 1224              multiSignedByAdmins
1234 1225      }
1235 1226      }
1236 1227

Old	New		Differences
6	6		let MAX_A = 1000000
7	7
8	8		let MAX_A_CHANGE = 10
	9	+
	10	+	let DECIMALS = 6
9	11
10	12		let MIN_RAMP_TIME = (86400 / 60)
11	13

283	285		else $Tuple2(D, false)
284	286		}
285	287
286		-	let $~~t066126724~~ = {
	288	+	let $t066296741 = {
287	289		let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14]
288	290		let $s = size($l)
289	291		let $acc0 = $Tuple2(toBigInt(S), false)

297	299
298	300		$f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
299	301		}
300		-	let D = $~~t066126724~~._1
301		-	let finished = $~~t066126724~~._2
	302	+	let D = $t066296741._1
	303	+	let finished = $t066296741._2
302	304		if ((finished == false))
303	305		then throw(("get_D() not finished with " + toString(D)))
304	306		else toInt(D)

324	326		let D = get_D(xp_, amp)
325	327		let Ann = (amp * nCoins)
326	328		func S_c (acc,i) = {
327		-	let $~~t072957312~~ = acc
328		-	let S_ = $~~t072957312~~._1
329		-	let c = $~~t072957312~~._2
	329	+	let $t073127329 = acc
	330	+	let S_ = $t073127329._1
	331	+	let c = $t073127329._2
330	332		let x_ = if ((in == i))
331	333		then x
332	334		else xp_[i]

337	339		else $Tuple2(S_, c)
338	340		}
339	341
340		-	let $~~t075207621~~ = {
	342	+	let $t075377638 = {
341	343		let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14]
342	344		let $s = size($l)
343	345		let $acc0 = $Tuple2(0, toBigInt(D))

351	353
352	354		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
353	355		}
354		-	let S_ = $~~t075207621~~._1
355		-	let c_ = $~~t075207621~~._2
	356	+	let S_ = $t075377638._1
	357	+	let c_ = $t075377638._2
356	358		let c = fraction(c_, toBigInt(D), toBigInt((Ann * nCoins)))
357	359		let bD = toBigInt(((S_ + (D / Ann)) - D))
358	360		func y_proc (acc,_i) = if ((acc._2 == true))

369	371		else $Tuple2(y, false)
370	372		}
371	373
372		-	let $~~t081038220~~ = {
	374	+	let $t081208237 = {
373	375		let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15]
374	376		let $s = size($l)
375	377		let $acc0 = $Tuple2(toBigInt(D), false)

383	385
384	386		$f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16)
385	387		}
386		-	let y = $~~t081038220~~._1
387		-	let finished = $~~t081038220~~._2
	388	+	let y = $t081208237._1
	389	+	let finished = $t081208237._2
388	390		if ((finished == false))
389	391		then throw(("getY() not finished with " + toString(y)))
390	392		else toInt(y)

398	400		else {
399	401		let Ann = (A_ * nCoins)
400	402		func S_c (acc,i) = {
401		-	let $~~t085998616~~ = acc
402		-	let S_ = $~~t085998616~~._1
403		-	let c = $~~t085998616~~._2
	403	+	let $t086168633 = acc
	404	+	let S_ = $t086168633._1
	405	+	let c = $t086168633._2
404	406		let x_ = if (if ((in != i))
405	407		then (nCoins > i)
406	408		else false)

413	415		else $Tuple2(S_, c)
414	416		}
415	417
416		-	let $~~t088368937~~ = {
	418	+	let $t088538954 = {
417	419		let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14]
418	420		let $s = size($l)
419	421		let $acc0 = $Tuple2(0, toBigInt(D))

427	429
428	430		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
429	431		}
430		-	let S_ = $~~t088368937~~._1
431		-	let c_ = $~~t088368937~~._2
	432	+	let S_ = $t088538954._1
	433	+	let c_ = $t088538954._2
432	434		let c = fraction(c_, toBigInt(D), toBigInt((Ann * nCoins)))
433	435		let bD = toBigInt(((S_ + (D / Ann)) - D))
434	436		func y_D_proc (acc,i) = if ((acc._2 == true))

445	447		else $Tuple2(y, false)
446	448		}
447	449
448		-	let $~~t094209539~~ = {
	450	+	let $t094379556 = {
449	451		let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15]
450	452		let $s = size($l)
451	453		let $acc0 = $Tuple2(toBigInt(D), false)

459	461
460	462		$f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16)
461	463		}
462		-	let y = $~~t094209539~~._1
463		-	let finished = $~~t094209539~~._2
	464	+	let y = $t094379556._1
	465	+	let finished = $t094379556._2
464	466		if ((finished == false))
465	467		then throw(("get_y_D() not finished with " + toString(y)))
466	468		else toInt(y)

477	479		let new_y = get_y_D(amp, i, xp, D1)
478	480		let dy_0 = (xp[i] - new_y)
479	481		func xp_reduced_proc (acc,xp_j) = {
480		-	let $~~t01018010209~~ = acc
481		-	let xp_reduced = $~~t01018010209~~._1
482		-	let index = $~~t01018010209~~._2
	482	+	let $t01019710226 = acc
	483	+	let xp_reduced = $t01019710226._1
	484	+	let index = $t01019710226._2
483	485		let dx_expected = if ((index == i))
484	486		then (fraction(xp_j, D1, D0) - new_y)
485	487		else (xp_j - fraction(xp_j, D1, D0))
486	488		$Tuple2((xp_reduced :+ (xp_j - fraction(_fee, dx_expected, feeScale6))), (index + 1))
487	489		}
488	490
489		-	let $~~t01047110535~~ = {
	491	+	let $t01048810552 = {
490	492		let $l = xp
491	493		let $s = size($l)
492	494		let $acc0 = $Tuple2(nil, 0)

500	502
501	503		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
502	504		}
503		-	let xp_reduced = $~~t01047110535~~._1
504		-	let index = $~~t01047110535~~._2
	505	+	let xp_reduced = $t01048810552._1
	506	+	let index = $t01048810552._2
505	507		let xp_reduced_i = xp_reduced[i]
506	508		let dy = ((xp_reduced_i - get_y_D(amp, i, xp_reduced, D1)) - 1)
507	509		$Tuple2(dy, (dy_0 - dy))

525	527
526	528		func calcStakingParams (stake,amount,assetId) = if (stake)
527	529		then {
528		-	let $~~t01109911165~~ = calcStakingFuncAndAddres(stake, assetId)
529		-	let call = $~~t01109911165~~._1
530		-	let stakingAddr = $~~t01109911165~~._2
	530	+	let $t01111611182 = calcStakingFuncAndAddres(stake, assetId)
	531	+	let call = $t01111611182._1
	532	+	let stakingAddr = $t01111611182._2
531	533		$Tuple4(call, stakingAddr, nil, [AttachedPayment(assetId, amount)])
532	534		}
533	535		else {
534		-	let $~~t01125111317~~ = calcStakingFuncAndAddres(stake, assetId)
535		-	let call = $~~t01125111317~~._1
536		-	let stakingAddr = $~~t01125111317~~._2
	536	+	let $t01126811334 = calcStakingFuncAndAddres(stake, assetId)
	537	+	let call = $t01126811334._1
	538	+	let stakingAddr = $t01126811334._2
537	539		$Tuple4(call, stakingAddr, [amount, toBase58String(assetId)], nil)
538	540		}
539	541
540	542
541	543		func stake (amount,assetIdString) = if (containsElement(stakingAssets, assetIdString))
542	544		then {
543		-	let $~~t01150411606~~ = calcStakingParams(true, amount, fromBase58String(assetIdString))
544		-	let call = $~~t01150411606~~._1
545		-	let addr = $~~t01150411606~~._2
546		-	let params = $~~t01150411606~~._3
547		-	let payments = $~~t01150411606~~._4
	545	+	let $t01152111623 = calcStakingParams(true, amount, fromBase58String(assetIdString))
	546	+	let call = $t01152111623._1
	547	+	let addr = $t01152111623._2
	548	+	let params = $t01152111623._3
	549	+	let payments = $t01152111623._4
548	550		invoke(addr, call, params, payments)
549	551		}
550	552		else 0

552	554
553	555		func unstake (amount,assetIdString) = if (containsElement(stakingAssets, assetIdString))
554	556		then {
555		-	let $~~t01179111894~~ = calcStakingParams(false, amount, fromBase58String(assetIdString))
556		-	let call = $~~t01179111894~~._1
557		-	let addr = $~~t01179111894~~._2
558		-	let params = $~~t01179111894~~._3
559		-	let payments = $~~t01179111894~~._4
	557	+	let $t01180811911 = calcStakingParams(false, amount, fromBase58String(assetIdString))
	558	+	let call = $t01180811911._1
	559	+	let addr = $t01180811911._2
	560	+	let params = $t01180811911._3
	561	+	let payments = $t01180811911._4
560	562		invoke(addr, call, params, payments)
561	563		}
562	564		else 0

585	587		func checkSuspicious () = {
586	588		let contractBalances = _xp()
587	589		func checkBalance (acc,assetId) = {
588		-	let $~~t01250512530~~ = acc
589		-	let suspicious = $~~t01250512530~~._1
590		-	let i = $~~t01250512530~~._2
	590	+	let $t01252212547 = acc
	591	+	let suspicious = $t01252212547._1
	592	+	let i = $t01252212547._2
591	593		if (suspicious)
592	594		then $Tuple2(suspicious, i)
593	595		else {

637	639		func checkDAppThreshold (newBalances) = {
638	640		let dAppThresholdCoef = valueOrErrorMessage(getInteger(this, kDAppThresholdCoef), "No dAppThresholdCoef key")
639	641		let thresholdScale = 10000
640		-	func iterAllBalances (acc,tokenBalance) = {
641		-	let $t01350913550 = acc
642		-	let thresholdError = $t01350913550._1
643		-	let cutedBalances = $t01350913550._2
644		-	func iterCutedBalances (checkRatio,checkedBalance) = {
645		-	let ratio = fraction(tokenBalance, thresholdScale, checkedBalance)
646		-	if (if ((ratio > (dAppThresholdCoef * thresholdScale)))
647		-	then true
648		-	else (fraction(1, thresholdScale, dAppThresholdCoef) > ratio))
649		-	then throw("New balance in assets of the DApp is less than threshold")
650		-	else false
651		-	}
	642	+	let maxBalance = max(newBalances)
	643	+	let minBalance = min(newBalances)
	644	+	let ratio = fraction(maxBalance, thresholdScale, minBalance)
	645	+	if ((ratio > (dAppThresholdCoef * thresholdScale)))
	646	+	then throw("New balance in assets of the DApp is less than threshold")
	647	+	else false
	648	+	}
652	649
653		-	$Tuple2({
654		-	let $l = cutedBalances
655		-	let $s = size($l)
656		-	let $acc0 = thresholdError
657		-	func $f0_1 ($a,$i) = if (($i >= $s))
658		-	then $a
659		-	else iterCutedBalances($a, $l[$i])
660	650
661		-	func $f0_2 ($a,$i) = if (($i >= $s))
662		-	then $a
663		-	else throw("List size exceeds 15")
664		-
665		-	$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
666		-	}, removeByIndex(cutedBalances, 0))
	651	+	func checkCoins (assetIds) = {
	652	+	let coins = split(assetIds, ",")
	653	+	func checkCoin (error,assetId) = {
	654	+	let asset = valueOrErrorMessage(fromBase58String(assetId), ("fromBase58String: " + assetId))
	655	+	let decimals = valueOrErrorMessage(assetInfo(asset), ("assetInfo: " + assetId)).decimals
	656	+	if ((decimals != DECIMALS))
	657	+	then throw("wrong decimals")
	658	+	else false
667	659		}
668	660
669		-	let $t01407214175 = {
670		-	let $l = newBalances
671		-	let $s = size($l)
672		-	let $acc0 = $Tuple2(false, removeByIndex(newBalances, 0))
673		-	func $f0_1 ($a,$i) = if (($i >= $s))
674		-	then $a
675		-	else iterAllBalances($a, $l[$i])
	661	+	let $l = coins
	662	+	let $s = size($l)
	663	+	let $acc0 = false
	664	+	func $f0_1 ($a,$i) = if (($i >= $s))
	665	+	then $a
	666	+	else checkCoin($a, $l[$i])
676	667
677		-	func $f0_2 ($a,$i) = if (($i >= $s))
678		-	then $a
679		-	else throw("List size exceeds 15")
	668	+	func $f0_2 ($a,$i) = if (($i >= $s))
	669	+	then $a
	670	+	else throw("List size exceeds 15")
680	671
681		-	$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
682		-	}
683		-	let thresholdError = $t01407214175._1
684		-	let b = $t01407214175._2
685		-	thresholdError
	672	+	$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
686	673		}
687	674
688	675

695	682
696	683
697	684		@Callable(msg)
698		-	func init (~~coins~~,_A,firstHarvest) = if (!(isDataStorageUntouched(this)))
	685	+	func init (assetIds,_A,firstHarvest) = if (!(isDataStorageUntouched(this)))
699	686		then throw("Already initialized")
700	687		else {
701	688		let shareName = "s_Multi_USD"
702	689		let shareDescription = ("ShareToken of SwopFi protocol for MultiStable USD pool at address " + toString(this))
703	690		let issueToken = Issue(shareName, shareDescription, 0, 6, true)
704	691		let tokenId = calculateAssetId(issueToken)
705		-	let baseEntry = [StringEntry(kAssets, coins), IntegerEntry("initial_A", _A), IntegerEntry("future_A", _A), IntegerEntry(kFee, getIntegerValue(oracle, "base_fee_flat")), StringEntry(kShareAssetId, toBase58String(tokenId)), IntegerEntry(kShareAssetSupply, 0), IntegerEntry(kDAppThresholdCoef, 15), BooleanEntry(kActive, true), issueToken]
706		-	if (firstHarvest)
707		-	then (baseEntry ++ [BooleanEntry(kFirstHarvest, firstHarvest), IntegerEntry(kFirstHarvestHeight, (startHeight + (firstHarvestEndPeriod * periodLength)))])
708		-	else baseEntry
	692	+	if (checkCoins(assetIds))
	693	+	then throw()
	694	+	else {
	695	+	let baseEntry = [StringEntry(kAssets, assetIds), IntegerEntry("initial_A", _A), IntegerEntry("future_A", _A), IntegerEntry(kFee, getIntegerValue(oracle, "base_fee_flat")), StringEntry(kShareAssetId, toBase58String(tokenId)), IntegerEntry(kShareAssetSupply, 0), IntegerEntry(kDAppThresholdCoef, 15), BooleanEntry(kActive, true), issueToken]
	696	+	if (firstHarvest)
	697	+	then (baseEntry ++ [BooleanEntry(kFirstHarvest, firstHarvest), IntegerEntry(kFirstHarvestHeight, (startHeight + (firstHarvestEndPeriod * periodLength)))])
	698	+	else baseEntry
	699	+	}
709	700		}
710	701
711	702

755	746		else {
756	747		let paymentsSize = size(payments)
757	748		func parsePayments (acc,assetId) = {
758		-	let $~~t01658116610~~ = acc
759		-	let newBalances = $~~t01658116610~~._1
760		-	let i = $~~t01658116610~~._2
761		-	let j = $~~t01658116610~~._3
	749	+	let $t01661916648 = acc
	750	+	let newBalances = $t01661916648._1
	751	+	let i = $t01661916648._2
	752	+	let j = $t01661916648._3
762	753		if (if ((paymentsSize > j))
763	754		then (getStrAssetId(payments[j].assetId) == assetId)
764	755		else false)

771	762		else $Tuple3((newBalances :+ xp[i]), (i + 1), j)
772	763		}
773	764
774		-	let $~~t01691617002~~ = {
	765	+	let $t01695417040 = {
775	766		let $l = assetIds
776	767		let $s = size($l)
777	768		let $acc0 = $Tuple3(nil, 0, 0)

785	776
786	777		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
787	778		}
788		-	let newBalances = $~~t01691617002~~._1
789		-	let k = $~~t01691617002~~._2
790		-	let parsedPayments = $~~t01691617002~~._3
	779	+	let newBalances = $t01695417040._1
	780	+	let k = $t01695417040._2
	781	+	let parsedPayments = $t01695417040._3
791	782		if (((paymentsSize - 1) > parsedPayments))
792	783		then throw("Incorect payments order")
793	784		else if (checkDAppThreshold(newBalances))

799	790		else {
800	791		let feeDiscount = calculateFeeDiscount(msg.caller)
801	792		func calcScriptActions (acc,newBalance) = {
802		-	let $~~t01740717448~~ = acc
803		-	let invBalances = $~~t01740717448~~._1
804		-	let scriptActions = $~~t01740717448~~._2
805		-	let i = $~~t01740717448~~._3
	793	+	let $t01744517486 = acc
	794	+	let invBalances = $t01744517486._1
	795	+	let scriptActions = $t01744517486._2
	796	+	let i = $t01744517486._3
806	797		if ((shareSupply > 0))
807	798		then {
808	799		let _fee = ((fraction(fee, feeDiscount, feeScale6, CEILING) * nCoins) / (4 * (nCoins - 1)))

824	815		else $Tuple3((invBalances :+ newBalance), (scriptActions :+ IntegerEntry((assetIds[i] + kAssetBalance), newBalance)), (i + 1))
825	816		}
826	817
827		-	let $~~t01878518873~~ = {
	818	+	let $t01882318911 = {
828	819		let $l = newBalances
829	820		let $s = size($l)
830	821		let $acc0 = $Tuple3(nil, nil, 0)

838	829
839	830		$f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
840	831		}
841		-	let invBalances = $~~t01878518873~~._1
842		-	let scriptActions = $~~t01878518873~~._2
	832	+	let invBalances = $t01882318911._1
	833	+	let scriptActions = $t01882318911._2
843	834		let D2 = getDMem(invBalances, amp)
844	835		let mint_amount = if ((shareSupply == 0))
845	836		then D1

913	904		then throw("Exchange resulted in fewer coins than expected")
914	905		else {
915	906		func makeNewBalances (acc,tokenBalance) = {
916		-	let $~~t02158521611~~ = acc
917		-	let newBalances = $~~t02158521611~~._1
918		-	let i = $~~t02158521611~~._2
	907	+	let $t02162321649 = acc
	908	+	let newBalances = $t02162321649._1
	909	+	let i = $t02162321649._2
919	910		if ((i == fromIndex))
920	911		then $Tuple2((newBalances :+ (tokenBalance + dx)), (i + 1))
921	912		else if ((i == toIndex))

923	914		else $Tuple2((newBalances :+ tokenBalance), (i + 1))
924	915		}
925	916
926		-	let $~~t02186121922~~ = {
	917	+	let $t02189921960 = {
927	918		let $l = xp
928	919		let $s = size($l)
929	920		let $acc0 = $Tuple2(nil, 0)

937	928
938	929		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
939	930		}
940		-	let newBalances = $~~t02186121922~~._1
941		-	let i = $~~t02186121922~~._2
	931	+	let newBalances = $t02189921960._1
	932	+	let i = $t02189921960._2
942	933		if (checkDAppThreshold(newBalances))
943	934		then throw()
944	935		else {

980	971		then {
981	972		let withdrawAmount = (_amount + unlockAmount)
982	973		func calcScriptActions (acc,balance) = {
983		-	let $~~t02332723355~~ = acc
984		-	let scriptActions = $~~t02332723355~~._1
985		-	let i = $~~t02332723355~~._2
	974	+	let $t02336523393 = acc
	975	+	let scriptActions = $t02336523393._1
	976	+	let i = $t02336523393._2
986	977		let wAmount = fraction(balance, withdrawAmount, total_supply)
987	978		if (assert((wAmount >= minAmounts[i])))
988	979		then throw("Withdrawal resulted in fewer coins than expected")

994	985		}
995	986		}
996	987
997		-	let $~~t02384523913~~ = {
	988	+	let $t02388323951 = {
998	989		let $l = _xp()
999	990		let $s = size($l)
1000	991		let $acc0 = $Tuple2(nil, 0)

1008	999
1009	1000		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
1010	1001		}
1011		-	let scriptActions = $~~t02384523913~~._1
1012		-	let i = $~~t02384523913~~._2
	1002	+	let scriptActions = $t02388323951._1
	1003	+	let i = $t02388323951._2
1013	1004		(scriptActions ++ [Burn(shareAssetId, withdrawAmount), IntegerEntry(kShareAssetSupply, (shareSupply - withdrawAmount))])
1014	1005		}
1015	1006		else throw("Strict value is not equal to itself.")

1049	1040		then {
1050	1041		let withdrawAmount = (_tokenAmount + unlockAmount)
1051	1042		let xp = _xp()
1052		-	let $~~t02514425225~~ = _calcWithdrawOneCoin(xp, withdrawAmount, outIndex, msg.caller)
1053		-	let dy = $~~t02514425225~~._1
1054		-	let dy_fee = $~~t02514425225~~._2
	1043	+	let $t02518225263 = _calcWithdrawOneCoin(xp, withdrawAmount, outIndex, msg.caller)
	1044	+	let dy = $t02518225263._1
	1045	+	let dy_fee = $t02518225263._2
1055	1046		if (assert((dy >= minAmount)))
1056	1047		then throw("Not enough coins removed")
1057	1048		else {
1058	1049		let governanceFees = fraction(dy_fee, feeGovernance, feeScale6)
1059	1050		let dy_and_fee = (dy + dy_fee)
1060	1051		func makeNewBalances (acc,tokenBalance) = {
1061		-	let $~~t02548325509~~ = acc
1062		-	let newBalances = $~~t02548325509~~._1
1063		-	let i = $~~t02548325509~~._2
	1052	+	let $t02552125547 = acc
	1053	+	let newBalances = $t02552125547._1
	1054	+	let i = $t02552125547._2
1064	1055		if ((i == outIndex))

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let PRECISION = 1000000
5	5
6	6		let MAX_A = 1000000
7	7
8	8		let MAX_A_CHANGE = 10
	9	+
	10	+	let DECIMALS = 6
9	11
10	12		let MIN_RAMP_TIME = (86400 / 60)
11	13
12	14		let kAssets = "asset_ids"
13	15
14	16		let kAssetBalance = "_balance"
15	17
16	18		let kActive = "active"
17	19
18	20		let kCause = "shutdown_cause"
19	21
20	22		let kShareAssetId = "share_asset_id"
21	23
22	24		let kShareAssetSupply = "share_asset_supply"
23	25
24	26		let kFee = "commission"
25	27
26	28		let kDAppThresholdCoef = "dAppThresholdCoef"
27	29
28	30		let kUSDNAddress = "staking_usdnnsbt_address"
29	31
30	32		let kDiscounts = "discounts"
31	33
32	34		let kDiscountValues = "discount_values"
33	35
34	36		let kUserSwopInGov = "_SWOP_amount"
35	37
36	38		let kFirstHarvest = "first_harvest"
37	39
38	40		let kFirstHarvestHeight = "first_harvest_height"
39	41
40	42		let kShareLimit = "share_limit_on_first_harvest"
41	43
42	44		let kBasePeriod = "base_period"
43	45
44	46		let kPeriodLength = "period_length"
45	47
46	48		let kStartHeight = "start_height"
47	49
48	50		let kAdminPubKey1 = "admin_pub_1"
49	51
50	52		let kAdminPubKey2 = "admin_pub_2"
51	53
52	54		let kAdminPubKey3 = "admin_pub_3"
53	55
54	56		let kAdminInvokePubKey = "admin_invoke_pub"
55	57
56	58		let kMoneyBoxAddress = "money_box_address"
57	59
58	60		let kGovAddress = "governance_address"
59	61
60	62		let kVotingAddress = "voting_address"
61	63
62	64		let kFarmingAddress = "farming_address"
63	65
64	66		let oracle = Address(base58'3NBBWfzZtZtszaXbitTKnrB2xXwv26Bn7H9')
65	67
66	68		func getBase58FromOracle (key) = match getString(oracle, key) {
67	69		case string: String =>
68	70		fromBase58String(string)
69	71		case nothing =>
70	72		throw((key + "is empty"))
71	73		}
72	74
73	75
74	76		let adminPubKey1 = getBase58FromOracle(kAdminPubKey1)
75	77
76	78		let adminPubKey2 = getBase58FromOracle(kAdminPubKey2)
77	79
78	80		let adminPubKey3 = getBase58FromOracle(kAdminPubKey3)
79	81
80	82		let adminPubKeyInvoke = getBase58FromOracle(kAdminInvokePubKey)
81	83
82	84		let moneyBoxAddress = Address(getBase58FromOracle(kMoneyBoxAddress))
83	85
84	86		let govAddress = Address(getBase58FromOracle(kGovAddress))
85	87
86	88		let stakingUSDNAddress = Address(getBase58FromOracle(kUSDNAddress))
87	89
88	90		let votingAddress = Address(getBase58FromOracle(kVotingAddress))
89	91
90	92		let farmingAddress = Address(getBase58FromOracle(kFarmingAddress))
91	93
92	94		let capMoneyBoxAddress = Address(base58'3MxXHaGvmKQHH3kNrPBunhve1sDXf7M5RZt')
93	95
94	96		let USDN = base58'8UrfDVd5GreeUwm7uPk7eYz1eMv376kzR52C6sANPkwS'
95	97
96	98		let stakingAssets = [toBase58String(USDN)]
97	99
98	100		let basePeriod = valueOrErrorMessage(getInteger(votingAddress, kBasePeriod), "Empty kBasePeriod")
99	101
100	102		let startHeight = valueOrErrorMessage(getInteger(votingAddress, kStartHeight), "Empty kStartHeight")
101	103
102	104		let periodLength = valueOrErrorMessage(getInteger(votingAddress, kPeriodLength), "Empty kPeriodLength")
103	105
104	106		let firstHarvestEndPeriod = ((basePeriod + ((height - startHeight) / periodLength)) + 3)
105	107
106	108		let active = getBooleanValue(this, kActive)
107	109
108	110		let shareAssetId = fromBase58String(getStringValue(this, kShareAssetId))
109	111
110	112		let shareSupply = getIntegerValue(this, kShareAssetSupply)
111	113
112	114		let feeScale6 = 1000000
113	115
114	116		let fee = getIntegerValue(this, kFee)
115	117
116	118		let feeGovernance = fraction(40, feeScale6, 100)
117	119
118	120		let initial_A = getIntegerValue(this, "initial_A")
119	121
120	122		let future_A = getIntegerValue(this, "future_A")
121	123
122	124		let initial_A_time = valueOrElse(getInteger(this, "initial_A_time"), 0)
123	125
124	126		let future_A_time = valueOrElse(getInteger(this, "future_A_time"), 0)
125	127
126	128		let assetIds = split(getStringValue(this, kAssets), ",")
127	129
128	130		let nCoins = size(assetIds)
129	131
130	132		func suspend (cause) = [BooleanEntry(kActive, false), StringEntry(kCause, cause)]
131	133
132	134
133	135		func throwIsActive () = throw("DApp is already active")
134	136
135	137
136	138		func isActive () = if (active)
137	139		then unit
138	140		else throw("DApp is inactive at this moment")
139	141
140	142
141	143		func isAdminCall (i) = if (containsElement([adminPubKey1, adminPubKey2, adminPubKey3], i.callerPublicKey))
142	144		then unit
143	145		else throw("Only admin can call this function")
144	146
145	147
146	148		func isSelfCall (i) = if ((this == i.caller))
147	149		then unit
148	150		else throw("Only contract itself can call this function")
149	151
150	152
151	153		let big2 = toBigInt(2)
152	154
153	155		let blockTimestamp = height
154	156
155	157		func assert (a) = if (a)
156	158		then false
157	159		else true
158	160
159	161
160	162		func calculateFeeDiscount (userAddr) = {
161	163		let swopAmount = valueOrElse(getInteger(govAddress, (toString(userAddr) + kUserSwopInGov)), 0)
162	164		let discountValues = split(getStringValue(oracle, kDiscountValues), ",")
163	165		let discounts = split(getStringValue(oracle, kDiscounts), ",")
164	166		if (if ((swopAmount >= parseIntValue(discountValues[0])))
165	167		then (parseIntValue(discountValues[1]) > swopAmount)
166	168		else false)
167	169		then (feeScale6 - parseIntValue(discounts[0]))
168	170		else if (if ((swopAmount >= parseIntValue(discountValues[1])))
169	171		then (parseIntValue(discountValues[2]) > swopAmount)
170	172		else false)
171	173		then (feeScale6 - parseIntValue(discounts[1]))
172	174		else if (if ((swopAmount >= parseIntValue(discountValues[2])))
173	175		then (parseIntValue(discountValues[3]) > swopAmount)
174	176		else false)
175	177		then (feeScale6 - parseIntValue(discounts[2]))
176	178		else if (if ((swopAmount >= parseIntValue(discountValues[3])))
177	179		then (parseIntValue(discountValues[4]) > swopAmount)
178	180		else false)
179	181		then (feeScale6 - parseIntValue(discounts[3]))
180	182		else if ((swopAmount >= parseIntValue(discountValues[4])))
181	183		then (feeScale6 - parseIntValue(discounts[4]))
182	184		else feeScale6
183	185		}
184	186
185	187
186	188		func _A () = {
187	189		let t1 = future_A_time
188	190		let A1 = future_A
189	191		if ((t1 > blockTimestamp))
190	192		then {
191	193		let A0 = initial_A
192	194		let t0 = initial_A_time
193	195		if ((A1 > A0))
194	196		then (A0 + (((A1 - A0) * (blockTimestamp - t0)) / (t1 - t0)))
195	197		else (A0 - (((A0 - A1) * (blockTimestamp - t0)) / (t1 - t0)))
196	198		}
197	199		else A1
198	200		}
199	201
200	202
201	203		func _xp () = {
202	204		func assetBalances (acc,assetId) = (acc :+ valueOrElse(getInteger(this, (assetId + kAssetBalance)), 0))
203	205
204	206		let $l = assetIds
205	207		let $s = size($l)
206	208		let $acc0 = nil
207	209		func $f0_1 ($a,$i) = if (($i >= $s))
208	210		then $a
209	211		else assetBalances($a, $l[$i])
210	212
211	213		func $f0_2 ($a,$i) = if (($i >= $s))
212	214		then $a
213	215		else throw("List size exceeds 15")
214	216
215	217		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
216	218		}
217	219
218	220
219	221		func _xp_mem (xp) = xp
220	222
221	223
222	224		func sumList (acc,element) = (acc + element)
223	225
224	226
225	227		func get_D (xp,amp) = {
226	228		let @ = invoke(this, "D", [xp, amp], nil)
227	229		if ($isInstanceOf(@, "Int"))
228	230		then @
229	231		else throw(($getType(invoke(this, "D", [xp, amp], nil)) + " couldn't be cast to Int"))
230	232		}
231	233
232	234
233	235		func get_D_internal (xp,amp) = {
234	236		let S = {
235	237		let $l = xp
236	238		let $s = size($l)
237	239		let $acc0 = 0
238	240		func $f0_1 ($a,$i) = if (($i >= $s))
239	241		then $a
240	242		else sumList($a, $l[$i])
241	243
242	244		func $f0_2 ($a,$i) = if (($i >= $s))
243	245		then $a
244	246		else throw("List size exceeds 15")
245	247
246	248		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
247	249		}
248	250		if ((S == 0))
249	251		then 0
250	252		else {
251	253		let Ann = (amp * nCoins)
252	254		let AnnS = (toBigInt(Ann) * toBigInt(S))
253	255		let Ann1 = toBigInt((Ann - 1))
254	256		func Dproc (acc,i) = if ((acc._2 == true))
255	257		then acc
256	258		else {
257	259		let Dprev = acc._1
258	260		func D_PProc (D_P,i) = if ((nCoins > i))
259	261		then ((D_P * Dprev) / (toBigInt(xp[i]) * toBigInt(nCoins)))
260	262		else D_P
261	263
262	264		let D_P = {
263	265		let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14]
264	266		let $s = size($l)
265	267		let $acc0 = Dprev
266	268		func $f1_1 ($a,$i) = if (($i >= $s))
267	269		then $a
268	270		else D_PProc($a, $l[$i])
269	271
270	272		func $f1_2 ($a,$i) = if (($i >= $s))
271	273		then $a
272	274		else throw("List size exceeds 15")
273	275
274	276		$f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
275	277		}
276	278		let D = fraction((AnnS + (toBigInt(nCoins) * D_P)), Dprev, ((Ann1 * Dprev) + (toBigInt((nCoins + 1)) * D_P)))
277	279		if ((D > Dprev))
278	280		then if ((1 >= toInt((D - Dprev))))
279	281		then $Tuple2(D, true)
280	282		else $Tuple2(D, false)
281	283		else if ((1 >= toInt((Dprev - D))))
282	284		then $Tuple2(D, true)
283	285		else $Tuple2(D, false)
284	286		}
285	287
286		-	let $~~t066126724~~ = {
	288	+	let $t066296741 = {
287	289		let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14]
288	290		let $s = size($l)
289	291		let $acc0 = $Tuple2(toBigInt(S), false)
290	292		func $f1_1 ($a,$i) = if (($i >= $s))
291	293		then $a
292	294		else Dproc($a, $l[$i])
293	295
294	296		func $f1_2 ($a,$i) = if (($i >= $s))
295	297		then $a
296	298		else throw("List size exceeds 15")
297	299
298	300		$f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
299	301		}
300		-	let D = $~~t066126724~~._1
301		-	let finished = $~~t066126724~~._2
	302	+	let D = $t066296741._1
	303	+	let finished = $t066296741._2
302	304		if ((finished == false))
303	305		then throw(("get_D() not finished with " + toString(D)))
304	306		else toInt(D)
305	307		}
306	308		}
307	309
308	310
309	311		func getDMem (xp,amp) = get_D(_xp_mem(xp), amp)
310	312
311	313
312	314		func getY (in,out,x,xp_) = if (assert((in != out)))
313	315		then throw("same coin")
314	316		else if (assert(if ((out >= 0))
315	317		then (in >= 0)
316	318		else false))
317	319		then throw("below zero")
318	320		else if (assert(if ((nCoins > out))
319	321		then (nCoins > in)
320	322		else false))
321	323		then throw("above N_COINS")
322	324		else {
323	325		let amp = _A()
324	326		let D = get_D(xp_, amp)
325	327		let Ann = (amp * nCoins)
326	328		func S_c (acc,i) = {
327		-	let $~~t072957312~~ = acc
328		-	let S_ = $~~t072957312~~._1
329		-	let c = $~~t072957312~~._2
	329	+	let $t073127329 = acc
	330	+	let S_ = $t073127329._1
	331	+	let c = $t073127329._2
330	332		let x_ = if ((in == i))
331	333		then x
332	334		else xp_[i]
333	335		if (if ((i != out))
334	336		then (nCoins > i)
335	337		else false)
336	338		then $Tuple2((S_ + x_), fraction(c, toBigInt(D), toBigInt((x_ * nCoins))))
337	339		else $Tuple2(S_, c)
338	340		}
339	341
340		-	let $~~t075207621~~ = {
	342	+	let $t075377638 = {
341	343		let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14]
342	344		let $s = size($l)
343	345		let $acc0 = $Tuple2(0, toBigInt(D))
344	346		func $f0_1 ($a,$i) = if (($i >= $s))
345	347		then $a
346	348		else S_c($a, $l[$i])
347	349
348	350		func $f0_2 ($a,$i) = if (($i >= $s))
349	351		then $a
350	352		else throw("List size exceeds 15")
351	353
352	354		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
353	355		}
354		-	let S_ = $~~t075207621~~._1
355		-	let c_ = $~~t075207621~~._2
	356	+	let S_ = $t075377638._1
	357	+	let c_ = $t075377638._2
356	358		let c = fraction(c_, toBigInt(D), toBigInt((Ann * nCoins)))
357	359		let bD = toBigInt(((S_ + (D / Ann)) - D))
358	360		func y_proc (acc,_i) = if ((acc._2 == true))
359	361		then acc
360	362		else {
361	363		let y_prev = acc._1
362	364		let y = (((y_prev * y_prev) + c) / ((big2 * y_prev) + bD))
363	365		if ((y > y_prev))
364	366		then if ((1 >= toInt((y - y_prev))))
365	367		then $Tuple2(y, true)
366	368		else $Tuple2(y, false)
367	369		else if ((1 >= toInt((y_prev - y))))
368	370		then $Tuple2(y, true)
369	371		else $Tuple2(y, false)
370	372		}
371	373
372		-	let $~~t081038220~~ = {
	374	+	let $t081208237 = {
373	375		let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15]
374	376		let $s = size($l)
375	377		let $acc0 = $Tuple2(toBigInt(D), false)
376	378		func $f1_1 ($a,$i) = if (($i >= $s))
377	379		then $a
378	380		else y_proc($a, $l[$i])
379	381
380	382		func $f1_2 ($a,$i) = if (($i >= $s))
381	383		then $a
382	384		else throw("List size exceeds 16")
383	385
384	386		$f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16)
385	387		}
386		-	let y = $~~t081038220~~._1
387		-	let finished = $~~t081038220~~._2
	388	+	let y = $t081208237._1
	389	+	let finished = $t081208237._2
388	390		if ((finished == false))
389	391		then throw(("getY() not finished with " + toString(y)))
390	392		else toInt(y)
391	393		}
392	394
393	395
394	396		func get_y_D (A_,in,xp,D) = if (assert((in >= 0)))
395	397		then throw("i below zero")
396	398		else if (assert((nCoins > in)))
397	399		then throw("i above N_COINS")
398	400		else {
399	401		let Ann = (A_ * nCoins)
400	402		func S_c (acc,i) = {
401		-	let $~~t085998616~~ = acc
402		-	let S_ = $~~t085998616~~._1
403		-	let c = $~~t085998616~~._2
	403	+	let $t086168633 = acc
	404	+	let S_ = $t086168633._1
	405	+	let c = $t086168633._2
404	406		let x_ = if (if ((in != i))
405	407		then (nCoins > i)
406	408		else false)
407	409		then xp[i]
408	410		else 0
409	411		if (if ((nCoins > i))
410	412		then (in != i)
411	413		else false)
412	414		then $Tuple2((S_ + x_), fraction(c, toBigInt(D), toBigInt((x_ * nCoins))))
413	415		else $Tuple2(S_, c)
414	416		}
415	417
416		-	let $~~t088368937~~ = {
	418	+	let $t088538954 = {
417	419		let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14]
418	420		let $s = size($l)
419	421		let $acc0 = $Tuple2(0, toBigInt(D))
420	422		func $f0_1 ($a,$i) = if (($i >= $s))
421	423		then $a
422	424		else S_c($a, $l[$i])
423	425
424	426		func $f0_2 ($a,$i) = if (($i >= $s))
425	427		then $a
426	428		else throw("List size exceeds 15")
427	429
428	430		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15)
429	431		}
430		-	let S_ = $~~t088368937~~._1
431		-	let c_ = $~~t088368937~~._2
	432	+	let S_ = $t088538954._1
	433	+	let c_ = $t088538954._2
432	434		let c = fraction(c_, toBigInt(D), toBigInt((Ann * nCoins)))
433	435		let bD = toBigInt(((S_ + (D / Ann)) - D))
434	436		func y_D_proc (acc,i) = if ((acc._2 == true))
435	437		then acc
436	438		else {
437	439		let y_prev = acc._1
438	440		let y = (((y_prev * y_prev) + c) / ((big2 * y_prev) + bD))
439	441		if ((y > y_prev))
440	442		then if ((1 >= toInt((y - y_prev))))
441	443		then $Tuple2(y, true)
442	444		else $Tuple2(y, false)
443	445		else if ((1 >= toInt((y_prev - y))))
444	446		then $Tuple2(y, true)
445	447		else $Tuple2(y, false)
446	448		}
447	449
448		-	let $~~t094209539~~ = {
	450	+	let $t094379556 = {
449	451		let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15]
450	452		let $s = size($l)
451	453		let $acc0 = $Tuple2(toBigInt(D), false)
452	454		func $f1_1 ($a,$i) = if (($i >= $s))
453	455		then $a
454	456		else y_D_proc($a, $l[$i])
455	457
456	458		func $f1_2 ($a,$i) = if (($i >= $s))
457	459		then $a
458	460		else throw("List size exceeds 16")
459	461
460	462		$f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16)
461	463		}
462		-	let y = $~~t094209539~~._1
463		-	let finished = $~~t094209539~~._2
	464	+	let y = $t094379556._1
	465	+	let finished = $t094379556._2
464	466		if ((finished == false))
465	467		then throw(("get_y_D() not finished with " + toString(y)))
466	468		else toInt(y)
467	469		}
468	470
469	471
470	472		func _calcWithdrawOneCoin (xp,_token_amount,i,caller) = {
471	473		let feeDiscount = calculateFeeDiscount(caller)
472	474		let amp = _A()
473	475		let _fee = ((fraction(fee, feeDiscount, feeScale6, CEILING) * nCoins) / (4 * (nCoins - 1)))
474	476		let total_supply = shareSupply
475	477		let D0 = get_D(xp, amp)
476	478		let D1 = (D0 - fraction(_token_amount, D0, total_supply))
477	479		let new_y = get_y_D(amp, i, xp, D1)

github/deemru/w8io/c3f4982 
170.87 ms ◑