print  OUT "$vard:$anc{$vard}\n";