function atof (asc:           anystring): real;