#Len=滑动条(0, 10,0.01)[br]n=滑动条(0, 10,1)[br][br]r = 滑动条(0, 10,0.01)[br][br]#R = 滑动条(0, 10,0.01)[br][br]m=滑动条(0, 10,1)[br][br]#Al=滑动条(0, 20,0.1)[br]#Ak=滑动条(0, 20,0.1)[br][br][br]#Ratio = 滑动条(-0.2, 1.5,0.01)[br]PList1={B,C,D,E,F}[br]SP1=折线(PList1)[br][br]SP2=圆弧(A,A+(r,0),A+(r;3pi/3))[br][br]t = 滑动条(0, 10,0.01)[br][br][br]a=t SP1+(1-t) SP2[br]k=滑动条(0, 20,1)[br][br]#Plist1=平移(旋转(位似(合并({序列((1;i pi/2/k-pi/4)+ (-cos(π / 4), 0),i,0,k),序列((1;i pi/2/k+3pi/4)+ (cos(π / 4), 0),i,0,k)}),1/sin(pi/4)/2,(0,0)),pi/2,(0,0)),向量( (0.5,0)))[br][br][br][br]P1=序列((描点(SP1,i/k)),i,0,k)[br]P2=序列((描点(SP2,i/k)),i,0,k)[br][br]P3=序列((描点({SP1,SP2},i/k)),i,0,k+1)[br][br]SP9=多边形(P3)[br][br]SP3=多边形(合并(P1,P2))[br][br][br]f1=x^2-1[br]f2=x^3-1[br]f3=-2+1/(x-3)[br]f4=sin(2x-1)[br]Fun={f1,f2,f3,f4}[br]Pic= 滑动条(1, 4,1)[br]f=Fun(Pic)[br][br]PF=序列((i,f(i)),i,-1,1,0.02)[br][br]SPF=多边形(合并(P2,PF))[br][br]Plist1=序列(序列(平移(旋转(位似(SPF,1,(0,0)),区间随机数(0,3) pi/2,(0,0)),向量( (i,j))),i,0,2n,2),j,0,2m,2)[br][br]#p1=多边形(Plist1)[br]#p2=旋转(p1,pi/2,(0,0)))[br]#Base={p1,p2}[br][br][br]#均匀分布随机数[br]#M=序列(序列(均匀分布随机数(0,1),i,1,n),j,1,m)[br]#M=序列(序列(区间随机数(0,1),i,1,n),j,1,m)[br]