亚洲欧美第一页_禁久久精品乱码_粉嫩av一区二区三区免费野_久草精品视频

蟲蟲首頁| 資源下載| 資源專輯| 精品軟件
登錄| 注冊

您現在的位置是:蟲蟲下載站 > 資源下載 > 源碼 > fortan程序數值分析之Newton法求解非線性方程組

fortan程序數值分析之Newton法求解非線性方程組

資 源 簡 介

module M_GAUSS

!高斯列主元消去法模塊

contains

subroutine LINEQ(A,B,X,N)

!高斯列主元消去法

   implicit real*8(A-Z)

   integer::I,K,N

   integer::ID_MAX  !主元素標號

   real*8::A(N,N),B(N),X(N)

   real*8::AUP(N,N),BUP(N)

   !A,B為增廣矩陣

   real*8::AB(N,N+1)

   real*8::VTEMP1(N+1),VTEMP2(N+1)

   AB(1:N,1:N)=A

   AB(:,N+1)=B

相 關 資 源

主站蜘蛛池模板: 抚顺市| 龙口市| 兰州市| 友谊县| 昌都县| 上犹县| 宝鸡市| 临西县| 遵义市| 周至县| 蓬莱市| 衡阳县| 茌平县| 日土县| 囊谦县| 清丰县| 襄垣县| 丽江市| 大洼县| 肥城市| 营口市| 瓦房店市| 武义县| 永清县| 安顺市| 东明县| 盐山县| 乐业县| 梨树县| 芜湖县| 靖远县| 白山市| 淮北市| 磐安县| 南岸区| 潼南县| 平顺县| 金湖县| 秭归县| 淮南市| 奎屯市|