https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68283
Dominique d'Humieres <dominiq at lps dot ens.fr> changed: What |Removed |Added ---------------------------------------------------------------------------- Status|UNCONFIRMED |WAITING Last reconfirmed| |2015-11-11 Ever confirmed|0 |1 --- Comment #1 from Dominique d'Humieres <dominiq at lps dot ens.fr> --- Did you provide the right test? The one (duplicated?) in comment 0 does not compile pr68283.f90:6:15: TYPE neb_var_type 2 REAL(KIND=dp), DIMENSION(:, :), POINTER :: xyz, int, wrk END TYPE neb_var_type IMPLICIT NONE 1 Error: IMPLICIT NONE statement at (1) cannot follow derived type declaration statement at (2) pr68283.f90:14:66: dot_product_band(neb_env,forces%wrk(:,i),tangent,Mmatrix,error)*tangent 1 Error: Symbol 'error' at (1) has no IMPLICIT type pr68283.f90:10:49: INTEGER, INTENT(IN) :: i 1 Error: Symbol at (1) is not a DUMMY variable pr68283.f90:14:60: dot_product_band(neb_env,forces%wrk(:,i),tangent,Mmatrix,error)*tangent 1 Error: Symbol 'mmatrix' at (1) has no IMPLICIT type pr68283.f90:14:28: dot_product_band(neb_env,forces%wrk(:,i),tangent,Mmatrix,error)*tangent 1 Error: Symbol 'neb_env' at (1) has no IMPLICIT type pr68283.f90:14:52: dot_product_band(neb_env,forces%wrk(:,i),tangent,Mmatrix,error)*tangent 1 Error: Symbol 'tangent' at (1) has no IMPLICIT type Fixing the error does not lead to any ICE.