select distinct Instructors.name from Instructors, Grades, Courses
where Instructors.empno = Grades.empno
and Grades.cno = Courses.cno
and Courses.cr = 4
/