4 lines
63 B
Forth
4 lines
63 B
Forth
real, dimension(20) :: a
|
|
real, dimension(16) :: p
|
|
|
|
p = a(5:20)
|
real, dimension(20) :: a
|
|
real, dimension(16) :: p
|
|
|
|
p = a(5:20)
|