summaryrefslogtreecommitdiff
path: root/29784-t/images/sources
diff options
context:
space:
mode:
Diffstat (limited to '29784-t/images/sources')
-rw-r--r--29784-t/images/sources/014a.xp84
-rw-r--r--29784-t/images/sources/026a.xp176
-rw-r--r--29784-t/images/sources/027a.xp191
-rw-r--r--29784-t/images/sources/028a.xp166
-rw-r--r--29784-t/images/sources/030a.xp185
-rw-r--r--29784-t/images/sources/031a.xp188
-rw-r--r--29784-t/images/sources/032a.xp177
-rw-r--r--29784-t/images/sources/057a.xp69
8 files changed, 1236 insertions, 0 deletions
diff --git a/29784-t/images/sources/014a.xp b/29784-t/images/sources/014a.xp
new file mode 100644
index 0000000..e6e95fd
--- /dev/null
+++ b/29784-t/images/sources/014a.xp
@@ -0,0 +1,84 @@
+/* -*-ePiX-*- */
+#include "epix.h"
+using namespace ePiX;
+
+void bigdot() { dot_size(10); }
+void lildot() { dot_size(2); }
+
+void Dn(const P& loc)
+{
+ bigdot();
+ circ(loc);
+
+ marker(loc, TIMES);
+}
+
+void Up(const P& loc)
+{
+ bigdot();
+ circ(loc);
+
+ lildot();
+ dot(loc);
+}
+
+void Dn(const P& loc, const P& off, const std::string& msg,
+ epix_label_posn A)
+{
+ Dn(loc);
+ label(loc, off, msg, A);
+}
+
+void Up(const P& loc, const P& off, const std::string& msg,
+ epix_label_posn A)
+{
+ Up(loc);
+ label(loc, off, msg, A);
+}
+
+double th1(30), th2(20), rad(0.6), rad2(2.5), EPS(1.5);
+P scat1(1,0), scat2(3.5,0);
+
+int main()
+{
+ picture(P(0,-1), P(6,1), "6 x 2in");
+
+ begin();
+ degrees();
+ arrow_inset(0.25);
+
+ line(scat1, scat1 - cis(th1));
+ line(scat1, P(xmax(),0));
+ arrow(scat2, scat2+polar(rad2, th2));
+ arrow(scat2, scat2+polar(rad2, -th2));
+
+ arc_arrow(scat1, rad, th1, EPS, 0.5);
+ arc_arrow(scat2, rad, 0, th2-EPS, 0.5);
+ arc_arrow(scat2, rad, 0, -th2+EPS, 0.5);
+ arrow(scat1 - polar(0.6, th1), scat1 - polar(0.55, th1));
+ arrow(scat1 + P(1.5), scat1 + P(1.55));
+
+ dashed();
+ line(scat1, scat1 + cis(th1));
+
+ label(scat1 - polar(0.6, th1), P(2,-2), "$\\vec{k}_0$", br);
+ label(scat1 + P(1.5), P(0,-4), "$\\vec{k}_1$", b);
+
+ label(scat2+polar(rad2, th2), P(2,0), "$\\vec{k}_2^\\ell$", r);
+ label(scat2+polar(rad2, -th2), P(2,0), "$\\vec{k}_2^r$", r);
+
+ label(scat1+polar(rad, 0.5*th1), P(4,-2), "$\\theta_1$", tr);
+ label(scat2+polar(rad, 0.5*th2), P(4,-2), "$\\theta_2$", tr);
+ label(scat2+polar(rad, -0.5*th2), P(4, 2), "$\\theta_2$", br);
+
+ Dn(scat2+polar(0.6*rad2, th2), P(2,-2), "$\\vec{n}_2^\\ell$", br);
+ Up(scat2+polar(0.6*rad2, -th2), P(2, 2), "$\\vec{n}_2^r$", tr);
+ Up(scat1+P(1,0), P(2,-6), "$\\vec{n}_1$", b);
+
+ label(scat2+polar(0.4*rad2, th2), P(-2, 2), "$\\ell$~Beam", tl);
+ label(scat2+polar(0.4*rad2, -th2), P(-2,-2), "$r$~Beam", bl);
+
+ label(P(0.5*(xmin()+xmax()), ymin()), P(0,-2), "\\textsc{Fig.~1}", b);
+ tikz_format();
+ end();
+}
diff --git a/29784-t/images/sources/026a.xp b/29784-t/images/sources/026a.xp
new file mode 100644
index 0000000..6ada707
--- /dev/null
+++ b/29784-t/images/sources/026a.xp
@@ -0,0 +1,176 @@
+/* -*-ePiX-*- */
+#include "epix.h"
+using namespace ePiX;
+
+P sw(776,1892), ne(2984,680);
+double XSZ(5.5), YSZ(1.2); // Cartesian dimensions
+
+// to screen
+P pt(double x, double y)
+{
+ return P(XSZ*(x-sw.x1())/(ne.x1() - sw.x1()),
+ YSZ*(y-sw.x2())/(ne.x2() - sw.x2()));
+}
+
+P Bl(380, 2160), Tr(3180, 60);
+// to picture
+P pic(double x, double y)
+{
+ return P(8*(x-Bl.x1())/(Tr.x1() - Bl.x1()),
+ 6*(y-Bl.x2())/(Tr.x2() - Bl.x2()));
+}
+
+void Circ(const P& loc, const std::string& msg)
+{
+ dot_size(16);
+ circ(loc);
+ label(loc, msg);
+}
+
+void key(const P& loc, const std::string& msg)
+{
+ P stem(P(0.5, 0.25));
+ double scale(8.5 - 2*loc.x1());
+
+ P elbow(loc + scale*stem), tail(elbow+P(0.25));
+ line(elbow, tail);
+ base(White(), 2.5);
+ line(elbow, tail);
+ base(Neutral(), 0);
+ arrow(elbow, elbow-scale*0.99*stem);
+
+ Circ(tail, msg);
+}
+
+int main()
+{
+ picture(P(0,0), P(8,6), "8 x 6in");
+
+ begin();
+ degrees();
+
+ screen scr(P(0,0), P(XSZ, YSZ));
+ activate(scr);
+
+ grid(P(0,0), P(6, YSZ), 6, 3);
+ bold();
+ grid();
+
+ axis Ax(P(0,0), P(5,0), 5, P(0,-4), b);
+ Ax.subdivide(2).tick_ratio(1).align(t).draw();
+
+ axis Ay(P(0,0), P(0,1), 5, P(-4,0), l);
+ Ay.align(r).draw();
+
+ axis Ax2(P(0,YSZ), P(5,YSZ), 5);
+ Ax2.subdivide(2).tick_ratio(1).align(b).draw_ticks();
+
+ axis Ay2(P(XSZ,0), P(XSZ, 1), 5);
+ Ay2.align(l).draw_ticks();
+
+ std::vector<P> data1, data2, data3, data4;
+ data1.push_back(pt(775, 883));
+ data1.push_back(pt(875, 883));
+ data1.push_back(pt(975, 883));
+ data1.push_back(pt(1075, 884));
+ data1.push_back(pt(1175, 886));
+ data1.push_back(pt(1275, 888));
+ data1.push_back(pt(1375, 893));
+ data1.push_back(pt(1475, 903));
+ data1.push_back(pt(1575, 915));
+ data1.push_back(pt(1675, 944));
+ data1.push_back(pt(1775, 998));
+ data1.push_back(pt(1875, 1089));
+ data1.push_back(pt(1975, 1225));
+ data1.push_back(pt(2075, 1405)); // final common point
+
+ data1.push_back(pt(2125, 1505));
+ data1.push_back(pt(2175, 1573));
+ data1.push_back(pt(2275, 1693));
+ data1.push_back(pt(2375, 1777));
+ data1.push_back(pt(2475, 1829));
+ data1.push_back(pt(2575, 1860));
+ data1.push_back(pt(2675, 1882));
+ data1.push_back(pt(2775, 1893));
+ data1.push_back(pt(2875, 1895));
+ data1.push_back(pt(2975, 1896));
+
+ data2.push_back(pt(1975, 1225));
+ data2.push_back(pt(2075, 1409));
+ data2.push_back(pt(2125, 1507));
+ data2.push_back(pt(2175, 1576));
+ data2.push_back(pt(2275, 1710));
+ data2.push_back(pt(2375, 1800));
+ data2.push_back(pt(2475, 1851));
+ data2.push_back(pt(2575, 1878));
+ data2.push_back(pt(2675, 1892));
+ data2.push_back(pt(2775, 1895));
+ data2.push_back(pt(2875, 1896));
+
+ data3.push_back(pt(1975, 1225));
+ data3.push_back(pt(2075, 1409));
+ data3.push_back(pt(2125, 1508));
+ data3.push_back(pt(2175, 1597));
+ data3.push_back(pt(2275, 1746));
+ data3.push_back(pt(2375, 1841));
+ data3.push_back(pt(2475, 1882));
+ data3.push_back(pt(2575, 1895));
+ data3.push_back(pt(2675, 1896));
+
+ data4.push_back(pt(1975, 1225));
+ data4.push_back(pt(2075, 1409));
+ data4.push_back(pt(2125, 1519));
+ data4.push_back(pt(2175, 1667));
+ data4.push_back(pt(2275, 1861));
+ data4.push_back(pt(2375, 1892));
+ data4.push_back(pt(2475, 1896));
+
+ spline(data1, 12);
+ spline(data2, 12);
+ spline(data3, 12);
+ spline(data4, 12);
+
+ plain();
+ key(pt(2288, 1706), "$1$");
+ key(pt(2305, 1742), "$2$");
+ key(pt(2314, 1789), "$3$");
+ key(pt(2292, 1873), "$4$");
+ crop();
+
+ label(P(1.5), P(0,-4), "$\\rho$", b);
+ label(P(2.75, 0), P(0,-18), // added period
+ "\\textsc{Fig.~2} -- Central form factors, tail variation.", b);
+
+ label_angle(90);
+ label(P(0, 0.6), P(-24,0), "\\Code{FFCR} and/or \\Code{FFCI}", l);
+ deactivate(scr);
+
+ inset(scr, P(1.125,0.5), P(8, 4.25));
+
+ // now draw rest of page
+ label_angle(0);
+ label(pic(1004, 220), P(0,0),
+ "\\Code{R0 = 1.2},\\quad \\Code{A = 0.52},\\quad \\Code{HA = 0},\\quad \\Code{FN1A = 1},\\quad $\\rho_{m_A} = \\bar{\\rho}_N = 3.24$", r);
+
+ label(pic(1700, 160), P(0,0), "\\framebox{p - Cu\\quad $9.75$~\\MeV}", t);
+
+ P lb(pic(1232, 304)), dY(pic(1232, 364) - lb);
+ Circ(lb, "$1$");
+ label(lb, P(12,0), "\\Code{FN2A = 0.01}", r);
+
+ lb += dY;
+ Circ(lb, "$2$");
+ // Capitalize Standard
+ label(lb, P(12,0), "\\Code{FN2A = 1}\\qquad(Standard form factor)", r);
+
+ lb += dY;
+ Circ(lb, "$3$");
+ label(lb, P(12,0), "\\Code{FN2A = 3}", r);
+
+ lb += dY;
+ Circ(lb, "$4$");
+ label(lb, P(12,0), "\\Code{FN2A = 10}", r);
+
+ tikz_format();
+ end();
+}
diff --git a/29784-t/images/sources/027a.xp b/29784-t/images/sources/027a.xp
new file mode 100644
index 0000000..5a1cf1b
--- /dev/null
+++ b/29784-t/images/sources/027a.xp
@@ -0,0 +1,191 @@
+/* -*-ePiX-*- */
+#include "epix.h"
+using namespace ePiX;
+
+P sw(666,2122), ne(2984,602);
+double XSZ(25), YSZ(3); // Cartesian dimensions
+
+P pt(double x, double y)
+{
+ return P(XSZ*(x-sw.x1())/(ne.x1() - sw.x1()),
+ YSZ*(y-sw.x2())/(ne.x2() - sw.x2()));
+}
+
+P Bl(380, 2140), Tr(3180, 40);
+P pic(double x, double y)
+{
+ return P(8*(x-Bl.x1())/(Tr.x1() - Bl.x1()),
+ 6*(y-Bl.x2())/(Tr.x2() - Bl.x2()));
+}
+
+void Circ(const P& loc, const std::string& msg)
+{
+ dot_size(16);
+ circ(loc);
+ label(loc, msg);
+}
+
+int main()
+{
+ picture(P(0,0), P(8,6), "8 x 6in");
+
+ begin();
+ degrees();
+
+ screen scr(P(0,0), P(XSZ, YSZ));
+ activate(scr);
+
+ grid(P(0,0), P(25, 3), 5, 3);
+ bold();
+ grid();
+
+ axis Ax(P(0,0), P(XSZ,0), 5, P(0,-4), b);
+ Ax.subdivide(5).tick_ratio(1).align(t).draw();
+
+ axis Ay(P(0,0), P(0,YSZ), 3, P(-4,0), l);
+ Ay.subdivide(5).tick_ratio(1).align(r).draw();
+
+ axis Ax2(P(0, YSZ), P(XSZ,YSZ), 5);
+ Ax2.subdivide(5).tick_ratio(1).align(b).draw_ticks();
+
+ axis Ay2(P(XSZ,0), P(XSZ,YSZ), 3);
+ Ay2.subdivide(5).tick_ratio(1).align(l).draw_ticks();
+
+ std::vector<P> data1, data2, data3, data4;
+ data1.push_back(pt(666, 1614));
+ data1.push_back(pt(675, 1614));
+ data1.push_back(pt(775, 1614));
+ data1.push_back(pt(865, 1614));
+ data1.push_back(pt(875, 1614));
+ data1.push_back(pt(975, 1614));
+ data1.push_back(pt(1075, 1614));
+ data1.push_back(pt(1175, 1615));
+ data1.push_back(pt(1275, 1616));
+ data1.push_back(pt(1375, 1618));
+ data1.push_back(pt(1475, 1620));
+ data1.push_back(pt(1575, 1629));
+ data1.push_back(pt(1675, 1640));
+ data1.push_back(pt(1775, 1657)); // Meets path4
+ data1.push_back(pt(1875, 1683));
+ data1.push_back(pt(1975, 1728));
+ data1.push_back(pt(2075, 1794)); // first common point
+
+ data1.push_back(pt(2175, 1865));
+ data1.push_back(pt(2275, 1937));
+ data1.push_back(pt(2375, 1996));
+ data1.push_back(pt(2475, 2043));
+ data1.push_back(pt(2575, 2075));
+ data1.push_back(pt(2675, 2089));
+ data1.push_back(pt(2775, 2098));
+ data1.push_back(pt(2875, 2104));
+ data1.push_back(pt(2975, 2108));
+
+ data2.push_back(pt(666, 1108));
+ data2.push_back(pt(675, 1108));
+ data2.push_back(pt(775, 1117));
+ data2.push_back(pt(875, 1136));
+ data2.push_back(pt(975, 1163));
+ data2.push_back(pt(1075, 1200));
+ data2.push_back(pt(1175, 1243));
+ data2.push_back(pt(1275, 1292));
+ data2.push_back(pt(1375, 1344));
+ data2.push_back(pt(1475, 1398));
+ data2.push_back(pt(1575, 1456));
+ data2.push_back(pt(1675, 1516));
+ data2.push_back(pt(1775, 1578)); // Meets path4
+ data2.push_back(pt(1875, 1642));
+ data2.push_back(pt(1975, 1715));
+ data2.push_back(pt(2075, 1795)); // first common point
+
+ data3.push_back(pt(666, 2120));
+ data3.push_back(pt(675, 2121));
+ data3.push_back(pt(775, 2113));
+ data3.push_back(pt(875, 2093));
+ data3.push_back(pt(975, 2066));
+ data3.push_back(pt(1075, 2033));
+ data3.push_back(pt(1175, 1991));
+ data3.push_back(pt(1275, 1945));
+ data3.push_back(pt(1375, 1896));
+ data3.push_back(pt(1475, 1846));
+ data3.push_back(pt(1575, 1799));
+ data3.push_back(pt(1675, 1761));
+ data3.push_back(pt(1775, 1737));
+ data3.push_back(pt(1875, 1730));
+ data3.push_back(pt(1975, 1752));
+ data3.push_back(pt(2075, 1794)); // first common point
+
+ data4.push_back(pt(666, 600));
+ data4.push_back(pt(675, 603));
+ data4.push_back(pt(775, 633));
+ data4.push_back(pt(875, 707));
+ data4.push_back(pt(975, 817));
+ data4.push_back(pt(1075, 943));
+ data4.push_back(pt(1175, 1078));
+ data4.push_back(pt(1275, 1219));
+ data4.push_back(pt(1375, 1357));
+ data4.push_back(pt(1475, 1474));
+ data4.push_back(pt(1575, 1568));
+ data4.push_back(pt(1675, 1627));
+ data4.push_back(pt(1775, 1656)); // Meets path4
+
+ spline(data1, 12);
+ spline(data2, 12);
+ spline(data3, 12);
+ spline(data4, 12);
+
+ plain();
+ Circ(pt(953, 1658), "$1$");
+ Circ(pt(943, 1198), "$2$");
+ Circ(pt(958, 2019), "$3$");
+ Circ(pt(940, 852), "$4$");
+
+ label(P(17.5), P(0,-4), "$\\rho$", b);
+ label(P(12.5, 0), P(0,-18), // added period
+ "\\textsc{Fig.~3} -- Central form factors; central dips and rises.", b);
+
+ label_angle(90);
+ label(P(0, 1.5), P(-18,0), "\\Code{FFCR} and/or \\Code{FFCI}", l);
+
+ deactivate(scr);
+
+ inset(scr, P(1.25,0.5), P(8, 4.375));
+
+ // now draw rest of page
+ label_angle(0);
+ label(pic(1156, 224), P(0,0),
+ "\\Code{R0 = 1.25},\\quad \\Code{A = 0.65},\\quad \\Code{FN1A = 1},\\quad \\Code{FN2A = 1}", r);
+
+ label(pic(1608,180), P(0,0), "\\framebox{p - Ag\\quad $135$~\\MeV}", t);
+
+ P lb(pic(1300, 300)), dY(pic(1300, 364) - lb);
+ Circ(lb, "$1$");
+ // Capitalized Standard
+ label(lb, P(12,0), "\\Code{HA = 0}, \\Code{PMA = 1}, $\\rho_{m_A} = \\bar{\\rho}_N = 15.04$\\quad (Standard form factor)", r);
+
+ lb += dY;
+ Circ(lb, "$2$");
+ label(lb, P(12,0), "\\Code{HA = 1}", r);
+
+ label(pic(1578, 354), "\\Ditto");
+ label(pic(1578, 420), "\\Ditto");
+
+ label(pic(1770, 354), "\\Ditto");
+ label(pic(1770, 420), "\\Ditto");
+
+ label(pic(1922, 354), "\\Ditto");
+ label(pic(1922, 420), "\\Ditto");
+
+ label(pic(2069, 354), "\\Ditto");
+ label(pic(2069, 420), "\\Ditto");
+
+ lb += dY;
+ Circ(lb, "$3$");
+ label(lb, P(12,0), "\\Code{HA =-1}", r);
+
+ lb += dY;
+ Circ(lb, "$4$");
+ label(lb, P(12,0), "\\Code{HA = 2}, \\Code{PMA = 0.7}, $\\rho_{m_A} = 0.7\\bar{\\rho}_N = 10.53$", r);
+
+ tikz_format();
+ end();
+}
diff --git a/29784-t/images/sources/028a.xp b/29784-t/images/sources/028a.xp
new file mode 100644
index 0000000..232182b
--- /dev/null
+++ b/29784-t/images/sources/028a.xp
@@ -0,0 +1,166 @@
+/* -*-ePiX-*- */
+#include "epix.h"
+using namespace ePiX;
+
+P sw(789,1952), ne(3000, 730);
+double XSZ(5.5), YSZ(1.2); // Cartesian dimensions
+
+P pt(double x, double y)
+{
+ return P(XSZ*(x-sw.x1())/(ne.x1() - sw.x1()),
+ YSZ*(y-sw.x2())/(ne.x2() - sw.x2()));
+}
+
+P Bl(380, 2200), Tr(3180, 100);
+P pic(double x, double y)
+{
+ return P(8*(x-Bl.x1())/(Tr.x1() - Bl.x1()),
+ 6*(y-Bl.x2())/(Tr.x2() - Bl.x2()));
+}
+
+void Circ(const P& loc, const std::string& msg)
+{
+ dot_size(16);
+ circ(loc);
+ label(loc, msg);
+}
+
+void key(const P& loc, const std::string& msg)
+{
+ P stem(P(0.5, 0.25));
+ double scale(5 - 2*loc.x1()); // to put labels at 4.5 = (5+stem.x1())/2
+
+ P elbow(loc + scale*stem), tail(elbow+P(0.25));
+ line(elbow, tail);
+ base(White(), 2.5);
+ line(elbow, tail);
+ base(Neutral(), 0);
+ arrow(elbow, elbow-scale*0.99*stem);
+
+ Circ(tail, msg);
+}
+
+int main()
+{
+ picture(P(0,0), P(8,6), "8 x 6in");
+
+ begin();
+ degrees();
+
+ screen scr(P(0,0), P(XSZ, YSZ));
+ activate(scr);
+
+ grid(P(0,0), P(6, 1.2), 6, 3);
+ bold();
+ grid();
+
+ axis Ax(P(0,0), P(5,0), 5, P(0,-4), b);
+ Ax.subdivide(2).tick_ratio(1).align(t).draw();
+
+ axis Ay(P(0,0), P(0,1), 5, P(-4,0), l);
+ Ay.align(r).draw();
+
+ axis Ax2(P(0,YSZ), P(5,YSZ), 5);
+ Ax2.subdivide(2).tick_ratio(1).align(b).draw_ticks();
+
+ axis Ay2(P(XSZ,0), P(XSZ,YSZ), 6);
+ Ay2.align(l).draw_ticks();
+
+ std::vector<P> data1, data2, data3;
+ data1.push_back(pt(791, 931));
+ data1.push_back(pt(875, 931));
+ data1.push_back(pt(975, 931));
+ data1.push_back(pt(1075, 931));
+ data1.push_back(pt(1175, 931));
+ data1.push_back(pt(1275, 932));
+ data1.push_back(pt(1375, 935));
+ data1.push_back(pt(1475, 936));
+ data1.push_back(pt(1575, 941));
+ data1.push_back(pt(1675, 962));
+ data1.push_back(pt(1775, 1013));
+ data1.push_back(pt(1875, 1105));
+ data1.push_back(pt(1975, 1245));
+ data1.push_back(pt(2075, 1427)); // first common point
+
+ data1.push_back(pt(2175, 1603));
+ data1.push_back(pt(2275, 1743));
+ data1.push_back(pt(2375, 1837));
+ data1.push_back(pt(2475, 1896));
+ data1.push_back(pt(2575, 1927));
+ data1.push_back(pt(2675, 1940));
+ data1.push_back(pt(2775, 1947));
+ data1.push_back(pt(2875, 1948));
+ data1.push_back(pt(2990, 1948));
+
+ data2.push_back(pt(1275, 932));
+ data2.push_back(pt(1375, 935));
+ data2.push_back(pt(1475, 939));
+ data2.push_back(pt(1575, 956));
+ data2.push_back(pt(1675, 982));
+ data2.push_back(pt(1775, 1031));
+ data2.push_back(pt(1875, 1120));
+ data2.push_back(pt(1975, 1250));
+ data2.push_back(pt(2075, 1428));
+ data2.push_back(pt(2175, 1603));
+
+ data3.push_back(pt(791, 931));
+ data3.push_back(pt(875, 932));
+ data3.push_back(pt(975, 933));
+ data3.push_back(pt(1075, 937));
+ data3.push_back(pt(1175, 944));
+ data3.push_back(pt(1275, 954));
+ data3.push_back(pt(1375, 967));
+ data3.push_back(pt(1475, 984));
+ data3.push_back(pt(1575, 1006));
+ data3.push_back(pt(1675, 1037));
+ data3.push_back(pt(1775, 1084));
+ data3.push_back(pt(1875, 1159));
+ data3.push_back(pt(1975, 1268));
+ data3.push_back(pt(2075, 1428));
+
+ spline(data1, 12);
+ spline(data2, 12);
+ spline(data3, 12);
+
+ plain();
+ key(pt(1678, 962), "$1$");
+ key(pt(1714, 997), "$2$");
+ key(pt(1729, 1060), "$3$");
+ crop();
+
+ label(P(2.5), P(0,-4), "$\\rho$", b);
+ label(P(2.75, 0), P(0,-18), // added period
+ "\\textsc{Fig.~4} -- Central form factors, knee variation.", b);
+
+ label_angle(90);
+ label(P(0, 0.6), P(-24,0), "\\Code{FFCR} and/or \\Code{FFCI}", l);
+ deactivate(scr);
+
+ inset(scr, P(1.125,0.5), P(8, 4.25));
+
+ // now draw rest of page
+ label_angle(0);
+ label(pic(1292, 244), P(0,0),
+ "\\Code{R0 = 1.20},\\quad \\Code{A = 0.52},\\quad \\Code{FN2A = 1},\\quad \\Code{PMA = 1},\\quad $\\rho_{m_A} = \\bar{\\rho}_N = 3.24$", r);
+
+ label(pic(1916, 204), P(0,0), "\\framebox{p - Cu\\quad $9.75$~\\MeV}", t);
+
+ P lb(pic(1584, 320)), dY(pic(1584, 384) - lb);
+ Circ(lb, "$1$");// labels uncircled in original
+ label(lb, P(12,0), "\\Code{FN1A = 0.01}", r);
+ label(lb, P(100,0), "\\Code{HA = 0}", r);
+
+ lb += dY;
+ Circ(lb, "$2$");
+ label(lb, P(12,0), "\\Code{FN1A = 1}", r);
+ label(lb, P(100,0), "\\Code{HA = 0}", r);
+ label(lb, P(172,0), "(Standard form factor)", r);
+
+ lb += dY;
+ Circ(lb, "$3$");
+ label(lb, P(12,0), "\\Code{FN1A = 3}", r);
+ label(lb, P(100,0), "\\Code{HA = 0.046}", r);
+
+ tikz_format();
+ end();
+}
diff --git a/29784-t/images/sources/030a.xp b/29784-t/images/sources/030a.xp
new file mode 100644
index 0000000..9bc4912
--- /dev/null
+++ b/29784-t/images/sources/030a.xp
@@ -0,0 +1,185 @@
+/* -*-ePiX-*- */
+#include "epix.h"
+using namespace ePiX;
+
+P sw(776, 1790), ne(2999, 778);
+double XSZ(5.5), YSZ(0.4); // Cartesian dimensions
+
+P pt(double x, double y)
+{
+ return P(XSZ*(x-sw.x1())/(ne.x1() - sw.x1()),
+ YSZ*(y-sw.x2())/(ne.x2() - sw.x2()));
+}
+
+P Bl(380, 2240), Tr(3180, 140);
+P pic(double x, double y)
+{
+ return P(8*(x-Bl.x1())/(Tr.x1() - Bl.x1()),
+ 6*(y-Bl.x2())/(Tr.x2() - Bl.x2()));
+}
+
+void Circ(const P& loc, const std::string& msg)
+{
+ dot_size(16);
+ circ(loc);
+ label(loc, msg);
+}
+
+void key(const P& loc, const std::string& msg, bool extend=false)
+{
+ P stem(P(0.5, 0.035));
+ double scale(8.5 - 2*loc.x1()); // to put labels at 4.5 = (8.5+stem.x1())/2
+
+ P elbow(loc + scale*stem);
+ P tail(extend ? elbow+P(0.45) : elbow+P(0.25));
+ line(elbow, tail);
+ base(White(), 2.5);
+ line(elbow, tail);
+ base(Neutral(), 0);
+ arrow(elbow, elbow-scale*0.99*stem);
+
+ Circ(tail, msg);
+}
+
+int main()
+{
+ picture(P(0,0), P(8,6), "8 x 6in");
+
+ begin();
+ degrees();
+
+ screen scr(P(0,0), P(XSZ, YSZ));
+ activate(scr);
+
+ grid(P(0,0), P(6, 0.4), 6, 4);
+ bold();
+ grid();
+
+ axis Ax(P(0,0), P(5,0), 5, P(0,-4), b);
+ Ax.subdivide(2).tick_ratio(1).align(t).draw();
+
+ axis Ay(P(0,0), P(0,YSZ), 4, P(-4,0), l);
+ Ay.subdivide(2).tick_ratio(1).align(r).unmark(0.4).draw();
+
+ axis Ax2(P(0,YSZ), P(5,YSZ), 5);
+ Ax2.subdivide(2).tick_ratio(1).align(b).draw_ticks();
+
+ axis Ay2(P(XSZ,0), P(XSZ,YSZ), 4);
+ Ay2.subdivide(2).tick_ratio(1).align(l).draw_ticks();
+
+ std::vector<P> data1, data2, data3, data4;
+ data1.push_back(pt(775, 1768));
+ data1.push_back(pt(875, 1790));
+ data1.push_back(pt(975, 1790));
+ data1.push_back(pt(1075, 1788));
+ data1.push_back(pt(1175, 1783));
+ data1.push_back(pt(1275, 1776));
+ data1.push_back(pt(1375, 1761));
+ data1.push_back(pt(1475, 1737));
+ data1.push_back(pt(1575, 1699));
+ data1.push_back(pt(1675, 1629));
+ data1.push_back(pt(1775, 1523));
+ data1.push_back(pt(1875, 1391));
+ data1.push_back(pt(1975, 1270));
+
+ data1.push_back(pt(2025, 1243)); // final common point
+ data1.push_back(pt(2075, 1239));
+ data1.push_back(pt(2175, 1349));
+ data1.push_back(pt(2275, 1502));
+ data1.push_back(pt(2375, 1621));
+ data1.push_back(pt(2475, 1687));
+ data1.push_back(pt(2575, 1732));
+ data1.push_back(pt(2675, 1762));
+ data1.push_back(pt(2775, 1777));
+ data1.push_back(pt(2875, 1783));
+ data1.push_back(pt(2975, 1787));
+
+ data2.push_back(pt(2025, 1243)); // final common point
+ data2.push_back(pt(2075, 1237));
+ data2.push_back(pt(2175, 1317));
+ data2.push_back(pt(2275, 1466));
+ data2.push_back(pt(2375, 1620));
+ data2.push_back(pt(2475, 1698));
+ data2.push_back(pt(2575, 1745));
+ data2.push_back(pt(2675, 1774));
+ data2.push_back(pt(2775, 1784));
+ data2.push_back(pt(2875, 1786));
+ data2.push_back(pt(2975, 1787));
+
+ data3.push_back(pt(2025, 1243)); // final common point
+ data3.push_back(pt(2075, 1235));
+ data3.push_back(pt(2175, 1268));
+ data3.push_back(pt(2275, 1412));
+ data3.push_back(pt(2375, 1610));
+ data3.push_back(pt(2475, 1721));
+ data3.push_back(pt(2575, 1769));
+ data3.push_back(pt(2675, 1787));
+ data3.push_back(pt(2775, 1787));
+
+ data4.push_back(pt(2025, 1243)); // final common point
+ data4.push_back(pt(2050, 1236));
+ data4.push_back(pt(2075, 1229));
+ data4.push_back(pt(2100, 1208));
+ data4.push_back(pt(2125, 1164));
+ data4.push_back(pt(2150, 1111));
+ data4.push_back(pt(2175, 1048));
+ data4.push_back(pt(2200, 1007));
+ data4.push_back(pt(2225, 1025));
+ data4.push_back(pt(2250, 1102));
+ data4.push_back(pt(2275, 1328));
+ data4.push_back(pt(2325, 1669));
+ data4.push_back(pt(2375, 1763));
+ data4.push_back(pt(2475, 1787));
+ data4.push_back(pt(2575, 1787));
+ data4.push_back(pt(2675, 1787));
+
+ spline(data1, 12);
+ spline(data2, 12);
+ spline(data3, 12);
+ spline(data4, 12);
+
+ plain();
+ key(pt(2190, 1370), "$1$", true);
+ key(pt(2180, 1326), "$2$");
+ key(pt(2178, 1272), "$3$", true);
+ key(pt(2256, 1174), "$4$");
+ crop();
+
+ label(P(3.5), P(0,-4), "$\\rho$", b);
+ label(P(2.75, 0), P(0,-18), // label set on two lines in orig; added period
+ "\\textsc{Fig.~5} -- Spin-orbit form factor (derivative form). Tail variation.", b);
+
+ label_angle(90);
+ label(P(0, 0.2), P(-24,0), "\\Code{FFSR} and/or \\Code{FFSI}", l);
+ deactivate(scr);
+
+ // inset(scr, P(1.125,0.5), P(8, 4.25));
+ inset(scr, P(0.75,0.5), P(8, 4.25));
+
+ // now draw rest of page
+ label_angle(0);
+ label(pic(1100, 312), P(0,0),
+ "\\Code{R0 = 1.2},\\quad \\Code{A = 0.52},\\quad \\Code{FN1A = 3},\\quad \\Code{PMA = 1},\\quad $\\rho_{m_A} = \\bar{\\rho}_N = 3.24$", r);
+
+ label(pic(1780, 260), P(0,0), "\\framebox{p - Cu\\quad $9.75$~\\MeV}", t);
+
+ P lb(pic(1244, 372)), dY(pic(1244, 440) - lb);
+ Circ(lb, "$1$");
+ label(lb, P(12,0), "\\Code{FN2A = 0.01}", r);
+
+ lb += dY;
+ Circ(lb, "$2$");
+ // Capitalized Standard
+ label(lb, P(12,0), "\\Code{FN2A = 1}\\qquad(Standard derivative form factor)", r);
+
+ lb += dY;
+ Circ(lb, "$3$");
+ label(lb, P(12,0), "\\Code{FN2A = 3}", r);
+
+ lb += dY;
+ Circ(lb, "$4$");
+ label(lb, P(12,0), "\\Code{FN2A = 10}", r);
+
+ tikz_format();
+ end();
+}
diff --git a/29784-t/images/sources/031a.xp b/29784-t/images/sources/031a.xp
new file mode 100644
index 0000000..715ace1
--- /dev/null
+++ b/29784-t/images/sources/031a.xp
@@ -0,0 +1,188 @@
+/* -*-ePiX-*- */
+#include "epix.h"
+using namespace ePiX;
+
+P sw(680, 1382), ne(2988, 624);
+double XSZ(25), YSZ(0.03); // Cartesian dimensions
+
+P pt(double x, double y)
+{
+ return P(XSZ*(x-sw.x1())/(ne.x1() - sw.x1()),
+ YSZ*(y-sw.x2())/(ne.x2() - sw.x2()));
+}
+
+P Bl(380, 2180), Tr(3180, 80);
+P pic(double x, double y)
+{
+ return P(8*(x-Bl.x1())/(Tr.x1() - Bl.x1()),
+ 6*(y-Bl.x2())/(Tr.x2() - Bl.x2()));
+}
+
+void Circ(const P& loc, const std::string& msg)
+{
+ dot_size(16);
+ circ(loc);
+ label(loc, msg);
+}
+
+
+int main()
+{
+ picture(P(0,0), P(8,6), "8 x 6in");
+
+ begin();
+ degrees();
+
+ screen scr(P(0,-YSZ), P(XSZ, YSZ));
+ activate(scr);
+
+ grid(P(0,-YSZ), P(30, YSZ), 6, 6);
+ bold();
+ grid();
+
+ axis Ax(P(0,-YSZ), P(30,-YSZ), 6, P(0,-4), b);
+ Ax.subdivide(5).unmark(30).tick_ratio(1).align(t).draw();
+
+ axis Ay(P(0,-YSZ), P(0,YSZ), 6, P(-4,0), l);
+ Ay.subdivide(2).tick_ratio(1).align(r).draw();
+
+ axis Ax2(P(0,YSZ), P(30,YSZ), 6);
+ Ax2.subdivide(5).tick_ratio(1).align(b).draw_ticks();
+
+ axis Ay2(P(XSZ,-YSZ), P(XSZ,YSZ), 6);
+ Ay2.subdivide(2).tick_ratio(1).align(l).draw_ticks();
+
+ std::vector<P> data1, data2, data3, data4;
+ spline(pt(680, 1356), pt(690, 1369), pt(700, 1377), pt(710, 1379));
+
+ // data1.push_back(pt(680, 1356));
+ // data1.push_back(pt(700, 1375));
+ data1.push_back(pt(710, 1379));
+ data1.push_back(pt(725, 1379));
+ data1.push_back(pt(775, 1379));
+ data1.push_back(pt(875, 1380));
+ data1.push_back(pt(975, 1379));
+ data1.push_back(pt(1075, 1376));
+ data1.push_back(pt(1175, 1375));
+ data1.push_back(pt(1275, 1372));
+ data1.push_back(pt(1375, 1366));
+ data1.push_back(pt(1475, 1355));
+ data1.push_back(pt(1575, 1340));
+ data1.push_back(pt(1675, 1316));
+ data1.push_back(pt(1733, 1296)); // hits data4
+ data1.push_back(pt(1775, 1282));
+ data1.push_back(pt(1875, 1238));
+ data1.push_back(pt(1975, 1185));
+ data1.push_back(pt(2075, 1135));
+ data1.push_back(pt(2175, 1122));
+ data1.push_back(pt(2275, 1154)); // first common point
+
+ data1.push_back(pt(2375, 1215));
+ data1.push_back(pt(2475, 1273));
+ data1.push_back(pt(2575, 1316));
+ data1.push_back(pt(2675, 1344));
+ data1.push_back(pt(2775, 1362));
+ data1.push_back(pt(2875, 1371));
+ data1.push_back(pt(2983, 1376));
+
+ // data2.push_back(pt(680, 654));
+ // data2.push_back(pt(690, 681));
+ // data2.push_back(pt(725, 718));
+ spline(pt(680, 654), pt(690, 681), pt(725, 718), pt(750, 730));
+ data2.push_back(pt(750, 730));
+ data2.push_back(pt(775, 743));
+ data2.push_back(pt(875, 790));
+ data2.push_back(pt(975, 830));
+ data2.push_back(pt(1075, 870));
+ data2.push_back(pt(1175, 914));
+ data2.push_back(pt(1275, 958));
+ data2.push_back(pt(1375, 995));
+ data2.push_back(pt(1475, 1032));
+ data2.push_back(pt(1575, 1064));
+ data2.push_back(pt(1675, 1083));
+ data2.push_back(pt(1775, 1096));
+ data2.push_back(pt(1875, 1099));
+ data2.push_back(pt(1975, 1096));
+ data2.push_back(pt(2075, 1100));
+ data2.push_back(pt(2175, 1115));
+ data2.push_back(pt(2275, 1153)); // first common point
+ data2.push_back(pt(2375, 1215));
+
+ data3.push_back(pt(680, 2054));
+ data3.push_back(pt(775, 2010));
+ data3.push_back(pt(875, 1965));
+ data3.push_back(pt(975, 1921));
+ data3.push_back(pt(1075, 1876));
+ data3.push_back(pt(1175, 1828));
+ data3.push_back(pt(1275, 1781));
+ data3.push_back(pt(1375, 1732));
+ data3.push_back(pt(1475, 1678));
+ data3.push_back(pt(1575, 1618));
+ data3.push_back(pt(1675, 1550));
+ data3.push_back(pt(1775, 1470));
+ data3.push_back(pt(1875, 1371));
+ data3.push_back(pt(1975, 1262));
+ data3.push_back(pt(2075, 1171));
+ data3.push_back(pt(2175, 1126));
+ data3.push_back(pt(2225, 1133));
+ data3.push_back(pt(2275, 1154)); // first common point
+
+ data4.push_back(pt(1451, 624));
+ data4.push_back(pt(1475, 679));
+ data4.push_back(pt(1575, 929));
+ data4.push_back(pt(1675, 1164));
+ data4.push_back(pt(1733, 1296));
+
+ spline(data1, 4);
+ spline(data2, 4);
+ spline(data3, 4);
+ spline(data4, 4);
+
+ plain();
+ Circ(pt(1428, 1320), "$1$");
+ Circ(pt(1356, 944), "$2$");
+ Circ(pt(1376, 1688), "$3$");
+ line(pt(1704, 1175), pt(1741, 1261));
+ dart(pt(1741, 1261), pt(1806, 1236));
+ Circ(pt(1716, 1168), "$4$");
+ crop();
+
+ label(P(12), P(0,-4), "$\\rho$", b);
+ label(P(12.5, -YSZ), P(0,-18), // Added period
+ "{\\small\\textsc{Fig.~6} -- Spin-orbit form factors (derivative form). Effect of dips and rises in central form factor.}", b);
+
+ label_angle(90);
+ label(P(0, 0), P(-36,0), "\\Code{FFSR} and/or \\Code{FFSI}", l);
+ deactivate(scr);
+
+ inset(scr, P(1.125,0.5), P(8, 4.25));
+
+ // now draw rest of page
+ label_angle(0);
+ label(pic(1088, 268), P(0,0),
+ "\\Code{R0 = 1.25},\\quad \\Code{A = 0.65},\\quad \\Code{FN1A = 1},\\quad \\Code{FN2A = 1}", r);
+
+ label(pic(1624, 208), P(0,0), "\\framebox{p - Ag\\quad $135$~\\MeV}", t);
+
+ P lb(pic(1216, 340)), dY(pic(1216, 408) - lb);
+ Circ(lb, "$1$");
+ // Capitalized Standard
+ label(lb, P(12,0), "\\Code{HA = 0},\\quad\\Code{PMA = 1},\\qquad $\\rho_{m_A} = \\bar{\\rho}_N = 15.04$\\quad (Standard derivative form factor)", r);
+
+ lb += dY;
+ Circ(lb, "$2$");
+ label(lb, P(12,0), "\\Code{HA = 1},", r);
+ label(lb, P(72,0), "\\Ditto\\hspace*{1in}\\Ditto\\qquad\\Ditto\\qquad\\Ditto", r);
+
+ lb += dY;
+ Circ(lb, "$3$");
+ label(lb, P(12,0), "\\Code{HA = -1},", r);
+ label(lb, P(72,0), "\\Ditto\\hspace*{1in}\\Ditto\\qquad\\Ditto\\qquad\\Ditto", r);
+
+ lb += dY;
+ Circ(lb, "$4$");
+ label(lb, P(12,0), "\\Code{HA = 2},\\quad\\Code{PMA = 0.7},\\quad $\\rho_{m_A} = 0.7\\ \\bar{\\rho}_N = 10.53$", r);
+
+ tikz_format();
+ end();
+}
diff --git a/29784-t/images/sources/032a.xp b/29784-t/images/sources/032a.xp
new file mode 100644
index 0000000..1364b3f
--- /dev/null
+++ b/29784-t/images/sources/032a.xp
@@ -0,0 +1,177 @@
+/* -*-ePiX-*- */
+#include "epix.h"
+using namespace ePiX;
+
+P sw(758, 1718), ne(2976, 960);
+double XSZ(5.5), YSZ(0.3); // Cartesian dimensions
+
+P pt(double x, double y)
+{
+ return P(XSZ*(x-sw.x1())/(ne.x1() - sw.x1()),
+ YSZ*(y-sw.x2())/(ne.x2() - sw.x2()));
+}
+
+P Bl(380, 2180), Tr(3180, 80);
+P pic(double x, double y)
+{
+ return P(8*(x-Bl.x1())/(Tr.x1() - Bl.x1()),
+ 6*(y-Bl.x2())/(Tr.x2() - Bl.x2()));
+}
+
+void Circ(const P& loc, const std::string& msg)
+{
+ dot_size(16);
+ circ(loc);
+ label(loc, msg);
+}
+
+void key(const P& loc, const std::string& msg)
+{
+ P stem(P(0.5, -0.05));
+ double scale(2 - loc.x1()); // to put labels at 2.25 = (4+stem.x1())/2
+
+ P elbow(loc + scale*stem), tail(elbow-P(0.25));
+ line(elbow, tail);
+ base(White(), 2.5);
+ line(elbow, tail);
+ base(Neutral(), 0);
+ arrow(elbow, elbow-scale*0.99*stem);
+
+ Circ(tail, msg);
+}
+
+int main()
+{
+ picture(P(0,0), P(8,6), "8 x 6in");
+
+ begin();
+ degrees();
+
+ screen scr(P(0,0), P(XSZ, YSZ));
+ activate(scr);
+
+ grid(P(0,0), P(6, YSZ), 6, 3);
+ bold();
+ grid();
+
+ axis Ax(P(0,0), P(5,0), 5, P(0,-4), b);
+ Ax.subdivide(2).tick_ratio(1).align(t).draw();
+
+ axis Ay(P(0,0), P(0,YSZ), 3, P(-4,0), l);
+ Ay.align(r).draw();
+
+ axis Ax2(P(0,YSZ), P(5,YSZ), 5);
+ Ax2.subdivide(2).tick_ratio(1).align(b).draw_ticks();
+
+ // axis Ay2(P(XSZ,0), P(XSZ,YSZ), 3);
+ // Ay2.align(l).draw_ticks();
+
+ std::vector<P> data1, data2, data3;
+ data1.push_back(pt(758, 1718));
+ data1.push_back(pt(1275, 1718));
+ data1.push_back(pt(1375, 1712));
+ data1.push_back(pt(1475, 1687));
+ data1.push_back(pt(1575, 1645));
+ data1.push_back(pt(1675, 1559));
+ data1.push_back(pt(1775, 1411));
+ data1.push_back(pt(1875, 1249));
+ data1.push_back(pt(1975, 1149));
+ data1.push_back(pt(2075, 1158));
+ data1.push_back(pt(2175, 1276)); // first common point
+
+ data1.push_back(pt(2275, 1439));
+ data1.push_back(pt(2375, 1556));
+ data1.push_back(pt(2475, 1634));
+ data1.push_back(pt(2575, 1682));
+ data1.push_back(pt(2675, 1703));
+ data1.push_back(pt(2775, 1710));
+ data1.push_back(pt(2875, 1715));
+ data1.push_back(pt(2975, 1715));
+
+ data2.push_back(pt(758, 1718));
+ data2.push_back(pt(975, 1715));
+ data2.push_back(pt(1075, 1712));
+ data2.push_back(pt(1175, 1708));
+ data2.push_back(pt(1275, 1697));
+ data2.push_back(pt(1375, 1683));
+ data2.push_back(pt(1475, 1654));
+ data2.push_back(pt(1575, 1615));
+ data2.push_back(pt(1675, 1544));
+ data2.push_back(pt(1725, 1494));
+ data2.push_back(pt(1775, 1438));
+ data2.push_back(pt(1825, 1369));
+ data2.push_back(pt(1875, 1296));
+ data2.push_back(pt(1890, 1275));
+ data2.push_back(pt(1925, 1234));
+ data2.push_back(pt(1975, 1187));
+ data2.push_back(pt(2075, 1168));
+ data2.push_back(pt(2175, 1277)); // first common point
+
+ data3.push_back(pt(758, 1658));
+ data3.push_back(pt(775, 1657));
+ data3.push_back(pt(875, 1652));
+ data3.push_back(pt(975, 1649));
+ data3.push_back(pt(1075, 1644));
+ data3.push_back(pt(1175, 1642));
+ data3.push_back(pt(1275, 1638));
+ data3.push_back(pt(1375, 1628));
+ data3.push_back(pt(1475, 1609));
+ data3.push_back(pt(1575, 1578));
+ data3.push_back(pt(1675, 1534));
+ data3.push_back(pt(1725, 1502));
+ data3.push_back(pt(1775, 1460));
+ data3.push_back(pt(1825, 1412));
+ data3.push_back(pt(1875, 1357));
+ data3.push_back(pt(1894, 1336));
+ data3.push_back(pt(1975, 1236));
+ data3.push_back(pt(2025, 1180));
+ data3.push_back(pt(2050, 1172));
+ data3.push_back(pt(2075, 1173));
+ data3.push_back(pt(2125, 1204));
+ data3.push_back(pt(2175, 1280)); // first common point
+
+ spline(data1, 6);
+ spline(data2, 6);
+ spline(data3, 6);
+
+ plain();
+ key(pt(1901, 1209), "$1$");
+ key(pt(1890, 1275), "$2$");
+ key(pt(1894, 1336), "$3$");
+ crop();
+
+ label(P(3.5), P(0,-4), "$\\rho$", b);
+ label(P(2.75, 0), P(0,-18),
+ "\\textsc{Fig.~7} -- Spin-orbit form factor (derivative form). Knee variation.", b);
+
+ label_angle(90);
+ label(P(0, 0.15), P(-24,0), "\\Code{FFSR} and/or \\Code{FFSI}", l);
+ deactivate(scr);
+
+ inset(scr, P(1.125,1.5), P(8, 4.25));
+
+ // now draw rest of page
+ label_angle(0);
+ label(pic(1238, 376), P(0,0),
+ "\\Code{R0 = 1.20},\\quad \\Code{A = 0.52},\\quad \\Code{FN2A = 1},\\quad \\Code{PMA = 1},\\quad $\\rho_{m_A} = 1$, $\\bar{\\rho}_N = 3.24$", r);
+
+ label(pic(1760, 278), P(0,0), "\\framebox{p - Cu\\quad $9.75$~\\MeV}", t);
+
+ P lb(pic(1624, 462)), dY(pic(1624, 528) - lb);
+ Circ(lb, "$1$");
+ label(lb, P(12,0), "\\Code{FN1A = 0.01},", r);
+ label(lb, P(96,0), "\\Code{HA = 0}", r);
+
+ lb += dY;
+ Circ(lb, "$2$");
+ label(lb, P(12,0), "\\Code{FN1A = 1},", r);
+ label(lb, P(96,0), "\\Code{HA = 0}\\qquad(Standard derivative form factor)", r);
+
+ lb += dY;
+ Circ(lb, "$3$");
+ label(lb, P(12,0), "\\Code{FN1A = 3}", r);
+ label(lb, P(96,0), "\\Code{HA = 0.046}", r);
+
+ tikz_format();
+ end();
+}
diff --git a/29784-t/images/sources/057a.xp b/29784-t/images/sources/057a.xp
new file mode 100644
index 0000000..c616953
--- /dev/null
+++ b/29784-t/images/sources/057a.xp
@@ -0,0 +1,69 @@
+/* -*-ePiX-*- */
+#include "epix.h"
+using namespace ePiX;
+const double dx(0.25);
+
+double row0(-1.25), bot(-0.5), row1(0), row2(1), sep(1.75), row3(2.25);
+
+int main()
+{
+ picture(P(0,-1.5), P(36,2.5), "6 x 0.75in");
+
+ begin();
+ arrow_inset(0.25);
+
+ line(P(0, sep), P(xmax(), sep));
+ line(P(0, sep+0.05), P(xmax(), sep+0.05));
+
+ line(P(xmax()-1, bot), P(xmax()-1, ymax()));
+ line(P(xmax(), bot), P(xmax(), ymax()));
+
+ for (int i=6; i <= 21; ++i)
+ line(P(i, bot), P(i, ymax()));
+
+ font_size("footnotesize");
+ label(P(0,row1), P( 2,0), "Floating nos.", r);
+ label(P(0,row2), P( 2,0), "Integers", r);
+ label(P(6,row3), P(-2,0), "Columns.", l);
+
+ for (int i=1; i <= 15; ++i)
+ {
+ std::ostringstream buf;
+ buf << i;
+ label(P(i+5.5, row3), buf.str());
+
+ if (i <= 5)
+ label(P(i+5.5, row2), "x");
+
+ else if (i <= 13)
+ label(P(i+3.5, row1), "x");
+
+ else
+ label(P(i+5.5, row1), "x");
+ }
+
+ label(P(6.5), "$±$");
+ label(P(7.5), "$0$");
+ label(P(8.5), P(0,-2), "$.$");
+ label(P(18.5), "$±$");
+ label(P(xmax()-0.5, row3), "$72$");
+
+ base(White(), 2.5);
+ line(P(11+dx,row2), P(xmax()-dx,row2));
+ line(P(21+dx,row1), P(xmax()-dx,row1));
+
+ base(Neutral(), 0);
+ aarrow(P(11+dx,row2), P(xmax()-dx,row2), 0.5);
+ aarrow(P(21+dx,row1), P(xmax()-dx,row1), 0.5);
+
+ masklabel(P(0.5*(xmax()+11), row2), "any Hollerith character");
+ masklabel(P(0.5*(xmax()+21), row1), "any Hollerith character");
+
+ label(P(19.5, row0),
+ "$\\underbrace{\\rule{0.5in}{0pt}}_{\\text{exponent}}$");
+
+ label(P(13, row0),
+ "$\\underbrace{\\rule{1.333in}{0pt}}_{\\text{fractional part}}$");
+ tikz_format();
+ end();
+}