Loop indices not found with 2D array

[elsagermann]

When using a 2D array using indice notation for the first dimension and array notation for the second dimension claw expand is not able to expand it correctly.

Original code

   !$ACC PARALLEL DEFAULT(NONE)
   !$ACC LOOP GANG VECTOR
   !$claw expand
   pgcripr(jj,1:klev) = zgcripr(1:klev)
   $claw end expand
   $ACC END PARALLEL

Transformation code

   !$ACC PARALLEL DEFAULT(NONE)
   !$ACC LOOP GANG VECTOR
   DO claw_induction_1 = 1 , klev
    pgcripr ( jj , 1 : klev ) = zgcripr ( claw_induction_1 )
   END DO
   !$ACC END PARALLEL

Expected code

   !$ACC PARALLEL DEFAULT(NONE)
   !$ACC LOOP GANG VECTOR
   DO claw_induction_1 = 1 , klev
    pgcripr ( jj , claw_induction_1 ) = zgcripr ( claw_induction_1 )
   END DO
   !$ACC END PARALLEL

Execution of clawfc

# Command used to apply the transformation

Related issues (if any)

Issue #00