Corrected bug in read_uwreal

Thanks to P. Fritzsch

src/ADerrorsCF.jl

@@ -893,7 +893,7 @@ function uwreal(data::Vector{Float64},
     idc = Vector{Int64}(undef, length(data))
     iof = 0
     for i in 1:length(v)
-        v[i] = str*"r"*string(i-1)
+        v[i] = str*"_r"*string(i-1)
         for k in 1:iv[i]
             idc[k+iof] = k
         end
@@ -936,7 +936,7 @@ function uwreal(data::Vector{Float64},
     idc = Vector{Int64}(undef, length(data))
     iof = 0
     for i in 1:length(v)
-        v[i] = str*"r"*string(i-1)
+        v[i] = str*"_r"*string(i-1)
         for k in 1:iv[i]
             idc[k+iof] = k
         end

src/ADerrorsIO.jl

@@ -365,12 +365,17 @@ function read_bdio(fb, ws::wspace, mapids::Dict{Int64, Int64})
             BDIO.BDIO_read(fb, ifoo)
             str = get_name_from_id(convert(Int64, ids[i]), ws)
             for j in 1:nrep[i]
-                v[j] = str*"_r"*string(j)
-                for k in is:ie
-                    idc[k] = convert(Int32, k-is+1)
+                v[j] = str*"_r"*string(j-1)
+            end
+
+            iof = 0
+            for j in 1:nrep[i]
+                for k in 1:ivrep[is+j-1]
+                    idc[k+iof] = convert(Int32, k)
                 end
+                iof = iof + ivrep[is+j-1]
             end
-            add_repnames(convert(Int64, ids_obs[i]), ws, v, idc)
+            add_repnames(convert(Int64, ids_obs[i]), ws, v, convert(Vector{Int64}, idc))
             is = ie + 1
         end
     else