Comienzo a aprender Fortran y estoy haciendo un pequeño programa de prueba de casos en el que el usuario escribe dos números reales y selecciona un operador aritmético (de + - * /). El siguiente error aparece cuando el usuario selecciona "*"

F6502 : read <con> - positive integer expected in repeat field

y si el usuario selecciona "/", el compilador ejecuta el caso predeterminado y muestra este mensaje

invalid operator, thanks
the result is 0.000000E+00

El programa es el siguiente.

program operateur
implicit none

   CHARACTER(LEN=1) :: oper 
   real::a,b,res
   print*,'Give the first number a :'
   read*,a
   print*,'Give the second number b :'
   read*,b
   print*,'which operation ?'
   read*,oper
   !print*,'donnez a,b,oper :'
  ! read(*,*)a,b,oper

               select case (oper)

                  case ('+')      
                  res=a+b

                  case ('-')       
                  res=a-b

                  case ('*')       
                  res=a*b


                  case ('/')       
                  res=a/b           

                  case default
                  print*, "Invalid Operator, thanks" 

               end select

   print*,'the result is ',res 

end program operateur