|
a/LinPack.def |
|
b/LinPack.def |
|
... |
|
... |
| 91 |
(* job integer *)
|
91 |
(* job integer *)
|
| 92 |
(* := 0 to solve a*x := b , *)
|
92 |
(* := 0 to solve a*x := b , *)
|
| 93 |
(* := nonzero to solve trans(a)*x := b where *)
|
93 |
(* := nonzero to solve trans(a)*x := b where *)
|
| 94 |
(* trans(a) is the transpose. *)
|
94 |
(* trans(a) is the transpose. *)
|
| 95 |
(* *)
|
95 |
(* *)
|
| 96 |
(* n RETURN *)
|
96 |
(* on return *)
|
| 97 |
(* *)
|
97 |
(* *)
|
| 98 |
(* B the solution vector x . *)
|
98 |
(* B the solution vector x . *)
|
| 99 |
(* *)
|
99 |
(* *)
|
| 100 |
(* error condition *)
|
100 |
(* error condition *)
|
| 101 |
(* *)
|
101 |
(* *)
|