Program to show the usage of the linear_solvers module
| Type | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|
| integer, | parameter | :: | N | = | 500 | |
| real | :: | ti | ||||
| real | :: | tf | ||||
| real | :: | A(N,N) | ||||
| real | :: | b(N) | ||||
| real | :: | x_G(N) | ||||
| real | :: | x_LU(N) | ||||
| real | :: | x_J(N) | ||||
| real | :: | x_GS(N) | ||||
| real | :: | x_0(N) | ||||
| integer | :: | i | ||||
| integer | :: | u | ||||
| integer | :: | Nmax |