Index: mttroot/mtt/bin/trans/p/mtt_lubksb.p
==================================================================
--- mttroot/mtt/bin/trans/p/mtt_lubksb.p
+++ mttroot/mtt/bin/trans/p/mtt_lubksb.p
@@ -1,13 +1,20 @@
-PROCEDURE lubksb(a: StateMatrix; n: INTEGER; indx: StateVector; VAR b: StateVector);
+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

Index: mttroot/mtt/bin/trans/p/mtt_ludcmp.p
==================================================================
--- mttroot/mtt/bin/trans/p/mtt_ludcmp.p
+++ mttroot/mtt/bin/trans/p/mtt_ludcmp.p
@@ -1,17 +1,25 @@
-PROCEDURE ludcmp(VAR a: glnpbynp; n,np: integer;
-       VAR indx: glindx; VAR d: real);
-(* Programs using LUDCMP must define the types
+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. *)