I'm doing a code in Intel Fortran and I have vectors declared with numerically sequenced names. I want to call each vector in a loop according to the number that corresponds to it.
It is a program that reads data files over time, originated in a finite element analysis and each vector corresponds to elements associated with a node.
for example to create numerically sequenced files is declared as follows:
write(id_fich,'(I4)') itera
nome_fich='..\Controle\MJTS1_i'//Trim(adjustl(id_fich))//'.dat'
open(301,file=nome_fich)
something like this I'm trying to do but to call the vectors:
real*8 VP1(10),VP2(10),VP3(10)
integer i,j,k
do i=1,10
do k=1,3
VP//k//(i)=5.0*i
end do
end do