* -INC SMCHAML
*
* OBJET DE TYPE "CHAMELEM" : CHAMP PAR ELEMENT
*
PARAMETER (NCONCH=24)
SEGMENT,MCHELM
CHARACTER*(L1) TITCHE
CHARACTER*(NCONCH) CONCHE(N1)
INTEGER IMACHE(N1),ICHAML(N1)
INTEGER INFCHE(N1,N3),IFOCHE
ENDSEGMENT
POINTEUR MCHEL1.MCHELM,MCHEL2.MCHELM,MCHEL3.MCHELM
POINTEUR MCHEL4.MCHELM,MCHEL5.MCHELM,MCHEL6.MCHELM
*
SEGMENT,MCHAML
CHARACTER*8 NOMCHE(N2)
CHARACTER*16 TYPCHE(N2)
INTEGER IELVAL(N2)
ENDSEGMENT
POINTEUR MCHAM1.MCHAML,MCHAM2.MCHAML,MCHAM3.MCHAML
POINTEUR MCHAM4.MCHAML,MCHAM5.MCHAML,MCHAM6.MCHAML
*
SEGMENT,MELVAL
REAL*8 VELCHE(N1PTEL,N1EL)
INTEGER IELCHE(N2PTEL,N2EL)
ENDSEGMENT
POINTEUR MELVA1.MELVAL,MELVA2.MELVAL,MELVA3.MELVAL
POINTEUR MELVA4.MELVAL,MELVA5.MELVAL,MELVA6.MELVAL
*
* TITCHE : TITRE DU CHAMELEM
* CONCHE : NOM DU CONSTITUANT
* NOPHAS : nom de la phase
* la phase est maintenant rangée dans conche(17:24)
* IFOCHE : CORRESPOND A L'OPTION IFOUR ( CF CCOPTIO )
* IMACHE : POINTEURS SUR DES MAILLAGES ELEMENTAIRES
* ICHAML : POINTEURS SUR DES SEGMENTS "MCHAML"
* INFCHE : ENSEMBLE D'INFORMATIONS OU LES VALEURS PAR DEFAUT SONT 0
* INFCHE(.,1)=0 POUR DES VALEURS INDEPENDANTES DU REPERE
* =1 POUR DES VALEURS DEFINIES DANS LES REPERES LOCAUX
* =2 POUR DES VALEURS DEFINIES DANS LE REPERE GLOBAL
* INFCHE(.,2)= LIBRE
* ( ANCIENNEMENT LE NUMERO DE LA COUCHE )
* INFCHE(.,3)= NUMERO DE L'HARMONIQUE DE FOURIER
* INFCHE(.,4)=0 POUR DES VALEURS DEFINIES AUX NOEUDS
* =POINTEUR SUR UN SMINTE POUR DES VALEURS DEFINIES AILLEU
* INFCHE(.,5)=0 POUR DES CHAMPS DE DEFORMATIONS ET CONTRAINTES USUELS
* =1 POUR DES CHAMPS DE DEFORMATIONS ET CONTRAINTES
* EN FORMULATION "MASSIF" POUR DES ELEMENTS DE COQUE OU
* DE POUTRE OU DE TUYAU
* INFCHE(.,6): LE SMINTE POINTE SUR UN SEGMENT D'INTEGRATION :
* =1 AUX NOEUDS
* =2 AU CENTRE DE GRAVITE
* =3 AUX POINTS DE GAUSS POUR LA RIGIDITE
* =4 AUX POINTS DE GAUSS POUR LA MASSE
* =5 AUX POINTS DE GAUSS POUR LES CONTRAINTES
*
* NOMCHE : NOMS DES COMPOSANTES DU CHAMELEM
* TYPCHE : TYPES DES COMPOSANTES DU CHAMELEM:
* - TYPCHE(..)='REAL*8' POUR DES COMPOSANTES REELLES,
* - TYPCHE(..)='POINTEUR M...' POUR DES COMPOSANTES
* NON SCALAIRES, DECRITES PAR UN SEGMENT DE NOM "M..."
* IELVAL : POINTEURS SUR DES SEGMENTS "MELVAL"
*
* VELCHE(N1PTEL,N1EL) : VALEUR D'UNE COMPOSANTE REELLE POUR LE
* "N1PTEL"-EME NOEUD DU "N1EL"-EME ELEMENT.
* IELCHE(N2PTEL,N2EL) : POINTEUR SUR UN SEGMENT REPRESENTANT UNE
* COMPOSANTE NON SCALAIRE POUR LE
* "N2PTEL"-EME NOEUD DU "N2EL"-EME ELEMENT.
*
* REMARQUES:
*
* - SEUL L'UN DES TABLEAUX "VELCHE" ET "IELCHE" EST UN TABLEAU NON
* VIDE.
*
* - N.PTEL=N.EL=1 ("."= 1 OU 2) IMPLIQUE CHAMP UNIFORME DANS LE
* MAILLAGE.
*
* - N.PTEL=1 ("."= 1 OU 2) IMPLIQUE CHAMP CONSTANT PAR ELEMENT.
*
* ATTENTION : PAR ZONE ELEMENTAIRE , ON ENTEND UNE ZONE POUR
* LAQUELLE ON A LES MEMES IMACHE, CONCHE, ET CERTAINS
* INFCHE
© Cast3M 2003 - All rights reserved.
Disclaimer