elimination game 源代码

package game.basic; /** 硄ノㄢ蝴

function x = bslashtx(A,b) % BSLASHTX Solve linear system (backslash) % x = bslashtx(A,b) solves A*x = b [n,n] = size(A); i…

function [L,U,p] = lutx(A) %LUTX Triangular factorization, textbook version % [L,U,p] = lutx(A) produces a unit lower triangu…

/* * Solve set of linear equations involving * a Hilbert matrix * i.e. solves Hx=b, where b is the vector [1,1,1....1] *…

/* * Solve set of linear equations involving * a Hilbert matrix * i.e. solves Hx=b, where b is the vector [1,1,1....1] *…

SUBROUTINE GASCOL(A,N,NP,B) DIMENSION A(NP,NP),B(N) DO 15 K=1,N-1 pivoting IR=K DO 10 I=K,N IF (ABS(A(IR,K))…

/* gcpelimm.c:use Gauss elimination method to solve linear system.这是主函数*/ #define DIM 5 #include "gcpelim.c" extern int gelim(i…

/* Computer Soft/c2-1.c Gauss Elimination */ #include #include #include #define TRUE 1 /* a[i][j] : matrix …

function [k,p] = findpiv(A,k,p,tol) %FINDPIV Used by PLU to find a pivot for Gaussian elimination. % [r,p] = FINDPIV(A(k:m,p:n),…

function [L,U] = slu(A) %SLU Simple, square, LU factorization. % [L,U] = SLU(A) for a square matrix A, illustrates the use of %…