tx · 5M7gF4EphEfSp7AMj1j2HYJ2ioKQqT4EXP2WGxXTLT5r

3N4ziXSMRverXyxHDUKKMR9MHXnB3TyU3Yh:  -0.01000000 Waves

2023.04.18 10:28 [2539694] smart account 3N4ziXSMRverXyxHDUKKMR9MHXnB3TyU3Yh > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "5M7gF4EphEfSp7AMj1j2HYJ2ioKQqT4EXP2WGxXTLT5r",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1681802910970,
    "version": 2,
    "chainId": 84,
    "sender": "3N4ziXSMRverXyxHDUKKMR9MHXnB3TyU3Yh",
    "senderPublicKey": "EU9obW1yVhR8qug3EmXPeew3DMagvJFQzY5Ku8bmcsU7",
    "proofs": [
        "K3SpLDoo96AL6iwuiodw3T2s74ut5DoUbQhdrNHb6Yxs2GTsAh4fsNy7BiZLJbk4mcTJuJiVLUkrwyzf1VYxXbF"
    ],
    "script": "base64:BgICCAIPAANTRVACAl9fABBjb250cmFjdEZpbGVuYW1lAgl0ZXN0LnJpZGUBEGtleVB1YmxpY0tleUxpc3QACQC5CQIJAMwIAgICJXMJAMwIAgIVbXVsdGlzaWdQdWJsaWNLZXlMaXN0BQNuaWwFA1NFUAEIdGhyb3dFcnIBAXMJAAIBCQCsAgIJAKwCAgUQY29udHJhY3RGaWxlbmFtZQICOiAFAXMBHGdldE11bHRpc2lnUHViS2V5c0xpc3RPclVuaXQABBJyYXdNdWx0aXNpZ1B1YktleXMJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBEGtleVB1YmxpY0tleUxpc3QAAgAJALUJAgUScmF3TXVsdGlzaWdQdWJLZXlzBQNTRVABD2NvbXBhcmVGdW5jdGlvbgIBYQFiAwkAAAIFAWEFAWIAAQAAAQ1jb21wYXJlSGVscGVyAgNsc3QBYQQJJHQwNTY5NTk1BQNsc3QEBnJlc3VsdAgFCSR0MDU2OTU5NQJfMQQGZXhwZWN0CAUJJHQwNTY5NTk1Al8yCQCUCgIJAM0IAgUGcmVzdWx0CQEPY29tcGFyZUZ1bmN0aW9uAgUGZXhwZWN0BQFhBQZleHBlY3QBB2NvbXBhcmUCBGxpc3QBYQoAAiRsBQRsaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQNuaWwFAWEKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBDWNvbXBhcmVIZWxwZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoBBWFjY3VtAgNzdW0DdmFsCQBkAgUDc3VtBQN2YWwBB3N1bUxpc3QBBGxpc3QKAAIkbAUEbGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFYWNjdW0CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoBEWNvbXBhcmVMaXN0SGVscGVyAgFhAWIECSR0MDkyNTk0NgUBYQQGcmVzdWx0CAUJJHQwOTI1OTQ2Al8xBANsc3QIBQkkdDA5MjU5NDYCXzIEC2NvbXBhcmVMaXN0CAkBB2NvbXBhcmUCBQNsc3QFAWICXzEEA3N1bQkBB3N1bUxpc3QBBQtjb21wYXJlTGlzdAkAlAoCCQDNCAIFBnJlc3VsdAUDc3VtBQNsc3QBD25vcm1pbGl6ZUhlbHBlcgIEbGlzdARuZXh0CQDNCAIFBGxpc3QJAJcDAQkAzAgCAAEJAMwIAgUEbmV4dAUDbmlsAQlub3JtaWxpemUBBGxpc3QKAAIkbAUEbGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEPbm9ybWlsaXplSGVscGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAQhsaXN0TGlzdAIFbGlzdDEFbGlzdDIEAWEKAAIkbAUFbGlzdDEKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFA25pbAUFbGlzdDIKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBEWNvbXBhcmVMaXN0SGVscGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKCQEJbm9ybWlsaXplAQgFAWECXzEBBHRlc3QBAWEEBWxpc3QxCQDMCAICAWEJAMwIAgIBYwkAzAgCAgFlCQDMCAICAmFhCQDMCAICAmFhCQDMCAICAWQFA25pbAQFbGlzdDIJAMwIAgIBYQkAzAgCAgFiCQDMCAICAWMJAMwIAgIBZAkAzAgCAgFlCQDMCAICAWMJAMwIAgIBYwkAzAgCAgFlBQNuaWwEAWIJAQhsaXN0TGlzdAIFBWxpc3QxBQVsaXN0MgkAlAoCCQEHc3VtTGlzdAEFAWIFAWIAAE339yU=",
    "height": 2539694,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: FrEdWtCm4UL5gRVFuCjkuZqurrfYx8CSUwSqNXZA7NEY
Next: Fy7eLGGrcuxDh6jUaRWWbRsJvw8XYnvsnfBYoqL1VDYt

