求教：“ANSYS加筋土挡墙分析命令流”中的问题

yuxuanbing

小弟最近用ANSYS做了个加筋土挡墙的模型，可是不管怎么样调试，结果都不收敛，请哪位高人给指点下！谢谢！
现把模型命令流贴出如下：

/PREP7  
!*  
ET,1,PLANE42
!*  
!*  
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,EX,1,,4e7
MPDATA,PRXY,1,,0.35
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,DENS,1,,1800
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,MU,1,,0.4
TB,DP,1,,,  
TBMODIF,1,1,10000   
TBMODIF,1,2,20  
TBMODIF,1,3,20  
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,EX,2,,2e10   
MPDATA,PRXY,2,,0.25
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,DENS,2,,1950
TB,DP,2,,,  
TBMODIF,1,1,40000   
TBMODIF,1,2,50  
TBMODIF,1,3,50  
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,EX,3,,2e9
MPDATA,PRXY,3,,0
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,DENS,3,,1900
K, ,0,0,,   
K, ,-4,-2,,
K, ,-4,0,,  
K, ,10,0,,  
K, ,10,-2,,
K, ,10,6,,  
K, ,0,6,,   
K, ,0,-2,,  
K, ,4.2,-2,,
K, ,4.2,6,,
K, ,4.2,0,,
K, ,0,0.37,,
K, ,0,0.37,,
K, ,0,0.4,,
K, ,0,0.4,,
K, ,0,0.77,,
K, ,0,0.77,,
K, ,0,0.8,,
K, ,0,0.8,,
K, ,0,1.17,,
K, ,0,1.17,,
K, ,0,1.2,,
K, ,0,1.2,,
K, ,0,1.57,,
K, ,0,1.57,,
K, ,0,1.6,,
K, ,0,1.6,,
K, ,0,1.97,,
K, ,0,1.97,,
K, ,0,2,,   
K, ,0,2,,   
K, ,0,2.37,,
K, ,0,2.37,,
K, ,0,2.4,,
K, ,0,2.4,,
K, ,0,2.77,,
K, ,0,2.77,,
K, ,0,2.8,,
K, ,0,2.8,,
K, ,0,3.17,,
K, ,0,3.17,,
K, ,0,3.2,,
K, ,0,3.2,,
K, ,0,3.57,,
K, ,0,3.57,,
K, ,0,3.57,,
KDELE,      46  
/REPLOT
NUMCMP,KP   
K, ,0,3.6,,
K, ,0,3.6,,
K, ,0,3.97,,
K, ,0,3.97,,
K, ,0,4,,   
K, ,0,4,,   
K, ,0,4.37,,
K, ,0,4.37,,
K, ,0,4.4,,
K, ,0,4.4,,
K, ,0,4.77,,
K, ,0,4.77,,
K, ,0,4.8,,
K, ,0,4.8,,
K, ,0,5.17,,
K, ,0,5.17,,
K, ,0,5.2,,
K, ,0,5.2,,
K, ,0,5.57,,
K, ,0,5.57,,
K, ,0,5.6,,
K, ,0,5.6,,
K, ,4.2,0.37,,  
K, ,4.2,0.37,,  
K, ,4.2,0.4,,   
K, ,4.2,0.4,,   
K, ,4.2,0.77,,  
K, ,4.2,0.77,,  
K, ,4.2,0.8,,   
K, ,4.2,0.8,,   
K, ,4.2,1.17,,  
K, ,4.2,1.17,,  
K, ,4.2,1.2,,   
K, ,4.2,1.2,,   
K, ,4.2,1.57,,  
K, ,4.2,1.57,,  
K, ,4.2,1.6,,   
K, ,4.2,1.6,,   
K, ,4.2,1.97,,  
K, ,4.2,1.97,,  
K, ,4.2,2,,
K, ,4.2,2,,
K, ,4.2,2.37,,  
K, ,4.2,2.37,,  
K, ,4.2,2.4,,   
K, ,4.2,2.4,,   
K, ,4.2,2.77,,  
K, ,4.2,2.77,,  
K, ,4.2,2.8,,   
K, ,4.2,2.8,,   
K, ,4.2,3.17,,  
K, ,4.2,3.17,,  
K, ,4.2,3.2,,   
K, ,4.2,3.2,,   
K, ,4.2,3.57,,  
K, ,4.2,3.57,,  
K, ,4.2,3.6,,   
K, ,4.2,3.6,,   
K, ,4.2,3.97,,  
K, ,4.2,3.97,,  
K, ,4.2,4,,
K, ,4.2,4,,
K, ,4.2,4.37,,  
K, ,4.2,4.37,,  
K, ,4.2,4.4,,   
K, ,4.2,4.4,,   
K, ,4.2,4.77,,  
K, ,4.2,4.77,,  
K, ,4.2,4.8,,   
K, ,4.2,4.8,,   
K, ,4.2,5.17,,  
K, ,4.2,5.17,,  
K, ,4.2,5.2,,   
K, ,4.2,5.2,,   
K, ,4.2,5.57,,  
K, ,4.2,5.57,,  
K, ,4.2,5.6,,   
K, ,4.2,5.6,,   
K, ,10,0.37,,   
K, ,10,0.4,,
K, ,10,0.77,,   
K, ,10,0.8,,
K, ,10,1.17,,   
K, ,10,1.2,,
K, ,10,1.57,,   
K, ,10,1.6,,
K, ,10,1.97,,   
K, ,10,2,,  
K, ,10,2.37,,   
K, ,10,2.4,,
K, ,10,2.77,,   
K, ,10,2.8,,
K, ,10,3.17,,   
K, ,10,3.2,,
K, ,10,3.57,,   
K, ,10,3.6,,
K, ,10,3.97,,   
K, ,10,4,,  
K, ,10,4.37,,   
K, ,10,4.4,,
K, ,10,4.77,,   
K, ,10,4.8,,
K, ,10,5.17,,   
K, ,10,5.2,,
K, ,10,5.57,,   
K, ,10,5.6,,
LSTR,       1,      12  
LSTR,      13,      15  
LSTR,      14,      16  
LSTR,      17,      19  
LPLOT   
KPLOT   
/PNUM,KP,1  
/PNUM,LINE,1
/PNUM,AREA,0
/PNUM,VOLU,0
/PNUM,NODE,0
/PNUM,TABN,0
/PNUM,SVAL,0
/NUMBER,0   
!*  
/PNUM,ELEM,0
/REPLOT
!*  
LSTR,      18,      20  
LSTR,      21,      23  
LSTR,      22,      24  
LSTR,      25,      27  
LSTR,      26,      28  
LSTR,      29,      31  
/FOC,   1,  0.915310093433E-01,   1.72430153314    ,   0.00000000000
LSTR,      30,      32  
LSTR,      33,      35  
LSTR,      34,      36  
LSTR,      37,      39  
LSTR,      38,      40  
LSTR,      41,      43  
LSTR,      42,      44  
LSTR,      45,      47  
LSTR,      46,      48  
LSTR,      49,      51  
LSTR,      50,      52  
LSTR,      53,      55  
LSTR,      54,      56  
LSTR,      57,      59  
LSTR,      58,      60  
LSTR,      61,      63  
LSTR,      62,      64  
LSTR,      65,      67  
LSTR,      66,       7  
LSTR,      11,      68  
LSTR,      69,      71  
LSTR,      70,      72  
LSTR,      73,      75  
LSTR,      74,      76  
LSTR,      77,      79  
LSTR,      78,      80  
LSTR,      81,      83  
LSTR,      82,      84  
LSTR,      85,      87  
LSTR,      86,      88  
LSTR,      89,      91  
LSTR,      90,      92  
LSTR,      93,      95  
LSTR,      94,      96  
LSTR,      97,      99  
LSTR,      98,     100  
LSTR,     101,     103  
LSTR,     102,     104  
LSTR,     105,     107  
LSTR,     106,     108  
LSTR,     109,     111  
LSTR,     110,     112  
LSTR,     113,     115  
LSTR,     114,     116  
LSTR,     117,     119  
LSTR,     118,     120  
LSTR,     121,     123  
LSTR,     122,      10   
LSTR,       4,     124  
LSTR,     124,     125  
LSTR,     125,     126  
LSTR,     126,     127  
LSTR,     127,     128  
LSTR,     128,     129  
LSTR,     129,     130  
LSTR,     130,     131  
LSTR,     131,     132  
LSTR,     132,     133  
LSTR,     133,     134  
LSTR,     134,     135  
LSTR,     135,     136  
LSTR,     136,     137  
LSTR,     137,     138  
LSTR,     138,     139  
LSTR,     139,     140  
LSTR,     140,     141  
LSTR,     141,     142  
LSTR,     142,     143  
LSTR,     143,     144  
LSTR,     144,     145  
LSTR,     145,     146  
LSTR,     146,     147  
LSTR,     147,     148  
LSTR,     148,     149  
LSTR,     149,     150  
LSTR,     150,     151  
LSTR,     151,       6  

