From 9c24f48c378d578a87f6647d62877a19febba89d Mon Sep 17 00:00:00 2001
From: Ian Jauslin <ian@jauslin.org>
Date: Sat, 3 Oct 2020 00:51:21 -0400
Subject: As presented at the AMS Fall Sectional Meeting on 2020-10-03

---
 figs/libs/dimer.sty | 33 +++++++++++++++++++++++++++++++++
 1 file changed, 33 insertions(+)
 create mode 100644 figs/libs/dimer.sty

(limited to 'figs/libs/dimer.sty')

diff --git a/figs/libs/dimer.sty b/figs/libs/dimer.sty
new file mode 100644
index 0000000..0f087ef
--- /dev/null
+++ b/figs/libs/dimer.sty
@@ -0,0 +1,33 @@
+% square lattice (width #1, height #2, origin #3)
+\def\grid#1#2#3{
+  \foreach\i in {0,...,#2}{
+    \draw#3++(0,\i)--++(#1,0);
+  }
+  \foreach\i in {0,...,#1}{
+    \draw#3++(\i,0)--++(0,#2);
+  }
+}
+
+% dimer (bottom-left vertex #1, vertical or horizontal #2)
+\def\dimer#1#2{
+  \if#2h
+    \draw[line width=5pt]#1--++(1,0);
+    \fill#1circle(7pt);
+    \fill#1++(1,0)circle(7pt);
+  \else
+    \draw[line width=5pt]#1--++(0,1);
+    \fill#1circle(7pt);
+    \fill#1++(0,1)circle(7pt);
+  \fi
+}
+
+% interactions (bottom-left vertex #1, vertical or horizontal #2)
+\def\interaction#1#2{
+  \if#2h
+    \draw[line width=5pt, color=white]#1--++(1,0);
+    \draw[line width=4pt, decorate, decoration={snake}, color=red]#1--++(1,0);
+  \else
+    \draw[line width=5pt, color=white]#1--++(0,1);
+    \draw[line width=4pt, decorate, decoration={snake}, color=red]#1--++(0,1);
+  \fi
+}
-- 
cgit v1.2.3-70-g09d2

