updated extra_bits/common_blocks.f to f95