abc_apdl.txt

用visual basic编写的有限元程序！

!这是一个程序自动生成APDL命令流文件

! Nodes:124
! Elems:180

/prep7
ET,1,PLANE2

MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,EX,1,,100
MPDATA,PRXY,1,,0.3

R,1,10

! KeyPoints
n, 1, 0, 20
n, 2, 0, 30
n, 3, 10, 20
n, 4, 10, 30
n, 5, 20, 20
n, 6, 20, 30
n, 7, 30, 20
n, 8, 30, 30
n, 9, 40, 20
n, 10, 40, 30
n, 11, 50, 20
n, 12, 50, 30
n, 13, 60, 20
n, 14, 60, 30
n, 15, 70, 20
n, 16, 70, 30
n, 17, 80, 20
n, 18, 80, 30
n, 19, 90, 20
n, 20, 90, 30
n, 21, 100, 20
n, 22, 100, 30
n, 23, 110, 20
n, 24, 110, 30
n, 25, 120, 20
n, 26, 120, 30
n, 27, 130, 20
n, 28, 130, 30
n, 29, 140, 20
n, 30, 140, 30
n, 31, 150, 20
n, 32, 150, 30
n, 33, 160, 20
n, 34, 160, 30
n, 35, 170, 20
n, 36, 170, 30
n, 37, 180, 20
n, 38, 180, 30
n, 39, 190, 20
n, 40, 190, 30
n, 41, 200, 20
n, 42, 200, 30
n, 43, 210, 20
n, 44, 210, 30
n, 45, 220, 20
n, 46, 220, 30
n, 47, 230, 20
n, 48, 230, 30
n, 49, 240, 20
n, 50, 240, 30
n, 51, 250, 20
n, 52, 250, 30
n, 53, 260, 20
n, 54, 260, 30
n, 55, 270, 20
n, 56, 270, 30
n, 57, 280, 20
n, 58, 280, 30
n, 59, 290, 20
n, 60, 290, 30
n, 61, 300, 20
n, 62, 300, 30
n, 63, 290, 0
n, 64, 280, 0
n, 65, 270, 0
n, 66, 260, 0
n, 67, 250, 0
n, 68, 240, 0
n, 69, 230, 0
n, 70, 220, 0
n, 71, 210, 0
n, 72, 200, 0
n, 73, 190, 0
n, 74, 180, 0
n, 75, 170, 0
n, 76, 160, 0
n, 77, 150, 0
n, 78, 140, 0
n, 79, 130, 0
n, 80, 120, 0
n, 81, 110, 0
n, 82, 100, 0
n, 83, 90, 0
n, 84, 80, 0
n, 85, 70, 0
n, 86, 60, 0
n, 87, 50, 0
n, 88, 40, 0
n, 89, 30, 0
n, 90, 20, 0
n, 91, 10, 0
n, 92, 0, 0
n, 93, 0, 10
n, 94, 10, 10
n, 95, 20, 10
n, 96, 30, 10
n, 97, 40, 10
n, 98, 50, 10
n, 99, 60, 10
n, 100, 70, 10
n, 101, 80, 10
n, 102, 90, 10
n, 103, 100, 10
n, 104, 110, 10
n, 105, 120, 10
n, 106, 130, 10
n, 107, 140, 10
n, 108, 150, 10
n, 109, 160, 10
n, 110, 170, 10
n, 111, 180, 10
n, 112, 190, 10
n, 113, 200, 10
n, 114, 210, 10
n, 115, 220, 10
n, 116, 230, 10
n, 117, 240, 10
n, 118, 250, 10
n, 119, 260, 10
n, 120, 270, 10
n, 121, 280, 10
n, 122, 290, 10
n, 123, 300, 10
n, 124, 300, 0

