Left

CivilFEM Online Help

Official Websites: CivilFEM | CivilFEM Licenses | Ingeciber | Current downloads
CivilFEM for Ansys: Install | Doc | Verif | Instala | Doc(ES) | PDF | PDF(ES) | Support | Soporte | Class3
CivilFEM Apps for Ansys Workbench: Install | Lic | FAQ | Concrete | Steel | Theory | PDF | Support | Soporte | Class3
CivilFEM powered by Marc: Install | Capabilities | Cap(ES) | Doc | Python | Theory | Verif | PDF | Support | Soporte | Class3
Right

CFVR0832 - Combination module test

Example to check the combinations utility

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

  • Results handle on SHELL61 elements.
  • Date handle with unsorted numeration (elements, load steps...)

It is an axisymmetric-harmonic structural model with three elements. The inner node (number 10) is restrained (no movement or rotation allowed).
The load cases are:
  • Load Step 1, Sub Step 1: Imposed horizontal movement on the end node (number 40) of 1 meter in each direction (X and Y).
  • Load Step 2, Sub Step 1: Imposed vertical movement on the end node (number 40) of 1 meter.
No Civil materials or shell properties have been used in this example, only ANSYS results will be checked.

The target for the combinations is:
  • Target 45; Maximum Axial force in the X direction

The combination rule defined is:
  • Combination rule 10: ADDITION: H1+H2

Element types used in the model: SHELL61

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
Shell
Combinations


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

Log file: CFVR0832.DAT


  FINISH
  ~CFCLEAR,,1 
 AnsLic='ansys'

  NomFile='CFVR0832'
  /TITLE, %NomFile%, Combination module test with SHELL61
! ---------------------------------------------------------------------------------
! Model definition and solve
! ---------------------------------------------------------------------------------
/PREP7
! Materials
  MP,EX,5,3E6
  MP,NUXY,5,0.2
! Sections
  R,10,0.1,0.1
! Element types
  ET,2,SHELL61
! Nodes
  N,10,1.0,0.0
  N,20,1.0,1.0
  N,30,2.0,2.0
  N,40,2.0,3.0
! Elements
  MAT,5
  REAL,10
  TYPE,2
  EN,100, 10, 20
  EN,200, 20, 30
  EN,300, 30, 40
! Boundary conditions
  D,10,ALL,0.0
  EPLOT
  /IMAGE,SAVE,%NomFile%,BMP
! Initial hypothesis solve
  /SOLU
  ! Hypothesis 1:
    /TITLE, Hypothesis 1
    OUTRES,ALL,ALL
    D,40,UX,1
    D,40,UY,1
    SOLVE
    DDELE,40,ALL
  ! Hypothesis 2:
    /TITLE, Hypothesis 2
    OUTRES,ALL,ALL
    D,40,UZ,1
    SOLVE
    DDELE,40,ALL

/POST1
! ---------------------------------------------------------------------------------
! Read correct data from simple hypothesis
! ---------------------------------------------------------------------------------
  Dat=56 ! Number of data to check
  RES=
  *DIM,RES,,Dat,2
