Suiv.: 3.2.4 Le module COLIBR Sup.: Méthode de blocs Préc.: 3.2.2 Appel du module COLIB2 Index Table des matières

Appel des modules dérivés

Les modules dérivés sont construits à partir de COLIB2 dans le cas où il n'y a qu'un seul bloc de type donné, par suite, on trouve 3 modules dérivés: COLIBT , COLIBP  et COLIBH  correspondant au cas d'un seul tétraèdre, pentaèdre ou hexaèdre.

Les données sont du même type que ci-dessus mais sont plus simples à fournir car certaines sont implicitement connues.

Deux options permettent d'affecter les numéros de référence: l'une indique que tous ces numéros seront mis à 0, l'autre permet d'affecter un numéro distinct à tous les items créés.

COLIBT: cas d'un tétraèdre

• dimensionner le tableau M (dans le common blanc)
• déclarer les tableaux entiers IDECAR(6) et NBPARE(6)
• déclarer les tableaux réels XYZ(3,4) et XYZINT(3,LINT) avec LINT le nombre total de points de contrôle donnés par l'utilisateur sur les 6 arêtes grossières
• appeler INITI

appel du module

CALL COLIBT (M,NFNOPO,NINOPO,XYZ,IDECAR,NBPARE,XYZINT,
. IREF,NDSDE)

avec :

• M : le super-tableau
• NF(NI)NOPO : le numéro de support de la S.D.S. NOPO et son niveau
• XYZ(3,4) : les coordonnées des 4 sommets grossiers
• IDECAR(I) : le code de découpage de l'arête I : 0 pour une arête droite découpée automatiquement en segments de même longueur; 1 si on donne les points intermédiaires (cf. XYZINT)
• NBPARE(I) : le nombre de points de contrôle à créer sur l'arête (extrémités exclues)
• XYZINT(3,.) : les coordonnées des points de contrôle des arêtes donnés effectivement par l'utilisateur. Pour chaque arête I dont IDECAR(I) = 1, on donne ces valeurs de la façon suivante: XYZINT(J,I) est la coordonnée J du point I, où I est le numéro global du point, on compte d'abord les points (extrémités exclues) de la première arête ainsi décrite, puis ceux de la deuxième, etc.
• IREF : option pour affecter les références : 0 : toutes les références sont mises à 0; 1 : chaque item est différencié: les sommets de 1 à 4, les arêtes (et les points de contrôle de ces dernières) de 5 à 10, les faces (et les points créés sur ces dernières) de 11 à 14.
• NDSDE : le numéro de sous-domaine (celui de tous les sous-éléments créés)

Remarque :

• pour changer un ou plusieurs numéros de référence (IREF=1), on utilisera le module MODNOP ( MODNXX) ou le mot-clé NUME de APNOP3 après introduction du maillage (mot-clé INTR de APNOP3).

COLIBP: cas d'un pentaèdre

• dimensionner le tableau M (dans le common blanc)
• déclarer les tableaux entiers IDECAR(9) et NBPARE(9)
• déclarer les tableaux réels XYZ(3,6) et XYZINT(3,LINT) avec LINT le nombre total de points de contrôle donnés par l'utilisateur sur les 9 arêtes grossières
• appeler INITI

appel du module

CALL COLIBP (M,NFNOPO,NINOPO,XYZ,IDECAR,NBPARE,XYZINT,
. IREF,NDSDE)

avec :

• M : le super-tableau
• NF(NI)NOPO : le numéro de support de la S.D.S. NOPO et son niveau
• XYZ(3,6) : les coordonnées des 6 sommets grossiers
• IDECAR(I) : le code de découpage de l'arête I : 0 pour une arête droite découpée automatiquement en segments de même longueur; 1 si on donne les points intermédiaires (cf. XYZINT)
• NBPARE(I) : le nombre de points de contrôle à créer sur l'arête (extrémités exclues)
• XYZINT(3,.) : les coordonnées des points de contrôle des arêtes donnés effectivement par l'utilisateur. Pour chaque arête I dont IDECAR(I) = 1, on donne ces valeurs de la façon suivante: XYZINT(J,I) est la coordonnée J du point I, où I est le numéro global du point, on compte d'abord les points (extrémités exclues) de la première arête ainsi décrite, puis ceux de la deuxième, etc.
• IREF : option pour affecter les références : 0 : toutes les références sont mises à 0; 1 : chaque item est différencié: les sommets de 1 à 6, les arêtes (et les points de contrôle de ces dernières) de 7 à 15, les faces (et les points créés sur ces dernières) de 16 à 20.
• NDSDE : le numéro de sous-domaine (celui de tous les sous-éléments créés)

Remarque :

• pour changer un ou plusieurs numéros de références (IREF=1), on utilisera le module MODNOP ( MODNXX) ou le mot-clé NUME de APNOP3 après introduction du maillage (mot-clé INTR de APNOP3).

COLIBH: cas d'un hexaèdre

• dimensionner le tableau M (dans le common blanc)
• déclarer les tableaux entiers IDECAR(12) et NBPARE(12)
• déclarer les tableaux réels XYZ(3,8) et XYZINT(3,LINT) avec LINT le nombre total de points de contrôle donnés par l'utilisateur sur les 12 arêtes grossières
• appeler INITI

appel du module

CALL COLIBH (M,NFNOPO,NINOPO,XYZ,IDECAR,NBPARE,XYZINT,
. IREF,NDSDE)

avec :

• M : le super-tableau
• NF(NI)NOPO : le numéro de support de la S.D.S. NOPO et son niveau
• XYZ(3,8) : les coordonnées des 8 sommets grossiers
• IDECAR(I) : le code de découpage de l'arête I : 0 pour une arête droite découpée automatiquement en segments de même longueur; 1 si on donne les points intermédiaires (cf. XYZINT)
• NBPARE(I) : le nombre de points de contrôle à créer sur l'arête (extrémités exclues)
• XYZINT(3,.) : les coordonnées des points de contrôle des arêtes donnés effectivement par l'utilisateur. Pour chaque arête I dont IDECAR(I) = 1, on donne ces valeurs de la façon suivante: XYZINT(J,I) est la coordonnée J du point I, où I est le numéro global du point, on compte d'abord les points (extrémités exclues) de la première arête ainsi décrite, puis ceux de la deuxième, etc.
• IREF : option pour affecter les références : 0 : toutes les références sont mises à 0; 1 : chaque item est différencié: les sommets de 1 à 8, les arêtes (et les points de contrôle de ces dernières) de 9 à 20, les faces (et les points créés sur ces dernières) de 21 à 26.
• NDSDE : le numéro de sous-domaine (celui de tous les sous-éléments créés)

Remarque :

• pour changer un ou plusieurs numéros de références (IREF=1), on utilisera le module MODNOP ( MODNXX) ou le mot-clé NUME de APNOP3 après introduction du maillage (mot-clé INTR de APNOP3).