anchor.diff:   INTEGER :: istart = 1
    INTEGER :: iend = 10
   
  +
  +
    DO j = 1 , 10 , 2
     PRINT * ,"j" , j
    END DO
  
positive.code:  INTEGER :: istart = 1
   INTEGER :: iend = 10
  
   DO j = 1 , 10 , 2
    PRINT * ,"j" , j
   END DO
  
negative.code:  INTEGER :: i
   INTEGER :: istart = 1
   INTEGER :: iend = 10
  
  
   DO j = 1 , 10 , 1
    value1 ( j ) = j
  