*! v1.01 FRA Change frep. Note needed to be stored without Quotes
program frep
	syntax varname =/exp [if] [in]
	qui:recast double `varlist'
	replace  `varlist'=`exp'
    if strlen("`exp'")<75 {
	    label var `varlist' "`exp'"
	}
	else {
		qui:notes drop `varlist'
		label var `varlist' "See notes"
		note `varlist': `exp'
	}
	char `varlist'[fbl] "fable"
end