焊接命令流（Welding command stream）.doc

焊接命令流（Welding command stream） Finish /CLEAR! Clear the database, new files /FILNAME, EXAMPLE30! Change the name of the job Start thermal analysis Build a finite element model /PREP7! Into the preprocessor! ET, 1, PLANE77, flat heat units ET, 2, SOLID90! Space thermal unit V=0.005 welding line speed LENGTH=0.05 the length of the steel plate along the weld line L_NUMBER=LENGTH/V number of units along the weld seam direction MPTEMP, 1,0300600100013002000! Define material model, thermometer MPDATA, DENS, 1,1785977707659760067506750! Density! MPDATA, DENS, 2,1785977707659760067506750 MPDATA, C, 1,1450514967137028002000, specific heat MPDATA, C, 2,1450514967137028002000 MPDATA, KXX, 1,1,67,53,39,31, 20,20, conductivity MPDATA, KXX, 2,1,67,53,39,31,20,20 RECT, 0,0.10,0,0.01! Because of symmetry, create the 1/2 entity model K, 5,0.002 K, 6,0.002,0.002 K, 7,0.00662,0.01 K, 8,0.00339,0.01112 K, 9,0,0.0115 LARC, 7,9,8 A, 1,5,6,7,9 AGEN, 2,2 ASBA, 1,2 AGLUE, ALL K, 20,0,0.00385 CIRCLE, 20,0.008,, 90 CIRCLE, 20,0.012,, 90 ASBL, 3,4 ASBL, 2,5 ESIZE, 0.00075 SMRTSIZE, 7 MSHAPE, 1 AMESH, 3,5,1 ESIZE, 0.003 AMESH, 1! Divide the units EXTOPT, ESIZE, L_NUMBER EXTOPT, ACLEAR, 1 MAT, 1 VEXT, 3,5,1,, LENGTH, squeeze out MAT, 2 VEXT, 1,,,, LENGTH NUMMRG, NODE, merge the locations of the two extrusion locations to coincide ALLS FINISH Thermal analysis solver Steady thermal analysis is applied to initial temperature /SOLU! Enter the solver AUTOTS, ON! Turn on auto time step OUTPR, NSOL, ALL, output control OUTRES, NSOL, ALL KBC, 1, step load ANTYPE, TRANS, transient analysis TIMINT, OFF! Close time integration! NSUBST, 4, the number of steps D, ALL, TEMP, 20, apply initial temperature TIME, 0.01! Time! SOLVE! Answer! Kill weld element ESEL, S, MAT, 1, select the weld unit EKILL, ALL! Kill unit! ESEL, ALL TIME, 0.02 SOLVE Start activating the weld element for transient thermal analysis TIMINT, ON, THER! Open time integration for transient analysis DDELE, ALL, TEMP remove the temperature load