²é¿´: 1203  |  »Ø¸´: 8

lotusgun

Í­³æ (СÓÐÃûÆø)

[ÇóÖú] FORTRANÊôÐÔÉùÃ÷³ö´í

INTEGER,ALLOCATABLE :: NNN(

±àÒ룬ÌáʾÓï·¨´íÎó£ºsyntax error detected between , and ALLOCATABLE
ÄÄλºÃÐÄÈ˰ïæ½âÊÍÒ»ÏÂ
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

» ±¾Ö÷ÌâÏà¹Ø¼ÛÖµÌùÍÆ¼ö£¬¶ÔÄúͬÑùÓаïÖú:

ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

maomao1210

½ð³æ (ÕýʽдÊÖ)

¡¾´ð°¸¡¿Ó¦Öú»ØÌû

¡ï
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
ÄÄλºÃÐÄÈ˰ïæ½âÊÍÒ»ÏÂ

´ó¸ç£¬Äܲ»ÄܶàÌù³öµã´úÂë³öÀ´ÄØ£¿ÄãÕâÈÃÈ˼ҸôƤ²Â¹Ï£¬Ã»ÄÇˮƽŶ
2Â¥2011-12-06 14:59:31
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

lotusgun

Í­³æ (СÓÐÃûÆø)

ÒýÓûØÌû:
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
3Â¥2011-12-06 19:31:04
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

lotusgun

Í­³æ (СÓÐÃûÆø)

ÒýÓûØÌû:
2Â¥: Originally posted by maomao1210 at 2011-12-06 14:59:31:
´ó¸ç£¬Äܲ»ÄܶàÌù³öµã´úÂë³öÀ´ÄØ£¿ÄãÕâÈÃÈ˼ҸôƤ²Â¹Ï£¬Ã»ÄÇˮƽŶ

NNNºÍJMEÊÇÁ½¸öÊý×é
4Â¥2011-12-06 19:32:36
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

maomao1210

½ð³æ (ÕýʽдÊÖ)

¡¾´ð°¸¡¿Ó¦Öú»ØÌû

¡ï ¡ï
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
5Â¥2011-12-06 20:29:33
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

ÈñÀûµÄË鯬

ľ³æ (ÕýʽдÊÖ)

star watcher

¡¾´ð°¸¡¿Ó¦Öú»ØÌû

¡ï
jjdg(½ð±Ò+1): ¸Ðл²ÎÓë 2011-12-07 01:56:30
lotusgun(½ð±Ò+1): 2011-12-08 11:21:31
derive typeÀïʹÓÃallocatableÊý×éÊÇf2003мӵģ¬ÐèÒª±àÒëÆ÷Ö§³Ö¡£
6Â¥2011-12-06 21:05:50
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

lotusgun

Í­³æ (СÓÐÃûÆø)

ÒýÓûØÌû:
6Â¥: Originally posted by ÈñÀûµÄË鯬 at 2011-12-06 21:05:50:
derive typeÀïʹÓÃallocatableÊý×éÊÇf2003мӵģ¬ÐèÒª±àÒëÆ÷Ö§³Ö¡£

ÓпÉÄÜÊÇÕâ¸öÎÊÌ⣬ÎÒÓõÄÊÇpowerstation4.0£¬Ò»Ö±Ã»ÕÒµ½ÐµıàÒëÆ÷
7Â¥2011-12-07 10:32:49
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

lotusgun

Í­³æ (СÓÐÃûÆø)

ÒýÓûØÌû:
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 ...

ÇëÎÊÄãÓõÄÊÇÄĸö±àÒëÆ÷
8Â¥2011-12-07 10:35:25
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

ÈñÀûµÄË鯬

ľ³æ (ÕýʽдÊÖ)

star watcher

¡¾´ð°¸¡¿Ó¦Öú»ØÌû

¡ï
jjdg(½ð±Ò+1): ¸Ðл²ÎÓë 2011-12-08 00:22:35
windowsÉÏgfortranºÍifort¶¼¿ÉÒÔ
9Â¥2011-12-07 13:36:47
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ïà¹Ø°æ¿éÌø×ª ÎÒÒª¶©ÔÄÂ¥Ö÷ lotusgun µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] 085700×ÊÔ´Óë»·¾³308Çóµ÷¼Á +6 īīĮ 2026-03-18 6/300 2026-03-20 00:02 by 23Postgrad
[¿¼ÑÐ] 286·ÖÈ˹¤ÖÇÄÜרҵÇëÇóµ÷¼ÁÔ¸Òâ¿ç¿¼£¡ +3 lemonzzn 2026-03-17 3/150 2026-03-19 23:58 by 23Postgrad
[¿¼ÑÐ] 085600²ÄÁÏÓ뻯¹¤ Çóµ÷¼Á +14 enenenhui 2026-03-13 15/750 2026-03-19 21:53 by allen-yin
[¿¼ÑÐ] ÉúÎïѧµ÷¼ÁÕÐÈË£¡£¡£¡ +3 ɽº£Ììá° 2026-03-17 4/200 2026-03-19 21:34 by ÔõôÊÍ»³
[¿¼ÑÐ] Ò»Ö¾Ô¸±±¾©»¯¹¤´óѧ0703»¯Ñ§318·Ö£¬ÓпÆÑо­Àú£¬Çóµ÷¼Á +3 һƿ±½¼×Ëá 2026-03-14 3/150 2026-03-19 15:17 by ¾¡Ë´Ò¢1
[¿¼ÑÐ] 286Çóµ÷¼Á +6 lemonzzn 2026-03-16 10/500 2026-03-19 14:31 by lemonzzn
[¿¼ÑÐ] 324·Ö 085600²ÄÁÏ»¯¹¤Çóµ÷¼Á +3 llllkkkhh 2026-03-18 3/150 2026-03-19 14:22 by houyaoxu
[¿¼ÑÐ] Çóµ÷¼Á£¬Ò»Ö¾Ô¸:ÄϾ©º½¿Õº½Ìì´óѧ´óѧ £¬080500²ÄÁÏ¿ÆÑ§Ó빤³Ìѧ˶£¬×Ü·Ö289·Ö +3 @taotao 2026-03-19 3/150 2026-03-19 14:07 by peike
[¿¼ÑÐ] 0703»¯Ñ§µ÷¼Á£¬Çó¸÷λÀÏʦÊÕÁô +10 ÇïÓÐľ±± 2026-03-14 10/500 2026-03-19 05:52 by anny19840123
[¿¼ÑÐ] 330Çóµ÷¼Á +3 С²Ä»¯±¾¿Æ 2026-03-18 3/150 2026-03-18 21:55 by ÎÞи¿É»÷111
[¿¼ÑÐ] 26µ÷¼Á/²ÄÁÏ/Ó¢Ò»Êý¶þ/×Ü·Ö289/ÒѹýAÇøÏß +7 ²½´¨¿á×Ï123 2026-03-13 7/350 2026-03-18 17:12 by ¾¡Ë´Ò¢1
[¿¼ÑÐ] 297Çóµ÷¼Á +8 Ï·¾«µ¤µ¤µ¤ 2026-03-17 8/400 2026-03-18 14:30 by laoshidan
[¿¼ÑÐ] 331Çóµ÷¼Á£¨0703Óлú»¯Ñ§ +7 ZY-05 2026-03-13 8/400 2026-03-18 14:13 by 007_lilei
[¿¼²©] »·¾³ÁìÓòÈ«¹úÖØµãʵÑéÊÒÕÐÊÕ²©Ê¿1-2Ãû +3 QGZDSYS 2026-03-13 5/250 2026-03-18 11:13 by QGZDSYS
[¿¼ÑÐ] ÉúÎïѧ071000 329·ÖÇóµ÷¼Á +3 ÎÒ°®ÉúÎïÉúÎﰮΠ2026-03-17 3/150 2026-03-18 10:12 by macy2011
[¿¼ÑÐ] 0703»¯Ñ§336·ÖÇóµ÷¼Á +6 zbzihdhd 2026-03-15 7/350 2026-03-18 09:53 by zhukairuo
[¿¼ÑÐ] ¿¼Ñе÷¼Á +3 ä¿ya_~ 2026-03-17 5/250 2026-03-17 09:25 by Winj1e
[¿¼ÑÐ] ÇóÀÏʦÊÕÁôµ÷¼Á +4 jiang½ª66 2026-03-14 5/250 2026-03-15 20:11 by Winj1e
[¿¼ÑÐ] 26¿¼ÑÐÒ»Ö¾Ô¸ÖйúʯÓÍ´óѧ(»ª¶«)305·ÖÇóµ÷¼Á +3 ¼ÎÄêÐÂ³Ì 2026-03-15 3/150 2026-03-15 13:58 by ¹þ¹þ¹þ¹þºÙºÙºÙ
[¿¼ÑÐ] 070305Çóµ÷¼Á +3 mlpqaz03 2026-03-14 4/200 2026-03-15 11:04 by peike
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û