(Class-) array finalization and initialization question

[Harald Anlauf]

I compiled and ran the test program using the NAG and PGI Compilers.
No comment on the test results, I just state them.

Harald

% nagfor fintest.f90 -V
NAG Fortran Compiler Release 6.0(Hibiya) Build 1034
Product NPL6A60NA for x86-64 Linux
Copyright 1990-2015 The Numerical Algorithms Group Ltd., Oxford, U.K.
f95comp version is Hibiya(6.0) Build 1034
Warning: fintest.f90, line 125: INTENT(OUT) dummy argument X default
initialised but otherwise unused
Warning: fintest.f90, line 129: INTENT(OUT) dummy argument X default
initialised but otherwise unused
Warning: fintest.f90, line 133: INTENT(OUT) dummy argument X default
initialised but otherwise unused
Warning: fintest.f90, line 137: INTENT(OUT) dummy argument X default
initialised but otherwise unused
Warning: fintest.f90, line 141: INTENT(OUT) dummy argument X default
initialised but otherwise unused
Warning: fintest.f90, line 145: INTENT(OUT) dummy argument X default
initialised but otherwise unused
Warning: fintest.f90, line 149: INTENT(OUT) dummy argument X default
initialised but otherwise unused
Warning: fintest.f90, line 153: INTENT(OUT) dummy argument X default
initialised but otherwise unused
[NAG Fortran Compiler normal termination, 8 warnings]

% ./a.out
 ten_fin_counts:  6
 tee_fin_counts:  6
 tne_fin_counts:  6
 tnn_fin_counts:  0
 tae_fin_counts:  0
 tan_fin_counts:  1
 tge_scalar_fin_counts:  6
 tge_array_fin_counts:   0
 tgn_scalar_fin_counts:  0
 tgn_array_fin_counts:   1
 x_ten:  40 1 40 1 40 1 1 1 1 1 1 1 1 1 1 40 1 40 1 40 1 1 1 1 1
 x_tee:  41 2 41 2 41 2 2 2 2 2 2 2 2 2 2 41 2 41 2 41 2 2 2 2 2
 x_tne:  42 3 42 3 42 3 3 3 3 3 3 3 3 3 3 42 3 42 3 42 3 3 3 3 3
 x_tnn:  43 4 43 4 43 4 4 4 4 4 4 4 4 4 4 43 4 43 4 43 4 4 4 4 4
 x_tae:  44 5 44 5 44 5 5 5 5 5 5 5 5 5 5 44 5 44 5 44 5 5 5 5 5
 x_tan:  45 6 45 6 45 6 6 6 6 6 6 6 6 6 6 45 6 45 6 45 6 6 6 6 6
 x_tge:  46 7 46 7 46 7 7 7 7 7 7 7 7 7 7 46 7 46 7 46 7 7 7 7 7
 x_tgn:  47 8 47 8 47 8 8 8 8 8 8 8 8 8 8 47 8 47 8 47 8 8 8 8 8


% pgfortran fintest.f90 -V

pgfortran 14.10-0 64-bit target on x86-64 Linux -tp core2
The Portland Group - PGI Compilers and Tools
Copyright (c) 2014, NVIDIA CORPORATION.  All rights reserved.
PGF90/x86-64 Linux 14.10-0
Copyright (c) 2014, NVIDIA CORPORATION.  All rights reserved.
PGF90/x86-64 Linux 14.10-0
Copyright (c) 2014, NVIDIA CORPORATION.  All rights reserved.
login1:~> ./a.out
 ten_fin_counts:             1
 tee_fin_counts:             0
 tne_fin_counts:             0
 tnn_fin_counts:             1
 tae_fin_counts:             0
 tan_fin_counts:             0
 tge_scalar_fin_counts:             0
 tge_array_fin_counts:              0
 tgn_scalar_fin_counts:             1
 tgn_array_fin_counts:              0
 x_ten:            40            1            1           40            1
            1            1            1            1            1
    40
            1            1           40            1            1
     1
            1            1            1           40            1
     1
           40            1
 x_tee:            41            2            2           41            2
            2            2            2            2            2
    41
            2            2           41            2            2
     2
            2            2            2           41            2
     2
           41            2
 x_tne:            42            3            3           42            3
            3            3            3            3            3
    42
            3            3           42            3            3
     3
            3            3            3           42            3
     3
           42            3
 x_tnn:            43            4            4           43            4
            4            4            4            4            4
    43
            4            4           43            4            4
     4
            4            4            4           43            4
     4
           43            4
 x_tae:            44            5            5           44            5
            5            5            5            5            5
    44
            5            5           44            5            5
     5
            5            5            5           44            5
     5
           44            5
 x_tan:            45            6            6           45            6
            6            6            6            6            6
    45
            6            6           45            6            6
     6
            6            6            6           45            6
     6
           45            6
 x_tge:            46            7            7           46            7
            7            7            7            7            7
    46
            7            7           46            7            7
     7
            7            7            7           46            7
     7
           46            7
 x_tgn:            47            8            8           47            8
            8            8            8            8            8
    47
            8            8           47            8            8
     8
            8            8            8           47            8
     8
           47            8