Doubt on Read function parameters 1

[Fotran]

Hi all

I am new to fortran and so trying to understand some caracteristics of this language

can anyone explain to me the logic below?

do i=line+1, line+msup
read(*,*) (Akapla(i,j), j=2, nvar+1), Akapla(i,1)
if(Akapla(i,1).lt.0) then
write(*,*) 'Does not matter'
stop
endif

enddo

 

[salgerman]

the "read" line includes what is called an "implicit" loop...it is like a do-loop and, in your case, it assigns values 2 to nvar+1 to the variable 'j' and every time it read a value from the input and assigns that to the corresponding item in the 2D matrix Akapla. The other index (row) is simply whatever value 'i' came in with into the do-loop. Lastly, the read statement read one last value into the specified matrix entry, no loop here, just a list-directed read.

 

[Fotran]

I see.

Thanks salgerman, It was unduly clarifying.

 

[Fotran]

Can anyone put this code into C# or C?

do i=line+1, line+msup
read(*,*) (Akapla(i,j), j=2, nvar+1), Akapla(i,1)
if(Akapla(i,1).lt.0) then
write(*,*) 'Does not matter'
stop
endif

enddo

 

[salgerman]

Hhhhmmm...so, you are new to Fortran...are you new to C, too?

If you have access to the one file that this code is supposed to read, why don't you just forget about this piece of code and write the code the way you would do it in order to read the file? (Hint: you need an explicit loop, followed by one more read).