let rec formatC resultinC i = if i=63 then resultinC else
    formatC (resultinC^(string_of_char (exStrinC).[i])^".0;") (i+1)