character error fortran 90
program calcul

! ce programme permet d'effectuer des opérations mathématique de base

IMPLICIT NONE

REAL::x,y

character(len=1)::op

character(len=16)::op_msg

write(*,*)"entrer le type d'opération à effectuer(+,-,/,x,*)"

read(*,*)op

write(*,*)"entrer le premier nombre de l'opération"

read(*,*)x

write(*,*)"entrer le deuxième nombre de l'opération"

read(*,*)y

if(op=="+") then

  write(*,*)x,"plus",y,"egale",x+y

    else if(op=="-")then

      write(*,*)x,"moin",y,"egale",x-y

    else if ((op==("*").or.("x")) then

      write(*,*)x,"multiplie par",y,"egale",x*y

        else if (op=="/")then

          write(*,*)x,"divise par",y,"egale",x/y

else

write(*,*)"erreur:operation incorrecte"

end if

end program calcul

calculette.f90:21.26:

 else if ((op==("*").or.("x")) then

                                     1

Error: Invalid character in name at (1)

else if ((op==("*").or.op==("x")) then