File restructure #1

Modules/ado/personal/w/whist.ado

@@ -1,12 +0,0 @@
-program define whist, rclass
-version 9 /* si chgt version*/
-syntax varname [aweight iweight fweight pweight/] [,title(string)] /*pond posssibles*/
-di "varname :`varlist'"
-tempname varpond
-qui su `exp' if `varlist'!=.
-qui gen `varpond'=`exp'/r(sum)*100
-label variable `varpond' "fr<66>quence"
-label variable `varlist' "`varlist'"
-graph bar (sum) `varpond', over(`varlist') blabel(bar, format (%4.1f)) title(`title') ytitle(pourcentage) b1title(`varlist')
-end
-