Just another update
This commit is contained in:
parent
a25938f123
commit
00a190b0a6
6591 changed files with 94363 additions and 23227 deletions
|
|
@ -1,14 +0,0 @@
|
|||
program Concat_Arrays
|
||||
implicit none
|
||||
|
||||
integer, dimension(3) :: a = [ 1, 2, 3 ]
|
||||
integer, dimension(3) :: b = [ 4, 5, 6 ]
|
||||
integer, dimension(:), allocatable :: c
|
||||
|
||||
allocate(c(size(a)+size(b)))
|
||||
c(1:size(a)) = a
|
||||
c(size(a)+1:size(a)+size(b)) = b
|
||||
|
||||
write(*,*) c
|
||||
|
||||
end program Concat_Arrays
|
||||
Loading…
Add table
Add a link
Reference in a new issue