fluencelabs/examples
1
0
Fork 0
mirror of https://github.com/fluencelabs/examples synced 2025-03-16 16:20:50 +00:00
Code Issues Projects Releases Wiki Activity

update air scripts

Browse Source
This commit is contained in:
boneyard93501 2021-04-09 19:21:32 -05:00
parent ee7572c36a
commit f4350547d7
5 changed files with 143 additions and 30 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
par-greeter/air-scripts/air_echo.clj
View File

@ -7,7 +7,6 @@
(seq
(call relay ("op" "identity") [])
(call %init_peer_id% (returnService "run") [array_result])
; (call %init_peer_id% (returnService "run") [array_result.$.[2]!])
)
)
(seq

41
par-greeter/air-scripts/air_echo_greeter.clj Normal file
View File

@ -0,0 +1,41 @@
(xor
(seq
(seq
(seq
(call relay ("op" "identity") [])
(call node_1 (echo_service "echo") [names] echo_result)
)
(seq
(call relay ("op" "identity") [])
(call %init_peer_id% (returnService "run") [echo_result])
)
)
(seq
(seq
(seq
(call relay ("op" "identity") [])
(call node_2 (greeting_service_1 "greeting") [echo_result.$.[0]["echo"]!] greeter_result_0)
)
(seq
(call relay ("op" "identity") [])
(call %init_peer_id% (returnService "run") [greeter_result_0])
)
)
(seq
(seq
(call relay ("op" "identity") [])
(call node_3 (greeting_service_2 "greeting") [echo_result.$.[1]["echo"]!] greeter_result_1)
)
(seq
(call relay ("op" "identity") [])
(call %init_peer_id% (returnService "run") [greeter_result_1])
)
)
)
)
(seq
(call relay ("op" "identity") [])
(call %init_peer_id% (returnService "run") ["XOR FAILED" %last_error%])
)
)

40
par-greeter/air-scripts/air_fold.clj
View File

@ -2,47 +2,29 @@
(seq
(seq
(seq
(call relay ("op" "identity") [])
(call node (echo_service "echo") [names] array_result)
)
(seq
(seq
(call relay ("op" "identity") [])
(call node (echo_service "echo") [names] array_result)
)
(seq
(call relay ("op" "identity") [])
(call %init_peer_id% (returnService "run") [array_result])
)
(seq
(fold array_result item
(seq
(seq
(call relay ("op" "identity") [])
(call node (greeting_service "greeting") [item] greeter_results[])
)
(seq
(call relay ("op" "identity") [])
(next item)
)
)
)
(seq
(fold array_result item
(seq
(call relay ("op" "identity") [])
(call %init_peer_id% ("returnService" "run") [greeter_results])
(call node (greeting_service "greeting") [item] greeter_results[])
(next item)
)
)
)
)
(seq
(seq
(call relay ("op" "identity") [])
(call node (greeting_service "greeting") ["boo yah"] last_result)
)
(seq
(call relay ("op" "identity") [])
(call %init_peer_id% (returnService "run") [last_result])
)
(call relay ("op" "identity") [])
(call %init_peer_id% ("returnService" "run") [greeter_results])
)
)
(seq
(call relay ("op" "identity") [])
(call %init_peer_id% (returnService "run") ["XOR FAILED %last_error"])
(call %init_peer_id% (returnService "run") ["XOR FAILED" %last_error%])
)
)

43
par-greeter/air-scripts/air_fold_par_bad.clj Normal file
View File

@ -0,0 +1,43 @@
(xor
(seq
(seq
(seq
(call relay ("op" "identity") [])
(call node_1 (echo_service "echo") [names] array_result)
)
(seq
(call relay ("op" "identity") [])
(call %init_peer_id% (returnService "run") [array_result])
)
)
(seq
(fold array_result item
(par
(seq
(seq
(call node_2 (greeting_service_1 "greeting") [item.$.["echo"]!] greeting_1_result[])
(next item)
)
(seq
(call node_3 (greeting_service_2 "greeting") [item.$.["echo"]!] greeting_2_result[])
(next item)
)
)
(seq
(call node_4 (greeting_service_3 "greeting") [item.$.["echo"]!] greeting_3_result[])
(next item)
)
)
)
(seq
(call relay ("op" "identity") [])
(call %init_peer_id% (returnService "run") [greeting_1_result greeting_2_result greeting_3_result])
)
)
)
(seq
(call relay ("op" "identity") [])
(call %init_peer_id% (returnService "run") ["XOR FAILED %last_error"])
)
)

48
par-greeter/air-scripts/air_fold_seq.clj Normal file
View File

@ -0,0 +1,48 @@
(xor
(seq
(seq
(seq
(call relay ("op" "identity") [])
(call node_1 (echo_service "echo") [names] array_result)
)
(seq
(seq
(call relay ("op" "identity") [])
(call %init_peer_id% (returnService "run") [array_result])
)
(seq
(fold array_result item
(seq
(seq
(call relay ("op" "identity") [])
(call node_2 (greeting_service_1 "greeting") [item.$.["echo"]!] greeter_results[])
)
(seq
(call relay ("op" "identity") [])
(next item)
)
)
)
(seq
(call relay ("op" "identity") [])
(call %init_peer_id% ("returnService" "run") [greeter_results])
)
)
)
)
(seq
(seq
(call relay ("op" "identity") [])
(call node (greeting_service "greeting") ["boo yah"] last_result)
)
(seq
(call relay ("op" "identity") [])
(call %init_peer_id% (returnService "run") [last_result])
)
)
)
(seq
(call relay ("op" "identity") [])
(call %init_peer_id% (returnService "run") ["XOR FAILED" %last_error%])
)
)