! Load data of each simple hypothesis
  ! Hypothesis 1
    SET,1,1
    ETABLE,SMT_I   ,LS   , 1
    ETABLE,STHKT_I ,LS   , 2
    ETABLE,SHT_I   ,LS   , 3
    ETABLE,SMHT_I  ,LS   , 4
    ETABLE,SMM_I   ,LS   , 5
    ETABLE,STHKM_I ,LS   , 6
    ETABLE,SHM_I   ,LS   , 7
    ETABLE,SMHM_I  ,LS   , 8
    ETABLE,SMB_I   ,LS   , 9
    ETABLE,STHKB_I ,LS   ,10
    ETABLE,SHB_I   ,LS   ,11
    ETABLE,SMHB_I  ,LS   ,12
    ETABLE,EPMT_I  ,LEPEL, 1
    ETABLE,EPTHKT_I,LEPEL, 2
    ETABLE,EPHT_I  ,LEPEL, 3
    ETABLE,EPMHT_I ,LEPEL, 4
    ETABLE,EPMM_I  ,LEPEL, 5
    ETABLE,EPTHKM_I,LEPEL, 6
    ETABLE,EPHM_I  ,LEPEL, 7
    ETABLE,EPMHM_I ,LEPEL, 8
    ETABLE,EPMB_I  ,LEPEL, 9
    ETABLE,EPTHKB_I,LEPEL,10
    ETABLE,EPHB_I  ,LEPEL,11
    ETABLE,EPMHB_I ,LEPEL,12
    ETABLE,SMT_J   ,LS   ,25
    ETABLE,STHKT_J ,LS   ,26
    ETABLE,SHT_J   ,LS   ,27
    ETABLE,SMHT_J  ,LS   ,28
    ETABLE,SMM_J   ,LS   ,29
    ETABLE,STHKM_J ,LS   ,30
    ETABLE,SHM_J   ,LS   ,31
    ETABLE,SMHM_J  ,LS   ,32
    ETABLE,SMB_J   ,LS   ,33
    ETABLE,STHKB_J ,LS   ,34
    ETABLE,SHB_J   ,LS   ,35
    ETABLE,SMHB_J  ,LS   ,36
    ETABLE,EPMT_J  ,LEPEL,25
    ETABLE,EPTHKT_J,LEPEL,26
    ETABLE,EPHT_J  ,LEPEL,27
    ETABLE,EPMHT_J ,LEPEL,28
    ETABLE,EPMM_J  ,LEPEL,29
    ETABLE,EPTHKM_J,LEPEL,30
    ETABLE,EPHM_J  ,LEPEL,31
    ETABLE,EPMHM_J ,LEPEL,32
    ETABLE,EPMB_J  ,LEPEL,33
    ETABLE,EPTHKB_J,LEPEL,34
    ETABLE,EPHB_J  ,LEPEL,35
    ETABLE,EPMHB_J ,LEPEL,36
    ETABLE,MFORX_I ,SMISC, 1
    ETABLE,MFORY_I ,SMISC, 2
    ETABLE,MFORZ_I ,SMISC, 3
    ETABLE,MMOMZ_I ,SMISC, 6
    ETABLE,MFORX_J ,SMISC, 7
    ETABLE,MFORY_J ,SMISC, 8
    ETABLE,MFORZ_J ,SMISC, 9
    ETABLE,MMOMZ_J ,SMISC,12
    *GET,RES( 1,1),ELEM,200,ETAB,SMT_I
    *GET,RES( 2,1),ELEM,200,ETAB,STHKT_I
    *GET,RES( 3,1),ELEM,200,ETAB,SHT_I
    *GET,RES( 4,1),ELEM,200,ETAB,SMHT_I
    *GET,RES( 5,1),ELEM,200,ETAB,SMM_I
    *GET,RES( 6,1),ELEM,200,ETAB,STHKM_I
    *GET,RES( 7,1),ELEM,200,ETAB,SHM_I
    *GET,RES( 8,1),ELEM,200,ETAB,SMHM_I
    *GET,RES( 9,1),ELEM,200,ETAB,SMB_I
    *GET,RES(10,1),ELEM,200,ETAB,STHKB_I
    *GET,RES(11,1),ELEM,200,ETAB,SHB_I
    *GET,RES(12,1),ELEM,200,ETAB,SMHB_I
    *GET,RES(13,1),ELEM,200,ETAB,EPMT_I
    *GET,RES(14,1),ELEM,200,ETAB,EPTHKT_I
    *GET,RES(15,1),ELEM,200,ETAB,EPHT_I
    *GET,RES(16,1),ELEM,200,ETAB,EPMHT_I
    *GET,RES(17,1),ELEM,200,ETAB,EPMM_I
    *GET,RES(18,1),ELEM,200,ETAB,EPTHKM_I
    *GET,RES(19,1),ELEM,200,ETAB,EPHM_I
    *GET,RES(20,1),ELEM,200,ETAB,EPMHM_I
    *GET,RES(21,1),ELEM,200,ETAB,EPMB_I
    *GET,RES(22,1),ELEM,200,ETAB,EPTHKB_I
    *GET,RES(23,1),ELEM,200,ETAB,EPHB_I
    *GET,RES(24,1),ELEM,200,ETAB,EPMHB_I
    *GET,RES(25,1),ELEM,200,ETAB,SMT_J
    *GET,RES(26,1),ELEM,200,ETAB,STHKT_J
    *GET,RES(27,1),ELEM,200,ETAB,SHT_J
    *GET,RES(28,1),ELEM,200,ETAB,SMHT_J
    *GET,RES(29,1),ELEM,200,ETAB,SMM_J
    *GET,RES(30,1),ELEM,200,ETAB,STHKM_J
    *GET,RES(31,1),ELEM,200,ETAB,SHM_J
    *GET,RES(32,1),ELEM,200,ETAB,SMHM_J
    *GET,RES(33,1),ELEM,200,ETAB,SMB_J
    *GET,RES(34,1),ELEM,200,ETAB,STHKB_J
    *GET,RES(35,1),ELEM,200,ETAB,SHB_J
    *GET,RES(36,1),ELEM,200,ETAB,SMHB_J
    *GET,RES(37,1),ELEM,200,ETAB,EPMT_J
    *GET,RES(38,1),ELEM,200,ETAB,EPTHKT_J
    *GET,RES(39,1),ELEM,200,ETAB,EPHT_J
    *GET,RES(40,1),ELEM,200,ETAB,EPMHT_J
    *GET,RES(41,1),ELEM,200,ETAB,EPMM_J
    *GET,RES(42,1),ELEM,200,ETAB,EPTHKM_J
    *GET,RES(43,1),ELEM,200,ETAB,EPHM_J
    *GET,RES(44,1),ELEM,200,ETAB,EPMHM_J
    *GET,RES(45,1),ELEM,200,ETAB,EPMB_J
    *GET,RES(46,1),ELEM,200,ETAB,EPTHKB_J
    *GET,RES(47,1),ELEM,200,ETAB,EPHB_J
    *GET,RES(48,1),ELEM,200,ETAB,EPMHB_J
    *GET,RES(49,1),ELEM,200,ETAB,MFORX_I
    *GET,RES(50,1),ELEM,200,ETAB,MFORY_I
    *GET,RES(51,1),ELEM,200,ETAB,MFORZ_I
    *GET,RES(52,1),ELEM,200,ETAB,MMOMZ_I
    *GET,RES(53,1),ELEM,200,ETAB,MFORX_J
    *GET,RES(54,1),ELEM,200,ETAB,MFORY_J
    *GET,RES(55,1),ELEM,200,ETAB,MFORZ_J
    *GET,RES(56,1),ELEM,200,ETAB,MMOMZ_J
  ! Hypothesis 2
    SET,2,1
    ETABLE,SMT_I   ,LS   , 1
    ETABLE,STHKT_I ,LS   , 2
    ETABLE,SHT_I   ,LS   , 3
    ETABLE,SMHT_I  ,LS   , 4
    ETABLE,SMM_I   ,LS   , 5
    ETABLE,STHKM_I ,LS   , 6
    ETABLE,SHM_I   ,LS   , 7
    ETABLE,SMHM_I  ,LS   , 8
    ETABLE,SMB_I   ,LS   , 9
    ETABLE,STHKB_I ,LS   ,10
    ETABLE,SHB_I   ,LS   ,11
    ETABLE,SMHB_I  ,LS   ,12
    ETABLE,EPMT_I  ,LEPEL, 1
    ETABLE,EPTHKT_I,LEPEL, 2
    ETABLE,EPHT_I  ,LEPEL, 3
    ETABLE,EPMHT_I ,LEPEL, 4
    ETABLE,EPMM_I  ,LEPEL, 5
    ETABLE,EPTHKM_I,LEPEL, 6
    ETABLE,EPHM_I  ,LEPEL, 7
    ETABLE,EPMHM_I ,LEPEL, 8
    ETABLE,EPMB_I  ,LEPEL, 9
    ETABLE,EPTHKB_I,LEPEL,10
    ETABLE,EPHB_I  ,LEPEL,11
    ETABLE,EPMHB_I ,LEPEL,12
    ETABLE,SMT_J   ,LS   ,25
    ETABLE,STHKT_J ,LS   ,26
    ETABLE,SHT_J   ,LS   ,27
    ETABLE,SMHT_J  ,LS   ,28
    ETABLE,SMM_J   ,LS   ,29
    ETABLE,STHKM_J ,LS   ,30
    ETABLE,SHM_J   ,LS   ,31
    ETABLE,SMHM_J  ,LS   ,32
    ETABLE,SMB_J   ,LS   ,33
    ETABLE,STHKB_J ,LS   ,34
    ETABLE,SHB_J   ,LS   ,35
    ETABLE,SMHB_J  ,LS   ,36
    ETABLE,EPMT_J  ,LEPEL,25
    ETABLE,EPTHKT_J,LEPEL,26
    ETABLE,EPHT_J  ,LEPEL,27
    ETABLE,EPMHT_J ,LEPEL,28
    ETABLE,EPMM_J  ,LEPEL,29
    ETABLE,EPTHKM_J,LEPEL,30
    ETABLE,EPHM_J  ,LEPEL,31
    ETABLE,EPMHM_J ,LEPEL,32
    ETABLE,EPMB_J  ,LEPEL,33
    ETABLE,EPTHKB_J,LEPEL,34
    ETABLE,EPHB_J  ,LEPEL,35
    ETABLE,EPMHB_J ,LEPEL,36
    ETABLE,MFORX_I ,SMISC, 1
    ETABLE,MFORY_I ,SMISC, 2
    ETABLE,MFORZ_I ,SMISC, 3
    ETABLE,MMOMZ_I ,SMISC, 6
    ETABLE,MFORX_J ,SMISC, 7
    ETABLE,MFORY_J ,SMISC, 8
    ETABLE,MFORZ_J ,SMISC, 9
    ETABLE,MMOMZ_J ,SMISC,12
    *GET,RES( 1,2),ELEM,200,ETAB,SMT_I
    *GET,RES( 2,2),ELEM,200,ETAB,STHKT_I
    *GET,RES( 3,2),ELEM,200,ETAB,SHT_I
    *GET,RES( 4,2),ELEM,200,ETAB,SMHT_I
    *GET,RES( 5,2),ELEM,200,ETAB,SMM_I
    *GET,RES( 6,2),ELEM,200,ETAB,STHKM_I
    *GET,RES( 7,2),ELEM,200,ETAB,SHM_I
    *GET,RES( 8,2),ELEM,200,ETAB,SMHM_I
    *GET,RES( 9,2),ELEM,200,ETAB,SMB_I
    *GET,RES(10,2),ELEM,200,ETAB,STHKB_I
    *GET,RES(11,2),ELEM,200,ETAB,SHB_I
    *GET,RES(12,2),ELEM,200,ETAB,SMHB_I
    *GET,RES(13,2),ELEM,200,ETAB,EPMT_I
    *GET,RES(14,2),ELEM,200,ETAB,EPTHKT_I
    *GET,RES(15,2),ELEM,200,ETAB,EPHT_I
    *GET,RES(16,2),ELEM,200,ETAB,EPMHT_I
    *GET,RES(17,2),ELEM,200,ETAB,EPMM_I
    *GET,RES(18,2),ELEM,200,ETAB,EPTHKM_I
    *GET,RES(19,2),ELEM,200,ETAB,EPHM_I
    *GET,RES(20,2),ELEM,200,ETAB,EPMHM_I
    *GET,RES(21,2),ELEM,200,ETAB,EPMB_I
    *GET,RES(22,2),ELEM,200,ETAB,EPTHKB_I
    *GET,RES(23,2),ELEM,200,ETAB,EPHB_I
    *GET,RES(24,2),ELEM,200,ETAB,EPMHB_I
    *GET,RES(25,2),ELEM,200,ETAB,SMT_J
    *GET,RES(26,2),ELEM,200,ETAB,STHKT_J
    *GET,RES(27,2),ELEM,200,ETAB,SHT_J
    *GET,RES(28,2),ELEM,200,ETAB,SMHT_J
    *GET,RES(29,2),ELEM,200,ETAB,SMM_J
    *GET,RES(30,2),ELEM,200,ETAB,STHKM_J
    *GET,RES(31,2),ELEM,200,ETAB,SHM_J
    *GET,RES(32,2),ELEM,200,ETAB,SMHM_J
    *GET,RES(33,2),ELEM,200,ETAB,SMB_J
    *GET,RES(34,2),ELEM,200,ETAB,STHKB_J
    *GET,RES(35,2),ELEM,200,ETAB,SHB_J
    *GET,RES(36,2),ELEM,200,ETAB,SMHB_J
    *GET,RES(37,2),ELEM,200,ETAB,EPMT_J
    *GET,RES(38,2),ELEM,200,ETAB,EPTHKT_J
    *GET,RES(39,2),ELEM,200,ETAB,EPHT_J
    *GET,RES(40,2),ELEM,200,ETAB,EPMHT_J
    *GET,RES(41,2),ELEM,200,ETAB,EPMM_J
    *GET,RES(42,2),ELEM,200,ETAB,EPTHKM_J
    *GET,RES(43,2),ELEM,200,ETAB,EPHM_J
    *GET,RES(44,2),ELEM,200,ETAB,EPMHM_J
    *GET,RES(45,2),ELEM,200,ETAB,EPMB_J
    *GET,RES(46,2),ELEM,200,ETAB,EPTHKB_J
    *GET,RES(47,2),ELEM,200,ETAB,EPHB_J
    *GET,RES(48,2),ELEM,200,ETAB,EPMHB_J
    *GET,RES(49,2),ELEM,200,ETAB,MFORX_I
    *GET,RES(50,2),ELEM,200,ETAB,MFORY_I
    *GET,RES(51,2),ELEM,200,ETAB,MFORZ_I
    *GET,RES(52,2),ELEM,200,ETAB,MMOMZ_I
    *GET,RES(53,2),ELEM,200,ETAB,MFORX_J
    *GET,RES(54,2),ELEM,200,ETAB,MFORY_J
    *GET,RES(55,2),ELEM,200,ETAB,MFORZ_J
    *GET,RES(56,2),ELEM,200,ETAB,MMOMZ_J

