＜Array Section Example Program＞

Program array_section_example
  Real a(5)
  a(5:1:-1) = (/ 3.,4.,5.,6.,7. /)
  Print *, a(2:3)
End Program

■ Execution Results

  6.0000000   5.0000000