tx · J9rAYveNmtqUb22b1erQyymg3EXJkTtERvpqjvXhfLKX 3N7hFU6dFSFKGGwDyF9WJ1jVsrB9w8RHT37: -0.01000000 Waves 2023.03.17 03:36 [2493298] smart account 3N7hFU6dFSFKGGwDyF9WJ1jVsrB9w8RHT37 > SELF 0.00000000 Waves
{ "type": 13, "id": "J9rAYveNmtqUb22b1erQyymg3EXJkTtERvpqjvXhfLKX", "fee": 1000000, "feeAssetId": null, "timestamp": 1679013421070, "version": 2, "chainId": 84, "sender": "3N7hFU6dFSFKGGwDyF9WJ1jVsrB9w8RHT37", "senderPublicKey": "J6bcbr8r9usSLYw72NzzrKVCvKDDLe1uDx8bnWp3uFAV", "proofs": [ "5kfEfQpwvy7JAaMJs3csweby9sAcMTDsvu9ani8LYS63Lue5efjkXmWsRJ9ii16yzbfj5bH5vbH1iLoRS3Tq9YWV" ], "script": "base64:BgIHCAISAwoBCAIAB01VTFQxOFgJAKcDAQITMTAwMDAwMDAwMDAwMDAwMDAwMAAERTE4WAkApwMBAhMyNzE4MjgxODI4NDU5MDQ1MjM1AQFpAQVnYW1tYQEBegQEZXhwegkAdgYFBEUxOFgAEgkAvgIBCQCnAwEFAXoAEgASBQZIQUxGVVAKAQVjaGFpbgIDYWNjAWkJALgCAgkAtgIBCQBlAgkAZAIFAWkFAWkAAQkAvAIDCQC2AgEJAGgCBQFpBQFpBQdNVUxUMThYBQNhY2MEAWYKAAIkbAkAzAgCAAsJAMwIAgAKCQDMCAIACQkAzAgCAAgJAMwIAgAHCQDMCAIABgkAzAgCAAUJAMwIAgAECQDMCAIAAwkAzAgCAAIJAMwIAgABBQNuaWwKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQC2AgEAAQoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFY2hhaW4CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFUxpc3Qgc2l6ZSBleGNlZWRzIDEwMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgBbAFwAXQBeAF8AYABhAGIAYwBkBAFnCQC8AgMFBGV4cHoFB01VTFQxOFgFAWYJAJQKAgUDbmlsCQCmAwEFAWcArsd2nA==", "height": 2493298, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: DdYJT2juVs3Jb4PNRYXSuQfz4NMkGkChEeypx5itTe7q Next: AimrLN28fwqEDpBisXb3Nb48NszWdUyByNdxCuH1DULp Diff:
Old | New | Differences | |
---|---|---|---|
1 | 1 | {-# STDLIB_VERSION 6 #-} | |
2 | 2 | {-# SCRIPT_TYPE ACCOUNT #-} | |
3 | 3 | {-# CONTENT_TYPE DAPP #-} | |
4 | - | let | |
4 | + | let MULT18X = parseBigIntValue("1000000000000000000") | |
5 | 5 | ||
6 | - | let | |
6 | + | let E18X = parseBigIntValue("2718281828459045235") | |
7 | 7 | ||
8 | 8 | @Callable(i) | |
9 | 9 | func gamma (z) = { | |
10 | - | let expz = pow( | |
11 | - | func chain (acc,i) = (toBigInt(((i + i) - 1)) - fraction(toBigInt((i * i)), | |
10 | + | let expz = pow(E18X, 18, -(parseBigIntValue(z)), 18, 18, HALFUP) | |
11 | + | func chain (acc,i) = (toBigInt(((i + i) - 1)) - fraction(toBigInt((i * i)), MULT18X, acc)) | |
12 | 12 | ||
13 | 13 | let f = { | |
14 | 14 | let $l = [11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1] | |
24 | 24 | ||
25 | 25 | $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($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($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($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($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($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($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), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100) | |
26 | 26 | } | |
27 | - | let g = fraction(expz, | |
27 | + | let g = fraction(expz, MULT18X, f) | |
28 | 28 | $Tuple2(nil, toString(g)) | |
29 | 29 | } | |
30 | 30 |
Old | New | Differences | |
---|---|---|---|
1 | 1 | {-# STDLIB_VERSION 6 #-} | |
2 | 2 | {-# SCRIPT_TYPE ACCOUNT #-} | |
3 | 3 | {-# CONTENT_TYPE DAPP #-} | |
4 | - | let | |
4 | + | let MULT18X = parseBigIntValue("1000000000000000000") | |
5 | 5 | ||
6 | - | let | |
6 | + | let E18X = parseBigIntValue("2718281828459045235") | |
7 | 7 | ||
8 | 8 | @Callable(i) | |
9 | 9 | func gamma (z) = { | |
10 | - | let expz = pow( | |
11 | - | func chain (acc,i) = (toBigInt(((i + i) - 1)) - fraction(toBigInt((i * i)), | |
10 | + | let expz = pow(E18X, 18, -(parseBigIntValue(z)), 18, 18, HALFUP) | |
11 | + | func chain (acc,i) = (toBigInt(((i + i) - 1)) - fraction(toBigInt((i * i)), MULT18X, acc)) | |
12 | 12 | ||
13 | 13 | let f = { | |
14 | 14 | let $l = [11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1] | |
15 | 15 | let $s = size($l) | |
16 | 16 | let $acc0 = toBigInt(1) | |
17 | 17 | func $f0_1 ($a,$i) = if (($i >= $s)) | |
18 | 18 | then $a | |
19 | 19 | else chain($a, $l[$i]) | |
20 | 20 | ||
21 | 21 | func $f0_2 ($a,$i) = if (($i >= $s)) | |
22 | 22 | then $a | |
23 | 23 | else throw("List size exceeds 100") | |
24 | 24 | ||
25 | 25 | $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($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($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($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($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($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($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), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100) | |
26 | 26 | } | |
27 | - | let g = fraction(expz, | |
27 | + | let g = fraction(expz, MULT18X, f) | |
28 | 28 | $Tuple2(nil, toString(g)) | |
29 | 29 | } | |
30 | 30 | ||
31 | 31 |
github/deemru/w8io/026f985 23.74 ms ◑