! ---------------------------------------------------------------------------------
! Definition and solving of combinations
! ---------------------------------------------------------------------------------
! Reset combinations module
  ~CMBCLR,
! Targets definition
  ~TRGDEF,45,AXSHL,F,X,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 = 56
  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,SMT_I   ,LS   , 1
    ETABLE,STHKT_I ,LS   , 2
    ETABLE,SHT_I   ,LS   , 3
    ETABLE,SMHT_I  ,LS   , 4
    ETABLE,SMM_I   ,LS   , 5
    ETABLE,STHKM_I ,LS   , 6
    ETABLE,SHM_I   ,LS   , 7
    ETABLE,SMHM_I  ,LS   , 8
    ETABLE,SMB_I   ,LS   , 9
    ETABLE,STHKB_I ,LS   ,10
    ETABLE,SHB_I   ,LS   ,11
    ETABLE,SMHB_I  ,LS   ,12
    ETABLE,EPMT_I  ,LEPEL, 1
    ETABLE,EPTHKT_I,LEPEL, 2
    ETABLE,EPHT_I  ,LEPEL, 3
    ETABLE,EPMHT_I ,LEPEL, 4
    ETABLE,EPMM_I  ,LEPEL, 5
    ETABLE,EPTHKM_I,LEPEL, 6
    ETABLE,EPHM_I  ,LEPEL, 7
    ETABLE,EPMHM_I ,LEPEL, 8
    ETABLE,EPMB_I  ,LEPEL, 9
    ETABLE,EPTHKB_I,LEPEL,10
    ETABLE,EPHB_I  ,LEPEL,11
    ETABLE,EPMHB_I ,LEPEL,12
    ETABLE,SMT_J   ,LS   ,25
    ETABLE,STHKT_J ,LS   ,26
    ETABLE,SHT_J   ,LS   ,27
    ETABLE,SMHT_J  ,LS   ,28
    ETABLE,SMM_J   ,LS   ,29
    ETABLE,STHKM_J ,LS   ,30
    ETABLE,SHM_J   ,LS   ,31
    ETABLE,SMHM_J  ,LS   ,32
    ETABLE,SMB_J   ,LS   ,33
    ETABLE,STHKB_J ,LS   ,34
    ETABLE,SHB_J   ,LS   ,35
    ETABLE,SMHB_J  ,LS   ,36
    ETABLE,EPMT_J  ,LEPEL,25
    ETABLE,EPTHKT_J,LEPEL,26
    ETABLE,EPHT_J  ,LEPEL,27
    ETABLE,EPMHT_J ,LEPEL,28
    ETABLE,EPMM_J  ,LEPEL,29
    ETABLE,EPTHKM_J,LEPEL,30
    ETABLE,EPHM_J  ,LEPEL,31
    ETABLE,EPMHM_J ,LEPEL,32
    ETABLE,EPMB_J  ,LEPEL,33
    ETABLE,EPTHKB_J,LEPEL,34
    ETABLE,EPHB_J  ,LEPEL,35
    ETABLE,EPMHB_J ,LEPEL,36
    ETABLE,MFORX_I ,SMISC, 1
    ETABLE,MFORY_I ,SMISC, 2
    ETABLE,MFORZ_I ,SMISC, 3
    ETABLE,MMOMZ_I ,SMISC, 6
    ETABLE,MFORX_J ,SMISC, 7
    ETABLE,MFORY_J ,SMISC, 8
    ETABLE,MFORZ_J ,SMISC, 9
    ETABLE,MMOMZ_J ,SMISC,12
    *GET,VALUE( 1,2),ELEM,200,ETAB,SMT_I
    *GET,VALUE( 2,2),ELEM,200,ETAB,STHKT_I
    *GET,VALUE( 3,2),ELEM,200,ETAB,SHT_I
    *GET,VALUE( 4,2),ELEM,200,ETAB,SMHT_I
    *GET,VALUE( 5,2),ELEM,200,ETAB,SMM_I
    *GET,VALUE( 6,2),ELEM,200,ETAB,STHKM_I
    *GET,VALUE( 7,2),ELEM,200,ETAB,SHM_I
    *GET,VALUE( 8,2),ELEM,200,ETAB,SMHM_I
    *GET,VALUE( 9,2),ELEM,200,ETAB,SMB_I
    *GET,VALUE(10,2),ELEM,200,ETAB,STHKB_I
    *GET,VALUE(11,2),ELEM,200,ETAB,SHB_I
    *GET,VALUE(12,2),ELEM,200,ETAB,SMHB_I
    *GET,VALUE(13,2),ELEM,200,ETAB,EPMT_I
    *GET,VALUE(14,2),ELEM,200,ETAB,EPTHKT_I
    *GET,VALUE(15,2),ELEM,200,ETAB,EPHT_I
    *GET,VALUE(16,2),ELEM,200,ETAB,EPMHT_I
    *GET,VALUE(17,2),ELEM,200,ETAB,EPMM_I
    *GET,VALUE(18,2),ELEM,200,ETAB,EPTHKM_I
    *GET,VALUE(19,2),ELEM,200,ETAB,EPHM_I
    *GET,VALUE(20,2),ELEM,200,ETAB,EPMHM_I
    *GET,VALUE(21,2),ELEM,200,ETAB,EPMB_I
    *GET,VALUE(22,2),ELEM,200,ETAB,EPTHKB_I
    *GET,VALUE(23,2),ELEM,200,ETAB,EPHB_I
    *GET,VALUE(24,2),ELEM,200,ETAB,EPMHB_I
    *GET,VALUE(25,2),ELEM,200,ETAB,SMT_J
    *GET,VALUE(26,2),ELEM,200,ETAB,STHKT_J
    *GET,VALUE(27,2),ELEM,200,ETAB,SHT_J
    *GET,VALUE(28,2),ELEM,200,ETAB,SMHT_J
    *GET,VALUE(29,2),ELEM,200,ETAB,SMM_J
    *GET,VALUE(30,2),ELEM,200,ETAB,STHKM_J
    *GET,VALUE(31,2),ELEM,200,ETAB,SHM_J
    *GET,VALUE(32,2),ELEM,200,ETAB,SMHM_J
    *GET,VALUE(33,2),ELEM,200,ETAB,SMB_J
    *GET,VALUE(34,2),ELEM,200,ETAB,STHKB_J
    *GET,VALUE(35,2),ELEM,200,ETAB,SHB_J
    *GET,VALUE(36,2),ELEM,200,ETAB,SMHB_J
    *GET,VALUE(37,2),ELEM,200,ETAB,EPMT_J
    *GET,VALUE(38,2),ELEM,200,ETAB,EPTHKT_J
    *GET,VALUE(39,2),ELEM,200,ETAB,EPHT_J
    *GET,VALUE(40,2),ELEM,200,ETAB,EPMHT_J
    *GET,VALUE(41,2),ELEM,200,ETAB,EPMM_J
    *GET,VALUE(42,2),ELEM,200,ETAB,EPTHKM_J
    *GET,VALUE(43,2),ELEM,200,ETAB,EPHM_J
    *GET,VALUE(44,2),ELEM,200,ETAB,EPMHM_J
    *GET,VALUE(45,2),ELEM,200,ETAB,EPMB_J
    *GET,VALUE(46,2),ELEM,200,ETAB,EPTHKB_J
    *GET,VALUE(47,2),ELEM,200,ETAB,EPHB_J
    *GET,VALUE(48,2),ELEM,200,ETAB,EPMHB_J
    *GET,VALUE(49,2),ELEM,200,ETAB,MFORX_I
    *GET,VALUE(50,2),ELEM,200,ETAB,MFORY_I
    *GET,VALUE(51,2),ELEM,200,ETAB,MFORZ_I
    *GET,VALUE(52,2),ELEM,200,ETAB,MMOMZ_I
    *GET,VALUE(53,2),ELEM,200,ETAB,MFORX_J
    *GET,VALUE(54,2),ELEM,200,ETAB,MFORY_J
    *GET,VALUE(55,2),ELEM,200,ETAB,MFORZ_J
    *GET,VALUE(56,2),ELEM,200,ETAB,MMOMZ_J

