CFVR0813 - Combination module test

Example to check the combinations utility

This example checks the functionality of the combinations module.
It checks the following:

The model is a three elements horizontal cantilever beam, each element is one third of the length of the beam (total 3 meters). The orientation of the elements is defined through the third node option.
The load cases are:
No Civil materials or beam properties have been used in this example, only ANSYS results will be checked.

The target for the combinations is:
The combination rule defined is:

Element types used in the model: BEAM188

Needed CivilFEM Modules:
Geotechnical Module
Bridges and Civil Non Linearities Module
Advanced Prestressed Concrete Module

The example can be launched on an educational license.
KEYWORDS
Beam
Combinations

Model Statistics
Number of elements 3
Number of nodes 5
Number of civil materials 0
Number of cross sections 0
Number of shell vertices 0

Log file: CFVR0813.DAT


  FINISH
  ~CFCLEAR,,1 
 AnsLic='ansys'

  NomFile='CFVR0813'
  /TITLE, %NomFile%, Combination module test with BEAM188
! ---------------------------------------------------------------------------------
! Model definition and solve
! ---------------------------------------------------------------------------------
/PREP7
! Materials
  MP,EX,5,3E6
  MP,NUXY,5,0.2
! Sections
  SECTYPE, 1, BEAM, RECT
  SECOFFSET, CENT
  SECDATA,1,2
! Element types
  ET,2,BEAM188
! Nodes
  N,10,0.0,0.0
  N,20,1.0,0.0
  N,30,2.0,0.0
  N,40,3.0,0.0
  N,100,0,0,1  ! Orientation node
! Elements
  MAT,5
  REAL,10
  TYPE,2
  EN,100, 10, 20, 100
  EN,200, 20, 30, 100
  EN,300, 30, 40, 100
! Boundary conditions
  D,10,ALL,0.0
! Initial hypothesis solve
  /SOLU
  ! Hypothesis 1:
    /TITLE, Hypothesis 1
    OUTRES,ALL,ALL
    D,40,UX,1
    SOLVE
    DDELE,40,ALL
  ! Hypothesis 2:
    /TITLE, Hypothesis 2
    OUTRES,ALL,ALL
    D,40,UY,1
    D,40,UZ,1
    SOLVE
    DDELE,40,ALL

/POST1
! ---------------------------------------------------------------------------------
! Read correct data from simple hypothesis
! ---------------------------------------------------------------------------------
  Dat=6 ! Number of data to check
  RES=
  *DIM,RES,,Dat,2
! Load data of each simple hypothesis
  ! Hypothesis 1
    SET,1,1
    ETABLE,FX_I   ,SMISC, 1
    ETABLE,FY_I   ,SMISC, 6
    ETABLE,FZ_I   ,SMISC, 5
    ETABLE,MX_I   ,SMISC, 4
    ETABLE,MY_I   ,SMISC, 2
    ETABLE,MZ_I   ,SMISC, 3
    ETABLE,FX_J   ,SMISC,14
    ETABLE,FY_J   ,SMISC,19
    ETABLE,FZ_J   ,SMISC,18
    ETABLE,MX_J   ,SMISC,17
    ETABLE,MY_J   ,SMISC,15
    ETABLE,MZ_J   ,SMISC,16
    *GET,RES( 1,1),ELEM,200,ETAB,FX_J
    *GET,RES( 2,1),ELEM,200,ETAB,FY_J
    *GET,RES( 3,1),ELEM,200,ETAB,FZ_J
    *GET,RES( 4,1),ELEM,200,ETAB,MX_J
    *GET,RES( 5,1),ELEM,200,ETAB,MY_J
    *GET,RES( 6,1),ELEM,200,ETAB,MZ_J
  ! Hypothesis 2
    SET,2,1
    ETABLE,FX_I   ,SMISC, 1
    ETABLE,FY_I   ,SMISC, 6
    ETABLE,FZ_I   ,SMISC, 5
    ETABLE,MX_I   ,SMISC, 4
    ETABLE,MY_I   ,SMISC, 2
    ETABLE,MZ_I   ,SMISC, 3
    ETABLE,FX_J   ,SMISC,14
    ETABLE,FY_J   ,SMISC,19
    ETABLE,FZ_J   ,SMISC,18
    ETABLE,MX_J   ,SMISC,17
    ETABLE,MY_J   ,SMISC,15
    ETABLE,MZ_J   ,SMISC,16
    *GET,RES( 1,2),ELEM,200,ETAB,FX_J
    *GET,RES( 2,2),ELEM,200,ETAB,FY_J
    *GET,RES( 3,2),ELEM,200,ETAB,FZ_J
    *GET,RES( 4,2),ELEM,200,ETAB,MX_J
    *GET,RES( 5,2),ELEM,200,ETAB,MY_J
    *GET,RES( 6,2),ELEM,200,ETAB,MZ_J