! Areas
E,2,1,4,4                       !A1
E,3,4,1,1                       !A2
E,4,3,6,6                       !A3
E,5,6,3,3                       !A4
E,6,5,8,8                       !A5
E,7,8,5,5                       !A6
E,8,7,10,10                     !A7
E,9,10,7,7                      !A8
E,10,9,12,12                    !A9
E,11,12,9,9                     !A10
E,12,11,14,14                   !A11
E,13,14,11,11                   !A12
E,14,13,16,16                   !A13
E,15,16,13,13                   !A14
E,16,15,18,18                   !A15
E,17,18,15,15                   !A16
E,18,17,20,20                   !A17
E,19,20,17,17                   !A18
E,20,19,22,22                   !A19
E,21,22,19,19                   !A20
E,22,21,24,24                   !A21
E,23,24,21,21                   !A22
E,24,23,26,26                   !A23
E,25,26,23,23                   !A24
E,26,25,28,28                   !A25
E,27,28,25,25                   !A26
E,28,27,30,30                   !A27
E,29,30,27,27                   !A28
E,30,29,32,32                   !A29
E,31,32,29,29                   !A30
E,32,31,34,34                   !A31
E,33,34,31,31                   !A32
E,34,33,36,36                   !A33
E,35,36,33,33                   !A34
E,36,35,38,38                   !A35
E,37,38,35,35                   !A36
E,38,37,40,40                   !A37
E,39,40,37,37                   !A38
E,40,39,42,42                   !A39
E,41,42,39,39                   !A40
E,42,41,44,44                   !A41
E,43,44,41,41                   !A42
E,44,43,46,46                   !A43
E,45,46,43,43                   !A44
E,46,45,48,48                   !A45
E,47,48,45,45                   !A46
E,48,47,50,50                   !A47
E,49,50,47,47                   !A48
E,50,49,52,52                   !A49
E,51,52,49,49                   !A50
E,52,51,54,54                   !A51
E,53,54,51,51                   !A52
E,54,53,56,56                   !A53
E,55,56,53,53                   !A54
E,56,55,58,58                   !A55
E,57,58,55,55                   !A56
E,58,57,60,60                   !A57
E,59,60,57,57                   !A58
E,60,59,62,62                   !A59
E,61,62,59,59                   !A60
E,64,63,122,122                 !A61
E,65,64,121,121                 !A62
E,66,65,120,120                 !A63
E,67,66,119,119                 !A64
E,68,67,118,118                 !A65
E,69,68,117,117                 !A66
E,70,69,116,116                 !A67
E,71,70,115,115                 !A68
E,72,71,114,114                 !A69
E,73,72,113,113                 !A70
E,74,73,112,112                 !A71
E,75,74,111,111                 !A72
E,76,75,110,110                 !A73
E,77,76,109,109                 !A74
E,78,77,108,108                 !A75
E,79,78,107,107                 !A76
E,80,79,106,106                 !A77
E,81,80,105,105                 !A78
E,82,81,104,104                 !A79
E,83,82,103,103                 !A80
E,84,83,102,102                 !A81
E,85,84,101,101                 !A82
E,86,85,100,100                 !A83
E,87,86,99,99                   !A84
E,88,87,98,98                   !A85
E,89,88,97,97                   !A86
E,90,89,96,96                   !A87
E,91,90,95,95                   !A88
E,92,91,94,94                   !A89
E,1,93,3,3                      !A90
E,94,3,93,93                    !A91
E,3,94,5,5                      !A92
E,95,5,94,94                    !A93
E,5,95,7,7                      !A94
E,96,7,95,95                    !A95
E,7,96,9,9                      !A96
E,97,9,96,96                    !A97
E,9,97,11,11                    !A98
E,98,11,97,97                   !A99
E,11,98,13,13                   !A100
E,99,13,98,98                   !A101
E,13,99,15,15                   !A102
E,100,15,99,99                  !A103
E,15,100,17,17                  !A104
E,101,17,100,100                !A105
E,17,101,19,19                  !A106
E,102,19,101,101                !A107
E,19,102,21,21                  !A108
E,103,21,102,102                !A109
E,21,103,23,23                  !A110
E,104,23,103,103                !A111
E,23,104,25,25                  !A112
E,105,25,104,104                !A113
E,25,105,27,27                  !A114
E,106,27,105,105                !A115
E,27,106,29,29                  !A116
E,107,29,106,106                !A117
E,29,107,31,31                  !A118
E,108,31,107,107                !A119
E,31,108,33,33                  !A120
E,109,33,108,108                !A121
E,33,109,35,35                  !A122
E,110,35,109,109                !A123
E,35,110,37,37                  !A124
E,111,37,110,110                !A125
E,37,111,39,39                  !A126
E,112,39,111,111                !A127
E,39,112,41,41                  !A128
E,113,41,112,112                !A129
E,41,113,43,43                  !A130
E,114,43,113,113                !A131
E,43,114,45,45                  !A132
E,115,45,114,114                !A133
E,45,115,47,47                  !A134
E,116,47,115,115                !A135
E,47,116,49,49                  !A136
E,117,49,116,116                !A137
E,49,117,51,51                  !A138
E,118,51,117,117                !A139
E,51,118,53,53                  !A140
E,119,53,118,118                !A141
E,53,119,55,55                  !A142
E,120,55,119,119                !A143
E,55,120,57,57                  !A144
E,121,57,120,120                !A145
E,57,121,59,59                  !A146
E,122,59,121,121                !A147
E,59,122,61,61                  !A148
E,123,61,122,122                !A149
E,122,121,64,64                 !A150
E,121,120,65,65                 !A151
E,120,119,66,66                 !A152
E,119,118,67,67                 !A153
E,118,117,68,68                 !A154
E,117,116,69,69                 !A155
E,116,115,70,70                 !A156
E,115,114,71,71                 !A157
E,114,113,72,72                 !A158
E,113,112,73,73                 !A159
E,112,111,74,74                 !A160
E,111,110,75,75                 !A161
E,110,109,76,76                 !A162
E,109,108,77,77                 !A163
E,108,107,78,78                 !A164
E,107,106,79,79                 !A165
E,106,105,80,80                 !A166
E,105,104,81,81                 !A167
E,104,103,82,82                 !A168
E,103,102,83,83                 !A169
E,102,101,84,84                 !A170
E,101,100,85,85                 !A171
E,100,99,86,86                  !A172
E,99,98,87,87                   !A173
E,98,97,88,88                   !A174
E,97,96,89,89                   !A175
E,96,95,90,90                   !A176
E,95,94,91,91                   !A177
E,94,93,92,92                   !A178
E,123,63,124,124                !A179
E,63,123,122,122                !A180

D,1,ALL,0
D,2,ALL,0
D,92,ALL,0
D,93,ALL,0

F,124,FY,-10