I have a vector function involving a hypergeometric function as its inner constituent. I need to take the curl of this vector and when I do, Mathematica prompts this array of errors:
TensorRank::fscl: Nonscalar expression {0.6 -97.9987 I,0.6 +97.9987 I} encountered as an argument of numeric function HypergeometricPFQ.
TensorRank::fscl: Nonscalar expression {0.6 -97.9987 I,0.6 +97.9987 I} encountered as an argument of numeric function HypergeometricPFQ.
TensorRank::fscl: Nonscalar expression {0.6 -97.9987 I,0.6 +97.9987 I} encountered as an argument of numeric function HypergeometricPFQ.
General::stop: Further output of TensorRank::fscl will be suppressed during this calculation.
Symmetrize::fscl: Nonscalar expression {0.6 -97.9987 I,0.6 +97.9987 I} encountered as an argument of numeric function HypergeometricPFQ.
Symmetrize::fscl: Nonscalar expression {0.6 -97.9987 I,0.6 +97.9987 I} encountered as an argument of numeric function HypergeometricPFQ.
Symmetrize::fscl: Nonscalar expression {0.6 -97.9987 I,0.6 +97.9987 I} encountered as an argument of numeric function HypergeometricPFQ.
General::stop: Further output of Symmetrize::fscl will be suppressed during this calculation.
I tried differentiating HypergeometricPFQ
functions with complex arguments and it does the operation readily. So the problem only arises when I'm taking the curl. I wonder what am I missing in my calculations?
Here's my code,
fun[z_] = (E^(-z))^2.*HypergeometricPFQ[{2. - I, 2. + 2.*I}, {2., 3. - 3.*I, 3 + I}, -2/E^z]
vector[x_, z_] = {E^(I*x)*fun[z], E^(I*x)*z, fun[z]}
Curl[vector[x, z], {x, y, z}]
Many thanks in advance.
{-E^(I x), -2. E^( I x) (E^-z)^2. HypergeometricPFQ[{2. - 1. I, 2. + 2. I}, {2., 3. - 3. I, 3 + I}, -2 E^-z] + (0.333333 + 0.333333 I) E^( I x - z) (E^-z)^2. HypergeometricPFQ[{3. - 1. I, 3. + 2. I}, {3., 4. - 3. I, 4 + I}, -2 E^-z], I E^(I x) z}
Are you sure all the symbols that you are using are correctly defined? $\endgroup$ – dpravos Jun 6 '18 at 11:27