ADAS Subroutine five9
SUBROUTINE FIVE9(A,P) C----------------------------------------------------------------------- C C ******************** FORTRAN 77 SUBROUTINE: FIVE9 ****************** C C PURPOSE: C TO CALCULATE THE BURGESS KNOT POINTS C C CALLING PROGRAM: C LSTSQ9 C C INPUT: C (R*8) A - MATRIX CONTAINING REDUCED PARAMETERS C OUTPUT: C (R*8) P - THE BURGESS KNOT POINTS C C ROUTINES: C MATIN1 C C DATE: 25/05/99 VERSION 1.1 C C AUTHOR: HUGH SUMMERS, UNIVERSITY OF STRATHCLYDE C C---------------------------------------------------------------------- REAL*8 A(9,9), P(9)