Trailing-Edge
-
PDP-10 Archives
-
decuslib20-04
-
decus/20-0101/nlnf40.c24
There are 2 other files named nlnf40.c24 in the archive. Click here to see a list.
; FILE NLNF40.C24
;
; THIS BATCH CONTROL FILE WILL CREATE A 43 COEFFICIENT VERSION OF
; NONLINWOOD: NONLINEAR LEAST-SQUARES CURVE-FITTING PROGRAM.
; THE BATCH CONTROL FILE IS TO BE USED WITH THE TOPS-20
; OPERATING SYSTEM.
; EITHER THE F40 OR THE F10 COMPILERS MAY BE USED.
; NOTE: BEFORE THIS FILE CAN BE RUN, RUN FILE NLNF40.C22.
;
; THIS FILE IS SET UP TO USE THE F40 COMPILER WITHOUT OVERLAY.
; FILES NLNF10.C22, C24 AND C28 USE THE F10 COMPILER.
;
; NLIN43 ALLOWS 43 MAX COEFFICIENTS,
; 15 MAX VARIABLES,
; 170 MAX OBSERVATIONS.
;
; PERFORM PROGRAM MODIFICATIONS TO CREATE 43 COEFFICIENT
; PROGRAM
;
; NLNUPD IS A FORTRAN PROGRAM WHICH WILL MODIFY THE
; 20 COEFFICIENT TO CREATE THE 43 COEFFICIENT PROGRAM
; USING THE PROGRAM CHANGES IN NONLIN.M43
;
COPY NONLIN.UPD NLNUPD.F4
COMPILE NLNUPD.F4/LIST/COMPILE
COPY NONLIN.M43 FOR01.DAT
COPY NLN20C.PGM FOR20.DAT
EXEC NLNUPD.REL
; FOR23 HAS THE RESULTS OF THE PROGRAM UPDATE
COPY FOR23.DAT NLN43C.F4
;
; THESE FILES ARE NO LONGER NEEDED
DELETE FOR23.DAT,FOR01.DAT,FOR20.DAT
;
; COMPILE 43 COEFFICIENT PROGRAM
COMPILE NLN43C.F4/LIST/COMPILE
;
;
; NOW COMPILE TEST MODELS AND RUN TEST PROBLEMS
;
COPY MODEL1.PGM MODEL1.F4
COPY MODEL2.PGM MODEL2.F4
COPY MODEL5.PGM MODEL5.F4
COMPILE MODEL1.F4/LIST/COMPILE
COMPILE MODEL2.F4/LIST/COMPILE
COMPILE MODEL5.F4/LIST/COMPILE
;
; COPY TEST DATA
COPY NONLIN.TST FOR05.DAT
;
; LOAD PROGRAM AND TEST MODELS
LOAD NLN43C.REL,MODEL1.REL,MODEL2.REL,MODEL5.REL,REMDER.REL,MACF40.REL
;
; NOW RUN TEST DATA
START
FOR05.DAT
FOR06.DAT
COPY FOR06.DAT NONLIN.TR2