mirror of
https://github.com/fluencelabs/aqua-playground
synced 2025-03-15 02:10:51 +00:00
17 lines
546 B
Plaintext
17 lines
546 B
Plaintext
(seq
|
|
(call %init_peer_id% ({{user_list}} "is_authenticated") [] token)
|
|
(seq
|
|
(call %init_peer_id% ({{user_list}} "get_users") [] all_users)
|
|
(fold all_users.$.users! u
|
|
(par
|
|
(seq
|
|
(call u.$.relay_id! ("peer" "is_connected") [u.$.peer_id!] is_connected)
|
|
(match is_connected ""
|
|
(call %init_peer_id% ({{user_list}} "leave") [u.$.peer_id!])
|
|
)
|
|
)
|
|
(next u)
|
|
)
|
|
)
|
|
)
|
|
) |