LSTR,       3,       1  
LSTR,       1,      11  
LSTR,       3,       2  
LSTR,       2,       8  
LSTR,       8,       1  
LSTR,       8,       9  
LSTR,       9,      11  
  
LSTR,      11,       4  
LSTR,       4,       5  
LSTR,       5,       9  
  
LSTR,       7,      10  
LSTR,      10,       6  
   
LSTR,      12,      68  
LSTR,      13,      69  
LSTR,      14,      70  
LSTR,      15,      71  
LSTR,      16,      72  
LSTR,      18,      74  
LDELE,     105  
LSTR,      17,      73  
LSTR,      18,      74  
LSTR,      19,      75  
LSTR,      20,      76  
LSTR,      21,      77  
LSTR,      22,      78  
LSTR,      23,      79  
LSTR,      24,      80  
LSTR,      25,      81  
LSTR,      26,      82  
LSTR,      27,      83  
LSTR,      28,      84  
LSTR,      29,      85  
LSTR,      30,      86  
LSTR,      31,      87  
LLIST,ALL, , ,  
LSTR,      32,      88  
LSTR,      33,      89  
LSTR,      34,      90  
LSTR,      35,      91  
LSTR,      36,      92  
LSTR,      37,      93  
LSTR,      38,      94  
LSTR,      39,      95  
LSTR,      40,      96  
LSTR,      41,      97  
LSTR,      42,      98  
LSTR,      43,      99  
LSTR,      44,     100  
LSTR,      45,     101  
LSTR,      46,     102  
LSTR,      47,     103  
LSTR,      48,     104  
LSTR,      49,     105  
LSTR,      50,     106  
LSTR,      51,     107  
LSTR,      52,     108  
LSTR,      53,     109  
LSTR,      54,     110  
LSTR,      55,     111  
LSTR,      56,     112  
LSTR,      57,     113  
LSTR,      58,     114  
LSTR,      59,     115  
LSTR,      60,     116  
LSTR,      61,     117  
LSTR,      62,     118  
LSTR,      63,     119  
LSTR,      64,     120  
LSTR,      65,     121  
LSTR,      66,     122  
LSTR,      67,     123  
LSTR,      68,      70  
LSTR,      72,      74  
LSTR,      76,      78  
LSTR,      80,      82  
LSTR,      84,      86  
LSTR,      88,      90  
LSTR,      92,      94  
LSTR,      96,      98  
LSTR,     100,     102  
LSTR,     104,     106  
LSTR,     108,     110  
LSTR,     112,     114  
LSTR,     116,     118  
LSTR,     120,     122  
LSTR,      68,     124  
LSTR,      70,     125  
LSTR,      72,     126  
LSTR,      74,     127  
LSTR,      76,     128  
LSTR,      78,     129  
LSTR,      80,     130  
LSTR,      82,     131  
LSTR,      84,     132  
LSTR,      86,     133  
LSTR,      88,     134  
LSTR,      90,     135  
LSTR,      92,     136  
LSTR,      94,     137  
LSTR,      96,     138  
LSTR,      98,     139  
LSTR,     100,     140  
LSTR,     102,     141  
LSTR,     104,     142  
LSTR,     106,     143   
LSTR,     108,     144  
LSTR,     110,     145  
LSTR,     112,     146  
LSTR,     114,     147  
LSTR,     116,     148  
LSTR,     118,     149  
LSTR,     120,     150  
LSTR,     122,     151  

