(adsbygoogle = window.adsbygoogle || []).push({}); 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

**Physics Forums | Science Articles, Homework Help, Discussion**

Dismiss Notice

Join Physics Forums Today!

The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

# Homework Help: Finite difference method in fortran

Can you offer guidance or do you also need help?

Draft saved
Draft deleted

**Physics Forums | Science Articles, Homework Help, Discussion**