tx · DdYJT2juVs3Jb4PNRYXSuQfz4NMkGkChEeypx5itTe7q

3N7hFU6dFSFKGGwDyF9WJ1jVsrB9w8RHT37:  -0.01000000 Waves

2023.03.17 03:32 [2493294] smart account 3N7hFU6dFSFKGGwDyF9WJ1jVsrB9w8RHT37 > SELF 0.00000000 Waves

{ "type": 13, "id": "DdYJT2juVs3Jb4PNRYXSuQfz4NMkGkChEeypx5itTe7q", "fee": 1000000, "feeAssetId": null, "timestamp": 1679013220153, "version": 2, "chainId": 84, "sender": "3N7hFU6dFSFKGGwDyF9WJ1jVsrB9w8RHT37", "senderPublicKey": "J6bcbr8r9usSLYw72NzzrKVCvKDDLe1uDx8bnWp3uFAV", "proofs": [ "4st7619A8cWapT8npXYc9nNSXLe9sMPsBpfUqNbpuYvL3nWvkMNe9vEw5Crgp4MXikt4RLjBGcQRwCDTEBf1iBus" ], "script": "base64:BgIHCAISAwoBCAIAB01VTFQyNFgJAKcDAQIZMTAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMAAERTI0WAkApwMBAhkyNzE4MjgxODI4NDU5MDQ1MjM1MzYwMjg3AQFpAQVnYW1tYQEBegQEZXhwegkAdgYFBEUyNFgAGAkAvgIBCQCnAwEFAXoAGAAYBQZIQUxGVVAKAQVjaGFpbgIDYWNjAWkJALgCAgkAtgIBCQBlAgkAZAIFAWkFAWkAAQkAvAIDCQC2AgEJAGgCBQFpBQFpBQdNVUxUMjRYBQNhY2MEAWYKAAIkbAkAzAgCAAsJAMwIAgAKCQDMCAIACQkAzAgCAAgJAMwIAgAHCQDMCAIABgkAzAgCAAUJAMwIAgAECQDMCAIAAwkAzAgCAAIJAMwIAgABBQNuaWwKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQC2AgEAAQoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEFY2hhaW4CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFUxpc3Qgc2l6ZSBleGNlZWRzIDEwMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgBbAFwAXQBeAF8AYABhAGIAYwBkBAFnCQC8AgMFBGV4cHoFB01VTFQyNFgFAWYJAJQKAgUDbmlsCQCmAwEFAWcA1A4fnA==", "height": 2493294, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 2UNV9kPVMQTkRHAnvZnRG5soWB6ZRSVggYumDbEd2wR3 Next: J9rAYveNmtqUb22b1erQyymg3EXJkTtERvpqjvXhfLKX Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let neutrinoContract = addressFromStringValue("3N9be2mwrA52WJho6DiesZkk4351GvpnWuj")
4+let MULT24X = parseBigIntValue("1000000000000000000000000")
55
6-let secondContract = addressFromStringValue("3N6oQmUanp4TWuHnv5rma4WveVub63JRFB2")
7-
8-let usdnAssetId = base58'HezsdQuRDtzksAYUy97gfhKy7Z1NW2uXYSHA3bgqenNZ'
6+let E24X = parseBigIntValue("2718281828459045235360287")
97
108 @Callable(i)
11-func doubleIndirectSwapXtn () = {
12- let swap0 = invoke(neutrinoContract, "swapNeutrinoToBasket", nil, [AttachedPayment(usdnAssetId, 50000000)])
13- if ((swap0 == swap0))
14- then {
15- let swap1 = invoke(secondContract, "indirectSwapXtn", nil, nil)
16- if ((swap1 == swap1))
17- then {
18- let swap2 = invoke(neutrinoContract, "swapNeutrinoToBasket", nil, [AttachedPayment(usdnAssetId, 50000000)])
19- if ((swap2 == swap2))
20- then nil
21- else throw("Strict value is not equal to itself.")
22- }
23- else throw("Strict value is not equal to itself.")
24- }
25- else throw("Strict value is not equal to itself.")
26- }
9+func gamma (z) = {
10+ let expz = pow(E24X, 24, -(parseBigIntValue(z)), 24, 24, HALFUP)
11+ func chain (acc,i) = (toBigInt(((i + i) - 1)) - fraction(toBigInt((i * i)), MULT24X, acc))
2712
13+ let f = {
14+ let $l = [11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1]
15+ let $s = size($l)
16+ let $acc0 = toBigInt(1)
17+ func $f0_1 ($a,$i) = if (($i >= $s))
18+ then $a
19+ else chain($a, $l[$i])
2820
21+ func $f0_2 ($a,$i) = if (($i >= $s))
22+ then $a
23+ else throw("List size exceeds 100")
2924
30-@Callable(i)
31-func doubleIndirectSwapWaves () = {
32- let swap0 = invoke(neutrinoContract, "swapTokenToNeutrino", nil, [AttachedPayment(unit, 100000000)])
33- if ((swap0 == swap0))
34- then {
35- let swap1 = invoke(secondContract, "indirectSwapWaves", nil, nil)
36- if ((swap1 == swap1))
37- then {
38- let swap2 = invoke(neutrinoContract, "swapTokenToNeutrino", nil, [AttachedPayment(unit, 100000000)])
39- if ((swap2 == swap2))
40- then nil
41- else throw("Strict value is not equal to itself.")
42- }
43- else throw("Strict value is not equal to itself.")
44- }
45- else throw("Strict value is not equal to itself.")
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+ }
27+ let g = fraction(expz, MULT24X, f)
28+ $Tuple2(nil, toString(g))
4629 }
4730
4831

github/deemru/w8io/026f985 
25.37 ms