FLST,2,4,4  
FITEM,2,90  
FITEM,2,88  
FITEM,2,92  
FITEM,2,91  
AL,P51X
  
FLST,2,4,4  
FITEM,2,92  
FITEM,2,89  
FITEM,2,94  
FITEM,2,93  
AL,P51X
  
FLST,2,4,4  
FITEM,2,94  
FITEM,2,95  
FITEM,2,96  
FITEM,2,97  
AL,P51X
  
FLST,2,4,4  
FITEM,2,1   
FITEM,2,89  
FITEM,2,30  
FITEM,2,100
AL,P51X
FLST,2,4,4  
FITEM,2,2   
FITEM,2,101
FITEM,2,31  
FITEM,2,103
AL,P51X
FLST,2,4,4  
FITEM,2,3   
FITEM,2,102
FITEM,2,32  
FITEM,2,104
AL,P51X
FLST,2,4,4  
FITEM,2,4   
FITEM,2,105
FITEM,2,107
FITEM,2,33  
AL,P51X
FLST,2,4,4  
FITEM,2,5   
FITEM,2,106
FITEM,2,34  
FITEM,2,108
AL,P51X
FLST,2,4,4  
FITEM,2,6   
FITEM,2,109
FITEM,2,111
FITEM,2,35  
AL,P51X
FLST,2,4,4  
FITEM,2,7   
FITEM,2,110
FITEM,2,36  
FITEM,2,112
AL,P51X
FLST,2,4,4  
FITEM,2,8   
FITEM,2,113
FITEM,2,115
FITEM,2,37  
AL,P51X
FLST,2,4,4  
FITEM,2,9   
FITEM,2,114
FITEM,2,38  
FITEM,2,116
AL,P51X
FLST,2,4,4  
FITEM,2,10  
FITEM,2,117
FITEM,2,119
FITEM,2,39  
AL,P51X
FLST,2,4,4  
FITEM,2,11  
FITEM,2,118
FITEM,2,120
FITEM,2,40  
AL,P51X
FLST,2,4,4  
FITEM,2,12  
FITEM,2,121
FITEM,2,123
FITEM,2,41  
AL,P51X
FLST,2,4,4  
FITEM,2,13  
FITEM,2,122
FITEM,2,124
FITEM,2,42  
AL,P51X
FLST,2,4,4  
FITEM,2,14  
FITEM,2,125
FITEM,2,127
FITEM,2,43  
AL,P51X
FLST,2,4,4  
FITEM,2,15  
FITEM,2,126
FITEM,2,128
FITEM,2,44  
AL,P51X
FLST,2,4,4  
FITEM,2,16  
FITEM,2,129
FITEM,2,131
FITEM,2,45  
AL,P51X
FLST,2,4,4  
FITEM,2,17  
FITEM,2,130
FITEM,2,132
FITEM,2,46  
AL,P51X
FLST,2,4,4  
FITEM,2,18  
FITEM,2,133
FITEM,2,135
FITEM,2,47  
AL,P51X
FLST,2,4,4  
FITEM,2,19  
FITEM,2,134
FITEM,2,136
FITEM,2,48  
AL,P51X
FLST,2,4,4  
FITEM,2,20  
FITEM,2,137
FITEM,2,139
FITEM,2,49  
AL,P51X
FLST,2,4,4  
FITEM,2,21  
FITEM,2,138
FITEM,2,140
FITEM,2,50  
AL,P51X
FLST,2,4,4  
FITEM,2,22  
FITEM,2,141
FITEM,2,143
FITEM,2,51  
AL,P51X
FLST,2,4,4  
FITEM,2,23  
FITEM,2,142
FITEM,2,144
FITEM,2,52  
AL,P51X
FLST,2,4,4  
FITEM,2,24  
FITEM,2,145
FITEM,2,147
FITEM,2,53  
AL,P51X
FLST,2,4,4  
FITEM,2,25  
FITEM,2,146
FITEM,2,148
FITEM,2,54  
AL,P51X
FLST,2,4,4  
FITEM,2,26  
FITEM,2,149
FITEM,2,151
FITEM,2,55  
AL,P51X
FLST,2,4,4  
FITEM,2,27  
FITEM,2,150
FITEM,2,152
FITEM,2,56  
AL,P51X
FLST,2,4,4  
FITEM,2,28  
FITEM,2,153
FITEM,2,155
FITEM,2,57  
AL,P51X
  
FLST,2,4,4  
FITEM,2,29  
FITEM,2,154
FITEM,2,98  
FITEM,2,58  
AL,P51X
APLOT   
  
