I wrote the main program for a subroutine that solves a set of equations (Thomas algorithm) in Fortran. This is the code for a simple set of equations:
Progra