[1189 Common_nf95 @ atom]$ Test_C_Interop.x Testing interoperability with C dynamic arrays: Enter n and allocate_in_C (T or F): 5,t Values passed: n=25 dp=0 Allocating float array! Integer value of array address: 134556144 Elements [7:13] of array pointer x_vector: 6.0000000 7.0000000 8.0000000 9.0000000 10.0000000 11.0000000 12.0000000 Second row of array pointer x_matrix: 1.0000000 6.0000000 11.0000000 16.0000000 21.0000000 Second column of array pointer x_matrix: 5.0000000 6.0000000 7.0000000 8.0000000 9.0000000 Values passed: n=5 dp=0 Allocating float array! Allocation status of x_1D%x: T The elements of the dynamic array x_1D%x: 0.0000000E+00 1.0000000 2.0000000 3.0000000 4.0000000 Values passed: n=25 dp=0 Allocating float array! Allocation status of x_2D%x: T Second row of the dynamic array x_2D%x: 1.0000000 6.0000000 11.0000000 16.0000000 21.0000000 Second column of the dynamic array x_2D%x: 5.0000000 6.0000000 7.0000000 8.0000000 9.0000000 Allocation status of x_1D%x: F Allocation status of x_2D%x: F Testing derived datatypes: The point has: screen=2, x=-2.000000, y=2.000000 The next point has: screen=0, x=1.000000, y=-1.000000 Testing array pointer reshaping: The stride between successive sunny fields (in words) is: 4 The first row of the time matrix is: 1 2 3 4 5 The diagonal of the time matrix is: 1 4 9 16 25 Testing procedure pointers: Integer address of C_ASSOCIATED: 134524016 Integer address of AllocateTestArray_real_F: 134520172 Integer address of AllocateTestArray_real_C: 134546264 C calling procedure at integer address: 134515568 Fortran subroutine called with n= 113 Calling procedure at integer address: 134515568 from Fortran Fortran subroutine called with n= 13 Fortran subroutine called with n^2= 169