FLST,2,4,4  
FITEM,2,30  
FITEM,2,95  
FITEM,2,170
FITEM,2,59  
AL,P51X
FLST,2,4,4  
FITEM,2,156
FITEM,2,170
FITEM,2,171
FITEM,2,60  
AL,P51X
FLST,2,4,4  
FITEM,2,32  
FITEM,2,171
FITEM,2,172
FITEM,2,61  
AL,P51X
FLST,2,4,4  
FITEM,2,157
FITEM,2,172
FITEM,2,173
FITEM,2,62  
AL,P51X
FLST,2,4,4  
FITEM,2,34  
FITEM,2,173
FITEM,2,174
FITEM,2,63  
AL,P51X
FLST,2,4,4  
FITEM,2,158
FITEM,2,174
FITEM,2,175
FITEM,2,64  
AL,P51X
FLST,2,4,4  
FITEM,2,36  
FITEM,2,175
FITEM,2,176
FITEM,2,65  
AL,P51X
FLST,2,4,4  
FITEM,2,159
FITEM,2,176
FITEM,2,177
FITEM,2,66  
AL,P51X
FLST,2,4,4  
FITEM,2,38  
FITEM,2,177
FITEM,2,178
FITEM,2,67  
AL,P51X
FLST,2,4,4  
FITEM,2,160
FITEM,2,178
FITEM,2,179
FITEM,2,68  
AL,P51X
FLST,2,4,4  
FITEM,2,40  
FITEM,2,179
FITEM,2,180
FITEM,2,69  
AL,P51X
FLST,2,4,4  
FITEM,2,161
FITEM,2,180
FITEM,2,181
FITEM,2,70  
AL,P51X
FLST,2,4,4  
FITEM,2,42  
FITEM,2,181
FITEM,2,182
FITEM,2,71  
AL,P51X
FLST,2,4,4  
FITEM,2,162
FITEM,2,182
FITEM,2,183
FITEM,2,72  
AL,P51X
FLST,2,4,4  
FITEM,2,44  
FITEM,2,183
FITEM,2,184
FITEM,2,73  
AL,P51X
FLST,2,4,4  
FITEM,2,163
FITEM,2,184
FITEM,2,185
FITEM,2,74  
AL,P51X
FLST,2,4,4  
FITEM,2,46  
FITEM,2,185
FITEM,2,186
FITEM,2,75  
AL,P51X
FLST,2,4,4  
FITEM,2,164
FITEM,2,186
FITEM,2,187
FITEM,2,76  
AL,P51X
FLST,2,4,4  
FITEM,2,48  
FITEM,2,187
FITEM,2,188
FITEM,2,77  
AL,P51X
FLST,2,4,4  
FITEM,2,165
FITEM,2,188
FITEM,2,189
FITEM,2,78  
AL,P51X
FLST,2,4,4  
FITEM,2,50  
FITEM,2,189
FITEM,2,190
FITEM,2,79  
AL,P51X
FLST,2,4,4  
FITEM,2,166
FITEM,2,190
FITEM,2,191
FITEM,2,80  
AL,P51X

FLST,2,4,4  
FITEM,2,52  
FITEM,2,191
FITEM,2,192
FITEM,2,81  
AL,P51X
FLST,2,4,4  
FITEM,2,167
FITEM,2,192
FITEM,2,193
FITEM,2,82  
AL,P51X
FLST,2,4,4  
FITEM,2,54  
FITEM,2,193
FITEM,2,194
FITEM,2,83  
AL,P51X
FLST,2,4,4  
FITEM,2,168
FITEM,2,194
FITEM,2,195
FITEM,2,84  
AL,P51X
FLST,2,4,4  
FITEM,2,56  
FITEM,2,195
FITEM,2,196
FITEM,2,85  
AL,P51X
FLST,2,4,4  
FITEM,2,169
FITEM,2,196
FITEM,2,197
FITEM,2,86  
AL,P51X
FLST,2,4,4  
FITEM,2,58  
FITEM,2,197
FITEM,2,99  
FITEM,2,87  
AL,P51X
APLOT   
FLST,5,44,5,ORDE,16
FITEM,5,4   
FITEM,5,6   
FITEM,5,8   
FITEM,5,10  
FITEM,5,12  
FITEM,5,14  
FITEM,5,16  
FITEM,5,18  
FITEM,5,20  
FITEM,5,22  
FITEM,5,24  
FITEM,5,26  
FITEM,5,28  
FITEM,5,30  
FITEM,5,32  
FITEM,5,-61
CM,_Y,AREA  
ASEL, , , ,P51X
CM,_Y1,AREA
CMSEL,S,_Y  
!*  
CMSEL,S,_Y1
AATT,       1, ,   1,       0,  
CMSEL,S,_Y  
CMDELE,_Y   
CMDELE,_Y1  
!*  
FLST,5,3,5,ORDE,2   
FITEM,5,1   
FITEM,5,-3  
CM,_Y,AREA  
ASEL, , , ,P51X
CM,_Y1,AREA
CMSEL,S,_Y  
!*  
CMSEL,S,_Y1
AATT,       2, ,   1,       0,  
CMSEL,S,_Y  
CMDELE,_Y   
CMDELE,_Y1  
!*  
!*  
   
FLST,5,14,5,ORDE,14
FITEM,5,5   
FITEM,5,7   
FITEM,5,9   
FITEM,5,11  
FITEM,5,13  
FITEM,5,15  
FITEM,5,17  
FITEM,5,19  
FITEM,5,21  
FITEM,5,23  
FITEM,5,25  
FITEM,5,27  
FITEM,5,29  
FITEM,5,31  
CM,_Y,AREA  
ASEL, , , ,P51X
CM,_Y1,AREA
CMSEL,S,_Y  
!*  
CMSEL,S,_Y1
AATT,       3, ,   1,       0,  
CMSEL,S,_Y  
CMDELE,_Y   
CMDELE,_Y1  
!*  
SAVE
   
