org.eclipse.photran.core.vpg.tests/parser-test-code/reg_tests/bug308196.f90 - ptp/org.eclipse.photran - Git at Google

 FORALL (I=1:NAT) DIPOLES(3*I-2:3*I,:) = ALPHA(:,:,I)
 end program
	FORALL (I=1:NAT) DIPOLES(3I-2:3I,:) = ALPHA(:,:,I)
	end program