$ docker run --rm --name validator-libsodium-usage-r-cran-sodium-r21-scalar-multiplication-roundtrip-2732 -t --mount type=bind,src=/tmp/validator-status-libsodium-usage-r-cran-sodium-r21-scalar-multiplication-roundtrip,dst=/validator/status validator-libsodium-shared bash -lc 'set -euo pipefail
/validator/tests/_shared/install_override_debs.sh
exec /validator/tests/_shared/run_library_tests.sh "$@"' validator-testcase libsodium usage-r-cran-sodium-r21-scalar-multiplication-roundtrip -- bash -c 'PS4=$1; shift; set -x; source "$@"' validator-xtrace '__VALIDATOR_XTRACE__ ' /validator/tests/libsodium/tests/cases/usage/usage-r-cran-sodium-r21-scalar-multiplication-roundtrip.sh
no override packages found; continuing with apt originals
suppressPackageStartupMessages(library(sodium))
a_sk <- keygen()
b_sk <- keygen()
a_pk <- pubkey(a_sk)
b_pk <- pubkey(b_sk)
ab <- diffie_hellman(a_sk, b_pk)
ba <- diffie_hellman(b_sk, a_pk)
stopifnot(length(ab) == 32L)
stopifnot(length(ba) == 32L)
stopifnot(identical(ab, ba))
cat("ok dh_len=", length(ab), "\n", sep="")
'
ok dh_len=32