1)    Deformation (mm) Stress (Mpa) Case 1 0.00027492 0.605 Case 2 0.00029731 0.581 2) From analysis stand point i would like to pick case 2 model becase as per FEM results the stress value in case 2 model is less than the case 1 model. Second reason for opting case 2 model with respect to weight since…

Introduction In this challenge i have performed Static structure analysis on spur gear model in order to find equivalent stress, total displacement and stress intensity. I have used three diffrent materials namely cast iron, cast steel and cast bronze  in static structure analysis to evalute the ideal material for…

Objective: Creating automation for element normals. Code to display normals: *clearmarkall 1*setnormalsdisplaytype 1*createmark elements 1 "displayed"*normalsdisplay elements 1*clearmarkall 1*createmarkpanel elements 1 "select the elements you want reverse normals for"*normalsreverse elements 1*createmark elements 1 "displayed"*normalsdisplay…

Aim: Creating TK GUI for final checks. Procedure: 1) Create buttons to delete displayed geometric entities: set a .windowcatch {destroy $a}toplevel $a -class toplevelwm title $a "GUI For Final Checks"wm geometry $a 500x500+200+200; updatewm resizable $a 0 0 wm deiconify $a button $a.01 -text "Delete surfaces" -command…

Aim: Checking and correcting free edges. Procedure: 1) Create a code that displayed free and T edges for displayed elements: proc free_edges {} {*clearmarkall 1; *createmark elements 1 "displayed"if {[hm_marklength elements 1] !=0} {*findedges1 elements 1 0 0 0 30}} proc T_edges {} {*clearmarkall 1; *createmark…

Aim: To create a macro for creating components and property Procedure: 1) Ask the user to enter name of a component and its thickness set addsub .windowcatch {destroy $addsub}toplevel $addsub -class toplevelwm title $addsub "Creating_Components"wm geometry $addsub 500x500+200+200; updatewm resizable $addsub 0 0wm…

Aim: Creat a macro to Reflect the FEM entities. Procedure: Should be independent of deck proc nastran {a t} {set nastran [hm_info templatetype]if {$nastran=="nastran"} {set c $aset d $t*clearmarkall 1*createmark comps 1 $cif {[hm_marklength comps 1 $c]!=0} {puts [tk_messageBox -message "The component already exists" -icon…

Aim: To Create a macro such that it will create a midline for tubular components and for creating the spot welds. Procedure: Part A *createlistbypathpanel lines 1 "select source lines by path"set source [hm_getlist lines 1]*createlistbypathpanel lines 2 "select destination lines by path"set target [hm_getlist lines 2]foreach…

Aim: To creat a macro in order to check element qality of both 2d and 3D Procedure: Create a button for each criteria set addsub .windowcatch {destroy $addsub}toplevel $addsub -class toplevelwm title $addsub "Element_Qality"wm geometry $addsub 1000x700+200+200; updatewm resizable $addsub 0 0wm deiconify $addsublabel $addsub.01…

Aim: To creat a macro for creating diffrent type of connector, Reading nodes of .csv file and identify identical components. Procedure: Connector like weld, xloc, yloc, zloc proc connector () {set top .connectorcatch {destroy $top}toplevel $top -class TopLevelwm geometry $top 250x280+5+10; updatewm title $top "Connectors"…

Aim: To create a master TCL/TK macro Procedure: Buttons that will call all utilities created as assignments during this course set a .windowcatch {destroy $a}toplevel $a -class topLevelwm geometry $a 260x560+5+10; updatewm title $a "Master" wm resizable $a 0 0 wm deiconify $a button $a.01 -text "Normals" -command "normals"…

Aim: Creat an output file  which contains detail information about file. Procedure: set file [open master.csv w]puts $file "USERNAME, $env(USERNAME)"set sys_d_t [clock second]set Date [clock format $sys_d_t -format %D]puts $file "Date, [clock format $sys_d_t -format %D]"set Time [clock format $sys_d_t -format %T]puts…

Aim: Create FE model for a given component with the Size of 5 Units. Create 1D elements on the following component with given cross-section and DOF Snippets:              FE Model  FE Model with 1D elements        1D element cross section * .hm file has attached…

Aim: To create mesh on Hood Assy Model with in given parameters. Procedure:               Quality Criteria                                                    …

Aim: To create Tetra Mesh for all the given components with in the given criteria. Procedure:                                                                  …

Aim: To mesh the given geometry within the quality parameters and Create connector to attach the various parts. Procedure:            Quality Criteria                                        …