Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public, | parameter | :: | NX | = | 3 | |
integer, | public, | parameter | :: | NY | = | 4 | |
real(kind=REAL32), | public, | parameter | :: | A_EXPECTED | = | 5 | |
real(kind=REAL32), | public, | parameter | :: | U_EXPECTED(NX,NY) | = | reshape([1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3], [NX, NY]) | |
real(kind=REAL32), | public, | parameter | :: | V_EXPECTED(NX,NY) | = | reshape([1, 1, 1, 2, 2, 2, 3, 3, 3, 4, 4, 4], [NX, NY]) |