http://www.caelinux.org/wiki/index.php/Contrib:Claws/Code_Aster/10_x_cases/liaison_elem
DEBUT(LANG='EN')
mesh = LIRE_MAILLAGE(FORMAT='MED', UNITE=2)
model = AFFE_MODELE(AFFE=(_F(MODELISATION=('3D', ), PHENOMENE='MECANIQUE', TOUT='OUI'), _F(GROUP_MA=('ta4', 'ta5', 'ta6', 'ta1', 'ta2', 'ta3'), MODELISATION=('POU_D_E', ), PHENOMENE='MECANIQUE'), _F(GROUP_MA=('sss', ), MODELISATION=('DKT', ), PHENOMENE='MECANIQUE')), MAILLAGE=mesh)
elemprop = AFFE_CARA_ELEM(COQUE=_F(ANGL_REP=(0.0, 0.0), COQUE_NCOU=1, EPAIS=8.0, GROUP_MA=('sss', ), INER_ROTA='OUI'), MODELE=model, POUTRE=_F(CARA=('A', 'IY', 'IZ', 'JX'), GROUP_MA=('ta4', 'ta5', 'ta6', 'ta1', 'ta2', 'ta3'), SECTION='GENERALE', VALE=(100.0, 833.0, 833.0, 1347.87), VARI_SECT='CONSTANT'))
mater = DEFI_MATERIAU(ELAS=_F(E=7500.0, NU=0.4, RHO=0.0459))
fieldmat = AFFE_MATERIAU(AFFE=_F(MATER=(mater, ), TOUT='OUI'), MODELE=model)
load = AFFE_CHAR_MECA(DDL_IMPO=_F(DX=0.0, DY=0.0, DZ=0.0, GROUP_MA=('kotei', )), LIAISON_SOLIDE=(_F(GROUP_NO=('ke1', )), _F(GROUP_NO=('ke2', )), _F(GROUP_NO=('ke3', )), _F(GROUP_NO=('ke4', )), _F(GROUP_NO=('ke5', )), _F(GROUP_NO=('ke6', )), _F(GROUP_NO=('ke7', )), _F(GROUP_NO=('ke8', ))), MODELE=model)
load = AFFE_CHAR_MECA(DDL_IMPO=(_F(DX=0.0, DY=0.0, DZ=0.0, GROUP_NO=('kotei', 'kotei1')), _F(DX=0.0, DZ=0.0, GROUP_MA=('saica', ))), LIAISON_MAIL=(_F(GROUP_MA_ESCL=('join', ), GROUP_MA_MAIT=('box1', ), TYPE_RACCORD='MASSIF'), _F(GROUP_MA_ESCL=('joinb', ), GROUP_MA_MAIT=('box2', ), TYPE_RACCORD='MASSIF')), MODELE=model)
load = AFFE_CHAR_MECA(DDL_IMPO=(_F(DX=0.0, DY=0.0, DZ=0.0, GROUP_NO=('kotei', )), _F(DX=0.0, DY=0.0, DZ=0.0, GROUP_NO=('kotei2', ))), LIAISON_MAIL=(_F(GROUP_MA_ESCL=('setti1', ), GROUP_MA_MAIT=('settim', ), TYPE_RACCORD='MASSIF_COQUE'), _F(GROUP_MA_ESCL=('setti2', ), GROUP_MA_MAIT=('settim', ), TYPE_RACCORD='MASSIF_COQUE'), _F(GROUP_MA_ESCL=('setti3', ), GROUP_MA_MAIT=('settim', ), TYPE_RACCORD='MASSIF_COQUE'), _F(GROUP_MA_ESCL=('setti4', ), GROUP_MA_MAIT=('settim', ), TYPE_RACCORD='MASSIF_COQUE'), _F(GROUP_MA_ESCL=('setti5', ), GROUP_MA_MAIT=('settim', ), TYPE_RACCORD='MASSIF_COQUE'), _F(GROUP_MA_ESCL=('setti6', ), GROUP_MA_MAIT=('settim', ), TYPE_RACCORD='MASSIF_COQUE'), _F(GROUP_MA_ESCL=('setti7', ), GROUP_MA_MAIT=('syouban1', ), TYPE_RACCORD='MASSIF_COQUE')), MODELE=model)
・GROUP_MA_1にシェル要素の結合線、GROUP_NO_2に梁要素の結合点を選択
load = AFFE_CHAR_MECA( DDL_IMPO=(_F( DX=0.0, DY=0.0, DZ=0.0, GROUP_MA=('kotei1', ) ), _F( DRY=0.0, DRZ=0.0, DX=0.0, DY=0.0, DZ=0.0, GROUP_NO=('kotei2', ) )), FORCE_NODALE=_F( FY=1000.0, GROUP_NO=('saika2', ) ), LIAISON_ELEM=_F( AXE_POUTRE=(0.0, 0.0, 1.0), CARA_ELEM=elemprop, GROUP_MA_1=('ketsusen', ), GROUP_NO_2=('ketsuten', ), NUME_LAGR='NORMAL', OPTION='COQ_POU' ), MODELE=model )