/*************************************************************************************************************************************/ /* */ /* D E F I N I T I O N S D E S P A R A M E T R E S N E C E S S A I R E S */ /* A L ' E T U D E D E L ' A T O M E D ' H Y D R O G E N E : */ /* */ /* */ /* Author of '$xrq/Hspherik.12$I' : */ /* */ /* Jean-Francois Colonna (LACTAMME, 1993??????????). */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* D E F I N I T I O N D E S O R D R E S : */ /* */ /*************************************************************************************************************************************/ -define ORDRE_n_01 \ -_-_-_- UN -define ORDRE_n_02 \ -_-_-_- DEUX -define ORDRE_n_03 \ -_-_-_- TROIS /* Definition des ordres 'n' reconnus. ATTENTION, on notera que pour des raisons liees a */ /* la derivation formelle, il est impossible de definir les ordres 'l' par 'Denumer??(...)'. */ /* En effet, il est imperatif que 'ZERO, 'UN',... apparaissent tel quel, c'est-a-dire sans */ /* "fioritures" du type 'INTE(...)'. Enfin, un tel parametrage de l'ordre de derivation ne */ /* peut etre fait que dans un fichier d'include car etant obligatoirement en '$PASSE_D'... */ -define ORDRE_l_00 \ -_-_-_- ZERO -define ORDRE_l_01 \ -_-_-_- UN -define ORDRE_l_02 \ -_-_-_- DEUX -define ORDRE_l_03 \ -_-_-_- TROIS /* Definition des ordres 'l' reconnus. ATTENTION, on notera que pour des raisons liees a */ /* la derivation formelle, il est impossible de definir les ordres 'l' par 'Denumer??(...)'. */ /* En effet, il est imperatif que 'ZERO, 'UN',... apparaissent tel quel, c'est-a-dire sans */ /* "fioritures" du type 'INTE(...)'. Enfin, un tel parametrage de l'ordre de derivation ne */ /* peut etre fait que dans un fichier d'include car etant obligatoirement en '$PASSE_D'... */ -define ORDRE_m_00 \ -_-_-_- ZERO -define ORDRE_m_01 \ -_-_-_- UN -define ORDRE_m_02 \ -_-_-_- DEUX -define ORDRE_m_03 \ -_-_-_- TROIS /* Definition des ordres 'm' reconnus. ATTENTION, on notera que pour des raisons liees a */ /* la derivation formelle, il est impossible de definir les ordres 'm' par 'Denumer??(...)'. */ /* En effet, il est imperatif que 'ZERO, 'UN',... apparaissent tel quel, c'est-a-dire sans */ /* "fioritures" du type 'INTE(...)'. Enfin, un tel parametrage de l'ordre de derivation ne */ /* peut etre fait que dans un fichier d'include car etant obligatoirement en '$PASSE_D'... */ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* D E F I N I T I O N D E S C O O R D O N N E E S : */ /* */ /*************************************************************************************************************************************/ -define RHO \ -_-_-_- parametre_r /* Definition du rayon 'rho'... */ -define THETA \ -_-_-_- SE12(u,v) -define PHI \ -_-_-_- SE22(u,v) /* Definition des coordonnees (theta,phi) en fonction des coordonnees (u,v)... */