有限元求解柏松方程。本文采用FORTRAN語言編制程序。程序中大部分變量采用有名公共區存儲方式存儲,這樣可以減少內存占用量。
IFG:生成有限元網格信息,即元素節點局部編碼與總體編碼對照表,節點實際坐標,邊界節點編碼與邊界點上的已知值
GKD:生成總剛一維存儲對角元的地址,計算總剛一維存儲長度
FIXP:設置已知節點函數值
GK(NI,NJ,ADJ,AIJ):單元剛度矩陣計算
GF(NI,N,M,LE,YI,FE):單元列陣的計算
AK(I,J,AIJ):總剛度矩陣元素迭加
QEB:總剛度矩陣和總列陣合成
BDE:邊界條件處理
SOLGS:Gauss-Seidel迭代法求解方程組
UDIFF(NI,NFLAG,UDIF,LE,ADJ):標準元素內形狀函數導數計算
DIFF:節點上 , 加權平均
標簽:
FORTRAN
程序
有限元
方程
上傳時間:
2017-09-12
上傳用戶:erkuizhang
有限元求解柏松方程。本文采用FORTRAN語言編制程序。程序中大部分變量采用有名公共區存儲方式存儲,這樣可以減少內存占用量。
IFG:生成有限元網格信息,即元素節點局部編碼與總體編碼對照表,節點實際坐標,邊界節點編碼與邊界點上的已知值
GKD:生成總剛一維存儲對角元的地址,計算總剛一維存儲長度
FIXP:設置已知節點函數值
GK(NI,NJ,ADJ,AIJ):單元剛度矩陣計算
GF(NI,N,M,LE,YI,FE):單元列陣的計算
AK(I,J,AIJ):總剛度矩陣元素迭加
QEB:總剛度矩陣和總列陣合成
BDE:邊界條件處理
SOLGS:Gauss-Seidel迭代法求解方程組
UDIFF(NI,NFLAG,UDIF,LE,ADJ):標準元素內形狀函數導數計算
DIFF:節點上 , 加權平均
標簽:
FORTRAN
程序
有限元
方程
上傳時間:
2017-09-12
上傳用戶:問題問題