March 17, 2023 at 8:59 amFAQParticipant
The subroutine example below loops over the elements of all unstructured parts in an Autodyn model. The subroutine checks for each element whether it has been eroded or not. If yes, then the part Id, element Id, the mass and the erosion flag of the element are written to a file “eroded_element.txt”, which is saved in the Autodyn ad_usrsub.exe directory. the variable erosion_flag is checking the status of the elements. If erosion flag gets a value of 1 or 2, this means that the element has been eroded. A value of 1 means that the option “Retain Inertia of Eroded Nodes” for the element is active and a value of two means that the option is deactivated for the current element. ! BEGIN EXAMPLE SUBROUTINE EXEDIT3 USE kindef USE wrapup USE mdpart USE mdvar_all USE cycvar USE mdsolv IMPLICIT NONE INTEGER (INT4) :: np, ne, intpoi, nenum INTEGER (INT4) :: erosion_flag REAL (REAL8) :: mass open(20, file=”eroded_elements.txt”) do np = 1, num_parts do ne = 1, parts(np)%p%numelm nenum = parts(np)%p%element_list(ne) intpoi = 0 call get_elem_var(nenum,intpoi) mass = rvl(ivr_mass) erosion_flag = ivl(ivi_erosion) ! erosion_flag == 1: eroded element while retaining inertia, 2: eroded but not retaining ineratia if (erosion_flag .eq. 1 .or. erosion_flag .eq. 2) write(20,*) np, ne, mass, erosion_flag end do end do close(20) RETURN END SUBROUTINE EXEDIT3 ! END EXAMPLE
Introducing Ansys Electronics Desktop on Ansys Cloud
The Watch & Learn video article provides an overview of cloud computing from Electronics Desktop and details the product licenses and subscriptions to ANSYS Cloud Service that are...
How to Create a Reflector for a Center High-Mounted Stop Lamp (CHMSL)
This video article demonstrates how to create a reflector for a center high-mounted stop lamp. Optical Part design in Ansys SPEOS enables the design and validation of multiple...
Introducing the GEKO Turbulence Model in Ansys Fluent
The GEKO (GEneralized K-Omega) turbulence model offers a flexible, robust, general-purpose approach to RANS turbulence modeling. Introducing 2 videos: Part 1 provides background information on the model and a...
Postprocessing on Ansys EnSight
This video demonstrates exporting data from Fluent in EnSight Case Gold format, and it reviews the basic postprocessing capabilities of EnSight.
- The LS-DYNA equivalent of *MODEL_CHANGE card (in ABAQUS). Which keywords can be used to introduce(activate)/delete(deactivate) elements in the middle of a calculation (at user-specific time/load steps).
- The warning message is: “The maximum contact stiffness is too big. This may affect the accuracy of the results.” Why does large contact stiffness affect results accuracy?
- Contact Definitions in ANSYS Workbench Mechanical
- How to deal with “”Problem terminated — energy error too large””?”
- After Workbench crashes, how can I recover the project from a .mechdb file?
- How to display the color of each body based on the material in Mechanical?
- How to resolve “Error: Invalid Geometry”?
- Model has a large number of contacts – how to reduce them?
- Please explain the difference between Point Mass and Distributed Mass.
- How to locate an element of a particular ID number in Mechanical?