FLST,5,30,4,ORDE,30
FITEM,5,89  
FITEM,5,98  
FITEM,5,100
FITEM,5,102
FITEM,5,104
FITEM,5,106
FITEM,5,108
FITEM,5,110
FITEM,5,112
FITEM,5,114
FITEM,5,116
FITEM,5,118
FITEM,5,120
FITEM,5,122
FITEM,5,124
FITEM,5,126
FITEM,5,128
FITEM,5,130
FITEM,5,132
FITEM,5,134
FITEM,5,136
FITEM,5,138
FITEM,5,140
FITEM,5,142
FITEM,5,144
FITEM,5,146
FITEM,5,148
FITEM,5,150
FITEM,5,152
FITEM,5,154
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
LESIZE,_Y1, , ,42, , , , ,1
!*  
FLST,5,8,4,ORDE,8   
FITEM,5,101
FITEM,5,103
FITEM,5,105
FITEM,5,107
FITEM,5,109
FITEM,5,111
FITEM,5,113
FITEM,5,115
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
FLST,5,28,4,ORDE,28
FITEM,5,101
FITEM,5,103
FITEM,5,105
FITEM,5,107
FITEM,5,109
FITEM,5,111
FITEM,5,113
FITEM,5,115
FITEM,5,117
FITEM,5,119
FITEM,5,121
FITEM,5,123
FITEM,5,125
FITEM,5,127
FITEM,5,129
FITEM,5,131
FITEM,5,133
FITEM,5,135
FITEM,5,137
FITEM,5,139
FITEM,5,141
FITEM,5,143
FITEM,5,145
FITEM,5,147
FITEM,5,149
FITEM,5,151
FITEM,5,153
FITEM,5,155
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
LESIZE,_Y1, , ,42, , , , ,1
!*  
FLST,5,30,4,ORDE,30
FITEM,5,1   
FITEM,5,3   
FITEM,5,5   
FITEM,5,7   
FITEM,5,9   
FITEM,5,11  
FITEM,5,13  
FITEM,5,15  
FITEM,5,17  
FITEM,5,19  
FITEM,5,21  
FITEM,5,23  
FITEM,5,25  
FITEM,5,27  
FITEM,5,29  
FITEM,5,-30
FITEM,5,32  
FITEM,5,34  
FITEM,5,36  
FITEM,5,38  
FITEM,5,40  
FITEM,5,42  
FITEM,5,44  
FITEM,5,46  
FITEM,5,48  
FITEM,5,50  
FITEM,5,52  
FITEM,5,54  
FITEM,5,56  
FITEM,5,58  
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
LESIZE,_Y1, , ,4, , , , ,1  
!*  
FLST,5,14,4,ORDE,14
FITEM,5,2   
FITEM,5,4   
FITEM,5,6   
FITEM,5,8   
FITEM,5,10  
FITEM,5,12  
FITEM,5,14  
FITEM,5,16  
FITEM,5,18  
FITEM,5,20  
FITEM,5,22  
FITEM,5,24  
FITEM,5,26  
FITEM,5,28  
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
LESIZE,_Y1, , ,1, , , , ,1  
!*  
FLST,5,14,4,ORDE,14
FITEM,5,31  
FITEM,5,33  
FITEM,5,35  
FITEM,5,37  
FITEM,5,39  
FITEM,5,41  
FITEM,5,43  
FITEM,5,45  
FITEM,5,47  
FITEM,5,49  
FITEM,5,51  
FITEM,5,53  
FITEM,5,55  
FITEM,5,57  
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
LESIZE,_Y1, , ,1, , , , ,1  
!*  

FLST,5,14,4,ORDE,2  
FITEM,5,156
FITEM,5,-169
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
LESIZE,_Y1, , ,1, , , , ,1  
!*  
FLST,5,14,4,ORDE,14
FITEM,5,60  
FITEM,5,62  
FITEM,5,64  
FITEM,5,66  
FITEM,5,68  
FITEM,5,70  
FITEM,5,72  
FITEM,5,74  
FITEM,5,76  
FITEM,5,78  
FITEM,5,80  
FITEM,5,82  
FITEM,5,84  
FITEM,5,86  
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
LESIZE,_Y1, , ,1, , , , ,1  
!*  
FLST,5,30,4,ORDE,4  
FITEM,5,95  
FITEM,5,99  
FITEM,5,170
FITEM,5,-197
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
LESIZE,_Y1, , ,58, , , , ,1
!*  
FLST,5,15,4,ORDE,15
FITEM,5,59  
FITEM,5,61  
FITEM,5,63  
FITEM,5,65  
FITEM,5,67  
FITEM,5,69  
FITEM,5,71  
FITEM,5,73  
FITEM,5,75  
FITEM,5,77  
FITEM,5,79  
FITEM,5,81  
FITEM,5,83  
FITEM,5,85  
FITEM,5,87  
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
LESIZE,_Y1, , ,4, , , , ,1  
!*  
  
FLST,5,2,4,ORDE,2   
FITEM,5,88  
FITEM,5,91  
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
LESIZE,_Y1, , ,40, , , , ,1
!*  
FLST,5,1,4,ORDE,1   
FITEM,5,93  
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
LESIZE,_Y1, , ,42, , , , ,1
!*  
FLST,5,1,4,ORDE,1   
FITEM,5,97  
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
LESIZE,_Y1, , ,58, , , , ,1
!*  
FLST,5,4,4,ORDE,4   
FITEM,5,90  
FITEM,5,92  
FITEM,5,94  
FITEM,5,96  
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
LESIZE,_Y1, , ,20, , , , ,1
!*  
MSHKEY,0
FLST,5,61,5,ORDE,2  
FITEM,5,1   
FITEM,5,-61
CM,_Y,AREA  
ASEL, , , ,P51X
CM,_Y1,AREA
CHKMSH,'AREA'   
CMSEL,S,_Y  
!*  
AMESH,_Y1   
!*  
CMDELE,_Y   
CMDELE,_Y1  
CMDELE,_Y2  
!*  
  
