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ì)的電導(dǎo)率
%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ì)電導(dǎo)率之比
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
標(biāo)簽：
有限差分
上傳時間：
2018-07-13
上傳用戶：Kemin
VIP專區(qū)-嵌入式/單片機編程源碼精選合集系列（97）資源包含以下內(nèi)容：1. 介紹了Imu器件的模型參數(shù)及實驗驗證研究.2. 介紹IMU器件的試驗測試和參數(shù)分析.3. DM9000的中文參考資料.4. 一個在通用i2c程序基礎(chǔ)上加入自己的修改.5. 本程序是模擬的大習(xí)幕點陣的三種刷新效果。程序簡單.6. sim卡 讀卡教程 SIM 讀卡 詳細(xì)教程.7. T6963c(240*128)液晶驅(qū)動（AVR Mega128) C語言.8. *** *** *** *** *** *** *** *** *
USB測試程式說明
By hugang, hgx2000@mail.china.com
****************.9. 通過調(diào)用DLL文件進行儀器數(shù)據(jù)采集并進行解析..10. ES6028
Vibratto DVD Processor
Data Sheet
很詳細(xì)的IC各部件的功能詳細(xì)介紹.11. DS18B20溫度傳感器應(yīng)用解析.12. LPC 2300 串口開發(fā)；LPC2300是NXP 公司推出的最新的嵌入式芯片；異步串口通訊功能很強；本人寫了個測試案例；供大家參考；.13. Back in 2002, the 6502 disappeared out of all catalogues.
Wanted to know, if it s possible to buil.14. EEPROM acces under ADS.15. A digital fi‘equeney meter designed with FPGA development software Q-~us 11 is introduced．The 1 Hz—l.16. S3C2440A datasheet.17. RS編解碼程序.18. 專業(yè)汽車級嵌入式操作系統(tǒng)OSEK的源代碼.19. 基于LPC2000系列的USB主機驅(qū)動程序,可在此基礎(chǔ)上進行USB主機相關(guān)的開發(fā).20. 嵌入式TCP/IP協(xié)議棧應(yīng)用主機端程序（VC6源碼）
一個專為嵌入式系統(tǒng)編寫的小型TCP/IP協(xié)議棧TCP/IPLean.21. fft濾波器.22. fat32文件系統(tǒng)的代碼.23. 這個是顯示時間用的.24. iic commulacation by labview.25. 上載的程序可以用于PIC單片機,也可以用于430單片機,本人原創(chuàng),到至今還沒有發(fā)現(xiàn)哪位網(wǎng)友想出這種辦法,希望站長能多加分..26. 一個很好的flash程序燒寫工具.27. 本人有關(guān)PLC測試源碼.28. tvp5150數(shù)據(jù)手冊和TI的C文件,對tvp5150驅(qū)動開發(fā)有幫助.29. 該軟件能很好地實現(xiàn)數(shù)控機床上的G00.30. SPI簡單的數(shù)據(jù)傳輸.用單片595傳輸數(shù)據(jù).簡單易懂.31. 達芬奇雙核開發(fā)板TMS320DM644xled的源代碼.32. ARM的bootloader程序.33. for displaying led test program.34. 51上通過測試的程序.35. 天下無雙、功能最多的Flash！一個文件.36. 基于東進的D161A語音卡的開發(fā)平臺.37. i2c-test.38. GPRS上網(wǎng).39. gui關(guān)鍵的幾個類的代碼.40. 628512在實際電路中的應(yīng)用圖紙,有實際應(yīng)用的意義..
標(biāo)簽：
現(xiàn)代無線
通信系統(tǒng)
電波傳送
上傳時間：
2013-04-15
上傳用戶：eeworm
