RosettaCodeData/Task/Pointers-and-references/Fortran/pointers-and-references-9.f
2023-07-01 13:44:08 -04:00

4 lines
63 B
Forth

real, dimension(20) :: a
real, dimension(16) :: p
p = a(5:20)