macro NUM2DBL

double NUM2DBL(VALUE x)