Overview
Comment:Added notice.
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: dac04e29dbb8cddfcb5249e672cfc2f3c003860ec7a4e729ec34b545e2fdeb6a
User & Date: gawthrop@users.sourceforge.net on 1998-08-17 15:53:22.000
Other Links: branch diff | manifest | tags
Context
1998-08-17
15:54:04
Added notice check-in: 0a13d83492 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
15:53:22
Added notice. check-in: dac04e29db user: gawthrop@users.sourceforge.net tags: origin/master, trunk
15:48:39
Replaced SVD solver with LUD solver check-in: 3f75d5cb10 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
Unified Diff Ignore Whitespace Patch
Modified mttroot/mtt/bin/trans/p/mtt_lubksb.p from [29347bf816] to [c3d7f1be65]. 
1




2
3
4
5
6
7
8



9
10
11
12
13
14
15

PROCEDURE lubksb(a: StateMatrix; n: INTEGER; indx: StateVector; VAR b: StateVector);





{
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$



###############################################################
}


(* Programs using LUBKSB must define the types
TYPE
   glnarray = ARRAY [1..n] OF real;

|
>
>
>
>







>
>
>








1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

PROCEDURE mtt_lubksb(a: StateMatrix; n: INTEGER; indx: StateVector; VAR b: StateVector);

{ This file is derived from the NUMERICAL RECIPES PASCAL SHAREWARE DISKETTE.
 Please read the README file in $MTTPATH/trans/p
 }

{
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.1  1998/08/17 12:58:16  peterg
## Initial revision
##
###############################################################
}


(* Programs using LUBKSB must define the types
TYPE
   glnarray = ARRAY [1..n] OF real;
︙︙
Modified mttroot/mtt/bin/trans/p/mtt_ludcmp.p from [9ed894c7d7] to [46fed2d80a]. 
1
2
3




4
5
6
7
8
9



10
11
12

13
14
15
16
17
18
19

PROCEDURE ludcmp(VAR a: glnpbynp; n,np: integer;
       VAR indx: glindx; VAR d: real);
(* Programs using LUDCMP must define the types




{
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$



###############################################################
}


TYPE
   glnpbynp = ARRAY [1..np,1..np] OF real;
   glnarray = ARRAY [1..n] OF real;
   glindx = ARRAY [1..n] OF integer;
in the main routine. *)

CONST

|
|
|
>
>
>
>






>
>
>



>








1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27

PROCEDURE mtt_ludcmp(VAR a: StateMatrix; n: integer;
		     VAR indx: StateVector; VAR d: real);

{ This file is derived from the NUMERICAL RECIPES PASCAL SHAREWARE DISKETTE.
 Please read the README file in $MTTPATH/trans/p
 }

{
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.1  1998/08/14 07:58:13  peterg
## Initial revision
##
###############################################################
}

(* Programs using LUDCMP must define the types
TYPE
   glnpbynp = ARRAY [1..np,1..np] OF real;
   glnarray = ARRAY [1..n] OF real;
   glindx = ARRAY [1..n] OF integer;
in the main routine. *)

CONST
︙︙
MTT: Model Transformation Tools
[ GitHub | SourceHut | Sourceforge | Fossil RSS ]