! Warning and error tolerances
  TOLER( 1, 1)= 1E-02   $   TOLER( 1, 2)= 1E-01
  TOLER( 2, 1)= 1E-15   $   TOLER( 2, 2)= 1E-14
  TOLER( 3, 1)= 1E-02   $   TOLER( 3, 2)= 1E-01
  TOLER( 4, 1)= 1E-02   $   TOLER( 4, 2)= 1E-01
  TOLER( 5, 1)= 1E-02   $   TOLER( 5, 2)= 1E-01
  TOLER( 6, 1)= 1E-15   $   TOLER( 6, 2)= 1E-14
  TOLER( 7, 1)= 1E-02   $   TOLER( 7, 2)= 1E-01
  TOLER( 8, 1)= 1E-02   $   TOLER( 8, 2)= 1E-01
  TOLER( 9, 1)= 1E-02   $   TOLER( 9, 2)= 1E-01
  TOLER(10, 1)= 1E-15   $   TOLER(10, 2)= 1E-14
  TOLER(11, 1)= 1E-02   $   TOLER(11, 2)= 1E-01
  TOLER(12, 1)= 1E-02   $   TOLER(12, 2)= 1E-01
  TOLER(13, 1)= 1E-09   $   TOLER(13, 2)= 1E-08
  TOLER(14, 1)= 1E-10   $   TOLER(14, 2)= 1E-09
  TOLER(15, 1)= 1E-09   $   TOLER(15, 2)= 1E-08
  TOLER(16, 1)= 1E-09   $   TOLER(16, 2)= 1E-08
  TOLER(17, 1)= 1E-10   $   TOLER(17, 2)= 1E-09
  TOLER(18, 1)= 1E-10   $   TOLER(18, 2)= 1E-09
  TOLER(19, 1)= 1E-09   $   TOLER(19, 2)= 1E-08
  TOLER(20, 1)= 1E-09   $   TOLER(20, 2)= 1E-08
  TOLER(21, 1)= 1E-09   $   TOLER(21, 2)= 1E-08
  TOLER(22, 1)= 1E-09   $   TOLER(22, 2)= 1E-08
  TOLER(23, 1)= 1E-09   $   TOLER(23, 2)= 1E-08
  TOLER(24, 1)= 1E-09   $   TOLER(24, 2)= 1E-08
  TOLER(25, 1)= 1E-02   $   TOLER(25, 2)= 1E-01
  TOLER(26, 1)= 1E-15   $   TOLER(26, 2)= 1E-14
  TOLER(27, 1)= 1E-02   $   TOLER(27, 2)= 1E-01
  TOLER(28, 1)= 1E-03   $   TOLER(28, 2)= 1E-02
  TOLER(29, 1)= 1E-03   $   TOLER(29, 2)= 1E-02
  TOLER(30, 1)= 1E-15   $   TOLER(30, 2)= 1E-14
  TOLER(31, 1)= 1E-02   $   TOLER(31, 2)= 1E-01
  TOLER(32, 1)= 1E-03   $   TOLER(32, 2)= 1E-02
  TOLER(33, 1)= 1E-02   $   TOLER(33, 2)= 1E-01
  TOLER(34, 1)= 1E-15   $   TOLER(34, 2)= 1E-14
  TOLER(35, 1)= 1E-02   $   TOLER(35, 2)= 1E-01
  TOLER(36, 1)= 1E-03   $   TOLER(36, 2)= 1E-02
  TOLER(37, 1)= 1E-09   $   TOLER(37, 2)= 1E-08
  TOLER(38, 1)= 1E-10   $   TOLER(38, 2)= 1E-09
  TOLER(39, 1)= 1E-09   $   TOLER(39, 2)= 1E-08
  TOLER(40, 1)= 1E-10   $   TOLER(40, 2)= 1E-09
  TOLER(41, 1)= 1E-09   $   TOLER(41, 2)= 1E-08
  TOLER(42, 1)= 1E-10   $   TOLER(42, 2)= 1E-09
  TOLER(43, 1)= 1E-09   $   TOLER(43, 2)= 1E-08
  TOLER(44, 1)= 1E-10   $   TOLER(44, 2)= 1E-09
  TOLER(45, 1)= 1E-10   $   TOLER(45, 2)= 1E-09
  TOLER(46, 1)= 1E-10   $   TOLER(46, 2)= 1E-09
  TOLER(47, 1)= 1E-09   $   TOLER(47, 2)= 1E-08
  TOLER(48, 1)= 1E-10   $   TOLER(48, 2)= 1E-09
  TOLER(49, 1)= 1E-02   $   TOLER(49, 2)= 1E-01
  TOLER(50, 1)= 1E-03   $   TOLER(50, 2)= 1E-02
  TOLER(51, 1)= 1E-02   $   TOLER(51, 2)= 1E-01
  TOLER(52, 1)= 1E-03   $   TOLER(52, 2)= 1E-02
  TOLER(53, 1)= 1E-02   $   TOLER(53, 2)= 1E-01
  TOLER(54, 1)= 1E-02   $   TOLER(54, 2)= 1E-01
  TOLER(55, 1)= 1E-02   $   TOLER(55, 2)= 1E-01
  TOLER(56, 1)= 1E-03   $   TOLER(56, 2)= 1E-02

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

