版塊導(dǎo)航: 正在加載中...

登錄注冊

應(yīng)《網(wǎng)絡(luò)安全法》要求，自2017年10月1日起，未進行實名認證將不得使用互聯(lián)網(wǎng)跟帖服務(wù)。為保障您的帳號能夠正常使用，請盡快對帳號進行手機號驗證，感謝您的理解與支持！

24小時熱門版塊排行榜

返回列表

lotusgun

銅蟲 (小有名氣)

應(yīng)助: 1 (幼兒園)
金幣: 493.4
紅花: 6
帖子: 93
在線: 12.5小時
蟲號: 1285436
注冊: 2011-05-04
專業(yè): 機械動力學(xué)

[求助] FORTRAN屬性聲明出錯

INTEGER,ALLOCATABLE :: NNN(

編譯，提示語法錯誤：syntax error detected between , and ALLOCATABLE
哪位好心人幫忙解釋一下

回復(fù)此樓

» 猜你喜歡

求調(diào)劑已經(jīng)有7人回復(fù)
275求調(diào)劑已經(jīng)有6人回復(fù)
招08考數(shù)學(xué) 已經(jīng)有7人回復(fù)
303求調(diào)劑已經(jīng)有6人回復(fù)
306求調(diào)劑已經(jīng)有4人回復(fù)
求調(diào)劑已經(jīng)有7人回復(fù)
考研調(diào)劑已經(jīng)有4人回復(fù)
285求調(diào)劑已經(jīng)有6人回復(fù)
一志愿北京化工大學(xué)070300 學(xué)碩336求調(diào)劑已經(jīng)有7人回復(fù)
318求調(diào)劑已經(jīng)有6人回復(fù)

» 本主題相關(guān)價值貼推薦，對您同樣有幫助:

大家?guī)臀铱匆粋€fortran的程序，我總是計算不出正確的結(jié)果已經(jīng)有20人回復(fù)
如何改變fortran的浮點精度已經(jīng)有28人回復(fù)
請教一個fortran小程序編譯出錯的問題，謝謝已經(jīng)有9人回復(fù)
fortran編譯 read出錯完畢已經(jīng)有11人回復(fù)
【求助】如何寫FORTRAN程序?qū)崿F(xiàn)求平均最近鄰距離已經(jīng)有34人回復(fù)
【求助】fortran出錯編譯通過運行溢出已經(jīng)有10人回復(fù)
【求助】FORTRAN中增加計算區(qū)域后出錯，已經(jīng)有5人回復(fù)
【求助】fortran程序未出錯，但運行不出結(jié)果，中途中斷！已經(jīng)有6人回復(fù)

1樓 2011-12-06 13:41:59

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

maomao1210

金蟲 (正式寫手)

程序強帖: 5
應(yīng)助: 2 (幼兒園)
金幣: 1432.8
散金: 242
紅花: 16
沙發(fā): 1
帖子: 991
在線: 442.1小時
蟲號: 253215
注冊: 2006-05-20
性別: MM
專業(yè): 考古理論

【答案】應(yīng)助回帖

★
jjdg(金幣+1): 感謝參與 2011-12-07 01:56:00

引用回帖:

