gzz-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Gzz-commits] manuscripts/Paper visper.mp


From: Tuomas J. Lukka
Subject: [Gzz-commits] manuscripts/Paper visper.mp
Date: Sat, 29 Mar 2003 06:42:18 -0500

CVSROOT:        /cvsroot/gzz
Module name:    manuscripts
Changes by:     Tuomas J. Lukka <address@hidden>        03/03/29 06:42:17

Modified files:
        Paper          : visper.mp 

Log message:
        Matching image first take

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/gzz/manuscripts/Paper/visper.mp.diff?tr1=1.1&tr2=1.2&r1=text&r2=text

Patches:
Index: manuscripts/Paper/visper.mp
diff -u manuscripts/Paper/visper.mp:1.1 manuscripts/Paper/visper.mp:1.2
--- manuscripts/Paper/visper.mp:1.1     Sat Mar 29 06:19:17 2003
+++ manuscripts/Paper/visper.mp Sat Mar 29 06:42:16 2003
@@ -21,15 +21,18 @@
 enddef;
 
 def basic =
-    addto currentpicture also eye scaled 20;
-    yoffs := -50;
+    addto currentpicture also eye scaled 20 shifted (-10,0);
+    pair eyeright;
+    eyeright:= (10,0);
+    yoffs := -80;
+    ydist := -50;
 
     boxit.fex("Feature extraction" infont defaultfont);
     boxit.fv("Feature vector" infont defaultfont);
-    boxit.ma("Matcher" infont defaultfont);
+    boxit.ma("Matching" infont defaultfont);
 
     picture p;
-    p := "Memorized textures" infont defaultfont;
+    p := "Memorized vectors" infont defaultfont;
     pair v; 
     v := (urcorner(p) - ulcorner(p));
     for i = 0 upto 7:
@@ -42,8 +45,8 @@
 
     xpart(mem.c) = xpart(fex.c) = xpart(fv.c) = 0;
     ypart(fex.c) = yoffs;
-    ypart(fv.c) = 2 * yoffs;
-    ypart(mem.c) = 3.3 * yoffs;
+    ypart(fv.c) = yoffs + ydist;
+    ypart(mem.c) = yoffs + 2.3 * ydist;
     fv.w-fv.e = fex.w-fex.e;
 
     fixpos(fex, fv, mem);
@@ -62,6 +65,20 @@
 
     drawunboxed(mem);
 
+    drawarrow eyeright{right} .. tension 1 .. fex.n{down};
+    drawarrow fex.s{down} -- .3[fex.s, fv.n];
+
+    drawarrow ma.w{left} .. fv.s{up} dashed evenly;
+    drawarrow ma.w{left} .. (mem.n+(0,-5)){down} dashed evenly;
+
+    for i = 1 upto 9:
+       addto currentpicture doublepath unitsquare shifted (-.5,0)
+           yscaled uniformdeviate(35)
+           xscaled (abs(fv.w-fv.e)/11)
+           shifted ((i/10.0)[fv.ne, fv.nw])
+           withpen pencircle scaled .5pt
+           ;
+    endfor;
 
 enddef;
 




reply via email to

[Prev in Thread] Current Thread [Next in Thread]