1 line
No EOL
38 KiB
C++
Executable file
1 line
No EOL
38 KiB
C++
Executable file
************************************************************************
|
|
* UNIVERSITE DE BRETAGNE OCCIDENTALE --- I.U.T. DE LORIENT *
|
|
************************************************************************
|
|
* LABORATOIRE DE GENIE MECANIQUE ET PRODUCTIQUE *
|
|
* Tel 97.05.94.11 *
|
|
* Centre de Genie Industriel 56520 GUIDEL-PLAGES *
|
|
************************************************************************
|
|
|
|
|
|
************************************************************************
|
|
* *
|
|
* DATE: Thu Feb 4 12:58:37 WET 1993 *
|
|
* $ *
|
|
* AUTEUR: J-P HILY *
|
|
* $ *
|
|
* PROJET: EF3 *
|
|
* $ *
|
|
************************************************************************
|
|
|
|
|
|
************************************************************************
|
|
* *
|
|
* VERIFICATION: *
|
|
* *
|
|
* $ *
|
|
* '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' *
|
|
* MODIFICATIONS: *
|
|
* *
|
|
* ! date ! auteur ! but ! *
|
|
* ------------------------------------------------------------ *
|
|
* ! ! ! ! *
|
|
* ! ! ! ! *
|
|
* *
|
|
* $ *
|
|
* *
|
|
************************************************************************
|
|
|
|
|
|
************************************************************************
|
|
* *
|
|
SUBROUTINE HEXAQUA (NBNE,NBI,PHI,DPHI,WI,
|
|
& NBFE,NBNF,NONF,NBIS,PHIS,DPHIS,WIS)
|
|
* $ *
|
|
implicit none
|
|
* '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' *
|
|
* BUT: Valeurs des fonctions d'interpolations et de leurs *
|
|
* derivees aux points d'integration dans le cas *
|
|
* quadratique. *
|
|
* $ *
|
|
* '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' *
|
|
* VARIABLES: *
|
|
* ..................................... en entree *
|
|
* *
|
|
integer NBNE ! nombre de noeuds par element
|
|
integer NBFE ! nombre de faces par element
|
|
integer NBNF ! nombre de noeuds par face
|
|
integer NONF(NBNF,NBFE) ! connexion des noeuds des faces par
|
|
! rapport a ceux des elements
|
|
integer NBI ! nombre de point d'integration pour les elements
|
|
integer NBIS ! nombre de point d'integration pour les faces
|
|
* *
|
|
* ..................................... en sortie *
|
|
* *
|
|
c pour les elements
|
|
real*8 PHI(NBNE,NBI) ! fonctions d'interpolation
|
|
real*8 DPHI(3,NBNE,NBI) ! leurs derivees
|
|
real*8 WI(NBI) ! poids d'integration
|
|
c pour les faces
|
|
real*8 PHIS(NBNF,NBIS) ! fonctions d'interpolation
|
|
real*8 DPHIS(2,NBNF,NBIS)! leurs derivees
|
|
real*8 WIS(NBIS) ! poids d'integration
|
|
* $$ *
|
|
* ....................................... interne *
|
|
* *
|
|
integer NI
|
|
* *
|
|
************************************************************************
|
|
|
|
************************************************************************
|
|
* *
|
|
* ELEMENT DE REFERENCE , POINTS D'INTEGRATION: *
|
|
* *
|
|
* Nicolas COUTY 04/12/95 *
|
|
* Source : Pour l'element : Modulef Guide No 2, p 139 *
|
|
* Source : Pour les fonctions d'interpolation : *
|
|
* Dhatt et Touzot p 135 *
|
|
* + donnee suivante des valeurs des fonctions *
|
|
* d'interpolation aux points d'integration *
|
|
* (qui a permis la verification) *
|
|
* *
|
|
*----------------------------------------------------------------------*
|
|
*
|
|
* |zeta
|
|
* |
|
|
* 5____________20__|________8
|
|
* |\ | |\
|
|
* | \ | | \
|
|
* | 17 | | 19
|
|
* | \ | | \
|
|
* 13 \ | 16 \
|
|
* | 6\___________18___________\7
|
|
* | | | | |
|
|
* | | | | |
|
|
* | | -------------|----eta
|
|
* 1|_____|______12___\______| |
|
|
* \ 14 \ \4 15
|
|
* \ | \ \ |
|
|
* 9 | \ 11 |
|
|
* \ | \ \ |
|
|
* \ | \ \ |
|
|
* 2\|___________10____\_____\|3
|
|
* \
|
|
* \xi
|
|
*
|
|
* Points d'integration (cf hexalin.f)
|
|
* a=1/racine(3)
|
|
* Pt1 (a,a,a) ; Pt2 (a,a,-a) ; Pt3 (a,-a,a) ; Pt4 (a,-a,-a)
|
|
* Pt5 (-a,a,a) ; Pt6 (-a,a,-a) ; Pt7 (-a,-a,a) ; Pt8 (-a,-a,-a)
|
|
*
|
|
|
|
************************************************************************
|
|
* *
|
|
* CORPS DU PROGRAMME: *
|
|
* *
|
|
*----------------------------------------------------------------------*
|
|
|
|
CALL DINVEC(PHI,NBNE*NBI)
|
|
CALL DINVEC(DPHI,3*NBNE*NBI)
|
|
DO NI= 1,NBI
|
|
WI(NI)= 1.d0
|
|
ENDDO
|
|
CALL DINVEC(PHIS,NBNF*NBIS)
|
|
CALL DINVEC(DPHIS,2*NBNF*NBIS)
|
|
DO NI= 1,NBIS
|
|
WIS(NI)= 1.d0
|
|
ENDDO
|
|
|
|
c ---------- face 1 ----------
|
|
NONF(1,1)= 1
|
|
NONF(2,1)= 4
|
|
NONF(3,1)= 3
|
|
NONF(4,1)= 2
|
|
NONF(5,1)= 12
|
|
NONF(6,1)= 11
|
|
NONF(7,1)= 10
|
|
NONF(8,1)= 9
|
|
c ---------- face 2 ----------
|
|
NONF(1,2)= 1
|
|
NONF(2,2)= 5
|
|
NONF(3,2)= 8
|
|
NONF(4,2)= 4
|
|
NONF(5,2)= 13
|
|
NONF(6,2)= 20
|
|
NONF(7,2)= 16
|
|
NONF(8,2)= 12
|
|
c ---------- face 3 ----------
|
|
NONF(1,3)= 1
|
|
NONF(2,3)= 2
|
|
NONF(3,3)= 6
|
|
NONF(4,3)= 5
|
|
NONF(5,3)= 9
|
|
NONF(6,3)= 14
|
|
NONF(7,3)= 17
|
|
NONF(8,3)= 13
|
|
c ---------- face 4 ----------
|
|
NONF(1,4)= 5
|
|
NONF(2,4)= 6
|
|
NONF(3,4)= 7
|
|
NONF(4,4)= 8
|
|
NONF(5,4)= 17
|
|
NONF(6,4)= 18
|
|
NONF(7,4)= 19
|
|
NONF(8,4)= 20
|
|
c ---------- face 5 ----------
|
|
NONF(1,5)= 2
|
|
NONF(2,5)= 3
|
|
NONF(3,5)= 7
|
|
NONF(4,5)= 6
|
|
NONF(5,5)= 10
|
|
NONF(6,5)= 15
|
|
NONF(7,5)= 18
|
|
NONF(8,5)= 14
|
|
c ---------- face 6 ----------
|
|
NONF(1,6)= 3
|
|
NONF(2,6)= 4
|
|
NONF(3,6)= 8
|
|
NONF(4,6)= 7
|
|
NONF(5,6)= 11
|
|
NONF(6,6)= 16
|
|
NONF(7,6)= 19
|
|
NONF(8,6)= 15
|
|
|
|
PHI(7,3) = -0.1870014113213579D0
|
|
PHI(3,6) = -0.1870014113213579D0
|
|
PHI(20,7) = 0.4146723119520977D0
|
|
PHI(19,6) = 0.1111111111111112D0
|
|
PHI(15,3) = 0.1111111111111112D0
|
|
PHI(19,1) = 0.4146723119520977D0
|
|
PHI(10,6) = 0.1111111111111112D0
|
|
PHI(3,4) = -0.1870014113213579D0
|
|
PHI(7,6) = -0.9077636645642013D-1
|
|
PHI(14,3) = 0.4146723119520977D0
|
|
PHI(16,5) = 0.4146723119520977D0
|
|
PHI(15,4) = 0.1111111111111112D0
|
|
PHI(12,4) = 0.1111111111111112D0
|
|
PHI(4,8) = -0.1870014113213579D0
|
|
PHI(16,1) = 0.1111111111111112D0
|
|
PHI(14,6) = 0.2977213249234699D-1
|
|
PHI(9,8) = 0.4146723119520977D0
|
|
PHI(20,4) = 0.2977213249234699D-1
|
|
PHI(18,4) = 0.1111111111111112D0
|
|
PHI(9,5) = 0.2977213249234699D-1
|
|
PHI(11,5) = 0.1111111111111112D0
|
|
PHI(5,5) = -0.1870014113213579D0
|
|
PHI(12,3) = 0.2977213249234699D-1
|
|
PHI(5,1) = -0.9077636645642013D-1
|
|
PHI(12,6) = 0.4146723119520977D0
|
|
PHI(17,5) = 0.1111111111111112D0
|
|
PHI(5,2) = -0.3522081090086456D-1
|
|
PHI(16,6) = 0.4146723119520977D0
|
|
PHI(7,8) = -0.3522081090086456D-1
|
|
PHI(12,7) = 0.1111111111111112D0
|
|
PHI(10,5) = 0.2977213249234699D-1
|
|
PHI(17,6) = 0.2977213249234699D-1
|
|
PHI(8,8) = -0.9077636645642013D-1
|
|
PHI(9,7) = 0.1111111111111112D0
|
|
PHI(16,7) = 0.1111111111111112D0
|
|
PHI(8,7) = -0.1870014113213579D0
|
|
PHI(5,3) = -0.1870014113213579D0
|
|
PHI(13,8) = 0.4146723119520977D0
|
|
PHI(2,2) = -0.1870014113213579D0
|
|
PHI(9,4) = 0.4146723119520977D0
|
|
PHI(12,5) = 0.1111111111111112D0
|
|
PHI(5,4) = -0.9077636645642013D-1
|
|
PHI(2,5) = -0.3522081090086456D-1
|
|
PHI(3,7) = -0.3522081090086456D-1
|
|
PHI(18,7) = 0.1111111111111112D0
|
|
PHI(15,8) = 0.2977213249234699D-1
|
|
PHI(3,1) = -0.1870014113213579D0
|
|
PHI(5,7) = -0.1314458557658024D0
|
|
PHI(18,3) = 0.4146723119520977D0
|
|
PHI(12,2) = 0.1111111111111112D0
|
|
PHI(2,8) = -0.1870014113213579D0
|
|
PHI(6,6) = -0.3522081090086456D-1
|
|
PHI(4,7) = -0.9077636645642013D-1
|
|
PHI(19,8) = 0.2977213249234699D-1
|
|
PHI(3,3) = -0.9077636645642013D-1
|
|
PHI(4,4) = -0.9077636645642013D-1
|
|
PHI(2,6) = -0.9077636645642013D-1
|
|
PHI(17,4) = 0.1111111111111112D0
|
|
PHI(13,5) = 0.1111111111111112D0
|
|
PHI(9,1) = 0.2977213249234699D-1
|
|
PHI(9,6) = 0.1111111111111112D0
|
|
PHI(10,4) = 0.4146723119520977D0
|
|
PHI(20,3) = 0.1111111111111112D0
|
|
PHI(1,7) = -0.1870014113213579D0
|
|
PHI(10,7) = 0.2977213249234699D-1
|
|
PHI(14,1) = 0.1111111111111112D0
|
|
PHI(19,2) = 0.1111111111111112D0
|
|
PHI(17,3) = 0.4146723119520977D0
|
|
PHI(8,5) = -0.1314458557658024D0
|
|
PHI(5,6) = -0.9077636645642013D-1
|
|
PHI(4,6) = -0.1314458557658024D0
|
|
PHI(13,6) = 0.1111111111111112D0
|
|
PHI(18,8) = 0.2977213249234699D-1
|
|
PHI(4,1) = -0.9077636645642013D-1
|
|
PHI(18,1) = 0.4146723119520977D0
|
|
PHI(20,1) = 0.1111111111111112D0
|
|
PHI(8,4) = -0.3522081090086456D-1
|
|
PHI(1,3) = -0.9077636645642013D-1
|
|
PHI(7,4) = -0.9077636645642013D-1
|
|
PHI(3,5) = -0.9077636645642013D-1
|
|
PHI(19,4) = 0.2977213249234699D-1
|
|
PHI(13,7) = 0.4146723119520977D0
|
|
PHI(17,2) = 0.2977213249234699D-1
|
|
PHI(13,3) = 0.1111111111111112D0
|
|
PHI(6,5) = -0.9077636645642013D-1
|
|
PHI(8,3) = -0.9077636645642013D-1
|
|
PHI(16,4) = 0.2977213249234699D-1
|
|
PHI(15,7) = 0.2977213249234699D-1
|
|
PHI(10,1) = 0.1111111111111112D0
|
|
PHI(7,2) = -0.1870014113213579D0
|
|
PHI(6,7) = -0.1870014113213579D0
|
|
PHI(15,1) = 0.4146723119520977D0
|
|
PHI(2,4) = -0.1314458557658024D0
|
|
PHI(18,5) = 0.1111111111111112D0
|
|
PHI(20,2) = 0.2977213249234699D-1
|
|
PHI(14,4) = 0.4146723119520977D0
|
|
PHI(15,2) = 0.4146723119520977D0
|
|
PHI(10,2) = 0.4146723119520977D0
|
|
PHI(14,5) = 0.2977213249234699D-1
|
|
PHI(11,2) = 0.4146723119520977D0
|
|
PHI(8,6) = -0.1870014113213579D0
|
|
PHI(16,8) = 0.1111111111111112D0
|
|
PHI(1,5) = -0.9077636645642013D-1
|
|
PHI(2,1) = -0.9077636645642013D-1
|
|
PHI(13,1) = 0.2977213249234699D-1
|
|
PHI(20,5) = 0.4146723119520977D0
|
|
PHI(6,8) = -0.9077636645642013D-1
|
|
PHI(12,8) = 0.4146723119520977D0
|
|
PHI(4,5) = -0.1870014113213579D0
|
|
PHI(20,8) = 0.1111111111111112D0
|
|
PHI(13,4) = 0.1111111111111112D0
|
|
PHI(1,8) = -0.1314458557658024D0
|
|
PHI(6,3) = -0.1314458557658024D0
|
|
PHI(19,3) = 0.1111111111111112D0
|
|
PHI(11,3) = 0.2977213249234699D-1
|
|
PHI(15,6) = 0.1111111111111112D0
|
|
PHI(7,7) = -0.9077636645642013D-1
|
|
PHI(17,7) = 0.4146723119520977D0
|
|
PHI(19,7) = 0.1111111111111112D0
|
|
PHI(1,1) = -0.3522081090086456D-1
|
|
PHI(5,8) = -0.1870014113213579D0
|
|
PHI(3,8) = -0.9077636645642013D-1
|
|
PHI(8,2) = -0.9077636645642013D-1
|
|
PHI(14,2) = 0.1111111111111112D0
|
|
PHI(6,4) = -0.1870014113213579D0
|
|
PHI(12,1) = 0.2977213249234699D-1
|
|
PHI(16,2) = 0.1111111111111112D0
|
|
PHI(6,2) = -0.9077636645642013D-1
|
|
PHI(16,3) = 0.2977213249234699D-1
|
|
PHI(10,8) = 0.1111111111111112D0
|
|
PHI(1,2) = -0.9077636645642013D-1
|
|
PHI(11,6) = 0.4146723119520977D0
|
|
PHI(9,2) = 0.1111111111111112D0
|
|
PHI(10,3) = 0.1111111111111112D0
|
|
PHI(11,7) = 0.2977213249234699D-1
|
|
PHI(20,6) = 0.1111111111111112D0
|
|
PHI(2,7) = -0.9077636645642013D-1
|
|
PHI(13,2) = 0.2977213249234699D-1
|
|
PHI(9,3) = 0.1111111111111112D0
|
|
PHI(6,1) = -0.1870014113213579D0
|
|
PHI(18,2) = 0.1111111111111112D0
|
|
PHI(3,2) = -0.1314458557658024D0
|
|
PHI(14,8) = 0.1111111111111112D0
|
|
PHI(14,7) = 0.1111111111111112D0
|
|
PHI(15,5) = 0.1111111111111112D0
|
|
PHI(17,8) = 0.1111111111111112D0
|
|
PHI(11,1) = 0.1111111111111112D0
|
|
PHI(11,4) = 0.1111111111111112D0
|
|
PHI(19,5) = 0.4146723119520977D0
|
|
PHI(4,2) = -0.1870014113213579D0
|
|
PHI(2,3) = -0.1870014113213579D0
|
|
PHI(1,6) = -0.1870014113213579D0
|
|
PHI(7,1) = -0.1314458557658024D0
|
|
PHI(17,1) = 0.1111111111111112D0
|
|
PHI(7,5) = -0.1870014113213579D0
|
|
PHI(8,1) = -0.1870014113213579D0
|
|
PHI(4,3) = -0.3522081090086456D-1
|
|
PHI(18,6) = 0.2977213249234699D-1
|
|
PHI(11,8) = 0.1111111111111112D0
|
|
PHI(1,4) = -0.1870014113213579D0
|
|
DPHI(1,6,6) = -0.7389594549567744D-1
|
|
DPHI(3,10,7) = -0.7044162180172908D-1
|
|
DPHI(1,10,4) = 0.2628917115316043D0
|
|
DPHI(2,12,5) = -0.1924500897298754D0
|
|
DPHI(3,3,6) = -0.128917115316044D-1
|
|
DPHI(2,1,1) = 0.7389594549567744D-1
|
|
DPHI(2,11,5) = 0.7044162180172908D-1
|
|
DPHI(1,16,2) = -0.2628917115316043D0
|
|
DPHI(1,13,8) = -0.2628917115316043D0
|
|
DPHI(2,17,8) = -0.7044162180172908D-1
|
|
DPHI(3,16,8) = 0.1924500897298754D0
|
|
DPHI(3,17,2) = 0.7044162180172908D-1
|
|
DPHI(1,14,3) = 0.2628917115316043D0
|
|
DPHI(1,4,7) = 0.2232909936926024D-1
|
|
DPHI(3,16,2) = 0.1924500897298754D0
|
|
DPHI(3,2,8) = -0.128917115316044D-1
|
|
DPHI(1,14,7) = 0.2628917115316043D0
|
|
DPHI(2,13,1) = -0.7044162180172908D-1
|
|
DPHI(1,19,5) = 0.7182335127930841D0
|
|
DPHI(3,13,8) = 0.7182335127930841D0
|
|
DPHI(3,14,3) = -0.7182335127930841D0
|
|
DPHI(1,12,6) = -0.2628917115316043D0
|
|
DPHI(2,19,7) = 0.2628917115316043D0
|
|
DPHI(3,4,1) = 0.1795583781982711D0
|
|
DPHI(2,7,1) = 0.4072292788290108D0
|
|
DPHI(3,18,1) = 0.2628917115316043D0
|
|
DPHI(3,3,4) = -0.128917115316044D-1
|
|
DPHI(3,7,7) = -0.2232909936926024D-1
|
|
DPHI(3,14,7) = -0.1924500897298754D0
|
|
DPHI(2,8,8) = -0.1795583781982711D0
|
|
DPHI(1,16,3) = -0.7044162180172908D-1
|
|
DPHI(1,20,3) = -0.2628917115316043D0
|
|
DPHI(2,5,4) = 0.2232909936926024D-1
|
|
DPHI(1,19,3) = -0.1924500897298754D0
|
|
DPHI(1,20,4) = -0.7044162180172908D-1
|
|
DPHI(1,2,3) = 0.128917115316044D-1
|
|
DPHI(3,16,3) = -0.5156684612641721D-1
|
|
DPHI(1,7,8) = -0.7389594549567744D-1
|
|
DPHI(2,14,2) = -0.2628917115316043D0
|
|
DPHI(3,17,5) = 0.7044162180172908D-1
|
|
DPHI(1,6,2) = -0.2232909936926024D-1
|
|
DPHI(3,11,6) = -0.2628917115316043D0
|
|
DPHI(3,9,4) = -0.2628917115316043D0
|
|
DPHI(1,2,8) = -0.3110042339640731D0
|
|
DPHI(1,5,6) = 0.2232909936926024D-1
|
|
DPHI(1,14,4) = 0.2628917115316043D0
|
|
DPHI(2,7,5) = 0.128917115316044D-1
|
|
DPHI(3,18,6) = 0.7044162180172908D-1
|
|
DPHI(3,20,6) = 0.2628917115316043D0
|
|
DPHI(1,5,2) = 0.7389594549567744D-1
|
|
DPHI(3,19,4) = 0.7044162180172908D-1
|
|
DPHI(2,20,5) = -0.7182335127930841D0
|
|
DPHI(3,20,1) = 0.7044162180172908D-1
|
|
DPHI(2,10,6) = -0.1924500897298754D0
|
|
DPHI(1,4,5) = -0.128917115316044D-1
|
|
DPHI(1,10,7) = 0.7044162180172908D-1
|
|
DPHI(2,8,4) = -0.7389594549567744D-1
|
|
DPHI(1,15,6) = 0.2628917115316043D0
|
|
DPHI(1,10,1) = 0.7044162180172908D-1
|
|
DPHI(2,20,1) = -0.1924500897298754D0
|
|
DPHI(1,18,2) = 0.7044162180172908D-1
|
|
DPHI(3,14,4) = 0.7182335127930841D0
|
|
DPHI(1,17,4) = -0.1924500897298754D0
|
|
DPHI(3,12,5) = -0.2628917115316043D0
|
|
DPHI(1,8,8) = 0.2232909936926024D-1
|
|
DPHI(2,7,4) = -0.1795583781982711D0
|
|
DPHI(1,14,1) = 0.7044162180172908D-1
|
|
DPHI(1,11,6) = 0.7182335127930841D0
|
|
DPHI(3,6,4) = -0.3110042339640731D0
|
|
DPHI(2,13,5) = -0.2628917115316043D0
|
|
DPHI(1,3,8) = -0.1795583781982711D0
|
|
DPHI(1,4,3) = 0.7389594549567744D-1
|
|
DPHI(3,6,3) = 0.4072292788290108D0
|
|
DPHI(3,12,4) = -0.7044162180172908D-1
|
|
DPHI(1,18,4) = 0.7044162180172908D-1
|
|
DPHI(3,7,8) = -0.7389594549567744D-1
|
|
DPHI(3,9,7) = -0.2628917115316043D0
|
|
DPHI(2,17,3) = -0.2628917115316043D0
|
|
DPHI(1,18,7) = 0.2628917115316043D0
|
|
DPHI(2,2,8) = -0.128917115316044D-1
|
|
DPHI(3,4,2) = -0.128917115316044D-1
|
|
DPHI(2,11,7) = 0.7044162180172908D-1
|
|
DPHI(3,7,4) = -0.1795583781982711D0
|
|
DPHI(1,11,1) = -0.1924500897298754D0
|
|
DPHI(3,3,2) = -0.4072292788290108D0
|
|
DPHI(1,19,2) = -0.1924500897298754D0
|
|
DPHI(1,15,1) = 0.2628917115316043D0
|
|
DPHI(2,19,5) = 0.2628917115316043D0
|
|
DPHI(1,18,6) = 0.7044162180172908D-1
|
|
DPHI(2,4,2) = 0.128917115316044D-1
|
|
DPHI(1,3,4) = 0.128917115316044D-1
|
|
DPHI(3,6,8) = -0.1795583781982711D0
|
|
DPHI(1,6,7) = -0.3110042339640731D0
|
|
DPHI(1,12,2) = -0.2628917115316043D0
|
|
DPHI(3,15,1) = -0.7182335127930841D0
|
|
DPHI(1,9,6) = 0.1924500897298754D0
|
|
DPHI(3,3,7) = 0.7389594549567744D-1
|
|
DPHI(2,15,7) = 0.7044162180172908D-1
|
|
DPHI(2,18,1) = -0.7182335127930841D0
|
|
DPHI(3,5,3) = 0.128917115316044D-1
|
|
DPHI(2,4,5) = 0.128917115316044D-1
|
|
DPHI(3,8,5) = 0.4072292788290108D0
|
|
DPHI(2,12,8) = 0.7182335127930841D0
|
|
DPHI(1,12,1) = -0.7044162180172908D-1
|
|
DPHI(2,10,3) = 0.1924500897298754D0
|
|
DPHI(2,10,5) = -0.5156684612641721D-1
|
|
DPHI(1,10,8) = 0.2628917115316043D0
|
|
DPHI(1,5,7) = -0.4072292788290108D0
|
|
DPHI(2,12,3) = 0.5156684612641721D-1
|
|
DPHI(2,17,1) = -0.2628917115316043D0
|
|
DPHI(2,5,3) = -0.128917115316044D-1
|
|
DPHI(3,17,6) = 0.7044162180172908D-1
|
|
DPHI(2,11,8) = 0.2628917115316043D0
|
|
DPHI(3,8,1) = 0.128917115316044D-1
|
|
DPHI(1,6,4) = 0.128917115316044D-1
|
|
DPHI(1,14,5) = 0.7044162180172908D-1
|
|
DPHI(2,11,3) = 0.7044162180172908D-1
|
|
DPHI(1,4,6) = -0.4072292788290108D0
|
|
DPHI(3,2,7) = 0.1795583781982711D0
|
|
DPHI(3,11,1) = -0.2628917115316043D0
|
|
DPHI(1,6,5) = -0.1795583781982711D0
|
|
DPHI(3,14,5) = -0.5156684612641721D-1
|
|
DPHI(3,9,5) = -0.7044162180172908D-1
|
|
DPHI(2,12,7) = 0.1924500897298754D0
|
|
DPHI(3,19,1) = 0.2628917115316043D0
|
|
DPHI(2,19,3) = 0.2628917115316043D0
|
|
DPHI(1,9,5) = 0.5156684612641721D-1
|
|
DPHI(2,13,6) = -0.2628917115316043D0
|
|
DPHI(2,15,4) = 0.2628917115316043D0
|
|
DPHI(2,18,7) = 0.1924500897298754D0
|
|
DPHI(1,12,5) = -0.7044162180172908D-1
|
|
DPHI(2,15,6) = 0.7044162180172908D-1
|
|
DPHI(1,11,8) = 0.1924500897298754D0
|
|
DPHI(2,6,6) = 0.7389594549567744D-1
|
|
DPHI(1,15,8) = 0.7044162180172908D-1
|
|
DPHI(3,1,1) = 0.7389594549567744D-1
|
|
DPHI(3,7,3) = 0.128917115316044D-1
|
|
DPHI(3,11,4) = -0.7044162180172908D-1
|
|
DPHI(1,3,3) = -0.2232909936926024D-1
|
|
DPHI(1,2,7) = -0.1795583781982711D0
|
|
DPHI(3,4,4) = 0.2232909936926024D-1
|
|
DPHI(3,10,4) = -0.2628917115316043D0
|
|
DPHI(2,3,5) = -0.2232909936926024D-1
|
|
DPHI(1,16,7) = -0.7044162180172908D-1
|
|
DPHI(3,7,1) = 0.4072292788290108D0
|
|
DPHI(3,6,5) = -0.2232909936926024D-1
|
|
DPHI(3,8,8) = -0.1795583781982711D0
|
|
DPHI(3,15,8) = 0.5156684612641721D-1
|
|
DPHI(1,16,8) = -0.7044162180172908D-1
|
|
DPHI(1,15,2) = 0.2628917115316043D0
|
|
DPHI(1,11,5) = 0.1924500897298754D0
|
|
DPHI(2,17,7) = -0.2628917115316043D0
|
|
DPHI(1,11,3) = -0.5156684612641721D-1
|
|
DPHI(2,5,1) = 0.1795583781982711D0
|
|
DPHI(2,8,1) = 0.128917115316044D-1
|
|
DPHI(2,4,4) = -0.1795583781982711D0
|
|
DPHI(2,17,4) = -0.7044162180172908D-1
|
|
DPHI(3,15,6) = 0.1924500897298754D0
|
|
DPHI(2,20,6) = -0.1924500897298754D0
|
|
DPHI(3,16,7) = -0.1924500897298754D0
|
|
DPHI(2,9,1) = -0.7044162180172908D-1
|
|
DPHI(1,13,3) = -0.2628917115316043D0
|
|
DPHI(3,15,2) = 0.7182335127930841D0
|
|
DPHI(3,3,3) = 0.1795583781982711D0
|
|
DPHI(1,17,3) = -0.7182335127930841D0
|
|
DPHI(2,7,8) = -0.7389594549567744D-1
|
|
DPHI(1,11,7) = 0.5156684612641721D-1
|
|
DPHI(1,17,5) = 0.1924500897298754D0
|
|
DPHI(1,5,1) = 0.1795583781982711D0
|
|
DPHI(2,11,2) = 0.2628917115316043D0
|
|
DPHI(2,4,3) = -0.7389594549567744D-1
|
|
DPHI(3,13,3) = -0.1924500897298754D0
|
|
DPHI(1,4,4) = 0.1795583781982711D0
|
|
DPHI(3,2,6) = 0.2232909936926024D-1
|
|
DPHI(2,9,6) = -0.2628917115316043D0
|
|
DPHI(2,16,5) = 0.2628917115316043D0
|
|
DPHI(2,3,3) = -0.1795583781982711D0
|
|
DPHI(2,3,4) = -0.3110042339640731D0
|
|
DPHI(2,20,2) = -0.5156684612641721D-1
|
|
DPHI(1,15,3) = 0.7044162180172908D-1
|
|
DPHI(2,15,5) = 0.7044162180172908D-1
|
|
DPHI(3,9,3) = -0.2628917115316043D0
|
|
DPHI(2,2,4) = -0.4072292788290108D0
|
|
DPHI(3,5,5) = 0.128917115316044D-1
|
|
DPHI(1,13,7) = -0.2628917115316043D0
|
|
DPHI(2,16,1) = 0.7044162180172908D-1
|
|
DPHI(1,20,7) = -0.2628917115316043D0
|
|
DPHI(2,5,2) = 0.7389594549567744D-1
|
|
DPHI(1,18,3) = 0.2628917115316043D0
|
|
DPHI(1,1,4) = 0.3110042339640731D0
|
|
DPHI(3,15,3) = -0.1924500897298754D0
|
|
DPHI(2,13,2) = -0.7044162180172908D-1
|
|
DPHI(2,19,2) = 0.7044162180172908D-1
|
|
DPHI(3,8,4) = -0.7389594549567744D-1
|
|
DPHI(3,13,7) = -0.7182335127930841D0
|
|
DPHI(2,4,8) = -0.3110042339640731D0
|
|
DPHI(1,10,2) = 0.2628917115316043D0
|
|
DPHI(3,20,4) = 0.7044162180172908D-1
|
|
DPHI(3,19,6) = 0.2628917115316043D0
|
|
DPHI(1,6,8) = -0.1795583781982711D0
|
|
DPHI(1,9,8) = 0.7182335127930841D0
|
|
DPHI(3,18,5) = 0.7044162180172908D-1
|
|
DPHI(1,16,5) = -0.2628917115316043D0
|
|
DPHI(1,18,8) = 0.7044162180172908D-1
|
|
DPHI(1,17,1) = -0.1924500897298754D0
|
|
DPHI(1,18,5) = 0.2628917115316043D0
|
|
DPHI(2,6,8) = 0.2232909936926024D-1
|
|
DPHI(3,11,7) = -0.7044162180172908D-1
|
|
DPHI(3,6,2) = -0.1795583781982711D0
|
|
DPHI(1,12,4) = -0.2628917115316043D0
|
|
DPHI(3,10,3) = -0.2628917115316043D0
|
|
DPHI(2,16,6) = 0.2628917115316043D0
|
|
DPHI(1,9,7) = 0.1924500897298754D0
|
|
DPHI(3,9,2) = -0.7044162180172908D-1
|
|
DPHI(1,14,6) = 0.7044162180172908D-1
|
|
DPHI(2,9,8) = -0.2628917115316043D0
|
|
DPHI(3,13,4) = 0.1924500897298754D0
|
|
DPHI(1,16,4) = -0.7044162180172908D-1
|
|
DPHI(2,6,2) = 0.1795583781982711D0
|
|
DPHI(2,1,8) = -0.4072292788290108D0
|
|
DPHI(3,12,7) = -0.2628917115316043D0
|
|
DPHI(3,12,3) = -0.7044162180172908D-1
|
|
DPHI(3,11,5) = -0.2628917115316043D0
|
|
DPHI(3,14,6) = 0.5156684612641721D-1
|
|
DPHI(2,13,4) = -0.7044162180172908D-1
|
|
DPHI(3,16,4) = 0.5156684612641721D-1
|
|
DPHI(2,6,5) = 0.1795583781982711D0
|
|
DPHI(3,20,8) = 0.2628917115316043D0
|
|
DPHI(1,1,1) = 0.7389594549567744D-1
|
|
DPHI(2,2,7) = 0.2232909936926024D-1
|
|
DPHI(3,12,8) = -0.2628917115316043D0
|
|
DPHI(2,10,4) = 0.7182335127930841D0
|
|
DPHI(2,11,6) = 0.2628917115316043D0
|
|
DPHI(3,19,7) = 0.7044162180172908D-1
|
|
DPHI(1,13,4) = -0.2628917115316043D0
|
|
DPHI(3,1,6) = -0.128917115316044D-1
|
|
DPHI(3,12,6) = -0.2628917115316043D0
|
|
DPHI(3,18,7) = 0.7044162180172908D-1
|
|
DPHI(1,17,7) = 0.7182335127930841D0
|
|
DPHI(3,2,1) = 0.1795583781982711D0
|
|
DPHI(2,17,2) = -0.7044162180172908D-1
|
|
DPHI(2,1,5) = 0.1795583781982711D0
|
|
DPHI(2,5,7) = -0.4072292788290108D0
|
|
DPHI(1,9,1) = -0.5156684612641721D-1
|
|
DPHI(2,16,2) = 0.7044162180172908D-1
|
|
DPHI(1,13,1) = -0.7044162180172908D-1
|
|
DPHI(1,8,5) = -0.4072292788290108D0
|
|
DPHI(2,13,8) = -0.2628917115316043D0
|
|
DPHI(3,17,8) = 0.2628917115316043D0
|
|
DPHI(2,2,1) = 0.1795583781982711D0
|
|
DPHI(2,7,2) = 0.128917115316044D-1
|
|
DPHI(2,14,3) = -0.2628917115316043D0
|
|
DPHI(2,20,8) = 0.1924500897298754D0
|
|
DPHI(3,5,6) = -0.1795583781982711D0
|
|
DPHI(3,14,1) = -0.1924500897298754D0
|
|
DPHI(1,3,7) = -0.7389594549567744D-1
|
|
DPHI(2,14,7) = -0.7044162180172908D-1
|
|
DPHI(3,5,8) = -0.3110042339640731D0
|
|
DPHI(2,19,8) = 0.7044162180172908D-1
|
|
DPHI(3,13,1) = -0.5156684612641721D-1
|
|
DPHI(3,1,3) = 0.1795583781982711D0
|
|
DPHI(2,4,7) = -0.1795583781982711D0
|
|
DPHI(1,7,2) = 0.128917115316044D-1
|
|
DPHI(3,19,5) = 0.2628917115316043D0
|
|
DPHI(2,16,3) = 0.7044162180172908D-1
|
|
DPHI(3,12,1) = -0.7044162180172908D-1
|
|
DPHI(1,14,2) = 0.7044162180172908D-1
|
|
DPHI(2,17,5) = -0.2628917115316043D0
|
|
DPHI(3,8,3) = -0.2232909936926024D-1
|
|
DPHI(2,20,3) = 0.1924500897298754D0
|
|
DPHI(2,9,4) = -0.2628917115316043D0
|
|
DPHI(2,19,4) = 0.7044162180172908D-1
|
|
DPHI(2,20,4) = 0.5156684612641721D-1
|
|
DPHI(2,2,6) = 0.1795583781982711D0
|
|
DPHI(3,7,6) = -0.1795583781982711D0
|
|
DPHI(3,1,5) = 0.1795583781982711D0
|
|
DPHI(3,14,2) = 0.1924500897298754D0
|
|
DPHI(1,1,3) = 0.1795583781982711D0
|
|
DPHI(2,8,3) = -0.1795583781982711D0
|
|
DPHI(1,6,3) = 0.4072292788290108D0
|
|
DPHI(1,20,5) = -0.2628917115316043D0
|
|
DPHI(1,10,6) = 0.2628917115316043D0
|
|
DPHI(1,4,2) = 0.3110042339640731D0
|
|
DPHI(3,8,7) = 0.128917115316044D-1
|
|
DPHI(1,20,1) = -0.2628917115316043D0
|
|
DPHI(2,14,4) = -0.2628917115316043D0
|
|
DPHI(3,20,7) = 0.2628917115316043D0
|
|
DPHI(1,8,3) = 0.1795583781982711D0
|
|
DPHI(1,3,1) = 0.128917115316044D-1
|
|
DPHI(3,4,7) = 0.1795583781982711D0
|
|
DPHI(2,10,7) = 0.5156684612641721D-1
|
|
DPHI(3,2,3) = 0.3110042339640731D0
|
|
DPHI(1,2,5) = -0.7389594549567744D-1
|
|
DPHI(2,4,6) = 0.4072292788290108D0
|
|
DPHI(2,10,1) = -0.1924500897298754D0
|
|
DPHI(2,18,2) = -0.1924500897298754D0
|
|
DPHI(3,4,3) = 0.7389594549567744D-1
|
|
DPHI(1,2,4) = 0.4072292788290108D0
|
|
DPHI(1,13,5) = -0.7044162180172908D-1
|
|
DPHI(3,4,8) = -0.128917115316044D-1
|
|
DPHI(2,14,1) = -0.2628917115316043D0
|
|
DPHI(3,14,8) = 0.1924500897298754D0
|
|
DPHI(3,2,4) = -0.4072292788290108D0
|
|
DPHI(2,9,7) = -0.7044162180172908D-1
|
|
DPHI(2,2,3) = -0.128917115316044D-1
|
|
DPHI(1,9,3) = -0.1924500897298754D0
|
|
DPHI(1,11,4) = -0.1924500897298754D0
|
|
DPHI(1,1,5) = 0.2232909936926024D-1
|
|
DPHI(3,13,5) = -0.1924500897298754D0
|
|
DPHI(3,1,2) = 0.2232909936926024D-1
|
|
DPHI(3,5,2) = -0.7389594549567744D-1
|
|
DPHI(3,8,2) = -0.1795583781982711D0
|
|
DPHI(2,12,6) = -0.7182335127930841D0
|
|
DPHI(2,18,4) = 0.1924500897298754D0
|
|
DPHI(2,5,5) = 0.3110042339640731D0
|
|
DPHI(1,3,2) = 0.4072292788290108D0
|
|
DPHI(1,17,2) = -0.5156684612641721D-1
|
|
DPHI(1,3,6) = -0.3110042339640731D0
|
|
DPHI(2,1,2) = 0.1795583781982711D0
|
|
DPHI(3,2,2) = -0.128917115316044D-1
|
|
DPHI(3,17,3) = 0.2628917115316043D0
|
|
DPHI(2,5,6) = 0.1795583781982711D0
|
|
DPHI(1,19,6) = 0.1924500897298754D0
|
|
DPHI(1,20,8) = -0.7044162180172908D-1
|
|
DPHI(1,14,8) = 0.2628917115316043D0
|
|
DPHI(3,6,6) = -0.7389594549567744D-1
|
|
DPHI(1,7,1) = 0.4072292788290108D0
|
|
DPHI(1,11,2) = -0.7182335127930841D0
|
|
DPHI(3,6,1) = 0.128917115316044D-1
|
|
DPHI(1,7,3) = 0.128917115316044D-1
|
|
DPHI(1,4,1) = 0.1795583781982711D0
|
|
DPHI(2,15,1) = 0.2628917115316043D0
|
|
DPHI(1,15,7) = 0.7044162180172908D-1
|
|
DPHI(1,18,1) = 0.2628917115316043D0
|
|
DPHI(1,1,2) = 0.1795583781982711D0
|
|
DPHI(2,18,6) = -0.5156684612641721D-1
|
|
DPHI(1,19,8) = 0.5156684612641721D-1
|
|
DPHI(1,8,2) = 0.1795583781982711D0
|
|
DPHI(1,5,3) = 0.3110042339640731D0
|
|
DPHI(1,12,8) = -0.2628917115316043D0
|
|
DPHI(1,10,3) = 0.7044162180172908D-1
|
|
DPHI(1,10,5) = 0.7044162180172908D-1
|
|
DPHI(3,1,7) = 0.3110042339640731D0
|
|
DPHI(2,12,2) = -0.1924500897298754D0
|
|
DPHI(1,9,2) = -0.1924500897298754D0
|
|
DPHI(1,1,6) = -0.128917115316044D-1
|
|
DPHI(3,15,7) = -0.5156684612641721D-1
|
|
DPHI(1,12,3) = -0.7044162180172908D-1
|
|
DPHI(3,18,3) = 0.2628917115316043D0
|
|
DPHI(3,1,8) = -0.4072292788290108D0
|
|
DPHI(2,2,5) = 0.7389594549567744D-1
|
|
DPHI(2,17,6) = -0.7044162180172908D-1
|
|
DPHI(2,3,8) = -0.1795583781982711D0
|
|
DPHI(2,12,1) = -0.5156684612641721D-1
|
|
DPHI(2,8,5) = 0.4072292788290108D0
|
|
DPHI(3,10,2) = -0.2628917115316043D0
|
|
DPHI(3,20,2) = 0.7044162180172908D-1
|
|
DPHI(2,1,7) = -0.128917115316044D-1
|
|
DPHI(2,10,8) = 0.1924500897298754D0
|
|
DPHI(1,8,1) = 0.3110042339640731D0
|
|
DPHI(3,19,8) = 0.7044162180172908D-1
|
|
DPHI(1,9,4) = -0.7182335127930841D0
|
|
DPHI(1,7,5) = -0.3110042339640731D0
|
|
DPHI(3,4,6) = -0.4072292788290108D0
|
|
DPHI(2,3,7) = -0.7389594549567744D-1
|
|
DPHI(3,17,1) = 0.7044162180172908D-1
|
|
DPHI(3,18,8) = 0.7044162180172908D-1
|
|
DPHI(2,1,3) = 0.2232909936926024D-1
|
|
DPHI(3,11,8) = -0.7044162180172908D-1
|
|
DPHI(2,11,1) = 0.7044162180172908D-1
|
|
DPHI(2,14,5) = -0.7044162180172908D-1
|
|
DPHI(2,9,5) = -0.7044162180172908D-1
|
|
DPHI(3,16,5) = -0.7182335127930841D0
|
|
DPHI(1,8,6) = -0.128917115316044D-1
|
|
DPHI(1,1,7) = -0.128917115316044D-1
|
|
DPHI(1,12,7) = -0.7044162180172908D-1
|
|
DPHI(2,19,1) = 0.2628917115316043D0
|
|
DPHI(3,4,5) = 0.3110042339640731D0
|
|
DPHI(3,10,6) = -0.7044162180172908D-1
|
|
DPHI(1,13,6) = -0.7044162180172908D-1
|
|
DPHI(3,3,1) = 0.3110042339640731D0
|
|
DPHI(3,11,3) = -0.7044162180172908D-1
|
|
DPHI(1,15,4) = 0.7044162180172908D-1
|
|
DPHI(3,5,1) = -0.2232909936926024D-1
|
|
DPHI(3,7,2) = -0.3110042339640731D0
|
|
DPHI(3,20,3) = 0.7044162180172908D-1
|
|
DPHI(3,5,7) = 0.4072292788290108D0
|
|
DPHI(3,19,3) = 0.7044162180172908D-1
|
|
DPHI(3,13,6) = 0.1924500897298754D0
|
|
DPHI(3,15,4) = 0.1924500897298754D0
|
|
DPHI(2,7,6) = -0.2232909936926024D-1
|
|
DPHI(3,8,6) = -0.3110042339640731D0
|
|
DPHI(1,2,2) = 0.128917115316044D-1
|
|
DPHI(1,6,1) = 0.128917115316044D-1
|
|
DPHI(1,19,1) = -0.7182335127930841D0
|
|
DPHI(2,15,8) = 0.7044162180172908D-1
|
|
DPHI(1,7,4) = -0.2232909936926024D-1
|
|
DPHI(1,7,6) = -0.1795583781982711D0
|
|
DPHI(2,8,6) = 0.128917115316044D-1
|
|
DPHI(3,17,4) = 0.2628917115316043D0
|
|
DPHI(1,4,8) = -0.128917115316044D-1
|
|
DPHI(2,1,6) = 0.3110042339640731D0
|
|
DPHI(1,20,6) = -0.7044162180172908D-1
|
|
DPHI(2,16,7) = 0.2628917115316043D0
|
|
DPHI(1,19,7) = 0.1924500897298754D0
|
|
DPHI(2,16,8) = 0.2628917115316043D0
|
|
DPHI(2,15,2) = 0.2628917115316043D0
|
|
DPHI(1,19,4) = -0.5156684612641721D-1
|
|
DPHI(2,7,7) = -0.1795583781982711D0
|
|
DPHI(3,17,7) = 0.2628917115316043D0
|
|
DPHI(1,3,5) = -0.1795583781982711D0
|
|
DPHI(3,10,1) = -0.2628917115316043D0
|
|
DPHI(3,18,2) = 0.2628917115316043D0
|
|
DPHI(3,5,4) = -0.1795583781982711D0
|
|
DPHI(1,8,4) = 0.7389594549567744D-1
|
|
DPHI(3,3,5) = 0.1795583781982711D0
|
|
DPHI(3,9,1) = -0.7044162180172908D-1
|
|
DPHI(2,13,3) = -0.7044162180172908D-1
|
|
DPHI(2,3,1) = 0.128917115316044D-1
|
|
DPHI(1,20,2) = -0.7044162180172908D-1
|
|
DPHI(1,15,5) = 0.2628917115316043D0
|
|
DPHI(3,6,7) = 0.128917115316044D-1
|
|
DPHI(2,7,3) = -0.3110042339640731D0
|
|
DPHI(2,9,3) = -0.7044162180172908D-1
|
|
DPHI(2,11,4) = 0.2628917115316043D0
|
|
DPHI(2,3,6) = 0.128917115316044D-1
|
|
DPHI(2,4,1) = -0.2232909936926024D-1
|
|
DPHI(1,16,1) = -0.2628917115316043D0
|
|
DPHI(3,11,2) = -0.2628917115316043D0
|
|
DPHI(1,2,6) = -0.1795583781982711D0
|
|
DPHI(3,9,6) = -0.7044162180172908D-1
|
|
DPHI(2,6,3) = -0.4072292788290108D0
|
|
DPHI(2,8,2) = -0.2232909936926024D-1
|
|
DPHI(3,18,4) = 0.2628917115316043D0
|
|
DPHI(3,2,5) = 0.7389594549567744D-1
|
|
DPHI(2,15,3) = 0.2628917115316043D0
|
|
DPHI(3,15,5) = -0.1924500897298754D0
|
|
DPHI(1,13,2) = -0.7044162180172908D-1
|
|
DPHI(2,6,4) = -0.128917115316044D-1
|
|
DPHI(2,6,7) = -0.128917115316044D-1
|
|
DPHI(2,13,7) = -0.2628917115316043D0
|
|
DPHI(3,16,1) = -0.1924500897298754D0
|
|
DPHI(2,20,7) = 0.7182335127930841D0
|
|
DPHI(3,1,4) = -0.128917115316044D-1
|
|
DPHI(1,5,4) = 0.1795583781982711D0
|
|
DPHI(3,7,5) = 0.128917115316044D-1
|
|
DPHI(2,19,6) = 0.7044162180172908D-1
|
|
DPHI(2,2,2) = 0.3110042339640731D0
|
|
DPHI(2,18,3) = 0.7182335127930841D0
|
|
DPHI(1,17,6) = 0.5156684612641721D-1
|
|
DPHI(3,13,2) = 0.5156684612641721D-1
|
|
DPHI(3,19,2) = 0.2628917115316043D0
|
|
DPHI(2,3,2) = 0.4072292788290108D0
|
|
DPHI(2,10,2) = -0.7182335127930841D0
|
|
DPHI(2,6,1) = 0.3110042339640731D0
|
|
DPHI(1,8,7) = -0.128917115316044D-1
|
|
DPHI(2,14,8) = -0.7044162180172908D-1
|
|
DPHI(2,1,4) = -0.128917115316044D-1
|
|
DPHI(1,7,7) = -0.1795583781982711D0
|
|
DPHI(2,18,8) = 0.5156684612641721D-1
|
|
DPHI(2,18,5) = -0.1924500897298754D0
|
|
DPHI(2,5,8) = -0.128917115316044D-1
|
|
DPHI(1,17,8) = 0.1924500897298754D0
|
|
DPHI(1,2,1) = -0.2232909936926024D-1
|
|
DPHI(3,12,2) = -0.7044162180172908D-1
|
|
DPHI(1,16,6) = -0.2628917115316043D0
|
|
DPHI(1,1,8) = -0.4072292788290108D0
|
|
DPHI(2,9,2) = -0.2628917115316043D0
|
|
DPHI(3,10,5) = -0.7044162180172908D-1
|
|
DPHI(3,20,5) = 0.2628917115316043D0
|
|
DPHI(2,12,4) = 0.1924500897298754D0
|
|
DPHI(3,16,6) = 0.7182335127930841D0
|
|
DPHI(3,3,8) = 0.2232909936926024D-1
|
|
DPHI(1,5,8) = -0.128917115316044D-1
|
|
DPHI(3,10,8) = -0.7044162180172908D-1
|
|
DPHI(1,5,5) = -0.128917115316044D-1
|
|
DPHI(2,14,6) = -0.7044162180172908D-1
|
|
DPHI(2,8,7) = -0.3110042339640731D0
|
|
DPHI(3,9,8) = -0.2628917115316043D0
|
|
DPHI(2,16,4) = 0.7044162180172908D-1
|
|
PHIS(7,3) = 0.5257834230632085D0
|
|
PHIS(3,4) = -0.9622504486493765D-1
|
|
PHIS(5,1) = 0.1408832436034581D0
|
|
PHIS(5,2) = 0.5257834230632085D0
|
|
PHIS(5,3) = 0.1408832436034581D0
|
|
PHIS(2,2) = 0.9622504486493735D-1
|
|
PHIS(5,4) = 0.5257834230632085D0
|
|
PHIS(3,1) = 0.9622504486493735D-1
|
|
PHIS(3,3) = -0.1666666666666668D0
|
|
PHIS(4,4) = -0.1666666666666668D0
|
|
PHIS(4,1) = -0.1666666666666668D0
|
|
PHIS(8,4) = 0.5257834230632085D0
|
|
PHIS(1,3) = -0.1666666666666668D0
|
|
PHIS(7,4) = 0.1408832436034581D0
|
|
PHIS(8,3) = 0.5257834230632085D0
|
|
PHIS(7,2) = 0.1408832436034581D0
|
|
PHIS(2,4) = -0.1666666666666668D0
|
|
PHIS(2,1) = -0.1666666666666668D0
|
|
PHIS(6,3) = 0.1408832436034581D0
|
|
PHIS(1,1) = -0.9622504486493765D-1
|
|
PHIS(8,2) = 0.1408832436034581D0
|
|
PHIS(6,4) = 0.1408832436034581D0
|
|
PHIS(6,2) = 0.5257834230632085D0
|
|
PHIS(1,2) = -0.1666666666666668D0
|
|
PHIS(6,1) = 0.5257834230632085D0
|
|
PHIS(3,2) = -0.1666666666666668D0
|
|
PHIS(4,2) = -0.9622504486493765D-1
|
|
PHIS(2,3) = -0.9622504486493765D-1
|
|
PHIS(7,1) = 0.5257834230632085D0
|
|
PHIS(8,1) = 0.1408832436034581D0
|
|
PHIS(4,3) = 0.9622504486493735D-1
|
|
PHIS(1,4) = 0.9622504486493735D-1
|
|
DPHIS(2,1,1) = 0.1830127018922193D0
|
|
DPHIS(2,7,1) = 0.3333333333333333D0
|
|
DPHIS(2,5,4) = -0.3333333333333333D0
|
|
DPHIS(1,2,3) = -0.1830127018922193D0
|
|
DPHIS(1,6,2) = 0.3333333333333333D0
|
|
DPHIS(1,5,2) = -0.9106836025229589D0
|
|
DPHIS(2,8,4) = 0.9106836025229589D0
|
|
DPHIS(2,7,4) = 0.3333333333333333D0
|
|
DPHIS(1,4,3) = -0.6830127018922194D0
|
|
DPHIS(2,4,2) = -0.1830127018922193D0
|
|
DPHIS(1,3,4) = -0.1830127018922193D0
|
|
DPHIS(2,5,3) = -0.3333333333333333D0
|
|
DPHIS(1,6,4) = 0.3333333333333333D0
|
|
DPHIS(1,3,3) = -0.2276709006307396D0
|
|
DPHIS(2,5,1) = -0.3333333333333333D0
|
|
DPHIS(2,8,1) = -0.2440169358562925D0
|
|
DPHIS(2,4,4) = -0.2276709006307396D0
|
|
DPHIS(1,5,1) = -0.2440169358562925D0
|
|
DPHIS(2,4,3) = 0.6830127018922194D0
|
|
DPHIS(1,4,4) = -0.610042339640732D-1
|
|
DPHIS(2,3,3) = 0.610042339640732D-1
|
|
DPHIS(2,3,4) = -0.1830127018922193D0
|
|
DPHIS(2,2,4) = -0.610042339640732D-1
|
|
DPHIS(2,5,2) = -0.3333333333333333D0
|
|
DPHIS(1,1,4) = -0.6830127018922194D0
|
|
DPHIS(2,6,2) = 0.9106836025229589D0
|
|
DPHIS(1,1,1) = 0.1830127018922193D0
|
|
DPHIS(2,2,1) = 0.2276709006307396D0
|
|
DPHIS(2,7,2) = 0.3333333333333333D0
|
|
DPHIS(1,7,2) = -0.2440169358562925D0
|
|
DPHIS(1,1,3) = -0.610042339640732D-1
|
|
DPHIS(2,8,3) = -0.9106836025229589D0
|
|
DPHIS(1,6,3) = 0.3333333333333333D0
|
|
DPHIS(1,4,2) = 0.1830127018922193D0
|
|
DPHIS(1,8,3) = -0.3333333333333333D0
|
|
DPHIS(1,3,1) = 0.6830127018922194D0
|
|
DPHIS(1,2,4) = -0.2276709006307396D0
|
|
DPHIS(2,2,3) = 0.1830127018922193D0
|
|
DPHIS(1,3,2) = 0.610042339640732D-1
|
|
DPHIS(2,1,2) = -0.610042339640732D-1
|
|
DPHIS(1,7,1) = -0.9106836025229589D0
|
|
DPHIS(1,7,3) = 0.9106836025229589D0
|
|
DPHIS(1,4,1) = 0.2276709006307396D0
|
|
DPHIS(1,1,2) = 0.2276709006307396D0
|
|
DPHIS(1,8,2) = -0.3333333333333333D0
|
|
DPHIS(1,5,3) = 0.2440169358562925D0
|
|
DPHIS(1,8,1) = -0.3333333333333333D0
|
|
DPHIS(2,1,3) = 0.2276709006307396D0
|
|
DPHIS(1,2,2) = 0.6830127018922194D0
|
|
DPHIS(1,6,1) = 0.3333333333333333D0
|
|
DPHIS(1,7,4) = 0.2440169358562925D0
|
|
DPHIS(1,8,4) = -0.3333333333333333D0
|
|
DPHIS(2,3,1) = 0.6830127018922194D0
|
|
DPHIS(2,7,3) = 0.3333333333333333D0
|
|
DPHIS(2,4,1) = 0.610042339640732D-1
|
|
DPHIS(2,6,3) = -0.2440169358562925D0
|
|
DPHIS(2,8,2) = 0.2440169358562925D0
|
|
DPHIS(2,6,4) = 0.2440169358562925D0
|
|
DPHIS(1,5,4) = 0.9106836025229589D0
|
|
DPHIS(2,2,2) = -0.6830127018922194D0
|
|
DPHIS(2,3,2) = -0.2276709006307396D0
|
|
DPHIS(2,6,1) = -0.9106836025229589D0
|
|
DPHIS(2,1,4) = -0.6830127018922194D0
|
|
DPHIS(1,2,1) = 0.610042339640732D-1
|
|
|
|
END
|