Fortranの基本を紹介します。
出力
print *, "Hello ", name
1次元配列の宣言(real)
real, dimension(N):: a
1次元配列の初期値指定(real)
data z/0.3,0.3,0.4/
2次元配列の宣言(real)
real, dimension(N,M):: b
2次元配列の初期値指定(real)
real::k(2,2)=reshape( (/0.0e0,-0.8,1.0,-0.07), (/2,2/) )
if文(ex.物性推算法による式の切替))
if ( Meth == 1 ) then
m=0.48+1.574*Omega-0.176*Omega*Omega
else if ( Meth == 2 ) then
m=0.37464+1.54226*Omega-0.26992*Omega*Omega
else
print *, "select Methods"
end if
Doを使った繰り返し(ex.状態方程式のAmatrix計算)
DO i=1,N
DO j=1,N
AM(i,j)=sqrt(AA(i)*AA(j))*(1-k(i,j))
END DO
END DO
real::k(3,3)=reshape( (/0.0e0,-0.8, 0.03, 0.05, -0.001, 0.01, 0.02, &
& 1.0,-0.07), (/2,2/) )
こちらのブログに、インストール方法をまとめています。
こちらのブログに、Fortranで作成したdllファイルをRで呼び出す方法をまとめています。
当サイトに不具合、ご意見等ございましたらCEsolutionにお知らせください。