From af1a266670d040d2f4083ff309d732d648afba2a Mon Sep 17 00:00:00 2001 From: Angelos Mouzakitis Date: Tue, 10 Oct 2023 14:33:42 +0000 Subject: Add submodule dependency files Change-Id: Iaf8d18082d3991dec7c0ebbea540f092188eb4ec --- meson/test cases/fortran/19 fortran_std/std95.f90 | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 meson/test cases/fortran/19 fortran_std/std95.f90 (limited to 'meson/test cases/fortran/19 fortran_std/std95.f90') diff --git a/meson/test cases/fortran/19 fortran_std/std95.f90 b/meson/test cases/fortran/19 fortran_std/std95.f90 new file mode 100644 index 000000000..2837da86a --- /dev/null +++ b/meson/test cases/fortran/19 fortran_std/std95.f90 @@ -0,0 +1,14 @@ +program main +implicit none + +integer :: i, j +integer, parameter :: N=3 +real :: A(N,N) + +A = 0 + +forall (i=1:N, j=1:N) + A(i,j) = 1 +end forall + +end program -- cgit 1.2.3-korg