## Arrow from a torus to an other

The following image represents two worlds drawn as toruses whith one door on each world. I would like to draw a bidirectional red arrow — if possible as a tube for the fun — going from one door to the other.

But my tentativ is very poor. Any idea ?

```
torus2 = First[
ParametricPlot3D[{(4 + Cos[2 \[Pi] v]) Sin[
2 \[Pi] u], (4 + Cos[2 \[Pi] v]) Cos[2 \[Pi] u],
Sin[2 \[Pi] v]}, {u, 0, 1}, {v, 0, 1}, Boxed -> False,
Axes -> False, MeshFunctions -> {#3 &}, Mesh -> 0,
ColorFunction -> "BrownCyanTones"]];
p2 = {LightBlue, AbsolutePointSize[20], Point[{2.5, 4, 1}]};
g3D2 = Graphics3D[{p2, torus2}, Boxed -> False];
torus1 = First[
ParametricPlot3D[{(4 + Cos[2 \[Pi] v]) Sin[
2 \[Pi] u], (4 + Cos[2 \[Pi] v]) Cos[2 \[Pi] u],
Sin[2 \[Pi] v]}, {u, 0, 1}, {v, 0, 1}, Boxed -> False,
Axes -> False, MeshFunctions -> {#3 &}, Mesh -> 0,
ColorFunction -> "AlpineColors"]];
p1 = {LightRed, AbsolutePointSize[20], Point[{-2.5, -4, 1}]};
g3D1 = Graphics3D[{p1, torus1}, Boxed -> False];
a1 = Graphics[{{Thick,
Arrow[BezierCurve[{{-2, 3}, {1, 3.5}, {2, 2}}]]}}]
GraphicsRow[{, g3D2, a1, g3D1,}]
```