featpost (7feb12)

git-svn-id: svn://tug.org/texlive/trunk@25331 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 1 insertions, 112 deletions

diff --git a/Master/texmf-dist/metapost/featpost/featpost3Dplus2D.mp b/Master/texmf-dist/metapost/featpost/featpost3Dplus2D.mp
index 06b7b76ca0c..8ed0ab46a18 100644
--- a/Master/texmf-dist/metapost/featpost/featpost3Dplus2D.mp
+++ b/Master/texmf-dist/metapost/featpost/featpost3Dplus2D.mp
@@ -23,7 +23,7 @@
 % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the 
 % GNU General Public License for more details.
 
-    message "Preloading FeatPost macros, version 0.8.3";
+    message "Preloading FeatPost macros, version 0.8.4";
 
     warningcheck := 0;
     background := 0.987white;
@@ -4198,115 +4198,4 @@
  endgroup; 
 enddef;
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-%%%% Part VI (strictly two-dimensional and related to planifications):
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% Default Values %%%%%%%%%%%%
-    pen grossa, usual, fina;
-    grossa= pencircle scaled 0.9mm;
-    usual = pencircle scaled 0.6mm;
-    fina  = pencircle scaled 0.3mm;
-    numeric u, arestaref, defaultaresta;
-    u = 0.5mm;
-    defaultaresta = 30mm;
-    arestaref = defaultaresta;
-    picture pequeno, grande, nada;
-    linecap := squared;                         %%%%%%%%%%%%%%%%%%%%%
-    pequeno = dashpattern( off 3u on 1u );
-    grande = dashpattern( off 8u on 6u );
-    nada  = dashpattern( on 1pt );
-    linecap := rounded;                         %%%%%%%%%%%%%%%%%%%%%
-    pair urCorner,ulCorner,llCorner,lrCorner,PageCenter;
-    urCorner := (8.13in,11.533in);
-    llCorner := (0.118in,35.5bp);
-    ulCorner := (xpart llCorner,ypart urCorner);
-    lrCorner := (xpart urCorner,ypart llCorner);
-    PageCenter := (urCorner+ulCorner+llCorner+lrCorner)/4;
-    path thebigframe;
-    thebigframe = llCorner--lrCorner--urCorner--ulCorner--cycle;
-    boolean EPSmode, Athreemode;
-    EPSmode = false;
-    Athreemode = false;
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
-    
-    def centerof( text t) =
-      begingroup
-	save momentum, counter;
-	numeric counter;
-	pair momentum;
-	counter = 0;
-	momentum = (0,0);
-	forsuffixes $=t:
-	  counter := incr(counter);
-	  momentum := momentum + z$;
-	endfor;
-	( momentum/counter )
-      endgroup
-    enddef;
-    
-    def truefyepsmode = 
-      begingroup
-	EPSmode := true;
-	arestaref := arestaref/2;
-      endgroup
-    enddef;
-    
-    def makearestarefathree =
-      begingroup
-	if not EPSmode:
-	  Athreemode := true;
-	  arestaref := arestaref*1.414;
-	fi;
-      endgroup
-    enddef;
-    
-    def terminar( expr ScaleFactor, RotAngle ) =
-      begingroup
-	picture inicial,final;
-	inicial = currentpicture;
-	currentpicture := nullpicture;
-	final = inicial scaled ScaleFactor;
-	if EPSmode:
-	  final := final scaled 2
-	fi;
-	final := final rotated RotAngle;
-	if Athreemode:
-	  draw final shifted (PageCenter*1.414);
-	  arestaref := defaultaresta;
-	  Athreemode := false;
-	else:
-	  draw final shifted PageCenter;
-	  if EPSmode:
-	    pickup grossa;
-	    draw thebigframe;
-	    inicial := currentpicture;
-	    currentpicture := nullpicture;
-	    final := inicial rotated -90;
-	    draw final
-	  fi;
-	fi;
-      endgroup
-    enddef;
-    
-    def desvia( text zes ) =
-      begingroup
-	picture inicial,final;
-	inicial = currentpicture;
-	currentpicture := nullpicture;
-	final = inicial shifted -centerof( zes );
-	draw final
-      endgroup
-    enddef;
-    
-    def desvec( expr vect ) =
-      begingroup
-	picture inicial,final;
-	inicial = currentpicture;
-	currentpicture := nullpicture;
-	final = inicial shifted -vect;
-	draw final
-      endgroup
-    enddef;
-    
 % EOF