org.eclipse.photran.core.vpg.tests/refactoring-test-code/make-save-explicit/user-story-8/test-8.2/make_save_8_2.f90

! USER STORY 8, TEST 2
! Adds SAVE attribute to the declaration statement for variable j initialized
! through a DATA statement in subroutine MySub, but not to the declaration
! statement for variable i also initialized through a DATA statement in program
! MyProgram

PROGRAM MyProgram !<<<<< 1, 1, pass
  INTEGER :: i
  DATA i /0/
  i = i + 1
  PRINT *, 'called:', i
  i = i + 1
  PRINT *, 'called:', i
  CALL MySub
  CALL MySub
END PROGRAM MyProgram

SUBROUTINE MySub
  INTEGER :: j
  DATA j /0/
  j = j + 1
  PRINT *, 'called:', j
END SUBROUTINE MySub