// Returns Exp(zta) * d/dz Ai(z) where zta = (2/3) * z * Sqrt(z)
public static Complex ScaledCairyPrime(Complex z)
{
int id = 1;
int kode = 2;
int nz = 0;
int ierr = 0;
double air = double.NaN;
double aii = double.NaN;
AmosHelper.zairy(z.Real, z.Imaginary, id, kode, ref air, ref aii, ref nz, ref ierr);
return(new Complex(air, aii));
}
// Returns Exp(zta) * d/dz Ai(z) where zta = (2/3) * z * Sqrt(z)
public static double ScaledCairyPrime(double z)
{
if (z < 0)
{
return(double.NaN);
}
int id = 1;
int kode = 2;
int nz = 0;
int ierr = 0;
double air = double.NaN;
double aii = double.NaN;
AmosHelper.zairy(z, 0.0, id, kode, ref air, ref aii, ref nz, ref ierr);
return(air);
}