let dispatch_cvar vinfo = dispatch_var (Cv vinfo)