! ---------------------------------------------------------------------------------
! Definition and solving of combinations
! ---------------------------------------------------------------------------------
! Reset combinations module
  ~CMBCLR,
! Targets definition
  ~TRGDEF,45,BEAM,M,Z,MAX
! Combinations definition
  ! Combination 10: ADDITION [H1+H2]
      ~CMBDEF, 10,ADD,2
      ~STSTDEF,10,1,LSTEP,1, ,2,1,1
      ~STSTCFT,10, ,1.00
! Combine
  ~COMBINE

!--------------------------------------------------------------------------------------
! DATA CHECK
!--------------------------------------------------------------------------------------
! Data comparison number
  NComp = 6
  NComp_ch = 0

! Marix dim.
  *DIM,LABEL,CHAR,Ncomp,1
  *DIM,VALUE,,Ncomp,3
  *DIM,TOLER,,Ncomp,2

! Labels
!--------------------------------------------------------------------------------------
  *DO,I,1,NComp
    LABEL(I) ='TEST%I%'
  *ENDDO

! Correct values
!--------------------------------------------------------------------------------------
  *DO,I,1,NComp
    VALUE(I,1)=RES(I,1)+RES(I,2)
  *ENDDO

! Obtained values
!--------------------------------------------------------------------------------------
! Point to combined data
  ~CMBDAT,2
  ~CFSET,,10,45
  ETABLE,FX_I   ,SMISC, 1
  ETABLE,FY_I   ,SMISC, 6
  ETABLE,FZ_I   ,SMISC, 5
  ETABLE,MX_I   ,SMISC, 4
  ETABLE,MY_I   ,SMISC, 2
  ETABLE,MZ_I   ,SMISC, 3
  ETABLE,FX_J   ,SMISC,14
  ETABLE,FY_J   ,SMISC,19
  ETABLE,FZ_J   ,SMISC,18
  ETABLE,MX_J   ,SMISC,17
  ETABLE,MY_J   ,SMISC,15
  ETABLE,MZ_J   ,SMISC,16
  *GET,VALUE( 1,2),ELEM,200,ETAB,FX_J
  *GET,VALUE( 2,2),ELEM,200,ETAB,FY_J
  *GET,VALUE( 3,2),ELEM,200,ETAB,FZ_J
  *GET,VALUE( 4,2),ELEM,200,ETAB,MX_J
  *GET,VALUE( 5,2),ELEM,200,ETAB,MY_J
  *GET,VALUE( 6,2),ELEM,200,ETAB,MZ_J

! Warning and error tolerances
  TOLER( 1, 1)= 1E-01   $   TOLER( 1, 2)= 1E-00
  TOLER( 2, 1)= 1E-03   $   TOLER( 2, 2)= 1E-02
  TOLER( 3, 1)= 1E-02   $   TOLER( 3, 2)= 1E-01
  TOLER( 4, 1)= 1E-15   $   TOLER( 4, 2)= 1E-14
  TOLER( 5, 1)= 1E-02   $   TOLER( 5, 2)= 1E-01
  TOLER( 6, 1)= 1E-03   $   TOLER( 6, 2)= 1E-02

!--------------------------------------------------------------------------------------
! Results comparison
!--------------------------------------------------------------------------------------
  COMPARA.MAC

Results

LabelTargetCivilFEMRatioTolerance
TEST1 2e+006 2e+0061.000 1
TEST2 52593 525931.000 0.01
TEST31.7175e+0051.7175e+0051.000 0.1
TEST4 0 00.000 1e-014
TEST5-2.5763e+005-2.5763e+0051.000 0.1
TEST6 78889 788891.000 0.01

Contains proprietary and confidential information of Ingeciber, S.A.