Re: what is wrong with this code?can someone walk me through this?

madhu0319@xxxxxxxxx wrote:
On Mar 26, 8:19 pm, ka...@xxxxxxxxxxxxxxxxxxxxxxxxxxxx (Steven G.
Kargl) wrote:
In article <2536c6bf-4017-43c3-aa00-5d9eb8dd3...@xxxxxxxxxxxxxxxxxxxxxxxxxxxx>,
madhu0...@xxxxxxxxx writes:



Heres a fortran code to solve
....
source code:
IMPLICIT NONE
REAL*8 DERIV_FX,
DERIV_FY,N,RP,RF,RHO,UF,alpha,K,R0,U
REAL*8
Nu,x,y,y0,THETA,DT,T0,UT0,PI,T,THETA0,Stokes
REAL*8
UR0,b,x1,VX,VY,R,UT_K,UR_K,THETA2,MP,R2,x_i
INTEGER t_max, time
REAL*8 n_t
EXTERNAL FX, FY, DERIV_FX, DERIV_FY
COMMON Nu, RP, RF, MP, UF, alpha, K,
PI, Stokes, x_i
CALL read_parameters (t_max, alpha,
RHO, RP, RF, UF)
PI = 3.1415
Nu = 0.0000181
The problems in this code are too numerous to expend
the effort until you actual post code that has a just
to compile with any compiler.

--
steve

Sorry, I did not really understand what u said. I do have an
executable file for this code that works, but i dont know how to post
it here..What do I do abt this program, is it fixable at all?

One of the things that confuses people is that your code is hard to
read with the extra spaces on many lines and the bad line breaks.
This is a cut and paste problem with your mail program. The lines
>>> IMPLICIT NONE
>>> REAL*8 DERIV_FX,
>>> DERIV_FY,N,RP,RF,RHO,UF,alpha,K,R0,U
>>> REAL*8
>>> Nu,x,y,y0,THETA,DT,T0,UT0,PI,T,THETA0,Stokes
would be much easier to read and understand if you reformatted
them to look like
>>> IMPLICIT NONE
>>> REAL*8 DERIV_FX,DERIV_FY,N,RP,RF,RHO,UF,alpha,K,R0,U
>>> REAL*8 Nu,x,y,y0,THETA,DT,T0,UT0,PI,T,THETA0,Stokes

It's possible that you are using the TAB character to space things
out to column 7 and that when you paste it into your post, things
tab out 20 or so spaces.

*** Hendrickson
.