Results

LabelTargetCivilFEMRatioTolerance
TEST1-1.4064e+005-1.4064e+0051.000 0.1
TEST2 0 00.000 1e-014
TEST35.033e+0055.033e+0051.000 0.1
TEST43.5618e+0053.5618e+0051.000 0.1
TEST53.9551e+0053.9551e+0051.000 0.1
TEST6 0 00.000 1e-014
TEST75.8215e+0055.8215e+0051.000 0.1
TEST83.6924e+0053.6924e+0051.000 0.1
TEST99.3165e+0059.3165e+0051.000 0.1
TEST10 0 00.000 1e-014
TEST116.6099e+0056.6099e+0051.000 0.1
TEST123.8229e+0053.8229e+0051.000 0.1
TEST13 -0.080432 -0.0804321.000 1e-008
TEST14 -0.024178 -0.0241781.000 1e-009
TEST15 0.17714 0.177141.000 1e-008
TEST16 0.28495 0.284951.000 1e-008
TEST17 0.093026 0.0930261.000 1e-009
TEST18 -0.065177 -0.0651771.000 1e-009
TEST19 0.16768 0.167681.000 1e-008
TEST20 0.29539 0.295391.000 1e-008
TEST21 0.26648 0.266481.000 1e-008
TEST22 -0.10618 -0.106181.000 1e-008
TEST23 0.15822 0.158221.000 1e-008
TEST24 0.30583 0.305831.000 1e-008
TEST256.5617e+0056.5617e+0051.000 0.1
TEST26 0 00.000 1e-014
TEST27-4.845e+005-4.845e+0051.000 0.1
TEST28 97070 970701.000 0.01
TEST292.1248e+0052.1248e+0051.000 0.01
TEST30 0 00.000 1e-014
TEST31-5.6427e+005-5.6427e+0051.000 0.1
TEST32 98817 988171.000 0.01
TEST33-2.3121e+005-2.3121e+0051.000 0.1
TEST34 0 00.000 1e-014
TEST35-6.4404e+005-6.4404e+0051.000 0.1
TEST361.0056e+0051.0056e+0051.000 0.01
TEST37 0.25102 0.251021.000 1e-008
TEST38 -0.011445 -0.0114451.000 1e-009
TEST39 -0.20524 -0.205241.000 1e-008
TEST40 0.077656 0.0776561.000 1e-009
TEST41 0.10845 0.108451.000 1e-008
TEST42 0.023452 0.0234521.000 1e-009
TEST43 -0.20225 -0.202251.000 1e-008
TEST44 0.079053 0.0790531.000 1e-009
TEST45 -0.034134 -0.0341341.000 1e-009
TEST46 0.05835 0.058351.000 1e-009
TEST47 -0.19927 -0.199271.000 1e-008
TEST48 0.080451 0.0804511.000 1e-009
TEST492.6282e+0052.6282e+0051.000 0.1
TEST50 97334 973341.000 0.01
TEST512.3766e+0052.3766e+0051.000 0.1
TEST52 16058 160581.000 0.01
TEST532.5339e+0052.5339e+0051.000 0.1
TEST541.0676e+0051.0676e+0051.000 0.1
TEST551.1883e+0051.1883e+0051.000 0.1
TEST56 -20472 -204721.000 0.01

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