Adjust Coulomb bundles to place vector labels at the vector tips in Mechanics.asy.

diff --git a/asymptote/ElectroMag-test.asy b/asymptote/ElectroMag-test.asy
index f80a0248628ae8764b5c468fa729eae8b48de7f2..5b761f43390426bab9fe954b2062816cf1a899ac 100644 (file)
--- a/asymptote/ElectroMag-test.asy
+++ b/asymptote/ElectroMag-test.asy
@@ -43,7 +43,7 @@ for (int i=0; i<ds.length; i+=1)
 for (int i=0; i<as.length; i+=1)
   as[i].draw();
 
-CoulombEFields((-1.5u, 1.4u), c=cs, scale=2u, unit=u/2);
+CoulombEFields((-0.5u, 1.2u), c=cs, scale=2u, unit=u/2);
 //Vector Fba = CoulombForce(b,a, scale=2u, unit=u);
 //Fba.draw();
 CoulombForces(c=cs, scale=2u, unit=u);

diff --git a/asymptote/ElectroMag.asy b/asymptote/ElectroMag.asy
index 06f131489431dc6d1e19a07cb1984b337176e820..5495cf1d2210c1f707cd7db85980e63c925386b5 100644 (file)
--- a/asymptote/ElectroMag.asy
+++ b/asymptote/ElectroMag.asy
@@ -128,7 +128,9 @@ void CoulombEFields(pair a, Charge c[], real scale=1mm, real unit=1mm)
   string s;
   for (int i=0; i<c.length; i+=1) {
     s = "$E_{" + format("%d", i+1) + "}$";
-    E = CoulombEField(a, c[i], L=s, scale=scale, unit=unit);
+    E = CoulombEField(
+        a, c[i], L=Label(s, position=EndPoint, align=LeftSide),
+        scale=scale, unit=unit);
     E.draw();
   }
 }
@@ -154,7 +156,9 @@ void CoulombForces(Charge c[], real scale=1mm, real unit=1mm)
     for(int j=0; j<c.length; j+=1) {
       if (i==j) continue;
       s = "$F_{" + format("%d", i+1) + "," + format("%d", j+1) + "}$";
-      F = CoulombForce(c[i], c[j], L=s, scale=scale, unit=unit);
+      F = CoulombForce(
+          c[i], c[j], L=Label(s, position=EndPoint, align=LeftSide),
+          scale=scale, unit=unit);
       F.draw();
     }
   }