// Verify with Mathematica:
//   BaseForm[Mod[16^^a, 16^^N], 16]
// should return "16^^r".
sjcl.test.vector.bn_mod = [
  {
    a: "cfb9caac51a13eb13592d47863e463b306547683070424a7c7a41302e30453c2f5f6f2c432a267d2d72746c534d6c233c5c6740776e5c473592d4786377d745c534f2d502427612249266a45382a6f512e527d475577484f277e7a4ce62c7919c0b34b9f125124c574bac9738edb0998bfa8f5b8076c5266ae06e1b9121303d7ff8f0380a24526474d592a7d5e69f125124c574bac9738ed77d745c534f2d502427612249266a45382a6f512e527d4755560144ced0a078454a727d24db5d77484f27b0998bfa8f5b8076c5266ae06e1b9121303d7ff8f0380a24526474d592a7d5e682b2358377d745c534f2d502427612249266a45382a6f512e527d4755560144ced0a078454a727d24db5d77484f277e7b3d28256d71482d2a287d666b3ac7053b02c6543592d47863b6a0541cfa603219b694bec483592d478630",
    N: "c3219b694b6a0541cfa60c46a0541cfa60c4c574bac9738edb0998bfa8f5b8076c5266ae06e1b9121303d7ff8f0380a2f51de2fdc93bba83b4c4f49e2D3383B4813D692C6E0E0D5D8E250B98BE48E495C1D6089DAD15DC7D7B46154D6B6CE8EF4AD69B15D498254b6afa60c4835920541cfa60c4c4f49e2D3383B4813D692C855c8a7d64e9",
    r: "3c3312d60b052287f92b61bc1e890a3f43f46f302086fc19d7555059f957607981f89d7\
25b775c70c47e940a874e143efec01558c9cbe5f15df716d812c61cef1a2c6561ee999\
0b5db8e54827a16018fee6c111c9a8e66897f849ccd9114639ab086f8ecfa558b58555\
47b1eb110e245f51598bc98486af1813423877189e66a84cd7ead55"
  }
]

// Verify with Mathematica:
//   BaseForm[Mod[16^^a * 16^^b, 16^^N], 16]
// should return "16^^r".
sjcl.test.vector.bn_mulmod = [
  {
    a: "94B7555AABE9127CC58CCF4993DB6CF84D16C1244021612e464d6e2f4c724f2b3e275a43385a5a6d4c7441284648362a4526474d592a7d5e682b2358377d745c534f2d502427612249266a45382a6f512e527d475577484f277e7b3d28256d71482d2a287d666b52247027",
    b: "70424648242f4273612a524e4a44717b655b487b395d2f407d4c7141503e33442a657637257968345237677d6e736f5f24546b642a23283e463b306547683070424a7c7a41302e30453c2f5f6f2c432a267d2d72746c534d6c233c5c6740776e5c4725562029623d7a673d",
    N: "EEAF0AB9ADB38D8775FF3C0B9EA27496EA81D3383B4813D692C6E0E0D5D8E250B98BE48E495C1D6089DAD15DC7D7B46154D6B6CE8EF4AD69B15D4982559B297BCF1885C529F566660E57EC68EDBC3C05726CC02FD4CBF4976EAA9AFD5138FE8376435B9FC61D2FC0EB06E3",
    r: "266bd21de6da4ce62c7919c0b34b9f125124c574bac9738edb0998bfa8f5b8076c5266ae06e1b9121303d7ff8f0380a2f51de2fdc93bba83b4c4f49e2ddc65c24a8e2ecbac374e49181792aeeada8fc5438073187b2cf3d63f93d560144ced0a078454a727d24db5d09e56"
  }
]

sjcl.test.vector.bn_powermod = [
  {
    g: 2,
    x: 3,
    N: 3,
    v: 2
  },
  {
    g: 2,
    x: "10000000000000000000000000",
    N: 1337,
    v: 1206
  },
  {
    g: 17,
    x: 90,
    N: 34717861147,
    v: 28445204336
  },
  {
    g: 2,
    x: "0x844A000000000000000000000",
    N: 13,
    v: 9
  },
  {
    g: 2,
    x: 0x1010,
    N: 131,
    v: 59
  },
  {
    g: 2,
    x: "43207437777777877617151",
    N: 13,
    v: 2
  },
  {
    g: 2,
    x: "389274238947216444871600001871964319565192765874149",
    N: 117,
    v: 44
  },
  {
    g: 2,
    x: "89457115510016156219817846189181057618965150496979174671534084187",
    N: "1897166415676096761",
    v: "16840615e646a4c5c8d"
  }//,
  // // This was disabled because it's slow (~2.5s with `rhino -O 9`). Once
  // // a better powermod algorithm is implemented (e.g., using Montgomery
  // // reduction), this can be re-enabled.
  // {
  //   g: 2,
  //   x: "eeaf0ab9adb3008dd6c314c9c25600057674df692c0006e0d5d8e2050b98be48e4",
  //   N: "b48130d6e07674df740e1d33b4816e0d5d8e20e2050b98be48e457674df74096ea",
  //   v: "9c3219b694befb9caac51a13eb1ac7053b02c654b6a0541cfa60c483592d478630"
  // }
]