Diff: 
Old
New
Differences
117
117
 
    let list1 = ["a", "c", "e", "aa", "aa", "d"]
118
118
 
    let list2 = ["a", "b", "c", "d", "e", "c", "c", "e"]
119
119
 
    let b = listList(list1, list2)
120
-
    sumList(b)
120
+
    $Tuple2(sumList(b), b)
121
121
 
    }
122
122
 
123
123
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let SEP = "__"
5
5
 
6
6
 
let contractFilename = "test.ride"
7
7
 
8
8
 
func keyPublicKeyList () = makeString(["%s", "multisigPublicKeyList"], SEP)
9
9
 
10
10
 
11
11
 
func throwErr (s) = throw(((contractFilename + ": ") + s))
12
12
 
13
13
 
14
14
 
func getMultisigPubKeysListOrUnit () = {
15
15
 
    let rawMultisigPubKeys = valueOrElse(getString(this, keyPublicKeyList()), "")
16
16
 
    split(rawMultisigPubKeys, SEP)
17
17
 
    }
18
18
 
19
19
 
20
20
 
func compareFunction (a,b) = if ((a == b))
21
21
 
    then 1
22
22
 
    else 0
23
23
 
24
24
 
25
25
 
func compareHelper (lst,a) = {
26
26
 
    let $t0569595 = lst
27
27
 
    let result = $t0569595._1
28
28
 
    let expect = $t0569595._2
29
29
 
    $Tuple2((result :+ compareFunction(expect, a)), expect)
30
30
 
    }
31
31
 
32
32
 
33
33
 
func compare (list,a) = {
34
34
 
    let $l = list
35
35
 
    let $s = size($l)
36
36
 
    let $acc0 = $Tuple2(nil, a)
37
37
 
    func $f0_1 ($a,$i) =     if (($i >= $s))
38
38
 
        then $a
39
39
 
        else compareHelper($a, $l[$i])
40
40
 
41
41
 
    func $f0_2 ($a,$i) =     if (($i >= $s))
42
42
 
        then $a
43
43
 
        else throw("List size exceeds 10")
44
44
 
45
45
 
    $f0_2($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)
46
46
 
    }
47
47
 
48
48
 
49
49
 
func accum (sum,val) = (sum + val)
50
50
 
51
51
 
52
52
 
func sumList (list) = {
53
53
 
    let $l = list
54
54
 
    let $s = size($l)
55
55
 
    let $acc0 = 0
56
56
 
    func $f0_1 ($a,$i) =     if (($i >= $s))
57
57
 
        then $a
58
58
 
        else accum($a, $l[$i])
59
59
 
60
60
 
    func $f0_2 ($a,$i) =     if (($i >= $s))
61
61
 
        then $a
62
62
 
        else throw("List size exceeds 10")
63
63
 
64
64
 
    $f0_2($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)
65
65
 
    }
66
66
 
67
67
 
68
68
 
func compareListHelper (a,b) = {
69
69
 
    let $t0925946 = a
70
70
 
    let result = $t0925946._1
71
71
 
    let lst = $t0925946._2
72
72
 
    let compareList = compare(lst, b)._1
73
73
 
    let sum = sumList(compareList)
74
74
 
    $Tuple2((result :+ sum), lst)
75
75
 
    }
76
76
 
77
77
 
78
78
 
func normilizeHelper (list,next) = (list :+ min([1, next]))
79
79
 
80
80
 
81
81
 
func normilize (list) = {
82
82
 
    let $l = list
83
83
 
    let $s = size($l)
84
84
 
    let $acc0 = nil
85
85
 
    func $f0_1 ($a,$i) =     if (($i >= $s))
86
86
 
        then $a
87
87
 
        else normilizeHelper($a, $l[$i])
88
88
 
89
89
 
    func $f0_2 ($a,$i) =     if (($i >= $s))
90
90
 
        then $a
91
91
 
        else throw("List size exceeds 10")
92
92
 
93
93
 
    $f0_2($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)
94
94
 
    }
95
95
 
96
96
 
97
97
 
func listList (list1,list2) = {
98
98
 
    let a = {
99
99
 
        let $l = list1
100
100
 
        let $s = size($l)
101
101
 
        let $acc0 = $Tuple2(nil, list2)
102
102
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
103
103
 
            then $a
104
104
 
            else compareListHelper($a, $l[$i])
105
105
 
106
106
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
107
107
 
            then $a
108
108
 
            else throw("List size exceeds 10")
109
109
 
110
110
 
        $f0_2($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)
111
111
 
        }
112
112
 
    normilize(a._1)
113
113
 
    }
114
114
 
115
115
 
116
116
 
func test (a) = {
117
117
 
    let list1 = ["a", "c", "e", "aa", "aa", "d"]
118
118
 
    let list2 = ["a", "b", "c", "d", "e", "c", "c", "e"]
119
119
 
    let b = listList(list1, list2)
120
-
    sumList(b)
120
+
    $Tuple2(sumList(b), b)
121
121
 
    }
122
122
 
123
123
 
124
124
 

github/deemru/w8io/026f985 
27.58 ms ◑