# Huge arrows in 3D graphics

H$\vphantom{a}$i. Consider the following code:

f1 = Plot3D[-Exp[-x^2-y^2],{x,-5,5},{y,-5,5},PlotRange->All]


So far so good. Let us now combine these figures into a single figure:

Show[f1, f2]


For some reason, some arrows look funny: their heads are much larger than they should be. The behaviour is even weirder if we rotate the figure

What's going on here? how can I fix this?

Thanks.

Show[f2, BoxRatios -> {1, 1, 2}]

I talked about this issue in this answer, and my suggestion would be to use the same solution here. I'd suggest just using the function arrowLine I defined in that answer.
• @AccidentalFourierTransform I looked at my suggestion of BoxRatios->Automatic in the linked answer and find that it doesn't work properly here. So I'd say just use the arrowLine function. That Arrowheads stuff is just badly designed. – Jens Jun 4 '17 at 16:56
• I'm not sure why you say it doesn't work properly here. I changed Exp[-x^2-y^2] to 3Exp[-x^2-y^2], and the result looks fine to me. – AccidentalFourierTransform Jun 4 '17 at 17:01