let rec str ex i j = if j=63 then ex else
 str (ex^(string_of_int (vect64 (diagDepl data.(i))).(j))^".0D, ") (i) (j+1)