1. Limited time only! Sign up for a free 30min personal tutor trial with Chegg Tutors
    Dismiss Notice
Dismiss Notice
Join Physics Forums Today!
The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

Homework Help: Finite difference method in fortran

  1. Feb 22, 2010 #1
    1. I have problem numerical solving of PDE with finite difference method in fortran. it is about optical fibers. At the begining of the fiber the delta impuls is inserted, and I need function at the end of the fiber.



    2. The equation is given in attachement as the code in fortran



    3. The problem is that I know that the function at the end of the fiber should drift towards 0 (on X axis) for lenghts of fiber over 30m, but it does not. The problem is in the code but I cannot find where.

    If someone could help me I would appreciate it

    1. The problem statement, all variables and given/known data



    2. Relevant equations



    3. The attempt at a solution
     

    Attached Files:

  2. jcsd
Share this great discussion with others via Reddit, Google+, Twitter, or Facebook

Can you offer guidance or do you also need help?
Draft saved Draft deleted