FINISH  
/SOL
/PREP7  
/MREP,EPLOT
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,3
REAL,3  
ET,2,169
ET,3,172
KEYOPT,3,9,0
KEYOPT,3,10,2   
R,3,
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,101
CM,_TARGET,LINE
TYPE,2  
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,100
CM,_CONTACT,LINE
TYPE,3  
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,2  
ESEL,A,TYPE,,3  
ESEL,R,REAL,,3  
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,2  
ESEL,A,TYPE,,3  
ESEL,R,REAL,,3  
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,4
REAL,4  
ET,4,169
ET,5,172
KEYOPT,5,9,0
KEYOPT,5,10,2   
R,4,
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,103
CM,_TARGET,LINE
TYPE,4  
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,102
CM,_CONTACT,LINE
TYPE,5  
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,4  
ESEL,A,TYPE,,5  
ESEL,R,REAL,,4  
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,4  
ESEL,A,TYPE,,5  
ESEL,R,REAL,,4  
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,5
REAL,5  
ET,6,169
ET,7,172
KEYOPT,7,9,0
KEYOPT,7,10,2   
R,5,
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,105
CM,_TARGET,LINE
TYPE,6  
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,104
CM,_CONTACT,LINE
TYPE,7  
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,6  
ESEL,A,TYPE,,7  
ESEL,R,REAL,,5  
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,6  
ESEL,A,TYPE,,7  
ESEL,R,REAL,,5  
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,6
REAL,6  
ET,8,169
ET,9,172
KEYOPT,9,9,0
KEYOPT,9,10,2   
R,6,
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,107
CM,_TARGET,LINE
TYPE,8  
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,106
CM,_CONTACT,LINE
TYPE,9  
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,8  
ESEL,A,TYPE,,9  
ESEL,R,REAL,,6  
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,8  
ESEL,A,TYPE,,9  
ESEL,R,REAL,,6  
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,7
REAL,7  
ET,10,169   
ET,11,172   
KEYOPT,11,9,0   
KEYOPT,11,10,2  
R,7,
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,109
CM,_TARGET,LINE
TYPE,10
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,108
CM,_CONTACT,LINE
TYPE,11
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,10
ESEL,A,TYPE,,11
ESEL,R,REAL,,7  
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,10
ESEL,A,TYPE,,11
ESEL,R,REAL,,7  
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,8
REAL,8  
ET,12,169   
ET,13,172   
KEYOPT,13,9,0   
KEYOPT,13,10,2  
R,8,
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,111
CM,_TARGET,LINE
TYPE,12
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,110
CM,_CONTACT,LINE
TYPE,13
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,12
ESEL,A,TYPE,,13
ESEL,R,REAL,,8  
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,12
ESEL,A,TYPE,,13
ESEL,R,REAL,,8  
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,9
REAL,9  
ET,14,169   
ET,15,172   
KEYOPT,15,9,0   
KEYOPT,15,10,2  
R,9,
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,113
CM,_TARGET,LINE
TYPE,14
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,112
CM,_CONTACT,LINE
TYPE,15
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,14
ESEL,A,TYPE,,15
ESEL,R,REAL,,9  
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,14
ESEL,A,TYPE,,15
ESEL,R,REAL,,9  
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,10
REAL,10
ET,16,169   
ET,17,172   
KEYOPT,17,9,0   
KEYOPT,17,10,2  
R,10,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,115
CM,_TARGET,LINE
TYPE,16
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,114
CM,_CONTACT,LINE
TYPE,17
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,16
ESEL,A,TYPE,,17
ESEL,R,REAL,,10
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,16
ESEL,A,TYPE,,17
ESEL,R,REAL,,10
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,11
REAL,11
ET,18,169   
ET,19,172   
KEYOPT,19,9,0   
KEYOPT,19,10,2  
R,11,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,117
CM,_TARGET,LINE
TYPE,18
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,116
CM,_CONTACT,LINE
TYPE,19
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,18
ESEL,A,TYPE,,19
ESEL,R,REAL,,11
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,18
ESEL,A,TYPE,,19
ESEL,R,REAL,,11
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,12
REAL,12
ET,20,169   
ET,21,172   
KEYOPT,21,9,0   
KEYOPT,21,10,2  
R,12,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,119
CM,_TARGET,LINE
TYPE,20
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,118
CM,_CONTACT,LINE
TYPE,21
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,20
ESEL,A,TYPE,,21
ESEL,R,REAL,,12
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,20
ESEL,A,TYPE,,21
ESEL,R,REAL,,12
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,13
REAL,13
ET,22,169   
ET,23,172   
KEYOPT,23,9,0   
KEYOPT,23,10,2  
R,13,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,121
CM,_TARGET,LINE
TYPE,22
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,120
CM,_CONTACT,LINE
TYPE,23
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,22
ESEL,A,TYPE,,23
ESEL,R,REAL,,13
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,22
ESEL,A,TYPE,,23
ESEL,R,REAL,,13
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,14
REAL,14
ET,24,169   
ET,25,172   
KEYOPT,25,9,0   
KEYOPT,25,10,2  
R,14,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,123
CM,_TARGET,LINE
TYPE,24
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,122
CM,_CONTACT,LINE
TYPE,25
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,24
ESEL,A,TYPE,,25
ESEL,R,REAL,,14
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,24
ESEL,A,TYPE,,25
ESEL,R,REAL,,14
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,15
REAL,15
ET,26,169   
ET,27,172   
KEYOPT,27,9,0   
KEYOPT,27,10,2  
R,15,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,125
CM,_TARGET,LINE
TYPE,26
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,124
CM,_CONTACT,LINE
TYPE,27
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,26
ESEL,A,TYPE,,27
ESEL,R,REAL,,15
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,26
ESEL,A,TYPE,,27
ESEL,R,REAL,,15
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,16
REAL,16
ET,28,169   
ET,29,172   
KEYOPT,29,9,0   
KEYOPT,29,10,2  
R,16,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,127
CM,_TARGET,LINE
TYPE,28
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,126
CM,_CONTACT,LINE
TYPE,29
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,28
ESEL,A,TYPE,,29
ESEL,R,REAL,,16
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,28
ESEL,A,TYPE,,29
ESEL,R,REAL,,16
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,17
REAL,17
ET,30,169   
ET,31,172   
KEYOPT,31,9,0   
KEYOPT,31,10,2  
R,17,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,129
CM,_TARGET,LINE
TYPE,30
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,128
CM,_CONTACT,LINE
TYPE,31
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,30
ESEL,A,TYPE,,31
ESEL,R,REAL,,17
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,30
ESEL,A,TYPE,,31
ESEL,R,REAL,,17
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,18
REAL,18
ET,32,169   
ET,33,172   
KEYOPT,33,9,0   
KEYOPT,33,10,2  
R,18,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,131
CM,_TARGET,LINE
TYPE,32
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,130
CM,_CONTACT,LINE
TYPE,33
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,32
ESEL,A,TYPE,,33
ESEL,R,REAL,,18
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,32
ESEL,A,TYPE,,33
ESEL,R,REAL,,18
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,19
REAL,19
ET,34,169   
ET,35,172   
KEYOPT,35,9,0   
KEYOPT,35,10,2  
R,19,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,133
CM,_TARGET,LINE
TYPE,34
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,132
CM,_CONTACT,LINE
TYPE,35
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,34
ESEL,A,TYPE,,35
ESEL,R,REAL,,19
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,34
ESEL,A,TYPE,,35
ESEL,R,REAL,,19
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,20
REAL,20
ET,36,169   
ET,37,172   
KEYOPT,37,9,0   
KEYOPT,37,10,2  
R,20,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,135
CM,_TARGET,LINE
TYPE,36
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,134
CM,_CONTACT,LINE
TYPE,37
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,36
ESEL,A,TYPE,,37
ESEL,R,REAL,,20
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,36
ESEL,A,TYPE,,37
ESEL,R,REAL,,20
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,21
REAL,21
ET,38,169   
ET,39,172   
KEYOPT,39,9,0   
KEYOPT,39,10,2  
R,21,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,137
CM,_TARGET,LINE
TYPE,38
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,136
CM,_CONTACT,LINE
TYPE,39
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,38
ESEL,A,TYPE,,39
ESEL,R,REAL,,21
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,38
ESEL,A,TYPE,,39
ESEL,R,REAL,,21
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,22
REAL,22
ET,40,169   
ET,41,172   
KEYOPT,41,9,0   
KEYOPT,41,10,2  
R,22,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,139
CM,_TARGET,LINE
TYPE,40
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,138
CM,_CONTACT,LINE
TYPE,41
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,40
ESEL,A,TYPE,,41
ESEL,R,REAL,,22
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,40
ESEL,A,TYPE,,41
ESEL,R,REAL,,22
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,23
REAL,23
ET,42,169   
ET,43,172   
KEYOPT,43,9,0   
KEYOPT,43,10,2  
R,23,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,141
CM,_TARGET,LINE
TYPE,42
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,140
CM,_CONTACT,LINE
TYPE,43
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,42
ESEL,A,TYPE,,43
ESEL,R,REAL,,23
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,42
ESEL,A,TYPE,,43
ESEL,R,REAL,,23
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,24
REAL,24
ET,44,169   
ET,45,172   
KEYOPT,45,9,0   
KEYOPT,45,10,2  
R,24,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,143
CM,_TARGET,LINE
TYPE,44
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,142
CM,_CONTACT,LINE
TYPE,45
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,44
ESEL,A,TYPE,,45
ESEL,R,REAL,,24
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,44
ESEL,A,TYPE,,45
ESEL,R,REAL,,24
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,25
REAL,25
ET,46,169   
ET,47,172   
KEYOPT,47,9,0   
KEYOPT,47,10,2  
R,25,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,145
CM,_TARGET,LINE
TYPE,46
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,144
CM,_CONTACT,LINE
TYPE,47
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,46
ESEL,A,TYPE,,47
ESEL,R,REAL,,25
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,46
ESEL,A,TYPE,,47
ESEL,R,REAL,,25
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,26
REAL,26
ET,48,169   
ET,49,172   
KEYOPT,49,9,0   
KEYOPT,49,10,2  
R,26,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,151
CM,_TARGET,LINE
TYPE,48
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,150
CM,_CONTACT,LINE
TYPE,49
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,48
ESEL,A,TYPE,,49
ESEL,R,REAL,,26
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,48
ESEL,A,TYPE,,49
ESEL,R,REAL,,26
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,27
REAL,27
ET,50,169   
ET,51,172   
KEYOPT,51,9,0   
KEYOPT,51,10,2  
R,27,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,153
CM,_TARGET,LINE
TYPE,50
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,152
CM,_CONTACT,LINE
TYPE,51
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,50
ESEL,A,TYPE,,51
ESEL,R,REAL,,27
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,50
ESEL,A,TYPE,,51
ESEL,R,REAL,,27
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,28
REAL,28
ET,52,169   
ET,53,172   
KEYOPT,53,9,0   
KEYOPT,53,10,2  
R,28,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,155
CM,_TARGET,LINE
TYPE,52
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,154
CM,_CONTACT,LINE
TYPE,53
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,52
ESEL,A,TYPE,,53
ESEL,R,REAL,,28
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,52
ESEL,A,TYPE,,53
ESEL,R,REAL,,28
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
/MREP,EPLOT
EPLOT     
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,29
REAL,29
ET,54,169   
ET,55,172   
KEYOPT,55,9,0   
KEYOPT,55,10,2  
R,29,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,149
CM,_TARGET,LINE
TYPE,54
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,148
CM,_CONTACT,LINE
TYPE,55
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,54
ESEL,A,TYPE,,55
ESEL,R,REAL,,29
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,54
ESEL,A,TYPE,,55
ESEL,R,REAL,,29
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
LPLOT   
!*  
!*  
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.4
MAT,1   
R,30
REAL,30
ET,56,169   
ET,57,172   
KEYOPT,57,9,0   
KEYOPT,57,10,2  
R,30,   
RMORE,  
RMORE,,0
RMORE,0
! Generate the target surface   
LSEL,S,,,147
CM,_TARGET,LINE
TYPE,56
NSLL,S,1
ESLN,S,0
ESURF   
CMSEL,S,_ELEMCM
! Generate the contact surface  
LSEL,S,,,146
CM,_CONTACT,LINE
TYPE,57
NSLL,S,1
ESLN,S,0
ESURF   
ALLSEL  
ESEL,ALL
ESEL,S,TYPE,,56
ESEL,A,TYPE,,57
ESEL,R,REAL,,30
/PSYMB,ESYS,1   
/PNUM,TYPE,1
/NUM,1  
EPLOT   
ESEL,ALL
ESEL,S,TYPE,,56
ESEL,A,TYPE,,57
ESEL,R,REAL,,30
CMSEL,A,_NODECM
CMDEL,_NODECM   
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM   
CMSEL,S,_KPCM   
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM   
CMSEL,S,_AREACM
CMDEL,_AREACM   
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM   
/GRES,cwz,gsav  
CMDEL,_TARGET   
CMDEL,_CONTACT  
/COM, CONTACT PAIR CREATION - END   
/MREP,EPLOT
EPLOT   
FINISH  
/SOL
FLST,2,1,4,ORDE,1   
FITEM,2,90  
!*  
/GO
DL,P51X, ,UX,   
FLST,2,3,4,ORDE,3   
FITEM,2,91  
FITEM,2,93  
FITEM,2,97  
!*  
/GO
DL,P51X, ,UX,   
FLST,2,3,4,ORDE,3   
FITEM,2,91  
FITEM,2,93  
FITEM,2,97  
!*  
/GO
DL,P51X, ,UY,   
FLST,2,30,4,ORDE,3  
FITEM,2,59  
FITEM,2,-87
FITEM,2,96  
!*  
/GO
DL,P51X, ,UX,   

