| 5 | 1/1 | 返回列表 |
| 查看: 2185 | 回復(fù): 6 | ||
| 當(dāng)前只顯示滿足指定條件的回帖,點(diǎn)擊這里查看本話題的所有回帖 | ||
lijunjiexm鐵蟲(chóng) (小有名氣)
|
[求助]
請(qǐng)教一個(gè)簡(jiǎn)單的real語(yǔ)法,謝謝
|
|
|
請(qǐng)教一下下面語(yǔ)句如何解釋?zhuān)x謝 REAL(iwp)::det,one=1.0_iwp,pt5=0.5_iwp,rho,penalty=1.e20_iwp 我只有見(jiàn)過(guò)real(kind=4):: det, ...這樣的,但是上面的one=1.0_iwp到底什么意思,當(dāng)然還有real(iwp)。 |
至尊木蟲(chóng) (職業(yè)作家)
至尊木蟲(chóng) (職業(yè)作家)
|
你往前翻,看看 iwp 是如何定義的。我猜應(yīng)該是類(lèi)似于: 定義了上面之后, 1.0_iwp 表示 1.0 是一個(gè) real(kind=iwp),即單精度實(shí)數(shù),而 1.0_idp 表示 1.0 是一個(gè) real(kind=idp),即 double precision 實(shí)數(shù) 直接寫(xiě) real(kind=4) 不具有可移植性,所以,最好不要這么直接寫(xiě),呵呵…… |
鐵蟲(chóng) (小有名氣)
鐵蟲(chóng) (小有名氣)
|
不好意思,前面有的,我沒(méi)注意到,就在第一行: INTEGER,PARAMETER::iwp=SELECTED_REAL_KIND(15) INTEGER::fixed_freedoms,i,iel,iters,k,limit,nband,ndim=2,nels,neq,nip=4, & nn,nod=8,nodf=4,nodof=3,nr,ntot=20,nxe,nye REAL(iwp)::det,one=1.0_iwp,penalty=1.e20_iwp,pt5=0.5_iwp,rho,tol,ubar, & vbar,visc,zero=0.0_iwp |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 085602化工求調(diào)劑(331分) +8 | 111@127 2026-03-30 | 8/400 |
|
|---|---|---|---|---|
|
[考研] 317求調(diào)劑 +8 | 十閑wx 2026-03-24 | 8/400 |
|
|
[考研] 11408總分309,一志愿東南大學(xué)求調(diào)劑,不挑專(zhuān)業(yè) +5 | 天賦帶到THU 2026-03-29 | 6/300 |
|
|
[考研] 材料科學(xué)與工程 317求調(diào)劑 +7 | JKSOIID 2026-03-26 | 7/350 |
|
|
[考研] 311求調(diào)劑 +7 | 藍(lán)月亮亮 2026-03-30 | 7/350 |
|
|
[考研] 085601材料工程找調(diào)劑 +17 | oatmealR 2026-03-29 | 18/900 |
|
|
[考研] 26考研-291分-廈門(mén)大學(xué)(085601)-柔性電子學(xué)院材料工程專(zhuān)業(yè)求調(diào)劑 +5 | min3 2026-03-24 | 6/300 |
|
|
[考研] 材料化工340求調(diào)劑 +3 | jhx777 2026-03-30 | 3/150 |
|
|
[考研] 材料科學(xué)與工程調(diào)劑 +8 | 深V宿舍吧 2026-03-30 | 8/400 |
|
|
[考研] 375求調(diào)劑 +6 | 雨夏整夜 2026-03-29 | 6/300 |
|
|
[考研] 調(diào)劑求院校招收 +6 | 鶴鯨鴿 2026-03-28 | 6/300 |
|
|
[考研] 347求調(diào)劑 +3 | 山頂見(jiàn)α 2026-03-25 | 3/150 |
|
|
[考研] 070300化學(xué)求調(diào)劑 +4 | 起個(gè)名咋這么難 2026-03-27 | 4/200 |
|
|
[考研] 316求調(diào)劑 +5 | Pigcasso 2026-03-24 | 5/250 |
|
|
[考研] 材料求調(diào)劑 +5 | .m.. 2026-03-25 | 5/250 |
|
|
[考研]
|
WWW西西弗斯 2026-03-24 | 8/400 |
|
|
[考研] 打過(guò)很多競(jìng)賽,085406控制工程300分,求調(diào)劑 +3 | askeladz 2026-03-26 | 3/150 |
|
|
[考研] 網(wǎng)絡(luò)空間安全0839招調(diào)劑 +4 | w320357296 2026-03-25 | 6/300 |
|
|
[考研]
|
13659058978 2026-03-24 | 4/200 |
|
|
[考研] 344求調(diào)劑 +3 | desto 2026-03-24 | 3/150 |
|