4 interface operator(.op.)
7 interface operator(.ops.)
14 integer,intent(in) :: i
19 integer,intent(in) :: i
25 use a, only: operator(.op.), operator(.op.), &
26 operator(.my.)=>operator(.op.),operator(.ops.)=>operator(.op.)
28 if (.my.2 /= -2 .or. .op.3 /= -3 .or. .ops.7 /= -7) call abort()