Re: what is wrong with this code?can someone walk me through this?
- From: kargl@xxxxxxxxxxxxxxxxxxxxxxxxxxxx (Steven G. Kargl)
- Date: Thu, 27 Mar 2008 01:19:12 +0000 (UTC)
In article <2536c6bf-4017-43c3-aa00-5d9eb8dd305e@xxxxxxxxxxxxxxxxxxxxxxxxxxxx>,
madhu0319@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
.
- Follow-Ups:
- Re: what is wrong with this code?can someone walk me through this?
- From: Gerry Ford
- Re: what is wrong with this code?can someone walk me through this?
- From: madhu0319
- Re: what is wrong with this code?can someone walk me through this?
- References:
- what is wrong with this code?can someone walk me through this?
- From: madhu0319
- what is wrong with this code?can someone walk me through this?
- Prev by Date: what is wrong with this code?can someone walk me through this?
- Next by Date: Re: what is wrong with this code?can someone walk me through this?
- Previous by thread: what is wrong with this code?can someone walk me through this?
- Next by thread: Re: what is wrong with this code?can someone walk me through this?
- Index(es):
Relevant Pages
|
