function append(var f:text; s:string):boolean;
function col(a:mtx; j1, j2: longint): mtx;
function col(a:mtx; j1: longint): mtx;
function col(a:mtx): longint; inline;
function dia(a:mtx):mtx;
function elm(a:mtx; b:mtx):boolean;
function elm(a:mtx; i, j: longint):double;
function inv(r:mtx):boolean;
function inv(r:mtx; var d:double):boolean;
function inv(var r:mtx; a:mtx):boolean;
function inv(var r:mtx; a:mtx; var d:double):boolean;
function lgn(a:mtx; i1,i2: longint): mtx;
function lgn(a:mtx; i1: longint): mtx;
function lgn(a:mtx): longint; inline;
function lgn(a:mtx; low, high:double):mtx;
function mat(a:mtx):Pmatrix;
function mrd(var r:mtx):boolean;
function mrd(var r:mtx; fnam:string):boolean; inline;
function mrd(var r:mtx; fnam:string; mnam:string):boolean;
function mrd(var r: mtx; var f: text): boolean; inline;
function mrd(var r: mtx; var f: text; mnam:string): boolean;
function mty(a:mtx):boolean; inline;
function mwr(a:double): boolean; inline;
function mwr(a:double; var f:text): boolean; inline;
function mwr(a:mtx): boolean; inline;
function mwr(a:mtx; s:string): boolean;
function mwr(a:mtx; var f:text):boolean;
function nam(p:mtx):string; inline;
function prd(a, b:mtx):double;
function ptr(a:mtx):Pdouble;
function reset(var f: text; s:string): boolean; inline;
function rewrite(var f: text; s:string): boolean; inline;
function sev(u:double; s:mtx):double;
function sev(var r:mtx; u:mtx; s:mtx):boolean;
function sli(a:mtx; l1, l2, c1, c2: longint): mtx;
function smx(a:mtx):boolean;
function smx(a:mtx; i1,j1:longint; lgn, col:longint):mtx;
function spl( var s:mtx; x, y: mtx):boolean;
function trp(a:mtx):mtx;
function vec(a:mtx):Pvector;
procedure add(a, b:mtx);
procedure add(a: mtx; x: double);
procedure add(var r: mtx; a:mtx; b:mtx);
procedure add(var r: mtx; a:mtx; t:boolean);
procedure add(var r: mtx; a:mtx; x:double);
procedure add(var r: mtx; x:double; a:mtx);
procedure add(var x: double; b:mtx);
procedure cat(var r:mtx; a,b:mtx);
procedure cat(var r:mtx; a:mtx);
procedure cpy(var r:mtx; a:mtx);
procedure dim(var r:mtx; lgn, col:longint);
procedure dim(var r:mtx; lgn, col:longint; x:double); inline;
procedure dvd(a, b:mtx);
procedure dvd(a: mtx; x: double);
procedure dvd(var r: mtx; a:mtx; b:mtx);
procedure dvd(var r: mtx; a:mtx; t:boolean);
procedure dvd(var r: mtx; a:mtx; x:double);
procedure dvd(var r: mtx; x:double; a:mtx);
procedure dvd(var x: double; b:mtx);
procedure elm(a:mtx; i, j: longint; x:double);
procedure elm(b:mtx; x:double);
procedure equ(var r1:mtx; x:double); inline;
procedure equ(var r:mtx; a:mtx); inline;
procedure equ(var r:mtx; s:string);
procedure equ(var r:mtx; s:string; rnam:string); inline;
procedure equ(var r:mtx; x: double; a:mtx); inline;
procedure equ(var r:mtx; x:double; lgn, col:longint); inline;
procedure eye(a:mtx);
procedure eye(var r:mtx; a:mtx); inline;
procedure eye(var r:mtx; lgn, col: longint);
procedure fmt(d:longint); inline;
procedure lgn(var a:mtx; ri, rx:mtx);
procedure lgn(var a:mtx; r:mtx);
procedure lsp(var r:mtx; x0, x1: double; n:longint);
procedure map(var r:mtx; var x:double); inline;
procedure map(var r:mtx; var x:double; lgn, col:longint);
procedure mpt(a:mtx);
procedure mpt(a:mtx; s:string); inline;
procedure mul(a, b:mtx);
procedure mul(a: mtx; x: double);
procedure mul(var r: mtx; a:mtx; b:mtx);
procedure mul(var r: mtx; a:mtx; t:boolean);
procedure mul(var r: mtx; a:mtx; x:double);
procedure mul(var r: mtx; x:double; a:mtx);
procedure mul(var x: double; b:mtx);
procedure mwr(nam:string);
procedure nam(var p:mtx; name:string) inline;
procedure one(a:mtx); inline;
procedure one(var r:mtx; a:mtx); inline;
procedure one(var r:mtx; lgn, col: longint); inline;
procedure prd(var r: mtx; a, b: mtx);
procedure reset(var f: text); inline;
procedure rewrite(var f: text); inline;
procedure stk(var r:mtx; a,b:mtx);
procedure stk(var r:mtx; a:mtx);
procedure sub(a, b:mtx);
procedure sub(a: mtx; x: double);
procedure sub(var r: mtx; a:mtx; b:mtx);
procedure sub(var r: mtx; a:mtx; t:boolean);
procedure sub(var r: mtx; a:mtx; x:double);
procedure sub(var r: mtx; x:double; a:mtx);
procedure sub(var x: double; b:mtx);
procedure tra; inline;
procedure tra(p: boolean); inline;
procedure wtrace(a,b:mtx; s:string);
procedure wtrace(m:mtx; s:string);
procedure wtrace(r,a,b:mtx; s:string);
procedure zer(a:mtx); inline;
procedure zer(var r:mtx; a:mtx); inline;
procedure zer(var r:mtx; lgn, col: longint); inline;
