! /ANG, 1, 48.6256164048
! /REPLO
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
GPLOT
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /VIEW, 1, 0.193994219897 , -0.191118512278 , 0.962205776802
! /ANG, 1, 47.6740274612
! /REPLO
! /VIEW, 1, 0.429123109480 , -0.926668611549E-01, 0.898479943991
! /ANG, 1, 43.8893517041
! /REPLO
! /VIEW, 1, 0.495728852829 , -0.240002167529 , 0.834656734265
! /ANG, 1, 43.0447386697
! /REPLO
! /VIEW, 1, 0.329588284751 , -0.112456621620 , 0.937403366118
! /ANG, 1, 44.4705693561
! /REPLO
! /VIEW, 1, 0.366599996641 , -0.420180727095 , 0.830091922043
! /ANG, 1, 43.8647380284
! /REPLO
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! KPLOT
! /VIEW, 1, 0.174409660209 , -0.136871259629 , 0.975114110611
! /ANG, 1, 47.2476792850
! /REPLO
! /VIEW, 1, 0.381198925076 , -0.558781991969 , 0.736512094247
! /ANG, 1, 41.4143333094
! /REPLO
! /VIEW, 1, 0.125833806187 , -0.166712349316 , 0.977943171051
! /ANG, 1, 48.0443549321
! /REPLO
! /VIEW, 1, -0.191278604317E-01, 0.177603423041 , 0.983916230723
! /ANG, 1, 48.1510997871
! /REPLO
! /VIEW, 1, 0.409283648632 , -0.501530691446 , 0.762203293420
! /ANG, 1, 44.3814268821
! /REPLO
! /VIEW, 1, 0.506865443477 , -0.500469438335 , 0.701867340387
! /ANG, 1, 40.7122950122
! /REPLO
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /VIEW, 1, 0.451191079594 , -0.419038179935 , 0.787929954661
! /ANG, 1, 43.5162457764
! /REPLO
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
FLST,2,1,3,ORDE,1
FITEM,2,54
! /REPLOT,RESIZE
!*
/GO
FK,P51X,FX,p
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /REPLOT,RESIZE
GPLOT
! KPLOT
FLST,2,1,3,ORDE,1
FITEM,2,54
FKDELE,P51X,ALL
! APLOT
FLST,2,1,5,ORDE,1
FITEM,2,22
/GO
! /REPLOT,RESIZE
!*
SFA,P51X,1,PRES,p/(3.1415926534*d4**2/4)
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /REPLOT,RESIZE
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /VIEW,1,,,1
! /ANG,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /VIEW,1,1
! /ANG,1
! /REP,FAST
! /FOC, 1, -0.126980803837 , 0.772737704978E-01, 0.906075179436E-01
! /REPLO
! /FOC, 1, -0.126980803837 , -0.138959993958E-01, 0.359143931085
! /REPLO
! /FOC, 1, -0.126980803837 , 0.102269022315E-02, 0.531537677793
! /REPLO
! /FOC, 1, -0.126980803837 , -0.648681889272E-01, 0.345468465601
! /REPLO
! /FOC, 1, -0.126980803837 , -0.897326716254E-01, 0.164372149949
! /REPLO
! /FOC, 1, -0.126980803837 , -0.549223958479E-01, 0.118787265002
! /REPLO
! /VIEW, 1, 0.866025403784 , 0.00000000000 , -0.500000000000
! /REPLO
FLST,2,1,5,ORDE,1
FITEM,2,1
/GO
!*
SFA,P51X,1,PRES,p/(3.1415926534*d1**2/4)
FLST,2,1,5,ORDE,1
FITEM,2,1
SFADELE,P51X,1,PRES
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
FLST,2,1,5,ORDE,1
FITEM,2,1
/GO
!*
SFA,P51X,1,PRES,-p/(3.1415926534*d1**2/4)
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
FLST,2,2,5,ORDE,2
FITEM,2,1
FITEM,2,22
SFADELE,P51X,1,PRES
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /REPLOT,RESIZE
! /REPLOT,RESIZE
! /REPLOT,RESIZE
! /REPLOT,RESIZE
! /VIEW, 1, 0.171028036042 , -0.396364689154E-01, 0.984468567918
! /ANG, 1, 6.39685172947
! /REPLO
! /VIEW, 1, 0.595373611527 , -0.127665475044 , 0.793241318376
! /ANG, 1, 4.49991262816
! /REPLO
FLST,5,2,5,ORDE,2
FITEM,5,1
FITEM,5,22
ASEL,S, , ,P51X
NSLA,S
/OUTPUT, TERM
ALLSEL,ALL
ASEL,S, , , 22
NSLA,S
FLST,2,169,1,ORDE,2
FITEM,2,1800
FITEM,2,-1968
FLST,2,169,1,ORDE,2
FITEM,2,1800
FITEM,2,-1968
!*
/GO
F,P51X,FZ,-p/169
! /VIEW, 1, 0.954986040416 , -0.169058734286 , 0.243763834421
! /ANG, 1, -1.07424024743
! /REPLO
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
GPLOT
ALLSEL,ALL
! /VIEW, 1, 0.907042336043 , -0.614251585002E-01, -0.416534693067
! /ANG, 1, -4.48060172085
! /REPLO
! /VIEW, 1, 0.721199381367 , -0.323654027197E-01, -0.691971049266
! /ANG, 1, -5.38724754687
! /REPLO
! APLOT
ASEL,S, , , 1
NSLA,S
FLST,2,223,1,ORDE,2
FITEM,2,13506
FITEM,2,-13728
!*
/GO
F,P51X,FZ,p/223
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,0.924021086472,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
! /DIST,1,1.08222638492,1
! /REP,FAST
ALLSEL,ALL
GPLOT
! SAVE, porshen3,db,F:[АМРЗСК~1\
FINISH
/SOL
! /STATUS,SOLU
SOLVE
FINISH
/POST1
FINISH
/SOL
! APLOT
! /VIEW, 1, 0.960201525011 , -0.940940353001E-05, -0.279308129632
! /ANG, 1, -5.72078044044
! /REPLO
FINISH
/PREP7
! /VIEW, 1, 0.995470020479 , -0.106632959353E-01, 0.944760945795E-01
! /ANG, 1, -5.26929335564
! /REPLO
! /VIEW, 1, 0.742091494977 , -0.669054848716 , 0.408144887525E-01
! /ANG, 1, -5.56740820877
! /REPLO
! /VIEW, 1, 0.800440740681 , 0.598158241931 , -0.387471065879E-01
! /ANG, 1, -3.47312865934
! /REPLO
! /VIEW, 1, 0.265897812771 , 0.254857275540 , -0.929702168583
! /ANG, 1, 32.0271250373
! /REPLO
! /VIEW, 1, 0.818452140676 , 0.566506853554 , -0.959483105605E-01
! /ANG, 1, -3.46537758180
! /REPLO
FLST,2,2,5,ORDE,2
FITEM,2,11
FITEM,2,-12
!*
/GO
DA,P51X,UX,
! /VIEW, 1, 0.101176017675 , 0.171665344007 , -0.979946132762
! /ANG, 1, 33.0629850871
! /REPLO
! /VIEW, 1, 0.830227557539 , 0.524045873542 , -0.189995066061
! /ANG, 1, 0.886941268776E-01
! /REPLO
FLST,2,2,5,ORDE,2
FITEM,2,11
FITEM,2,-12
!*
/GO
DA,P51X,UY,
FINISH
/SOL
! /STATUS,SOLU
SOLVE
! SAVE, porsen4,db,D:\592\