1! RUN: %S/test_errors.sh %s %t %f18
2implicit none
3integer :: x
4!ERROR: No explicit type declared for 'y'
5y = x
6end
7