Mikael, After the previous fix, the test fails with
real*8 arr(4, 4, 4, 4) 1 Warning: Nonstandard type declaration REAL*8 at (1) Replacing real*8 arr(4, 4, 4, 4) with real(8) :: arr(4, 4, 4, 4) fixes the failures (due to the compilation with -pedantic-errors). Dominique