... it to bit-bit-bit format :-) 1) declare a huge character string, bigger than you will ever need and "read" through it character by character. something like character (len=1000000000000000000) :: x !or maybe smaller ;) x=' ' read(...) x do i = 1,10000000000000000000000 if(x(I:I) == '1') vector(i) = 1 if(x(I:I) == '...

... me rephrasing it to bit-bit-bit format :-) 1) declare a huge character string, bigger than you will ever need and "read" through it character by character. something like character (len=1000000000000000000) :: x !or maybe smaller ;) x=' ' read(...) x do i = 1,10000000000000000000000 if(x(I:I) == '1') vector(i) = 1 if(x(I:I) == ...

... number. There are two general approaches to consider. 1) declare a huge character string, bigger than you will ever need and "read" through it character by character. something like character (len=1000000000000000000) :: x !or maybe smaller ;) x=' ' read(...) x do i = 1,10000000000000000000000 if(x(I:I) == '1') vector(i) = 1 if(x(I:I) == '0') ...