$nastran system(86)=6 $assign output2='d:\setest\outfile.dat', unit=21, assign output2='out21.out', unit=21, delete assign output2='out22.out', unit=22, delete assign output2='out23.out', unit=23, delete assign output2='out24.out', unit=24, delete assign output2='out25.out', unit=25, delete assign output2='out26.out', unit=26, delete assign output2='out27.out', unit=27, delete $ form=formatted, delete $ FILE se1s103p.DAT $ Superelement dynamic reduction - using PARTs $ ID SE, SAMPLE PROBLEM DYNAMICS - SHOW DIFFERENT REDUCTION METHODS SOL 103 TIME 15 diag 8,15,56 include 'alter1ha.v707' CEND TITLE = S.E. SAMPLE PROBLEM 1 - NORMAL MODES SUBTITLE = S.E. DYNAMICS - USE DIFFERENT REDUCTION TECHNIQUES DISP = ALL PARAM,GRDPNT,0 $ $SEALL = 7 param,fixedb,-1 $ SUBCASE 1 SET 12 = 1,2 SUPER = 12 LABEL = GEN DYNAMIC REDUCTION + MODAL SYNTHESIS FOR S.E. 1 & 2 METHOD = 1 $ SUBCASE 2 SET 13 = 3,4 SUPER = 13 method = 1 LABEL = CMS of S.E. 3 & 4 $ SUBCASE 3 SET 15 = 5,6 SUPER = 15 LABEL = CMS of S.E. 5 & 6 METHOD = 1 $ SUBCASE 4 SUPER = 7 LABEL = COMPONENT MODE REDUCTION ONLY FOR S.E. 7 stress = all spcforce = all METHOD = 1 $ SUBCASE 5 LABEL = RES STR - SOLVE PROBLEM FOR SYSTEM MODES METHOD = 2 $ BEGIN BULK $ main bulk data section $ EIGRL,2,,200. CQUAD4 5 1 13 14 24 23 GRDSET 6 GRID 13 -.4 3.6 0. GRID 14 .4 3.6 0. GRID 23 -.4 4.4 0. GRID 24 .4 4.4 0. MAT1,1,30.+6,,.3,.283 PSHELL,1,1,.05,1,,1 $ begin super=1 param,makemat,1 param,matfile,21 param,drmh,1 EIGRl,1,,1000. spoint,10001,thru,10020 qset1,0,10001,thru,10020 $ $ part1.dat $ CQUAD4 18 1 33 34 46 45 CQUAD4 19 1 34 35 47 46 CQUAD4 20 1 35 36 48 47 CQUAD4 21 1 36 37 49 48 CQUAD4 22 1 37 38 50 49 CQUAD4 23 1 45 46 58 57 CQUAD4 24 1 46 47 59 58 CQUAD4 25 1 47 48 60 59 CQUAD4 26 1 48 49 61 60 CQUAD4 27 1 49 50 62 61 CQUAD4 28 1 57 58 70 69 CQUAD4 29 1 58 59 71 70 CQUAD4 30 1 59 60 72 71 CQUAD4 31 1 60 61 73 72 CQUAD4 32 1 61 62 74 73 CQUAD4 33 1 69 70 82 81 CQUAD4 34 1 70 71 83 82 CQUAD4 35 1 71 72 84 83 CQUAD4 36 1 72 73 85 84 CQUAD4 37 1 73 74 86 85 CQUAD4 38 1 81 82 94 93 CQUAD4 39 1 82 83 95 94 CQUAD4 40 1 83 84 96 95 CQUAD4 41 1 84 85 97 96 CQUAD4 42 1 85 86 98 97 $ GRDSET 6 $ $ boundary grids $ GRID 35 -3.6 6. 0. GRID 36 -2.8 6. 0. $ GRID 33 -5.2 6. 0. GRID 34 -4.4 6. 0. GRID 37 -2. 6. 0. GRID 38 -1.2 6. 0. $ GRID 45 -5.2 6.8 0. GRID 46 -4.4 6.8 0. GRID 47 -3.6 6.8 0. GRID 48 -2.8 6.8 0. GRID 49 -2. 6.8 0. GRID 50 -1.2 6.8 0. GRID 57 -5.2 7.6 0. GRID 58 -4.4 7.6 0. GRID 59 -3.6 7.6 0. GRID 60 -2.8 7.6 0. GRID 61 -2. 7.6 0. GRID 62 -1.2 7.6 0. GRID 69 -5.2 8.4 0. GRID 70 -4.4 8.4 0. GRID 71 -3.6 8.4 0. GRID 72 -2.8 8.4 0. GRID 73 -2. 8.4 0. GRID 74 -1.2 8.4 0. GRID 81 -5.2 9.2 0. GRID 82 -4.4 9.2 0. GRID 83 -3.6 9.2 0. GRID 84 -2.8 9.2 0. GRID 85 -2. 9.2 0. GRID 86 -1.2 9.2 0. GRID 93 -5.2 10. 0. GRID 94 -4.4 10. 0. GRID 95 -3.6 10. 0. GRID 96 -2.8 10. 0. GRID 97 -2. 10. 0. GRID 98 -1.2 10. 0. $ MAT1,1,30.+6,,.3,.283 PARAM,WTMASS,.00259 PARAM,AUTOSPC,YES PSHELL,1,1,.05,1,,1 $ $ $ file - loadprt1.dat $ loads on s.e. 1 $ $ LOAD CASE 1 - PRESSURE LOAD $ PLOAD2,101,-1.,18,THRU,42 $ $ LOAD CASE 2 - 2 POINT LOADS AT CORNERS $ FORCE,201,93,,2.,0.,0.,1. $ $ LOAD CASE 3 - OPPOSING POINT LOADS AT CORNERS $ FORCE,301,93,,2.,0.,0.,1. $ $ begin super=2 param,makemat,2 param,matfile,22 param,drmh,1 EIGRl,1,,1000. spoint,10001,thru,10020 qset1,0,10001,thru,10020 $ $ part2.dat $ CQUAD4 43 1 39 40 52 51 CQUAD4 44 1 40 41 53 52 CQUAD4 45 1 41 42 54 53 CQUAD4 46 1 42 43 55 54 CQUAD4 47 1 43 44 56 55 CQUAD4 48 1 51 52 64 63 CQUAD4 49 1 52 53 65 64 CQUAD4 50 1 53 54 66 65 CQUAD4 51 1 54 55 67 66 CQUAD4 52 1 55 56 68 67 CQUAD4 53 1 63 64 76 75 CQUAD4 54 1 64 65 77 76 CQUAD4 55 1 65 66 78 77 CQUAD4 56 1 66 67 79 78 CQUAD4 57 1 67 68 80 79 CQUAD4 58 1 75 76 88 87 CQUAD4 59 1 76 77 89 88 CQUAD4 60 1 77 78 90 89 CQUAD4 61 1 78 79 91 90 CQUAD4 62 1 79 80 92 91 CQUAD4 63 1 87 88 100 99 CQUAD4 64 1 88 89 101 100 CQUAD4 65 1 89 90 102 101 CQUAD4 66 1 90 91 103 102 CQUAD4 67 1 91 92 104 103 $ GRDSET 6 $ $ boundary grids $ GRID 41 2.8 6. 0. GRID 42 3.6 6. 0. $ GRID 39 1.2 6. 0. GRID 40 2. 6. 0. GRID 43 4.4 6. 0. GRID 44 5.2 6. 0. $ GRID 51 1.2 6.8 0. GRID 52 2. 6.8 0. GRID 53 2.8 6.8 0. GRID 54 3.6 6.8 0. GRID 55 4.4 6.8 0. GRID 56 5.2 6.8 0. GRID 63 1.2 7.6 0. GRID 64 2. 7.6 0. GRID 65 2.8 7.6 0. GRID 66 3.6 7.6 0. GRID 67 4.4 7.6 0. GRID 68 5.2 7.6 0. GRID 75 1.2 8.4 0. GRID 76 2. 8.4 0. GRID 77 2.8 8.4 0. GRID 78 3.6 8.4 0. GRID 79 4.4 8.4 0. GRID 80 5.2 8.4 0. GRID 87 1.2 9.2 0. GRID 88 2. 9.2 0. GRID 89 2.8 9.2 0. GRID 90 3.6 9.2 0. GRID 91 4.4 9.2 0. GRID 92 5.2 9.2 0. GRID 99 1.2 10. 0. GRID 100 2. 10. 0. GRID 101 2.8 10. 0. GRID 102 3.6 10. 0. GRID 103 4.4 10. 0. GRID 104 5.2 10. 0. $ MAT1,1,30.+6,,.3,.283 PARAM,WTMASS,.00259 PARAM,AUTOSPC,YES PSHELL,1,1,.05,1,,1 $ $ $ file - loadprt2.dat $ loads on s.e. 2 $ $ LOAD CASE 1 - PRESSURE LOAD $ PLOAD2,101,-1.,43,THRU,67 $ $ LOAD CASE 2 - 2 POINT LOADS AT CORNERS $ FORCE,201,104,,2.,0.,0.,1. $ $ LOAD CASE 3 - OPPOSING POINT LOADS AT CORNERS $ FORCE,301,104,,2.,0.,0.,-1. $ begin super=3 param,makemat,3 param,matfile,23 param,drmh,1 EIGRL,1,,,5 spoint,10001,thru,10020 qset1,0,10001,thru,10020 $ $ part3.dat $ CQUAD4 14 1 19 20 30 29 CQUAD4 15 1 29 30 36 35 $ GRDSET 6 $ $ boundary grids $ GRID 19 -3.6 4.4 0. GRID 20 -2.8 4.4 0. GRID 35 -3.6 6. 0. GRID 36 -2.8 6. 0. $ GRID 29 -3.6 5.2 0. GRID 30 -2.8 5.2 0. $ MAT1,1,30.+6,,.3,.283 PARAM,WTMASS,.00259 PARAM,AUTOSPC,YES PSHELL,1,1,.05,1,,1 $ begin super=4 param,makemat,4 param,matfile,24 param,drmh,1 EIGRL,1,,,5 spoint,10001,thru,10020 qset1,0,10001,thru,10020 $ $ part4.dat $ CQUAD4 16 1 27 28 32 31 CQUAD4 17 1 31 32 42 41 $ GRDSET 6 $ $ boundary grids $ GRID 27 2.8 4.4 0. GRID 28 3.6 4.4 0. GRID 41 2.8 6. 0. GRID 42 3.6 6. 0. $ GRID 31 2.8 5.2 0. GRID 32 3.6 5.2 0. $ MAT1,1,30.+6,,.3,.283 PARAM,WTMASS,.00259 PARAM,AUTOSPC,YES PSHELL,1,1,.05,1,,1 $ begin super=5 param,makemat,5 param,matfile,25 param,drmh,1 EIGRL,1,,,5 spoint,10001,thru,10020 qset1,0,10001,thru,10020 $ $ part5.dat $ CQUAD4 6 1 9 10 20 19 CQUAD4 7 1 10 11 21 20 CQUAD4 8 1 11 12 22 21 CQUAD4 9 1 12 13 23 22 $ GRDSET 6 $ $ boundary grids $ GRID 19 -3.6 4.4 0. GRID 20 -2.8 4.4 0. GRID 13 -.4 3.6 0. GRID 23 -.4 4.4 0. $ GRID 9 -3.6 3.6 0. GRID 10 -2.8 3.6 0. GRID 11 -2. 3.6 0. GRID 12 -1.2 3.6 0. GRID 21 -2. 4.4 0. GRID 22 -1.2 4.4 0. $ MAT1,1,30.+6,,.3,.283 PARAM,WTMASS,.00259 PARAM,AUTOSPC,YES PSHELL,1,1,.05,1,,1 $ begin super=6 param,makemat,6 param,matfile,26 param,drmh,1 EIGRL,1,,,5 spoint,10001,thru,10020 qset1,0,10001,thru,10020 $ $ part6.dat $ CQUAD4 10 1 14 15 25 24 CQUAD4 11 1 15 16 26 25 CQUAD4 12 1 16 17 27 26 CQUAD4 13 1 17 18 28 27 $ GRDSET 6 $ $ boundary grids $ GRID 27 2.8 4.4 0. GRID 28 3.6 4.4 0. GRID 14 .4 3.6 0. GRID 24 .4 4.4 0. $ GRID 15 1.2 3.6 0. GRID 16 2. 3.6 0. GRID 17 2.8 3.6 0. GRID 18 3.6 3.6 0. $ GRID 25 1.2 4.4 0. GRID 26 2. 4.4 0. $ MAT1,1,30.+6,,.3,.283 PARAM,WTMASS,.00259 PARAM,AUTOSPC,YES PSHELL,1,1,.05,1,,1 $ begin super=7 param,makemat,7 param,matfile,27 $param,neutral,1 $ define Q-set spoint,10001,thru,10020 qset1,0,10001,thru,10020 EIGRL,1,,,5 uset1,u2,123,2,3,4,5 param,drmh,1 $ $ part7.dat $ CQUAD4 1 1 1 2 4 3 CQUAD4 2 1 3 4 6 5 CQUAD4 3 1 5 6 8 7 CQUAD4 4 1 7 8 14 13 $ GRDSET 6 $ GRID 1 -.4 0. 0. 123456 GRID 2 .4 0. 0. 123456 GRID 3 -.4 0.9 0. GRID 4 .4 0.9 0. GRID 5 -.4 1.8 0. GRID 6 .4 1.8 0. GRID 7 -.4 2.7 0. GRID 8 .4 2.7 0. $ $ boundary grids $ GRID 13 -.4 3.6 0. GRID 14 .4 3.6 0. $ MAT1,1,30.+6,,.3,.283 PARAM,WTMASS,.00259 PARAM,AUTOSPC,YES PSHELL,1,1,.05,1,,1 $ ENDDATA