CFVR0814 - 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 BEAM189 elements.
- Date handle with unsorted numeration (elements, load steps...)
The load cases are:
- Load Step 1, Sub Step 1: Imposed horizontal movement on the free end of 1 meter in horizontal (direction of the beam).
- Load Step 2, Sub Step 1: Imposed vertical and horizontal movement (perpendicular to the beam) on the free end of 1 meter each.
The target for the combinations is:
- Target 45; Maximum Bending moment MZ
- Combination rule 10: ADDITION: H1+H2
Element types used in the model: BEAM189 Needed CivilFEM Modules: |
|
| Model Statistics | |
| Number of elements | 3 |
| Number of nodes | 8 |
| Number of civil materials | 0 |
| Number of cross sections | 0 |
| Number of shell vertices | 0 |
Log file: CFVR0814.DAT
FINISH ~CFCLEAR,,1 AnsLic='ansys' NomFile='CFVR0814' /TITLE, %NomFile%, Combination module test with BEAM189 ! --------------------------------------------------------------------------------- ! 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,0,0,0,0,0,0,0,0 ! Element types ET,2,BEAM189 ! Nodes N,10,0.0,0.0 N,15,0.5,0.0 N,20,1.0,0.0 N,25,1.5,0.0 N,30,2.0,0.0 N,35,2.5,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, 15, 100 EN,200, 20, 30, 25, 100 EN,300, 30, 40, 35, 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-26 $ TOLER( 4, 2)= 1E-26 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
| Label | Target | CivilFEM | Ratio | Tolerance |
| TEST1 | 2e+006 | 2e+006 | 1.000 | 1 |
| TEST2 | 51480 | 51480 | 1.000 | 0.01 |
| TEST3 | 1.6878e+005 | 1.6878e+005 | 1.000 | 0.1 |
| TEST4 | -6.2039e-025 | -6.2039e-025 | 1.000 | 1e-026 |
| TEST5 | -1.6878e+005 | -1.6878e+005 | 1.000 | 0.1 |
| TEST6 | 51480 | 51480 | 1.000 | 0.01 |
Contains proprietary and confidential information of Ingeciber, S.A.