Wednesday - June 7, 2023

Fortran ~ Newton Raphson Method


Fortran ~ Newton Raphson Method

  • Let Xo be an approximate value of the root of the equation f(X)=0 either algebraic or transcendental and let h be a real number sufficiently small.
  • F(X)=2*X**3-5.0*X-2.15
  • This is known as the Newton – Raphson formula or Newton’s iteration formula.
newton raphson method solved example, newton raphson method python, newton raphson method ppt, newton raphson method pdf, newton raphson method matlab, newton raphson method in c, newton raphson method formula, newton raphson method calculator, newton-raphson method matlab, newton's method calculator, newton raphson method in c,
Image Source ~ Crafted With ©Ishwaranand – 2020 ~ Image by ©Ishwaranand

Write a program to demonstrate the application of the Newton-Raphson method to find the root of the equation.?

PROGRAM RAPHSN
C
C      PROGRAM TO LOCATE A ROOT OF EQUATION USING NEWTON RAPHSON METHOD
C
C      GIVEN EQUATION
         F(X)=2*X**3-5.0*X-2.15
C      DERIVATIVE OF GIVEN EQUATION
         FD(X)=6.0*X**2-5.0
C
         WRITE(*,*)’ENTER YOUR ESTIMATE OF ROOT…’
         READ(*,*)X
          I=0
300    I=I+1
C       FIND ROOT POSITION
           X=X-F(X)/FD(X)
          CHK=ABS(F(X))
C        EXIT LOOP IF ROOT FOUND
           IF(CHK.LE.0.0001)GOTO 100
C        EXIT LOOP IF UNABLE TO FIND ROOT EVEN AFTER 100+CYCLES
          IF(I.GT.100)GOTO 200
C        START NEXT CYCLE
           GOTO 300
100     WRITE(*,*)’ROOT FOUND AT’, X
           STOP
200     WRITE(*,*)’ROOT NOT FOUND’
           STOP
           END

#OUTPUT
ENTER YOUR ESTIMATE OF ROOT
1
ROOT FOUND AT 1.3247180

Crafted by ISHWARANAND | Distributed by ISHWARANAND

Fortran ~ Regula Falsi Method

.