      program rform
c Fortran 90 output format
      write(*,*) 'input='
      read (*,*) a
      write(*,1) a
1     format(1x,b32)
      end
