000000 6.3. The Diffusion Equation + Qf -

A FORTRAN subroutine, subroutine fem3, for implementing Eq. (12.211) is presented in Program 12.3. Program main defines the data set and prints it, calls subroutine fem3 to implement the solution, and prints the solution.