function b = bits2(a)
if a <= 0 || a >= 1
    error('Argument a muss zwischen 0 und 1 liegen.')
end
b = '0.';
for i = 1:53
    if a >= 1/2^i
        a = a - 1/2^i;
        b = [b, '1'];
    else
        b = [b, '0'];
    end
    if a == 0
        break
    end
end
