tests/testthat/test-am.R

test_that("am works", {
  phi <- 1 + 1i
  m <- 2
  u <- Carlson::elliptic_F(phi, m)
  expect_equal(
    am(u, m), 
    phi
  )
})

Try the jacobi package in your browser

Any scripts or data that you put into this service are public.

jacobi documentation built on Nov. 19, 2023, 1:08 a.m.