dannywillems

// This should mimic LookupTable structure
#[wasm_bindgen]
pub struct WasmPastaFpLookupTable {
    #[wasm_bindgen(skip)]
    pub id: i32,
    #[wasm_bindgen(skip)]
    pub data: WasmVector<WasmFlatVector<WasmPastaFp>>,
}

// Converter from WasmPastaFpLookupTable to LookupTable, used by the binding

dannywillems

`gpg --version`
`gpg --expert --full-gen-key` -> to have ECC option (see https://twitter.com/dwillems42/status/1584107888540553216?s=20&t=mjqKYjAz6C9X7GMnjObqaQ)
`gpg --export -a "u@domain.com" > public.key` -> export public key

dannywillems

let print_bits_le b =
  assert (b >= 0 && b <= 255) ;
  let rec get_bits_le x acc i =
    if i = 8 then acc
    else
      let acc = (x mod 2) :: acc in
      get_bits_le (x lsr 1) acc (i + 1)
  in
  let bits_le = List.rev (get_bits_le b [] 0) in
  List.iter print_int bits_le ;