fcn vdc(n,base=2){
   vdc:=0.0; denom:=1;
   while(n){ reg remainder;
      denom *= base;
      n, remainder = n.divr(base);
      vdc += (remainder.toFloat() / denom);
   }
   vdc
}