From dda2eacb2b782539b0a2486e1eefbbd962e81ed7 Mon Sep 17 00:00:00 2001
From: "W. Trevor King" <wking@drexel.edu>
Date: Wed, 11 Apr 2012 17:40:27 -0400
Subject: [PATCH] Adjust Coulomb bundles to place vector labels at the vector
 tips in Mechanics.asy.

---
 asymptote/ElectroMag-test.asy | 2 +-
 asymptote/ElectroMag.asy      | 8 ++++++--
 2 files changed, 7 insertions(+), 3 deletions(-)

diff --git a/asymptote/ElectroMag-test.asy b/asymptote/ElectroMag-test.asy
index f80a024..5b761f4 100644
--- 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 06f1314..5495cf1 100644
--- 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();
     }
   }
-- 
2.26.2