theta1.dash.zero: Derivative of theta1

In elliptic: Weierstrass and Jacobi Elliptic Functions

Description

Calculates theta1' as a function of either m or k

Usage

theta1.dash.zero(m, ...)
theta1.dash.zero.q(q, ...)

Arguments

m	real parameter
q	Real parameter
...	Extra arguments passed to theta1() et seq, notably maxiter

Author(s)

Robin K. S. Hankin

Examples

#Now, try and get 16.28.6, p576: theta1dash=theta2*theta3*theta4:

m <- 0.5
derivative <- function(small){(theta1(small,m=m)-theta1(0,m=m))/small}
right.hand.side <-  theta2(0,m=m)*theta3(0,m=m)*theta4(0,m=m)
derivative(1e-7)-right.hand.side

elliptic documentation built on May 2, 2019, 9:37 a.m.