polish: tvault

guoyi.run

@@ -320,6 +320,7 @@ var: contree;
 set contree ntrees;
 
 /*Store consensus tree to tree vault*/
+hold /+0; 
 tv>/;
 tchoose 0.'npars';
 
@@ -375,10 +376,6 @@ if ('dosym')
   resample sym replications 1000 from 0;
 end
 
-/*Tree vault store*/
-hold /+0; 
-tvault >/;
-
 /*Export consensus tree with supports*/
 ttags & %7.resample.svg thickness 7 italics fontsize 15;
 log %7.resample.log;