XL Fortran prints the same output as Oracle: $ xlf2008 alloc.f ** types === End of Compilation 1 === ** procedures === End of Compilation 2 === ** interfaces === End of Compilation 3 === ** main === End of Compilation 4 === 1501-510 Compilation successful for file alloc.f. $ ./a.out 3 3 3 3 3 3 $ Regards Rafik