553def participantGroupBytes =
554 (lambda unrestricted group : (family ParticipantGroup) .
555 (bytes-append
556 b"alpha-participant-group-v1"
557 (bytes-append
558 (participantWord (participantUniverseOf group))
559 (bytes-append
560 (participantWord (participantEpochOf group))
561 (bytes-append
562 (participantWord (bytes-length (participantIdentityOf group)))
563 (bytes-append
564 (participantIdentityOf group)
565 (participantSelectionBytes (participantSelectionOf group))))))))The compiler supplied declaration spans and resolved links from this source snapshot. This page does not assert that this file belongs to a checked closure.