Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: milkypros
  • Order by date
  1. milkypros

    Gauss - Seidel

    hi It,s not a homework. I am not even a student. I am trying to learn fortran as fast as i can by trying to solve problems i fint on the net on my spare time because i will have to use it later for my job. I am writting the basic portion of the problems but when i try to improve it to do some...
  2. milkypros

    Gauss - Seidel

    The program i wrote below calculates the temparature distribution on a metal rod at 11 stations using Gauss-Seidel iterative method. How can i define in the program to stop the calculations when the temperatures T2 to T11 become: ?2,?3,?4,?5,?6,?7,?8,?9,?10=10,20,30,40,50,60,70,80,90 C...
  3. milkypros

    R-L circuit

    thsnks for the tips microm
  4. milkypros

    R-L circuit

    This is the basic portion for the program in order to calculate the J(i+1). it runs but it i only get zeros for the J(i) and i can't see why. What could cause this? dimension t(0:100),V(0:100),J(0:100) t1=0 t2=6.8 R=10.998 s=6.6 d=2.97 n=68...
  5. milkypros

    R-L circuit

    An RL circuit is described by the first order differential equation: L.(dI(t)/dt)+R.I(t)=V(t) where V(t)=Vo.e^(-t/?). The total current I according to Taylor rule is described by the equation I(i+1)=((1/(1+(h/d)))*I(i))+((h/d)/(1+(h/d))*(V(i+1)/R)). I wrote the program below but it seems...
  6. milkypros

    Calculate area of closed loop

    Thanks microm
  7. milkypros

    Calculate area of closed loop

    I wrote the program below and it works fine. But is there any way for the program to read (x,y) data from an EXCEL worksheet? parameter(NMAX=50) real*4 buffer(NMAX,NMAX) s=0 npoints=13 !13 points ! init buffer x(i), y(i) do i=1, npoints buffer(1,1)= 3...
  8. milkypros

    Calculate area of closed loop

    Hi Is there any way to calculate the area of a closed loop that is created by a set of (x,y) points?
  9. milkypros

    differenting a function over [a,b] using Taylor method

    microm thanks for answering. It works fine. The thing is that when i am trying to set a bigger value of n in order to compare the results, in example n>350, the program doesn't print all the results but it starts from values of x>1,02. whats the problem?
  10. milkypros

    differenting a function over [a,b] using Taylor method

    Thanks for answering. The code i wrote so far is: dimension x(0:20) f(x)=x**3 a=0 b=4 n=20 x(0)=a x(n)=b h=(b-a)/n do i=0,n x(i)=x(0)+i*h y=(f(x(i)+h)-f(x(i)))/h print*,x(i),y end do end I dont know if...
  11. milkypros

    differenting a function over [a,b] using Taylor method

    hi i am new in fortran programming and i need help on differenting a function over [a,b] using Taylor method. In example the function f(x)=x**3 and i want to calculate the quantity df=(f(x+h)-f(x))/h where h is the (b-a)/n and n is for example 20. Any help?

Part and Inventory Search

Back
Top