1樓: Originally posted by lotusgun at 2011-12-06 13:41:59:
INTEGER,ALLOCATABLE :: NNN(

編譯，提示語法錯誤：syntax error detected between , and ALLOCATABLE
哪位好心人幫忙解釋一下

大哥，能不能多貼出點代碼出來呢？你這讓人家隔皮猜瓜，沒那水平哦

贊一下(1人)

回復(fù)此樓

2樓2011-12-06 14:59:31

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

lotusgun

銅蟲 (小有名氣)

應(yīng)助: 1 (幼兒園)
金幣: 493.4
紅花: 6
帖子: 93
在線: 12.5小時
蟲號: 1285436
注冊: 2011-05-04
專業(yè): 機械動力學(xué)

引用回帖:

2樓: Originally posted by maomao1210 at 2011-12-06 14:59:31:
大哥，能不能多貼出點代碼出來呢？你這讓人家隔皮猜瓜，沒那水平哦

就一個小模塊
MODULE MTYPE_BASIC
      IMPLICIT DOUBLE PRECISION(A-H,O-Z)
   TYPE MINTPOINTER
                  INTEGER,ALLOCATABLE :: NNN(

      INTEGER NUM
      END TYPE
   TYPE ALLDIM_INT
                  INTEGER,ALLOCATABLE :: JME(

INTEGER NUM
END TYPE
END MODULE

贊一下

回復(fù)此樓

3樓2011-12-06 19:31:04

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

lotusgun

銅蟲 (小有名氣)

應(yīng)助: 1 (幼兒園)
金幣: 493.4
紅花: 6
帖子: 93
在線: 12.5小時
蟲號: 1285436
注冊: 2011-05-04
專業(yè): 機械動力學(xué)

引用回帖:

2樓: Originally posted by maomao1210 at 2011-12-06 14:59:31:
大哥，能不能多貼出點代碼出來呢？你這讓人家隔皮猜瓜，沒那水平哦

NNN和JME是兩個數(shù)組

贊一下

回復(fù)此樓

4樓2011-12-06 19:32:36

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

maomao1210

金蟲 (正式寫手)

程序強帖: 5
應(yīng)助: 2 (幼兒園)
金幣: 1432.8
散金: 242
紅花: 16
沙發(fā): 1
帖子: 991
在線: 442.1小時
蟲號: 253215
注冊: 2006-05-20
性別: MM
專業(yè): 考古理論

【答案】應(yīng)助回帖

★ ★
jjdg(金幣+2): 辛苦了 2011-12-07 01:56:24

引用回帖:

3樓: Originally posted by lotusgun at 2011-12-06 19:31:04:
就一個小模塊
MODULE MTYPE_BASIC
      IMPLICIT DOUBLE PRECISION(A-H,O-Z)
   TYPE MINTPOINTER
                  INTEGER,ALLOCATABLE :: NNN(

INTEGER NUM
END TYPE
...

沒問題呀，大哥
MODULE MTYPE_BASIC
  IMPLICIT DOUBLE PRECISION(A-H,O-Z)
   TYPE MINTPOINTER
      INTEGER,ALLOCATABLE :: NNN(

      INTEGER NUM
   END TYPE

   TYPE ALLDIM_INT
      INTEGER,ALLOCATABLE :: JME(

INTEGER NUM
END TYPE
END MODULE

use mtype_basic
implicit none
type(MINTPOINTER) :: a
type(ALLDIM_INT):: b

allocate(a%nnn(3))
allocate(b%jme(3))

a%nnn = (/1,2,3/)
b%jme = (/11,22,33/)

write(*,*) a%nnn
write(*,*) b%jme
end

贊一下(1人)

回復(fù)此樓

5樓2011-12-06 20:29:33

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

銳利的碎片

木蟲 (正式寫手)

star watcher

應(yīng)助: 136 (高中生)
金幣: 3637.1
散金: 252
紅花: 22
帖子: 988
在線: 1224.9小時
蟲號: 961933
注冊: 2010-03-05
專業(yè): 凝聚態(tài)物性 II ：電子結(jié)構(gòu)

【答案】應(yīng)助回帖

★
jjdg(金幣+1): 感謝參與 2011-12-07 01:56:30
lotusgun(金幣+1): 2011-12-08 11:21:31

derive type里使用allocatable數(shù)組是f2003新加的，需要編譯器支持。

贊一下(1人)

回復(fù)此樓

6樓2011-12-06 21:05:50

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

lotusgun

銅蟲 (小有名氣)

應(yīng)助: 1 (幼兒園)
金幣: 493.4
紅花: 6
帖子: 93
在線: 12.5小時
蟲號: 1285436
注冊: 2011-05-04
專業(yè): 機械動力學(xué)

引用回帖:

6樓: Originally posted by 銳利的碎片 at 2011-12-06 21:05:50:
derive type里使用allocatable數(shù)組是f2003新加的，需要編譯器支持。

有可能是這個問題，我用的是powerstation4.0，一直沒找到新的編譯器

贊一下

回復(fù)此樓

7樓2011-12-07 10:32:49

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

lotusgun

銅蟲 (小有名氣)

應(yīng)助: 1 (幼兒園)
金幣: 493.4
紅花: 6
帖子: 93
在線: 12.5小時
蟲號: 1285436
注冊: 2011-05-04
專業(yè): 機械動力學(xué)

引用回帖:

5樓: Originally posted by maomao1210 at 2011-12-06 20:29:33:
沒問題呀，大哥
MODULE MTYPE_BASIC
  IMPLICIT DOUBLE PRECISION(A-H,O-Z)
   TYPE MINTPOINTER
      INTEGER,ALLOCATABLE :: NNN(

      INTEGER NUM
   END TYPE

   TYPE ALLDI ...

請問你用的是哪個編譯器

贊一下

回復(fù)此樓

8樓2011-12-07 10:35:25

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

銳利的碎片

木蟲 (正式寫手)

star watcher

應(yīng)助: 136 (高中生)
金幣: 3637.1
散金: 252
紅花: 22
帖子: 988
在線: 1224.9小時
蟲號: 961933
注冊: 2010-03-05
專業(yè): 凝聚態(tài)物性 II ：電子結(jié)構(gòu)

【答案】應(yīng)助回帖

★
jjdg(金幣+1): 感謝參與 2011-12-08 00:22:35

windows上gfortran和ifort都可以

贊一下(1人)

回復(fù)此樓

9樓2011-12-07 13:36:47

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

相關(guān)版塊跳轉(zhuǎn) 我要訂閱樓主 lotusgun 的主題更新

返回列表

最具人氣熱帖推薦 [查看全部]		作者	回/看	最后發(fā)表

[考研] 285求調(diào)劑 +6	ytter 2026-03-22	6/300	2026-03-22 12:09 by 星空星月
[考研] 資源與環(huán)境調(diào)劑申請(333分) +5	holy J 2026-03-21	5/250	2026-03-21 22:42 by Catalysis25
[考研] 初試 317 +7	半拉月丙 2026-03-20	7/350	2026-03-21 22:26 by peike
[考研] 化學(xué)調(diào)劑 +5	yzysaa 2026-03-21	5/250	2026-03-21 22:12 by peike
[考研] 材料工程專碩 348分求調(diào)劑 +3	冬辭. 2026-03-17	5/250	2026-03-21 18:47 by 學(xué)員8dgXkO
[考研] 求助 +5	夢里的無言 2026-03-21	6/300	2026-03-21 17:51 by 學(xué)員8dgXkO
[考研] 0703化學(xué)297求調(diào)劑 +3	Daisy☆ 2026-03-20	3/150	2026-03-21 17:45 by ColorlessPI
[考研] 材料 271求調(diào)劑 +5	展信悅_ 2026-03-21	5/250	2026-03-21 17:29 by 學(xué)員8dgXkO
[考研] 299求調(diào)劑 +5	shxchem 2026-03-20	7/350	2026-03-21 17:09 by ColorlessPI
[基金申請] 學(xué)校已經(jīng)提交到NSFC，還能修改嗎？ 40+4	babangida 2026-03-19	9/450	2026-03-21 16:12 by babangida
[考研] 306求調(diào)劑 +4	chuanzhu川燭 2026-03-18	4/200	2026-03-21 08:25 by laoshidan
[考研] 一志愿中海洋材料工程專碩330分求調(diào)劑 +8	小材化本科 2026-03-18	8/400	2026-03-20 23:16 by JourneyLucky
[考研] 考研調(diào)劑求學(xué)校推薦 +3	伯樂29 2026-03-18	5/250	2026-03-20 22:59 by JourneyLucky
[考研] 350求調(diào)劑 +5	weudhdk 2026-03-19	5/250	2026-03-20 22:04 by luoyongfeng
[考研] 0817 化學(xué)工程 299分求調(diào)劑有科研經(jīng)歷有二區(qū)文章 +22	rare12345 2026-03-18	22/1100	2026-03-20 20:39 by zhukairuo
[考研] 288求調(diào)劑，一志愿華南理工大學(xué)071005 +5	ioodiiij 2026-03-17	5/250	2026-03-19 18:22 by zcl123
[考研] 085600材料與化工求調(diào)劑 +6	緒幸與子 2026-03-17	6/300	2026-03-19 13:27 by houyaoxu
[考研] 085601專碩，總分342求調(diào)劑，地區(qū)不限 +5	share_joy 2026-03-16	5/250	2026-03-18 14:48 by haxia
[考研] 材料，紡織，生物（0856、0710），化學(xué)招生啦 +3	Eember. 2026-03-17	9/450	2026-03-18 10:28 by Eember.
[考研] 一志愿，福州大學(xué)材料專碩339分求調(diào)劑 +3	木子momo青爭 2026-03-15	3/150	2026-03-17 07:52 by laoshidan

24小時熱門版塊排行榜

[求助] FORTRAN屬性聲明出錯

» 猜你喜歡

» 本主題相關(guān)價值貼推薦，對您同樣有幫助:

【答案】應(yīng)助回帖

【答案】應(yīng)助回帖

【答案】應(yīng)助回帖

【答案】應(yīng)助回帖

» 本主題相關(guān)價值貼推薦，對您同樣有幫助: