It's been a while since I posted.
I have this line:
write(13,153) ((( ALOG(WSratio(I,J,K))/ALOG(ZU/ZL), I=1,7), J=1,4), K = 3)
Upon compile, IVF v.14.x says this:
error #5082: Syntax error, found ')' when expecting one of: ,
It's almost acting as thought my parentheses are unbalanced, but I believe they are balanced.
I wonder what the real violation is here.
Any help is appreciated, as always.
You are missing the terminal parameter for the outer implied do - K starts at three, what value does it finish at?
(ZU/ZL), I=1,7), J=1,4), K = 3, you_forgot_this_bit)[/fortran]
Ah hah ... Ian.
Your question just clued me in as to the problem. For this operation, I only want the 3 index for the 3-d array. I think what I should have done is this:
write(13,153) (( ALOG(WSratio(I,J,3))/ALOG(ZU/ZL), I=1,7), J=1,4)
Isn't this better?
If you meant a single value for K, it could be written as K=3,3, but it would make more sense to write e.g.
By the way, your example appears to be Fortran 66 except for the error (extension?) and the use of free form.