!*  
/PSF,DEFA, ,1,0,1   
/PBF,DEFA, ,1   
/PIC,DEFA, ,1   
/PSYMB,CS,0
/PSYMB,NDIR,0   
/PSYMB,ESYS,0   
/PSYMB,LDIV,0   
/PSYMB,LDIR,0   
/PSYMB,ADIR,0   
/PSYMB,ECON,0   
/PSYMB,XNODE,0  
/PSYMB,DOT,1
/PSYMB,PCONV,   
/PSYMB,LAYR,0   
/PSYMB,FBCS,0   
!*  
/PBC,ALL,,1
/PBC,NFOR,,0
/PBC,NMOM,,0
/PBC,RFOR,,0
/PBC,RMOM,,0
/PBC,PATH,,0
/REP
!*  
!*  
/PSF,DEFA, ,1,0,1   
/PBF,DEFA, ,1   
/PIC,DEFA, ,1   
/PSYMB,CS,0
/PSYMB,NDIR,0   
/PSYMB,ESYS,0   
/PSYMB,LDIV,0   
/PSYMB,LDIR,0   
/PSYMB,ADIR,0   
/PSYMB,ECON,0   
/PSYMB,XNODE,0  
/PSYMB,DOT,1
/PSYMB,PCONV,   
/PSYMB,LAYR,0   
/PSYMB,FBCS,0   
!*  
/PBC,ALL,,1
/PBC,NFOR,,0
/PBC,NMOM,,0
/PBC,RFOR,,0
/PBC,RMOM,,0
/PBC,PATH,,0
/REP
!*  
/PNUM,KP,1  
/PNUM,LINE,1
/PNUM,AREA,0
/PNUM,VOLU,0
/PNUM,NODE,0
/PNUM,TABN,0
/PNUM,SVAL,0
/NUMBER,0   
!*  
/PNUM,ELEM,0
/REPLOT
!*  
!*  
/PSF,DEFA, ,1,0,1   
/PBF,DEFA, ,1   
/PIC,DEFA, ,1   
/PSYMB,CS,0
/PSYMB,NDIR,0   
/PSYMB,ESYS,0   
/PSYMB,LDIV,0   
/PSYMB,LDIR,0   
/PSYMB,ADIR,0   
/PSYMB,ECON,0   
/PSYMB,XNODE,0  
/PSYMB,DOT,1
/PSYMB,PCONV,   
/PSYMB,LAYR,0   
/PSYMB,FBCS,0   
!*  
/PBC,ALL, ,1
/REP
!*  
SAVE
!*  
/PSF,DEFA, ,1,0,1   
/PBF,DEFA, ,1   
/PIC,DEFA, ,1   
/PSYMB,CS,0
/PSYMB,NDIR,0   
/PSYMB,ESYS,0   
/PSYMB,LDIV,0   
/PSYMB,LDIR,0   
/PSYMB,ADIR,0   
/PSYMB,ECON,0   
/PSYMB,XNODE,0  
/PSYMB,DOT,1
/PSYMB,PCONV,   
/PSYMB,LAYR,0   
/PSYMB,FBCS,0   
!*  
/PBC,ALL,,0
/PBC,NFOR,,1
/PBC,NMOM,,1
/PBC,RFOR,,1
/PBC,RMOM,,1
/PBC,PATH,,1
/REP
!*  
LPLOT   
EPLOT   
!*  
/PSF,DEFA, ,1,0,1   
/PBF,DEFA, ,1   
/PIC,DEFA, ,1   
/PSYMB,CS,0
/PSYMB,NDIR,0   
/PSYMB,ESYS,0   
/PSYMB,LDIV,0   
/PSYMB,LDIR,0   
/PSYMB,ADIR,0   
/PSYMB,ECON,0   
/PSYMB,XNODE,0  
/PSYMB,DOT,1
/PSYMB,PCONV,   
/PSYMB,LAYR,0   
/PSYMB,FBCS,0   
!*  
/PBC,ALL,,1
/PBC,NFOR,,0
/PBC,NMOM,,0
/PBC,RFOR,,0
/PBC,RMOM,,0
/PBC,PATH,,0
/REP
!*  
ACEL,0,10,0,
!*  
FLST,2,30,4,ORDE,3  
FITEM,2,59  
FITEM,2,-87
FITEM,2,96  
DLDELE,P51X,ALL
/REPLOT
FLST,2,30,4,ORDE,3  
FITEM,2,59  
FITEM,2,-87
FITEM,2,96  
!*  
/GO
DL,P51X, ,UX,   
AUTOTS,0
LNSRCH,1
NEQIT,500   
NLGEOM,0
NROPT,FULL, ,ON
LUMPM,0
EQSLV, , ,0,
PRECISION,0
MSAVE,0
PIVCHECK,1  
SSTIF   
PSTRES  
SAVE
/STATUS,SOLU
SOLVE   
FINISH  
/POST1  
SET,LAST
!*  
/EFACET,1   
PLNSOL, U,X, 0,1.0  
!*  
/EFACET,1   
PLNSOL, U,Y, 0,1.0  
!*  
/EFACET,1   
PLNSOL, EPPL,X, 0,1.0   
FINISH  
/SOL
NSUBST,500,0,0  
TIME,1  
!*  
NLGEOM,0
NROPT,FULL, ,ON
LUMPM,0
EQSLV, , ,0,
PRECISION,0
MSAVE,0
PIVCHECK,1  
SSTIF   
PSTRES  
TOFFST,0,   
!*  
/STATUS,SOLU
SOLVE   
FINISH  
/POST1  
SET,FIRST   
!*  
/EFACET,1   
PLNSOL, U,X, 0,1.0  
SAVE
FINISH  
! /EXIT,ALL

ddbb

楼主解决没，急需啊，谢谢