describe("WB()", {
  it("can estimate the branch dry weight.", {
    expect_equal(WB(20, 7), 21.95725)
  })
  it("return `NA` when the diameter or height inputed is NA.", {
    expect_equal(WB(NA, 10), NA)
    expect_equal(WB(10, NA), NA)
    expect_equal(WB(NA, NA), NA)
  })
  it("return `0` when the diameter or height inputed is 0.", {
    expect_equal(WS(0, 10), 0)
    expect_equal(WS(10, 0), 0)
    expect_equal(WS(0, 0), 0)
  })
})