Lines Matching defs:var1
21 subroutine delayed_privatization_private_1d(var1, l1, u1)
24 integer, dimension(l1:u1) :: var1
26 !$omp parallel firstprivate(var1)
27 var1(l1 + 1) = 10
50 subroutine delayed_privatization_private_2d(var1, l1, u1, l2, u2)
53 integer, dimension(l1:u1, l2:u2) :: var1
55 !$omp parallel firstprivate(var1)
56 var1(l1 + 1, u2) = 10
70 ! TWO_DIM-NEXT: %[[PRIV_ALLOCA:.*]] = fir.alloca !fir.array<{{\?}}x{{\?}}xi32>, %[[DIMS0]]#1, %[[DIMS1]]#1 {bindc_name = "var1", pinned, uniq_name = "_QFdelayed_privatization_private_2dEvar1"}
85 integer, dimension(10) :: var1
87 !$omp parallel private(var1)
88 var1(1) = 10