function [alpha,N,U]=youxianchafen2(r1,r2,up,under,num,deta) %[alpha,N,U]=youxianchafen2(a,r1,r2,up,under,num,deta) %該函數(shù)用有限差分法求解有兩種介質(zhì)的正方形區(qū)域的二維拉普拉斯方程的數(shù)值解 %函數(shù)返回迭代因子、迭代次數(shù)以及迭代完成后所求區(qū)域內(nèi)網(wǎng)格節(jié)點處的值 %a為正方形求解區(qū)域的邊長 %r1,r2分別表示兩種介質(zhì)的電導率 %up,under分別為上下邊界值 %num表示將區(qū)域每邊的網(wǎng)格剖分個數(shù) %deta為迭代過程中所允許的相對誤差限 n=num+1; %每邊節(jié)點數(shù) U(n,n)=0; %節(jié)點處數(shù)值矩陣 N=0; %迭代次數(shù)初值 alpha=2/(1+sin(pi/num));%超松弛迭代因子 k=r1/r2; %兩介質(zhì)電導率之比 U(1,1:n)=up; %求解區(qū)域上邊界第一類邊界條件 U(n,1:n)=under; %求解區(qū)域下邊界第一類邊界條件 U(2:num,1)=0;U(2:num,n)=0; for i=2:num U(i,2:num)=up-(up-under)/num*(i-1);%采用線性賦值對上下邊界之間的節(jié)點賦迭代初值 end G=1; while G>0 %迭代條件:不滿足相對誤差限要求的節(jié)點數(shù)目G不為零 Un=U; %完成第n次迭代后所有節(jié)點處的值 G=0; %每完成一次迭代將不滿足相對誤差限要求的節(jié)點數(shù)目歸零 for j=1:n for i=2:num U1=U(i,j); %第n次迭代時網(wǎng)格節(jié)點處的值 if j==1 %第n+1次迭代左邊界第二類邊界條件 U(i,j)=1/4*(2*U(i,j+1)+U(i-1,j)+U(i+1,j)); end if (j>1)&&(j U2=1/4*(U(i,j+1)+ U(i-1,j)+ U(i,j-1)+ U(i+1,j)); U(i,j)=U1+alpha*(U2-U1); %引入超松弛迭代因子后的網(wǎng)格節(jié)點處的值 end if i==n+1-j %第n+1次迭代兩介質(zhì)分界面(與網(wǎng)格對角線重合)第二類邊界條件 U(i,j)=1/4*(2/(1+k)*(U(i,j+1)+U(i+1,j))+2*k/(1+k)*(U(i-1,j)+U(i,j-1))); end if j==n %第n+1次迭代右邊界第二類邊界條件 U(i,n)=1/4*(2*U(i,j-1)+U(i-1,j)+U(i+1,j)); end end end N=N+1 %顯示迭代次數(shù) Un1=U; %完成第n+1次迭代后所有節(jié)點處的值 err=abs((Un1-Un)./Un1);%第n+1次迭代與第n次迭代所有節(jié)點值的相對誤差 err(1,1:n)=0; %上邊界節(jié)點相對誤差置零 err(n,1:n)=0; %下邊界節(jié)點相對誤差置零 G=sum(sum(err>deta))%顯示每次迭代后不滿足相對誤差限要求的節(jié)點數(shù)目G end
標簽: 有限差分
上傳時間: 2018-07-13
上傳用戶:Kemin
方便綠色免安裝擷圖軟件,也可擷取網(wǎng)頁畫面
標簽: FSCapture
上傳時間: 2018-11-20
上傳用戶:aaazzz37
function y=lagr(x0,y0,x) %x0,y0為節(jié)點 %x是插值點 n=length(x0); m=length(x); for i=1:m z=x(i); s=0.0; for k=1:n p=1.0; for j=1:n if j~=k p=p*(z-x0(j))/(x0(k)-x0(j)); end end s=p*y0(k)+s; end y(i)=s; end
標簽: lagr
上傳時間: 2020-06-09
上傳用戶:shiyc2020
VIP專區(qū)-嵌入式/單片機編程源碼精選合集系列(153)資源包含以下內(nèi)容:1. LCD128x64_KS0108仿真實例.2. PCIE協(xié)議.3. LCD自動翻屏顯示程序 LCD自動翻屏顯示程序.4. DHT-90+LCD1602溫濕度顯示系統(tǒng).5. 博創(chuàng)時s3c2410試驗箱的串口實驗 值得下載.6. 博創(chuàng)時s3c2410試驗箱的ad轉(zhuǎn)換實驗 值得下載.7. 三菱PLC編程軟件(GPPW)的使用手冊,詳細介紹GPPW的使用方法..8. yaff2文件系統(tǒng)的詳細分析,感覺滿有用的.9. 超純水PLC源碼.10. 89c51多級菜單翻頁功能12864,給想要的人參考.11. 可作為接口實驗的參考教材.12. proteus仿真ARM7的幾個經(jīng)典例子.13. Proteus仿真的完整工程-DS1302實時時鐘(帶源碼) Proteus仿真的完整工程-DS1302實時時鐘(帶源碼).14. Proteus中液晶中文詳細資料 Proteus中液晶中文詳細資料.15. Single_Spi-發(fā)送Si ngle_Spi-發(fā)送Single_Spi-發(fā)送.16. SPI接口實驗LED顯示 SPI接口實驗LED顯示.17. 八路搶答器 八路搶答器 八路搶答器.18. 步進電機仿真 步進電機仿真 步進電機仿真 步進電機仿真.19. 步進電機仿真項目 步進電機仿真項目 步進電機仿真項目.20. 測溫控制系統(tǒng) 測溫控制系統(tǒng) 測溫控制系統(tǒng).21. 實驗板自制資料實驗板自制資實驗板自制資.22. dram-R3 DARM的基本工作原理.23. I2C的程序,用于PCF8563上一定可以通過的.24. 瑞薩的DOME板LIN主從節(jié)點程序調(diào)試通過可以使用.25. 嵌入式系統(tǒng)的實時概念.26. ATJ2085 mp3開發(fā)軟件,及程序 包括sdk_i_32f_16,修正程序.27. 這是一本關(guān)于器件LPD6803的圖書!很難的的中文資料!.28. 大屏幕16X64LED點陣滾動顯示 大屏幕16X64LED點陣滾動顯示.29. 單片機雙機通訊(方式1) 單片機雙機通訊(方式1).30. 單片機智能產(chǎn)品c語言設(shè)計實例詳解?テ悄懿穋語言設(shè)計實例詳解單片機智能產(chǎn)品c語言設(shè)計實例詳解.31. 動態(tài)數(shù)碼管顯示 動態(tài)數(shù)碼管顯示 動態(tài)數(shù)碼管顯示.32. tms320dm6446開發(fā)板原理圖.33. 利用TFDU4100 芯片.34. I2C規(guī)范協(xié)議中文版.35. c51 電子琴代碼.36. c51 直流電機。里面有KEIL編譯的源代碼.37. ad9852原理圖 大體是按技術(shù)資料來布的圖.38. 單片機播放音樂.39. 自動往返小汽車程序.40. C51中的鍵盤和顯示模塊.
上傳時間: 2013-07-24
上傳用戶:eeworm
asp.net數(shù)據(jù)庫程序范例
上傳時間: 2013-12-23
上傳用戶:wqxstar
動態(tài)聚類k-means演算 將輸入在程式中的數(shù)據(jù)資料 給予適當?shù)姆秩?/p>
上傳時間: 2015-03-16
上傳用戶:離殤
VC odbc 連接Access 數(shù)據(jù)庫 的例子,比較簡單
上傳時間: 2014-01-27
上傳用戶:1051290259
大型電子製造業(yè)后臺數(shù)據(jù)庫的詳細設(shè)計!絕對好東西!(部分刪減)
上傳時間: 2015-05-17
上傳用戶:aa54
數(shù)據(jù)庫轉(zhuǎn)資料程式用SQL SERVER DTS 轉(zhuǎn)表到另一能SQL DB上
上傳時間: 2014-01-26
上傳用戶:caiiicc
一個數(shù)據(jù)庫頁面,用jsp寫成。希望給點意見
標簽: jsp
上傳時間: 2013-12-14
上傳用戶:shanml
蟲蟲下載站版權(quán)所有 京ICP備2021023401號-1