/** * * This file is generated using: * @fluencelabs/aqua-api version: 0.12.0 * @fluencelabs/aqua-to-js version: 0.1.0 * If you find any bugs in generated AIR, please write an issue on GitHub: https://github.com/fluencelabs/aqua/issues * If you find any bugs in generated JS/TS, please write an issue on GitHub: https://github.com/fluencelabs/js-client/issues * */ import type { IFluenceClient as IFluenceClient$$ } from '@fluencelabs/js-client'; export declare const deal_install_script = "\n(xor\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (call %init_peer_id% (\"getDataSrv\" \"-relay-\") [] -relay-)\n (call %init_peer_id% (\"getDataSrv\" \"ipfs\") [] -ipfs-arg-)\n )\n (call %init_peer_id% (\"getDataSrv\" \"worker_def_cid\") [] -worker_def_cid-arg-)\n )\n (call %init_peer_id% (\"getDataSrv\" \"deal_id\") [] -deal_id-arg-)\n )\n (new $array-inline\n (seq\n (seq\n (ap \"Installing worker for deal\" $array-inline)\n (ap -deal_id-arg- $array-inline)\n )\n (canon %init_peer_id% $array-inline #array-inline-0)\n )\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-0] ret)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-0)\n )\n (par\n (call %init_peer_id% (ret-0 \"store_log\") [ret] ret-1)\n (seq\n (new $array-inline-1\n (seq\n (seq\n (ap ret-0 $array-inline-1)\n (ap #array-inline-0 $array-inline-1)\n )\n (canon %init_peer_id% $array-inline-1 #array-inline-1-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-1-0])\n )\n )\n )\n (xor\n (seq\n (call %init_peer_id% (\"aqua-ipfs\" \"cat_from\") [-worker_def_cid-arg- -ipfs-arg-] ret-2)\n (new -if-else-error-\n (new -else-error-\n (new -if-error-\n (xor\n (match ret-2.$.success true\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (call %init_peer_id% (\"json\" \"parse\") [ret-2.$.contents] ret-3)\n (new $array-inline-2\n (seq\n (seq\n (seq\n (ap \"parsed worker definition\" $array-inline-2)\n (ap -worker_def_cid-arg- $array-inline-2)\n )\n (ap ret-3 $array-inline-2)\n )\n (canon %init_peer_id% $array-inline-2 #array-inline-2-0)\n )\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-2-0] ret-4)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-5)\n )\n (par\n (call %init_peer_id% (ret-5 \"store_log\") [ret-4] ret-6)\n (seq\n (new $array-inline-3\n (seq\n (seq\n (ap ret-5 $array-inline-3)\n (ap #array-inline-2-0 $array-inline-3)\n )\n (canon %init_peer_id% $array-inline-3 #array-inline-3-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-3-0])\n )\n )\n )\n (fold ret-3.$.services s-0\n (seq\n (xor\n (seq\n (seq\n (new $hashes-0\n (seq\n (seq\n (fold s-0.$.modules m-0\n (seq\n (seq\n (seq\n (seq\n (call %init_peer_id% (\"aqua-ipfs\" \"get_from\") [m-0.$.wasm -ipfs-arg-] ret-7)\n (call %init_peer_id% (\"aqua-ipfs\" \"cat_from\") [m-0.$.config -ipfs-arg-] ret-8)\n )\n (xor\n (match ret-7.$.success false\n (ap ret-7.$.success and)\n )\n (ap ret-8.$.success and)\n )\n )\n (new -if-else-error-\n (new -else-error-\n (new -if-error-\n (xor\n (match and true\n (seq\n (seq\n (call %init_peer_id% (\"json\" \"parse\") [ret-8.$.contents] ret-9)\n (call %init_peer_id% (\"dist\" \"add_module_from_vault\") [ret-7.$.path ret-9] ret-10)\n )\n (ap ret-10 $hashes-0)\n )\n )\n (seq\n (ap :error: -if-error-)\n (xor\n (match :error:.$.error_code 10001\n (seq\n (seq\n (seq\n (new $array-inline-4\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (new $array-inline-5\n (seq\n (seq\n (seq\n (ap \"wasm\" $array-inline-5)\n (ap m-0.$.wasm $array-inline-5)\n )\n (ap ret-7 $array-inline-5)\n )\n (canon %init_peer_id% $array-inline-5 #array-inline-5-0)\n )\n )\n (new $array-inline-6\n (seq\n (seq\n (seq\n (ap \"config\" $array-inline-6)\n (ap m-0.$.config $array-inline-6)\n )\n (ap ret-8 $array-inline-6)\n )\n (canon %init_peer_id% $array-inline-6 #array-inline-6-0)\n )\n )\n )\n (ap s-0.$.name $array-inline-4)\n )\n (ap \"error retrieving module\" $array-inline-4)\n )\n (ap #array-inline-5-0 $array-inline-4)\n )\n (ap #array-inline-6-0 $array-inline-4)\n )\n (canon %init_peer_id% $array-inline-4 #array-inline-4-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-4-0] ret-11)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-12)\n )\n (par\n (call %init_peer_id% (ret-12 \"store_log\") [ret-11] ret-13)\n (seq\n (new $array-inline-7\n (seq\n (seq\n (ap ret-12 $array-inline-7)\n (ap #array-inline-4-0 $array-inline-7)\n )\n (canon %init_peer_id% $array-inline-7 #array-inline-7-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-7-0])\n )\n )\n )\n )\n (seq\n (seq\n (ap :error: -else-error-)\n (xor\n (match :error:.$.error_code 10001\n (ap -if-error- -if-else-error-)\n )\n (ap -else-error- -if-else-error-)\n )\n )\n (fail -if-else-error-)\n )\n )\n )\n )\n )\n )\n )\n )\n (next m-0)\n )\n )\n (canon %init_peer_id% $hashes-0 #-hashes-fix-0)\n )\n (ap #-hashes-fix-0 -hashes-flat-0)\n )\n )\n (par\n (seq\n (ap -hashes-flat-0 -hashes-flat-0_to_functor)\n (ap -hashes-flat-0_to_functor.length -hashes-flat-0_length)\n )\n (seq\n (seq\n (ap s-0.$.modules s-0_flat)\n (ap s-0_flat s-0_flat_to_functor)\n )\n (ap s-0_flat_to_functor.length s-0_flat_length)\n )\n )\n )\n (new -if-else-error-\n (new -else-error-\n (new -if-error-\n (xor\n (match -hashes-flat-0_length s-0_flat_length\n (seq\n (seq\n (seq\n (seq\n (call %init_peer_id% (\"dist\" \"make_blueprint\") [s-0.$.name -hashes-flat-0] ret-14)\n (call %init_peer_id% (\"dist\" \"add_blueprint\") [ret-14] ret-15)\n )\n (new $result\n (seq\n (seq\n (seq\n (call %init_peer_id% (\"worker-spell\" \"get_string\") [s-0.$.name] ret-16)\n (xor\n (match ret-16.$.success false\n (ap ret-16.$.success and-0)\n )\n (ap ret-16.$.absent and-0)\n )\n )\n (new -if-else-error-\n (new -else-error-\n (new -if-error-\n (xor\n (match and-0 true\n (ap false $result)\n )\n (seq\n (ap :error: -if-error-)\n (xor\n (match :error:.$.error_code 10001\n (seq\n (seq\n (ap ret-16.$.str ret-16_flat)\n (call %init_peer_id% (\"srv\" \"info\") [ret-16_flat] ret-17)\n )\n (new -if-else-error-\n (new -else-error-\n (new -if-error-\n (xor\n (match ret-17.$.blueprint_id ret-15\n (ap true $result)\n )\n (seq\n (ap :error: -if-error-)\n (xor\n (match :error:.$.error_code 10001\n (seq\n (seq\n (seq\n (seq\n (seq\n (new $array-inline-8\n (seq\n (seq\n (ap s-0.$.name $array-inline-8)\n (ap \"blueprint changed, need to redeploy\" $array-inline-8)\n )\n (canon %init_peer_id% $array-inline-8 #array-inline-8-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-8-0] ret-18)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-19)\n )\n (par\n (call %init_peer_id% (ret-19 \"store_log\") [ret-18] ret-20)\n (seq\n (new $array-inline-9\n (seq\n (seq\n (ap ret-19 $array-inline-9)\n (ap #array-inline-8-0 $array-inline-9)\n )\n (canon %init_peer_id% $array-inline-9 #array-inline-9-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-9-0])\n )\n )\n )\n (xor\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (new $array-inline-10\n (seq\n (seq\n (seq\n (ap s-0.$.name $array-inline-10)\n (ap \"removing old service\" $array-inline-10)\n )\n (ap ret-16_flat $array-inline-10)\n )\n (canon %init_peer_id% $array-inline-10 #array-inline-10-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-10-0] ret-21)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-22)\n )\n (par\n (call %init_peer_id% (ret-22 \"store_log\") [ret-21] ret-23)\n (seq\n (new $array-inline-11\n (seq\n (seq\n (ap ret-22 $array-inline-11)\n (ap #array-inline-10-0 $array-inline-11)\n )\n (canon %init_peer_id% $array-inline-11 #array-inline-11-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-11-0])\n )\n )\n )\n (call %init_peer_id% (\"srv\" \"remove\") [ret-16_flat])\n )\n (new $array-inline-12\n (seq\n (seq\n (seq\n (ap s-0.$.name $array-inline-12)\n (ap \"old service successfully removed\" $array-inline-12)\n )\n (ap ret-16_flat $array-inline-12)\n )\n (canon %init_peer_id% $array-inline-12 #array-inline-12-0)\n )\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-12-0] ret-24)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-25)\n )\n (par\n (call %init_peer_id% (ret-25 \"store_log\") [ret-24] ret-26)\n (seq\n (new $array-inline-13\n (seq\n (seq\n (ap ret-25 $array-inline-13)\n (ap #array-inline-12-0 $array-inline-13)\n )\n (canon %init_peer_id% $array-inline-13 #array-inline-13-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-13-0])\n )\n )\n )\n (seq\n (seq\n (seq\n (new $array-inline-14\n (seq\n (seq\n (seq\n (ap \"Error removing service\" $array-inline-14)\n (ap s-0.$.name $array-inline-14)\n )\n (ap :error: $array-inline-14)\n )\n (canon %init_peer_id% $array-inline-14 #array-inline-14-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-14-0] ret-27)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-28)\n )\n (par\n (call %init_peer_id% (ret-28 \"store_log\") [ret-27] ret-29)\n (seq\n (new $array-inline-15\n (seq\n (seq\n (ap ret-28 $array-inline-15)\n (ap #array-inline-14-0 $array-inline-15)\n )\n (canon %init_peer_id% $array-inline-15 #array-inline-15-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-15-0])\n )\n )\n )\n )\n )\n (ap false $result)\n )\n )\n (seq\n (seq\n (ap :error: -else-error-)\n (xor\n (match :error:.$.error_code 10001\n (ap -if-error- -if-else-error-)\n )\n (ap -else-error- -if-else-error-)\n )\n )\n (fail -if-else-error-)\n )\n )\n )\n )\n )\n )\n )\n )\n )\n (seq\n (seq\n (ap :error: -else-error-)\n (xor\n (match :error:.$.error_code 10001\n (ap -if-error- -if-else-error-)\n )\n (ap -else-error- -if-else-error-)\n )\n )\n (fail -if-else-error-)\n )\n )\n )\n )\n )\n )\n )\n )\n (new $result_test\n (seq\n (seq\n (fold $result result_fold_var\n (seq\n (seq\n (ap result_fold_var $result_test)\n (canon %init_peer_id% $result_test #result_iter_canon)\n )\n (xor\n (match #result_iter_canon.length 1\n (null)\n )\n (next result_fold_var)\n )\n )\n (never)\n )\n (canon %init_peer_id% $result_test #result_result_canon)\n )\n (ap #result_result_canon result_gate)\n )\n )\n )\n )\n )\n (xor\n (match result_gate.$.[0] true\n (ap false not)\n )\n (ap true not)\n )\n )\n (new -if-else-error-\n (new -else-error-\n (new -if-error-\n (xor\n (match not true\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (call %init_peer_id% (\"peer\" \"timestamp_sec\") [] ret-30)\n (new %Status_obj_map\n (seq\n (seq\n (seq\n (ap (\"message\" \"\") %Status_obj_map)\n (ap (\"state\" \"INSTALLATION_IN_PROGRESS\") %Status_obj_map)\n )\n (ap (\"timestamp\" ret-30) %Status_obj_map)\n )\n (canon %init_peer_id% %Status_obj_map Status_obj)\n )\n )\n )\n (call %init_peer_id% (\"json\" \"stringify\") [Status_obj] ret-31)\n )\n (call %init_peer_id% (\"worker-spell\" \"list_push_string\") [\"__installation_spell_status__\" ret-31] ret-32)\n )\n (call %init_peer_id% (\"srv\" \"create\") [ret-15] ret-33)\n )\n (new $array-inline-16\n (seq\n (seq\n (seq\n (ap \"Created service\" $array-inline-16)\n (ap s-0.$.name $array-inline-16)\n )\n (ap ret-33 $array-inline-16)\n )\n (canon %init_peer_id% $array-inline-16 #array-inline-16-0)\n )\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-16-0] ret-34)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-35)\n )\n (par\n (call %init_peer_id% (ret-35 \"store_log\") [ret-34] ret-36)\n (seq\n (new $array-inline-17\n (seq\n (seq\n (ap ret-35 $array-inline-17)\n (ap #array-inline-16-0 $array-inline-17)\n )\n (canon %init_peer_id% $array-inline-17 #array-inline-17-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-17-0])\n )\n )\n )\n (xor\n (call %init_peer_id% (\"srv\" \"add_alias\") [s-0.$.name ret-33])\n (seq\n (seq\n (seq\n (new $array-inline-18\n (seq\n (seq\n (seq\n (seq\n (ap \"Error creating alias for deployed service\" $array-inline-18)\n (ap s-0.$.name $array-inline-18)\n )\n (ap ret-33 $array-inline-18)\n )\n (ap :error: $array-inline-18)\n )\n (canon %init_peer_id% $array-inline-18 #array-inline-18-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-18-0] ret-37)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-38)\n )\n (par\n (call %init_peer_id% (ret-38 \"store_log\") [ret-37] ret-39)\n (seq\n (new $array-inline-19\n (seq\n (seq\n (ap ret-38 $array-inline-19)\n (ap #array-inline-18-0 $array-inline-19)\n )\n (canon %init_peer_id% $array-inline-19 #array-inline-19-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-19-0])\n )\n )\n )\n )\n )\n (call %init_peer_id% (\"worker-spell\" \"set_string\") [s-0.$.name ret-33] ret-40)\n )\n (call %init_peer_id% (\"op\" \"concat_strings\") [\"blueprint:\" s-0.$.name] ret-41)\n )\n (call %init_peer_id% (\"worker-spell\" \"set_string\") [ret-41 ret-15] ret-42)\n )\n )\n (seq\n (ap :error: -if-error-)\n (xor\n (match :error:.$.error_code 10001\n (seq\n (seq\n (seq\n (new $array-inline-20\n (seq\n (seq\n (ap s-0.$.name $array-inline-20)\n (ap \"service is already deployed, doing nothing\" $array-inline-20)\n )\n (canon %init_peer_id% $array-inline-20 #array-inline-20-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-20-0] ret-43)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-44)\n )\n (par\n (call %init_peer_id% (ret-44 \"store_log\") [ret-43] ret-45)\n (seq\n (new $array-inline-21\n (seq\n (seq\n (ap ret-44 $array-inline-21)\n (ap #array-inline-20-0 $array-inline-21)\n )\n (canon %init_peer_id% $array-inline-21 #array-inline-21-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-21-0])\n )\n )\n )\n )\n (seq\n (seq\n (ap :error: -else-error-)\n (xor\n (match :error:.$.error_code 10001\n (ap -if-error- -if-else-error-)\n )\n (ap -else-error- -if-else-error-)\n )\n )\n (fail -if-else-error-)\n )\n )\n )\n )\n )\n )\n )\n )\n )\n (seq\n (ap :error: -if-error-)\n (xor\n (match :error:.$.error_code 10001\n (seq\n (seq\n (seq\n (new $array-inline-22\n (seq\n (seq\n (ap s-0.$.name $array-inline-22)\n (ap \"error retrieving some of the modules, see above\" $array-inline-22)\n )\n (canon %init_peer_id% $array-inline-22 #array-inline-22-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-22-0] ret-46)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-47)\n )\n (par\n (call %init_peer_id% (ret-47 \"store_log\") [ret-46] ret-48)\n (seq\n (new $array-inline-23\n (seq\n (seq\n (ap ret-47 $array-inline-23)\n (ap #array-inline-22-0 $array-inline-23)\n )\n (canon %init_peer_id% $array-inline-23 #array-inline-23-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-23-0])\n )\n )\n )\n )\n (seq\n (seq\n (ap :error: -else-error-)\n (xor\n (match :error:.$.error_code 10001\n (ap -if-error- -if-else-error-)\n )\n (ap -else-error- -if-else-error-)\n )\n )\n (fail -if-else-error-)\n )\n )\n )\n )\n )\n )\n )\n )\n (seq\n (seq\n (seq\n (new $array-inline-24\n (seq\n (seq\n (seq\n (ap s-0.$.name $array-inline-24)\n (ap \"error deploying service\" $array-inline-24)\n )\n (ap :error: $array-inline-24)\n )\n (canon %init_peer_id% $array-inline-24 #array-inline-24-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-24-0] ret-49)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-50)\n )\n (par\n (call %init_peer_id% (ret-50 \"store_log\") [ret-49] ret-51)\n (seq\n (new $array-inline-25\n (seq\n (seq\n (ap ret-50 $array-inline-25)\n (ap #array-inline-24-0 $array-inline-25)\n )\n (canon %init_peer_id% $array-inline-25 #array-inline-25-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-25-0])\n )\n )\n )\n )\n (next s-0)\n )\n )\n )\n (fold ret-3.$.spells sp-0\n (seq\n (xor\n (seq\n (seq\n (seq\n (seq\n (new $array-inline-26\n (seq\n (seq\n (ap \"Deploying spell\" $array-inline-26)\n (ap sp-0.$.name $array-inline-26)\n )\n (canon %init_peer_id% $array-inline-26 #array-inline-26-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-26-0] ret-52)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-53)\n )\n (par\n (call %init_peer_id% (ret-53 \"store_log\") [ret-52] ret-54)\n (seq\n (new $array-inline-27\n (seq\n (seq\n (ap ret-53 $array-inline-27)\n (ap #array-inline-26-0 $array-inline-27)\n )\n (canon %init_peer_id% $array-inline-27 #array-inline-27-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-27-0])\n )\n )\n )\n (xor\n (seq\n (new $result-0\n (seq\n (xor\n (seq\n (seq\n (call %init_peer_id% (\"worker-spell\" \"get_string\") [sp-0.$.name] ret-55)\n (xor\n (match ret-55.$.success false\n (ap ret-55.$.success and-1)\n )\n (ap ret-55.$.absent and-1)\n )\n )\n (new -if-else-error-\n (new -else-error-\n (new -if-error-\n (xor\n (match and-1 true\n (ap false $result-0)\n )\n (seq\n (ap :error: -if-error-)\n (xor\n (match :error:.$.error_code 10001\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (ap ret-55.$.str ret-55_flat)\n (call %init_peer_id% (\"srv\" \"info\") [ret-55_flat] ret-56)\n )\n (call %init_peer_id% (ret-55_flat \"script_cid\") [] ret-57)\n )\n (new $array-inline-28\n (seq\n (seq\n (seq\n (seq\n (seq\n (ap ret-55_flat $array-inline-28)\n (ap \"script cid was:\" $array-inline-28)\n )\n (ap ret-57.$.v1_str $array-inline-28)\n )\n (ap \"new:\" $array-inline-28)\n )\n (ap sp-0.$.script $array-inline-28)\n )\n (canon %init_peer_id% $array-inline-28 #array-inline-28-0)\n )\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-28-0] ret-58)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-59)\n )\n (par\n (call %init_peer_id% (ret-59 \"store_log\") [ret-58] ret-60)\n (seq\n (new $array-inline-29\n (seq\n (seq\n (ap ret-59 $array-inline-29)\n (ap #array-inline-28-0 $array-inline-29)\n )\n (canon %init_peer_id% $array-inline-29 #array-inline-29-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-29-0])\n )\n )\n )\n (new -if-else-error-\n (new -else-error-\n (new -if-error-\n (xor\n (match ret-57.$.v1_str sp-0.$.script\n (ap true $result-0)\n )\n (seq\n (ap :error: -if-error-)\n (xor\n (match :error:.$.error_code 10001\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (new $array-inline-30\n (seq\n (seq\n (ap sp-0.$.name $array-inline-30)\n (ap \"script changed, need to redeploy\" $array-inline-30)\n )\n (canon %init_peer_id% $array-inline-30 #array-inline-30-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-30-0] ret-61)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-62)\n )\n (par\n (call %init_peer_id% (ret-62 \"store_log\") [ret-61] ret-63)\n (seq\n (new $array-inline-31\n (seq\n (seq\n (ap ret-62 $array-inline-31)\n (ap #array-inline-30-0 $array-inline-31)\n )\n (canon %init_peer_id% $array-inline-31 #array-inline-31-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-31-0])\n )\n )\n )\n (new $array-inline-32\n (seq\n (seq\n (seq\n (ap sp-0.$.name $array-inline-32)\n (ap \"removing old spell\" $array-inline-32)\n )\n (ap ret-55_flat $array-inline-32)\n )\n (canon %init_peer_id% $array-inline-32 #array-inline-32-0)\n )\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-32-0] ret-64)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-65)\n )\n (par\n (call %init_peer_id% (ret-65 \"store_log\") [ret-64] ret-66)\n (seq\n (new $array-inline-33\n (seq\n (seq\n (ap ret-65 $array-inline-33)\n (ap #array-inline-32-0 $array-inline-33)\n )\n (canon %init_peer_id% $array-inline-33 #array-inline-33-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-33-0])\n )\n )\n )\n (call %init_peer_id% (\"spell\" \"remove\") [ret-55_flat])\n )\n (new $array-inline-34\n (seq\n (seq\n (seq\n (ap sp-0.$.name $array-inline-34)\n (ap \"old spell successfully removed\" $array-inline-34)\n )\n (ap ret-55_flat $array-inline-34)\n )\n (canon %init_peer_id% $array-inline-34 #array-inline-34-0)\n )\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-34-0] ret-67)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-68)\n )\n (par\n (call %init_peer_id% (ret-68 \"store_log\") [ret-67] ret-69)\n (seq\n (new $array-inline-35\n (seq\n (seq\n (ap ret-68 $array-inline-35)\n (ap #array-inline-34-0 $array-inline-35)\n )\n (canon %init_peer_id% $array-inline-35 #array-inline-35-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-35-0])\n )\n )\n )\n (ap false $result-0)\n )\n )\n (seq\n (seq\n (ap :error: -else-error-)\n (xor\n (match :error:.$.error_code 10001\n (ap -if-error- -if-else-error-)\n )\n (ap -else-error- -if-else-error-)\n )\n )\n (fail -if-else-error-)\n )\n )\n )\n )\n )\n )\n )\n )\n )\n (seq\n (seq\n (ap :error: -else-error-)\n (xor\n (match :error:.$.error_code 10001\n (ap -if-error- -if-else-error-)\n )\n (ap -else-error- -if-else-error-)\n )\n )\n (fail -if-else-error-)\n )\n )\n )\n )\n )\n )\n )\n )\n (seq\n (seq\n (seq\n (seq\n (new $array-inline-36\n (seq\n (seq\n (seq\n (ap \"Error check spell deployed\" $array-inline-36)\n (ap sp-0.$.name $array-inline-36)\n )\n (ap :error: $array-inline-36)\n )\n (canon %init_peer_id% $array-inline-36 #array-inline-36-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-36-0] ret-70)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-71)\n )\n (par\n (call %init_peer_id% (ret-71 \"store_log\") [ret-70] ret-72)\n (seq\n (new $array-inline-37\n (seq\n (seq\n (ap ret-71 $array-inline-37)\n (ap #array-inline-36-0 $array-inline-37)\n )\n (canon %init_peer_id% $array-inline-37 #array-inline-37-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-37-0])\n )\n )\n )\n (ap false $result-0)\n )\n )\n (new $result-0_test\n (seq\n (seq\n (fold $result-0 result-0_fold_var\n (seq\n (seq\n (ap result-0_fold_var $result-0_test)\n (canon %init_peer_id% $result-0_test #result-0_iter_canon)\n )\n (xor\n (match #result-0_iter_canon.length 1\n (null)\n )\n (next result-0_fold_var)\n )\n )\n (never)\n )\n (canon %init_peer_id% $result-0_test #result-0_result_canon)\n )\n (ap #result-0_result_canon result-0_gate)\n )\n )\n )\n )\n (new -if-else-error-\n (new -else-error-\n (new -if-error-\n (xor\n (match result-0_gate.$.[0] true\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (new $array-inline-38\n (seq\n (seq\n (ap sp-0.$.name $array-inline-38)\n (ap \"spell is already deployed, checking config and init_args\" $array-inline-38)\n )\n (canon %init_peer_id% $array-inline-38 #array-inline-38-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-38-0] ret-73)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-74)\n )\n (par\n (call %init_peer_id% (ret-74 \"store_log\") [ret-73] ret-75)\n (seq\n (new $array-inline-39\n (seq\n (seq\n (ap ret-74 $array-inline-39)\n (ap #array-inline-38-0 $array-inline-39)\n )\n (canon %init_peer_id% $array-inline-39 #array-inline-39-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-39-0])\n )\n )\n )\n (call %init_peer_id% (\"op\" \"concat_strings\") [\"trigger_config:\" sp-0.$.name] ret-76)\n )\n (call %init_peer_id% (\"worker-spell\" \"get_string\") [ret-76] ret-77)\n )\n (new -if-error-\n (xor\n (mismatch ret-77.$.str sp-0.$.config\n (seq\n (seq\n (seq\n (seq\n (seq\n (new $array-inline-40\n (seq\n (seq\n (ap sp-0.$.name $array-inline-40)\n (ap \"config mismath, updating config\" $array-inline-40)\n )\n (canon %init_peer_id% $array-inline-40 #array-inline-40-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-40-0] ret-78)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-79)\n )\n (par\n (call %init_peer_id% (ret-79 \"store_log\") [ret-78] ret-80)\n (seq\n (new $array-inline-41\n (seq\n (seq\n (ap ret-79 $array-inline-41)\n (ap #array-inline-40-0 $array-inline-41)\n )\n (canon %init_peer_id% $array-inline-41 #array-inline-41-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-41-0])\n )\n )\n )\n (call %init_peer_id% (\"aqua-ipfs\" \"cat_from\") [sp-0.$.config -ipfs-arg-] ret-81)\n )\n (new -if-else-error-\n (new -else-error-\n (new -if-error-\n (xor\n (match ret-81.$.success true\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (call %init_peer_id% (\"json\" \"parse\") [ret-81.$.contents] ret-82)\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [sp-0.$.name] ret-83)\n )\n (call %init_peer_id% (\"spell\" \"update_trigger_config\") [ret-83 ret-82])\n )\n (call %init_peer_id% (\"op\" \"concat_strings\") [\"trigger_config:\" sp-0.$.name] ret-84)\n )\n (call %init_peer_id% (\"worker-spell\" \"set_string\") [ret-84 sp-0.$.config] ret-85)\n )\n (new $array-inline-42\n (seq\n (seq\n (ap sp-0.$.name $array-inline-42)\n (ap \"config successfully updated\" $array-inline-42)\n )\n (canon %init_peer_id% $array-inline-42 #array-inline-42-0)\n )\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-42-0] ret-86)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-87)\n )\n (par\n (call %init_peer_id% (ret-87 \"store_log\") [ret-86] ret-88)\n (seq\n (new $array-inline-43\n (seq\n (seq\n (ap ret-87 $array-inline-43)\n (ap #array-inline-42-0 $array-inline-43)\n )\n (canon %init_peer_id% $array-inline-43 #array-inline-43-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-43-0])\n )\n )\n )\n )\n (seq\n (ap :error: -if-error-)\n (xor\n (match :error:.$.error_code 10001\n (seq\n (seq\n (seq\n (new $array-inline-44\n (seq\n (seq\n (seq\n (seq\n (ap sp-0.$.name $array-inline-44)\n (ap \"error retrieving config\" $array-inline-44)\n )\n (ap sp-0.$.config $array-inline-44)\n )\n (ap ret-81.$.error $array-inline-44)\n )\n (canon %init_peer_id% $array-inline-44 #array-inline-44-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-44-0] ret-89)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-90)\n )\n (par\n (call %init_peer_id% (ret-90 \"store_log\") [ret-89] ret-91)\n (seq\n (new $array-inline-45\n (seq\n (seq\n (ap ret-90 $array-inline-45)\n (ap #array-inline-44-0 $array-inline-45)\n )\n (canon %init_peer_id% $array-inline-45 #array-inline-45-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-45-0])\n )\n )\n )\n )\n (seq\n (seq\n (ap :error: -else-error-)\n (xor\n (match :error:.$.error_code 10001\n (ap -if-error- -if-else-error-)\n )\n (ap -else-error- -if-else-error-)\n )\n )\n (fail -if-else-error-)\n )\n )\n )\n )\n )\n )\n )\n )\n )\n (seq\n (ap :error: -if-error-)\n (xor\n (match :error:.$.error_code 10002\n (null)\n )\n (fail -if-error-)\n )\n )\n )\n )\n )\n (call %init_peer_id% (\"op\" \"concat_strings\") [\"init_args:\" sp-0.$.name] ret-92)\n )\n (call %init_peer_id% (\"worker-spell\" \"get_string\") [ret-92] ret-93)\n )\n (new -if-error-\n (xor\n (mismatch ret-93.$.str sp-0.$.init_args\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (new $array-inline-46\n (seq\n (seq\n (ap sp-0.$.name $array-inline-46)\n (ap \"init_args changed, updating\" $array-inline-46)\n )\n (canon %init_peer_id% $array-inline-46 #array-inline-46-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-46-0] ret-94)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-95)\n )\n (par\n (call %init_peer_id% (ret-95 \"store_log\") [ret-94] ret-96)\n (seq\n (new $array-inline-47\n (seq\n (seq\n (ap ret-95 $array-inline-47)\n (ap #array-inline-46-0 $array-inline-47)\n )\n (canon %init_peer_id% $array-inline-47 #array-inline-47-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-47-0])\n )\n )\n )\n (call %init_peer_id% (\"aqua-ipfs\" \"cat_from\") [sp-0.$.init_args -ipfs-arg-] ret-97)\n )\n (new -if-else-error-\n (new -else-error-\n (new -if-error-\n (xor\n (match ret-97.$.success true\n (call %init_peer_id% (sp-0.$.name \"set_json_fields\") [ret-97.$.contents] ret-98)\n )\n (seq\n (ap :error: -if-error-)\n (xor\n (match :error:.$.error_code 10001\n (seq\n (seq\n (seq\n (new $array-inline-48\n (seq\n (seq\n (seq\n (seq\n (ap sp-0.$.name $array-inline-48)\n (ap \"error retrieving init_args\" $array-inline-48)\n )\n (ap sp-0.$.init_args $array-inline-48)\n )\n (ap ret-97.$.error $array-inline-48)\n )\n (canon %init_peer_id% $array-inline-48 #array-inline-48-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-48-0] ret-99)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-100)\n )\n (par\n (call %init_peer_id% (ret-100 \"store_log\") [ret-99] ret-101)\n (seq\n (new $array-inline-49\n (seq\n (seq\n (ap ret-100 $array-inline-49)\n (ap #array-inline-48-0 $array-inline-49)\n )\n (canon %init_peer_id% $array-inline-49 #array-inline-49-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-49-0])\n )\n )\n )\n )\n (seq\n (seq\n (ap :error: -else-error-)\n (xor\n (match :error:.$.error_code 10001\n (ap -if-error- -if-else-error-)\n )\n (ap -else-error- -if-else-error-)\n )\n )\n (fail -if-else-error-)\n )\n )\n )\n )\n )\n )\n )\n )\n (call %init_peer_id% (\"op\" \"concat_strings\") [\"init_args:\" sp-0.$.name] ret-102)\n )\n (call %init_peer_id% (\"worker-spell\" \"set_string\") [ret-102 sp-0.$.init_args] ret-103)\n )\n (new $array-inline-50\n (seq\n (seq\n (ap sp-0.$.name $array-inline-50)\n (ap \"init_args successfully updated\" $array-inline-50)\n )\n (canon %init_peer_id% $array-inline-50 #array-inline-50-0)\n )\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-50-0] ret-104)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-105)\n )\n (par\n (call %init_peer_id% (ret-105 \"store_log\") [ret-104] ret-106)\n (seq\n (new $array-inline-51\n (seq\n (seq\n (ap ret-105 $array-inline-51)\n (ap #array-inline-50-0 $array-inline-51)\n )\n (canon %init_peer_id% $array-inline-51 #array-inline-51-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-51-0])\n )\n )\n )\n )\n (seq\n (ap :error: -if-error-)\n (xor\n (match :error:.$.error_code 10002\n (null)\n )\n (fail -if-error-)\n )\n )\n )\n )\n )\n )\n (seq\n (ap :error: -if-error-)\n (xor\n (match :error:.$.error_code 10001\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (call %init_peer_id% (\"peer\" \"timestamp_sec\") [] ret-107)\n (new %Status_obj-0_map\n (seq\n (seq\n (seq\n (ap (\"message\" \"\") %Status_obj-0_map)\n (ap (\"state\" \"INSTALLATION_IN_PROGRESS\") %Status_obj-0_map)\n )\n (ap (\"timestamp\" ret-107) %Status_obj-0_map)\n )\n (canon %init_peer_id% %Status_obj-0_map Status_obj-0)\n )\n )\n )\n (call %init_peer_id% (\"json\" \"stringify\") [Status_obj-0] ret-108)\n )\n (call %init_peer_id% (\"worker-spell\" \"list_push_string\") [\"__installation_spell_status__\" ret-108] ret-109)\n )\n (call %init_peer_id% (\"aqua-ipfs\" \"cat_from\") [sp-0.$.script -ipfs-arg-] ret-110)\n )\n (call %init_peer_id% (\"aqua-ipfs\" \"cat_from\") [sp-0.$.config -ipfs-arg-] ret-111)\n )\n (call %init_peer_id% (\"aqua-ipfs\" \"cat_from\") [sp-0.$.init_args -ipfs-arg-] ret-112)\n )\n (xor\n (match ret-110.$.success false\n (ap ret-110.$.success and-2)\n )\n (ap ret-111.$.success and-2)\n )\n )\n (xor\n (match and-2 false\n (ap and-2 and-3)\n )\n (ap ret-112.$.success and-3)\n )\n )\n (new -if-else-error-\n (new -else-error-\n (new -if-error-\n (xor\n (match and-3 true\n (seq\n (seq\n (call %init_peer_id% (\"json\" \"parse\") [ret-111.$.contents] ret-113)\n (call %init_peer_id% (\"json\" \"parse\") [ret-112.$.contents] ret-114)\n )\n (xor\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (call %init_peer_id% (\"spell\" \"install\") [ret-110.$.contents ret-114 ret-113 sp-0.$.name] ret-115)\n (new $array-inline-52\n (seq\n (seq\n (seq\n (ap \"Installed spell\" $array-inline-52)\n (ap sp-0.$.name $array-inline-52)\n )\n (ap ret-115 $array-inline-52)\n )\n (canon %init_peer_id% $array-inline-52 #array-inline-52-0)\n )\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-52-0] ret-116)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-117)\n )\n (par\n (call %init_peer_id% (ret-117 \"store_log\") [ret-116] ret-118)\n (seq\n (new $array-inline-53\n (seq\n (seq\n (ap ret-117 $array-inline-53)\n (ap #array-inline-52-0 $array-inline-53)\n )\n (canon %init_peer_id% $array-inline-53 #array-inline-53-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-53-0])\n )\n )\n )\n (call %init_peer_id% (\"worker-spell\" \"set_string\") [sp-0.$.name ret-115] ret-119)\n )\n (call %init_peer_id% (\"op\" \"concat_strings\") [\"trigger_config:\" sp-0.$.name] ret-120)\n )\n (call %init_peer_id% (\"worker-spell\" \"set_string\") [ret-120 sp-0.$.config] ret-121)\n )\n (call %init_peer_id% (\"op\" \"concat_strings\") [\"init_args:\" sp-0.$.name] ret-122)\n )\n (call %init_peer_id% (\"worker-spell\" \"set_string\") [ret-122 sp-0.$.init_args] ret-123)\n )\n (seq\n (seq\n (seq\n (new $array-inline-54\n (seq\n (seq\n (seq\n (ap \"Error installing the spell\" $array-inline-54)\n (ap sp-0.$.name $array-inline-54)\n )\n (ap :error: $array-inline-54)\n )\n (canon %init_peer_id% $array-inline-54 #array-inline-54-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-54-0] ret-124)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-125)\n )\n (par\n (call %init_peer_id% (ret-125 \"store_log\") [ret-124] ret-126)\n (seq\n (new $array-inline-55\n (seq\n (seq\n (ap ret-125 $array-inline-55)\n (ap #array-inline-54-0 $array-inline-55)\n )\n (canon %init_peer_id% $array-inline-55 #array-inline-55-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-55-0])\n )\n )\n )\n )\n )\n )\n (seq\n (ap :error: -if-error-)\n (xor\n (match :error:.$.error_code 10001\n (seq\n (seq\n (seq\n (new $array-inline-56\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (new $array-inline-57\n (seq\n (seq\n (seq\n (ap \"script\" $array-inline-57)\n (ap sp-0.$.script $array-inline-57)\n )\n (ap ret-110 $array-inline-57)\n )\n (canon %init_peer_id% $array-inline-57 #array-inline-57-0)\n )\n )\n (new $array-inline-58\n (seq\n (seq\n (seq\n (ap \"cfg_json\" $array-inline-58)\n (ap sp-0.$.config $array-inline-58)\n )\n (ap ret-111 $array-inline-58)\n )\n (canon %init_peer_id% $array-inline-58 #array-inline-58-0)\n )\n )\n )\n (new $array-inline-59\n (seq\n (seq\n (seq\n (ap \"init_args_str\" $array-inline-59)\n (ap sp-0.$.init_args $array-inline-59)\n )\n (ap ret-112 $array-inline-59)\n )\n (canon %init_peer_id% $array-inline-59 #array-inline-59-0)\n )\n )\n )\n (ap sp-0.$.name $array-inline-56)\n )\n (ap \"error retrieving from IPFS\" $array-inline-56)\n )\n (ap #array-inline-57-0 $array-inline-56)\n )\n (ap #array-inline-58-0 $array-inline-56)\n )\n (ap #array-inline-59-0 $array-inline-56)\n )\n (canon %init_peer_id% $array-inline-56 #array-inline-56-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-56-0] ret-127)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-128)\n )\n (par\n (call %init_peer_id% (ret-128 \"store_log\") [ret-127] ret-129)\n (seq\n (new $array-inline-60\n (seq\n (seq\n (ap ret-128 $array-inline-60)\n (ap #array-inline-56-0 $array-inline-60)\n )\n (canon %init_peer_id% $array-inline-60 #array-inline-60-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-60-0])\n )\n )\n )\n )\n (seq\n (seq\n (ap :error: -else-error-)\n (xor\n (match :error:.$.error_code 10001\n (ap -if-error- -if-else-error-)\n )\n (ap -else-error- -if-else-error-)\n )\n )\n (fail -if-else-error-)\n )\n )\n )\n )\n )\n )\n )\n )\n )\n (seq\n (seq\n (ap :error: -else-error-)\n (xor\n (match :error:.$.error_code 10001\n (ap -if-error- -if-else-error-)\n )\n (ap -else-error- -if-else-error-)\n )\n )\n (fail -if-else-error-)\n )\n )\n )\n )\n )\n )\n )\n )\n (seq\n (seq\n (seq\n (new $array-inline-61\n (seq\n (seq\n (seq\n (ap \"Error deploy spell\" $array-inline-61)\n (ap sp-0.$.name $array-inline-61)\n )\n (ap :error: $array-inline-61)\n )\n (canon %init_peer_id% $array-inline-61 #array-inline-61-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-61-0] ret-130)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-131)\n )\n (par\n (call %init_peer_id% (ret-131 \"store_log\") [ret-130] ret-132)\n (seq\n (new $array-inline-62\n (seq\n (seq\n (ap ret-131 $array-inline-62)\n (ap #array-inline-61-0 $array-inline-62)\n )\n (canon %init_peer_id% $array-inline-62 #array-inline-62-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-62-0])\n )\n )\n )\n )\n )\n (seq\n (seq\n (seq\n (new $array-inline-63\n (seq\n (seq\n (seq\n (ap \"Error deploying spell\" $array-inline-63)\n (ap sp-0.$.name $array-inline-63)\n )\n (ap :error: $array-inline-63)\n )\n (canon %init_peer_id% $array-inline-63 #array-inline-63-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-63-0] ret-133)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-134)\n )\n (par\n (call %init_peer_id% (ret-134 \"store_log\") [ret-133] ret-135)\n (seq\n (new $array-inline-64\n (seq\n (seq\n (ap ret-134 $array-inline-64)\n (ap #array-inline-63-0 $array-inline-64)\n )\n (canon %init_peer_id% $array-inline-64 #array-inline-64-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-64-0])\n )\n )\n )\n )\n (next sp-0)\n )\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [\"Installation finished\"] ret-136)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-137)\n )\n (par\n (call %init_peer_id% (ret-137 \"store_log\") [ret-136] ret-138)\n (seq\n (new $array-inline-65\n (seq\n (seq\n (ap ret-137 $array-inline-65)\n (ap \"Installation finished\" $array-inline-65)\n )\n (canon %init_peer_id% $array-inline-65 #array-inline-65-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-65-0])\n )\n )\n )\n (new $status-2\n (seq\n (seq\n (seq\n (call %init_peer_id% (\"worker-spell\" \"list_get_strings\") [\"__installation_spell_status__\"] ret-139)\n (xor\n (match ret-139.$.success true\n (ap false not-0)\n )\n (ap true not-0)\n )\n )\n (new -if-else-error-\n (new -else-error-\n (new -if-error-\n (xor\n (match not-0 true\n (seq\n (new %Status_obj-1_map\n (seq\n (seq\n (seq\n (ap (\"message\" ret-139.$.error) %Status_obj-1_map)\n (ap (\"state\" \"STATUS_LOAD_ERROR\") %Status_obj-1_map)\n )\n (ap (\"timestamp\" 0) %Status_obj-1_map)\n )\n (canon %init_peer_id% %Status_obj-1_map Status_obj-1)\n )\n )\n (ap Status_obj-1 $status-2)\n )\n )\n (seq\n (ap :error: -if-error-)\n (xor\n (match :error:.$.error_code 10001\n (seq\n (seq\n (seq\n (ap ret-139.$.strings ret-139_flat)\n (ap ret-139_flat ret-139_flat_to_functor)\n )\n (ap ret-139_flat_to_functor.length ret-139_flat_length)\n )\n (new -if-else-error-\n (new -else-error-\n (new -if-error-\n (xor\n (match ret-139_flat_length 0\n (seq\n (new %Status_obj-2_map\n (seq\n (seq\n (seq\n (ap (\"message\" \"Installation has not started yet\") %Status_obj-2_map)\n (ap (\"state\" \"NOT_STARTED\") %Status_obj-2_map)\n )\n (ap (\"timestamp\" 0) %Status_obj-2_map)\n )\n (canon %init_peer_id% %Status_obj-2_map Status_obj-2)\n )\n )\n (ap Status_obj-2 $status-2)\n )\n )\n (seq\n (ap :error: -if-error-)\n (xor\n (match :error:.$.error_code 10001\n (seq\n (seq\n (seq\n (seq\n (seq\n (ap ret-139.$.strings ret-139_flat-0)\n (ap ret-139_flat-0 ret-139_flat-0_to_functor)\n )\n (ap ret-139_flat-0_to_functor.length ret-139_flat-0_length)\n )\n (call %init_peer_id% (\"math\" \"sub\") [ret-139_flat-0_length 1] sub)\n )\n (call %init_peer_id% (\"json\" \"parse\") [ret-139.$.strings.[sub]] ret-140)\n )\n (ap ret-140 $status-2)\n )\n )\n (seq\n (seq\n (ap :error: -else-error-)\n (xor\n (match :error:.$.error_code 10001\n (ap -if-error- -if-else-error-)\n )\n (ap -else-error- -if-else-error-)\n )\n )\n (fail -if-else-error-)\n )\n )\n )\n )\n )\n )\n )\n )\n )\n (seq\n (seq\n (ap :error: -else-error-)\n (xor\n (match :error:.$.error_code 10001\n (ap -if-error- -if-else-error-)\n )\n (ap -else-error- -if-else-error-)\n )\n )\n (fail -if-else-error-)\n )\n )\n )\n )\n )\n )\n )\n )\n (new $status-2_test\n (seq\n (seq\n (fold $status-2 status-2_fold_var\n (seq\n (seq\n (ap status-2_fold_var $status-2_test)\n (canon %init_peer_id% $status-2_test #status-2_iter_canon)\n )\n (xor\n (match #status-2_iter_canon.length 1\n (null)\n )\n (next status-2_fold_var)\n )\n )\n (never)\n )\n (canon %init_peer_id% $status-2_test #status-2_result_canon)\n )\n (ap #status-2_result_canon status-2_gate)\n )\n )\n )\n )\n )\n (new -if-error-\n (xor\n (match status-2_gate.$.[0].state \"INSTALLATION_IN_PROGRESS\"\n (seq\n (seq\n (seq\n (call %init_peer_id% (\"peer\" \"timestamp_sec\") [] ret-141)\n (new %Status_obj-3_map\n (seq\n (seq\n (seq\n (ap (\"message\" \"\") %Status_obj-3_map)\n (ap (\"state\" \"INSTALLATION_SUCCESSFUL\") %Status_obj-3_map)\n )\n (ap (\"timestamp\" ret-141) %Status_obj-3_map)\n )\n (canon %init_peer_id% %Status_obj-3_map Status_obj-3)\n )\n )\n )\n (call %init_peer_id% (\"json\" \"stringify\") [Status_obj-3] ret-142)\n )\n (call %init_peer_id% (\"worker-spell\" \"list_push_string\") [\"__installation_spell_status__\" ret-142] ret-143)\n )\n )\n (seq\n (ap :error: -if-error-)\n (xor\n (match :error:.$.error_code 10001\n (null)\n )\n (fail -if-error-)\n )\n )\n )\n )\n )\n )\n (seq\n (ap :error: -if-error-)\n (xor\n (match :error:.$.error_code 10001\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (new $array-inline-66\n (seq\n (seq\n (seq\n (seq\n (ap \"Error downloading worker definition from IPFS\" $array-inline-66)\n (ap -ipfs-arg- $array-inline-66)\n )\n (ap -worker_def_cid-arg- $array-inline-66)\n )\n (ap ret-2 $array-inline-66)\n )\n (canon %init_peer_id% $array-inline-66 #array-inline-66-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-66-0] ret-144)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-145)\n )\n (par\n (call %init_peer_id% (ret-145 \"store_log\") [ret-144] ret-146)\n (seq\n (new $array-inline-67\n (seq\n (seq\n (ap ret-145 $array-inline-67)\n (ap #array-inline-66-0 $array-inline-67)\n )\n (canon %init_peer_id% $array-inline-67 #array-inline-67-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-67-0])\n )\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-66-0] ret-147)\n )\n (call %init_peer_id% (\"peer\" \"timestamp_sec\") [] ret-148)\n )\n (new %Status_obj-4_map\n (seq\n (seq\n (seq\n (ap (\"message\" ret-147) %Status_obj-4_map)\n (ap (\"state\" \"INSTALLATION_FAILED\") %Status_obj-4_map)\n )\n (ap (\"timestamp\" ret-148) %Status_obj-4_map)\n )\n (canon %init_peer_id% %Status_obj-4_map Status_obj-4)\n )\n )\n )\n (call %init_peer_id% (\"json\" \"stringify\") [Status_obj-4] ret-149)\n )\n (call %init_peer_id% (\"worker-spell\" \"list_push_string\") [\"__installation_spell_status__\" ret-149] ret-150)\n )\n )\n (seq\n (seq\n (ap :error: -else-error-)\n (xor\n (match :error:.$.error_code 10001\n (ap -if-error- -if-else-error-)\n )\n (ap -else-error- -if-else-error-)\n )\n )\n (fail -if-else-error-)\n )\n )\n )\n )\n )\n )\n )\n )\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (seq\n (new $array-inline-68\n (seq\n (seq\n (ap \"Error installing worker\" $array-inline-68)\n (ap :error: $array-inline-68)\n )\n (canon %init_peer_id% $array-inline-68 #array-inline-68-0)\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-68-0] ret-151)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-152)\n )\n (par\n (call %init_peer_id% (ret-152 \"store_log\") [ret-151] ret-153)\n (seq\n (new $array-inline-69\n (seq\n (seq\n (ap ret-152 $array-inline-69)\n (ap #array-inline-68-0 $array-inline-69)\n )\n (canon %init_peer_id% $array-inline-69 #array-inline-69-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-69-0])\n )\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-68-0] ret-154)\n )\n (call %init_peer_id% (\"peer\" \"timestamp_sec\") [] ret-155)\n )\n (new %Status_obj-5_map\n (seq\n (seq\n (seq\n (ap (\"message\" ret-154) %Status_obj-5_map)\n (ap (\"state\" \"INSTALLATION_FAILED\") %Status_obj-5_map)\n )\n (ap (\"timestamp\" ret-155) %Status_obj-5_map)\n )\n (canon %init_peer_id% %Status_obj-5_map Status_obj-5)\n )\n )\n )\n (call %init_peer_id% (\"json\" \"stringify\") [Status_obj-5] ret-156)\n )\n (call %init_peer_id% (\"worker-spell\" \"list_push_string\") [\"__installation_spell_status__\" ret-156] ret-157)\n )\n )\n )\n (new $status-6\n (seq\n (seq\n (seq\n (call %init_peer_id% (\"worker-spell\" \"list_get_strings\") [\"__installation_spell_status__\"] ret-158)\n (xor\n (match ret-158.$.success true\n (ap false not-1)\n )\n (ap true not-1)\n )\n )\n (new -if-else-error-\n (new -else-error-\n (new -if-error-\n (xor\n (match not-1 true\n (seq\n (new %Status_obj-6_map\n (seq\n (seq\n (seq\n (ap (\"message\" ret-158.$.error) %Status_obj-6_map)\n (ap (\"state\" \"STATUS_LOAD_ERROR\") %Status_obj-6_map)\n )\n (ap (\"timestamp\" 0) %Status_obj-6_map)\n )\n (canon %init_peer_id% %Status_obj-6_map Status_obj-6)\n )\n )\n (ap Status_obj-6 $status-6)\n )\n )\n (seq\n (ap :error: -if-error-)\n (xor\n (match :error:.$.error_code 10001\n (seq\n (seq\n (seq\n (ap ret-158.$.strings ret-158_flat)\n (ap ret-158_flat ret-158_flat_to_functor)\n )\n (ap ret-158_flat_to_functor.length ret-158_flat_length)\n )\n (new -if-else-error-\n (new -else-error-\n (new -if-error-\n (xor\n (match ret-158_flat_length 0\n (seq\n (new %Status_obj-7_map\n (seq\n (seq\n (seq\n (ap (\"message\" \"Installation has not started yet\") %Status_obj-7_map)\n (ap (\"state\" \"NOT_STARTED\") %Status_obj-7_map)\n )\n (ap (\"timestamp\" 0) %Status_obj-7_map)\n )\n (canon %init_peer_id% %Status_obj-7_map Status_obj-7)\n )\n )\n (ap Status_obj-7 $status-6)\n )\n )\n (seq\n (ap :error: -if-error-)\n (xor\n (match :error:.$.error_code 10001\n (seq\n (seq\n (seq\n (seq\n (seq\n (ap ret-158.$.strings ret-158_flat-0)\n (ap ret-158_flat-0 ret-158_flat-0_to_functor)\n )\n (ap ret-158_flat-0_to_functor.length ret-158_flat-0_length)\n )\n (call %init_peer_id% (\"math\" \"sub\") [ret-158_flat-0_length 1] sub-0)\n )\n (call %init_peer_id% (\"json\" \"parse\") [ret-158.$.strings.[sub-0]] ret-159)\n )\n (ap ret-159 $status-6)\n )\n )\n (seq\n (seq\n (ap :error: -else-error-)\n (xor\n (match :error:.$.error_code 10001\n (ap -if-error- -if-else-error-)\n )\n (ap -else-error- -if-else-error-)\n )\n )\n (fail -if-else-error-)\n )\n )\n )\n )\n )\n )\n )\n )\n )\n (seq\n (seq\n (ap :error: -else-error-)\n (xor\n (match :error:.$.error_code 10001\n (ap -if-error- -if-else-error-)\n )\n (ap -else-error- -if-else-error-)\n )\n )\n (fail -if-else-error-)\n )\n )\n )\n )\n )\n )\n )\n )\n (new $status-6_test\n (seq\n (seq\n (fold $status-6 status-6_fold_var\n (seq\n (seq\n (ap status-6_fold_var $status-6_test)\n (canon %init_peer_id% $status-6_test #status-6_iter_canon)\n )\n (xor\n (match #status-6_iter_canon.length 1\n (null)\n )\n (next status-6_fold_var)\n )\n )\n (never)\n )\n (canon %init_peer_id% $status-6_test #status-6_result_canon)\n )\n (ap #status-6_result_canon status-6_gate)\n )\n )\n )\n )\n )\n (new $array-inline-70\n (seq\n (seq\n (ap \"Worker installation finished with status\" $array-inline-70)\n (ap status-6_gate.$.[0] $array-inline-70)\n )\n (canon %init_peer_id% $array-inline-70 #array-inline-70-0)\n )\n )\n )\n (call %init_peer_id% (\"debug\" \"stringify\") [#array-inline-70-0] ret-160)\n )\n (call %init_peer_id% (\"srv\" \"resolve_alias\") [\"spell\"] ret-161)\n )\n (par\n (call %init_peer_id% (ret-161 \"store_log\") [ret-160] ret-162)\n (seq\n (new $array-inline-71\n (seq\n (seq\n (ap ret-161 $array-inline-71)\n (ap #array-inline-70-0 $array-inline-71)\n )\n (canon %init_peer_id% $array-inline-71 #array-inline-71-0)\n )\n )\n (call %init_peer_id% (\"run-console\" \"print\") [#array-inline-71-0])\n )\n )\n )\n (call %init_peer_id% (\"errorHandlingSrv\" \"error\") [:error: 0])\n)\n"; export declare function deal_install(ipfs: string, worker_def_cid: string, deal_id: string, config?: { ttl?: number; }): Promise; export declare function deal_install(peer: IFluenceClient$$, ipfs: string, worker_def_cid: string, deal_id: string, config?: { ttl?: number; }): Promise;