²é¿´: 3259  |  »Ø¸´: 3

shileijerry

ÖÁ×ðľ³æ (ÖªÃû×÷¼Ò)

[ÇóÖú] Fortran MPI³ÌÐòÎÊÌâ ÒÑÓÐ2È˲ÎÓë

²ÉÓÃMicrosoft Visual Studio Fortran±àÒëMPI³ÌÐò
³ÌÐòÈçÏ£º
   Fortran example  
   program hello
   include 'mpif.h'
   integer rank, size, ierror, tag, status(MPI_STATUS_SIZE)
   
   call MPI_INIT(ierror)
   call MPI_COMM_SIZE(MPI_COMM_WORLD, size, ierror)
   call MPI_COMM_RANK(MPI_COMM_WORLD, rank, ierror)
   print*, 'node', rank, ': Hello world'
   call MPI_FINALIZE(ierror)
   end

µ«±àÒë³öÏÖÈçÏÂÎÊÌ⣺
Source1.f90(3): error #6591: An automatic object is invalid in a main program.   [STATUS]
error #6219: A specification expression object must be a dummy argument, a COMMON block object, or an object accessible through host or use association   [MPI_STATUS_SIZE]
compilation aborted for Source1.f90 (code 1)

лл
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

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

×ÊÁÏת×ÔÍøÂ磬½öÏÞѧϰ½»Á÷£¬ÇëÎð×÷ËûÓ㬷ñÔòºó¹û×Ô¸º£¡
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

Yan_Jordan

ľ³æ (СÓÐÃûÆø)

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

¡ï
¸Ðл²ÎÓ룬ӦÖúÖ¸Êý +1
jjdg: ½ð±Ò+1, ¸Ðл²ÎÓë 2017-04-14 23:02:57
Â¥Ö÷ÒÔǰÓÃC°É

FortranºÍCÓÐÇø±ð£¬ ²»ÊÇÓà include 'mpif.h'£¬ ¶øÊÇÓÃuse mpi

PS£ºÓеãС¹æ·¶¸ñʽµØ·½ integer ::
end program hello
¹æ·¶Ò»µã±È½ÏºÃ£¬Ò²·½±ãÔĶÁ
2Â¥2017-04-14 21:23:06
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

wz_work

ľ³æ (СÓÐÃûÆø)

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

¶ÔÓÚFORTRAN77µÄ´úÂ룬ʹÓÃINCLUDE "mpif.h"£¬¶ÔÓÚFortran90ÒÔºóµÄʹÓà use mpi£¬´Ë´¦±¨µÄ´íÎóÊÇÓÉÓÚstatus䶨Òå¡£
ÉúÃüµÄ³¤ºÓÊǶàôµÄÓØ»Ø£¬Ï£ÍûÓÖÊǶàôµÄÐÛ׳¡£
3Â¥2017-04-26 08:56:21
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

wz_work

ľ³æ (СÓÐÃûÆø)

ÒýÓûØÌû:
3Â¥: Originally posted by wz_work at 2017-04-26 08:56:21
¶ÔÓÚFORTRAN77µÄ´úÂ룬ʹÓÃINCLUDE "mpif.h"£¬¶ÔÓÚFortran90ÒÔºóµÄʹÓà use mpi£¬´Ë´¦±¨µÄ´íÎóÊÇÓÉÓÚstatus䶨Òå¡£

Éϱß˵µÄSTATUSµÄ´íÎóÓ¦¸Ã²»´æÔÚ£¬±§Ç¸¡£
ÉúÃüµÄ³¤ºÓÊǶàôµÄÓØ»Ø£¬Ï£ÍûÓÖÊǶàôµÄÐÛ׳¡£
4Â¥2017-04-26 09:00:10
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ïà¹Ø°æ¿éÌø×ª ÎÒÒª¶©ÔÄÂ¥Ö÷ shileijerry µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[»ù½ðÉêÇë] ÃæÉϵÄË®ºÜÉî +13 ²¼²¼ºÍÒ»¶þ 2026-07-18 18/900 2026-07-18 20:37 by ÈÕÔÂÌìµØ
[»ù½ðÉêÇë] ¹úÉç¿ÆÍ¨Ñ¶ÆÀÉó +4 DZˮ¹Ú¾ü123 2026-07-18 5/250 2026-07-18 19:58 by chenmodeyu
[»ù½ðÉêÇë] 5¸ö%2F£¬·Ç¹Ì¶¨¶Î22¸ö×Öĸ +8 jaasxulu 2026-07-15 9/450 2026-07-18 17:40 by dxcgbm
[»ù½ðÉêÇë] ÉúÃü¿ÚC13ÃæÉÏ»áÆÀʱ¼ä +7 luckinging 2026-07-14 11/550 2026-07-17 20:43 by ³æ²·1988
[½Ìʦ֮¼Ò] ÄÚÐÄØÑ·¦ +16 Ë®±ùÔÂÔÂÒ°Íà 2026-07-12 16/800 2026-07-17 19:25 by otani
[»ù½ðÉêÇë] ÉúÃü¿ÚÃæÉÏ»áÆÀ½áÊøÁËÂð´ó¼ÒÓÐÖªµÀ½á¹ûÂð£¿ÏÖÔÚ»¹Ã»Óнá¹ûÕý³£²»£¿ +6 ±ÌË®00 2026-07-16 9/450 2026-07-17 15:21 by jaasxulu
[ÂÛÎÄͶ¸å] ͶӢÎÄÆÚ¿¯ÈçºÎ²éÖØ 10+5 ²»ÖªµÀȡʲôÃû× 2026-07-15 6/300 2026-07-17 09:07 by bobvan
[»ù½ðÉêÇë] ²»ÒªÔÙÊý¹ú×ÔÈ»ÉêÇëÊéµÄ filecode µÄ·Ö¸ô·û¸öÊýÁË +14 sadpencil 2026-07-12 21/1050 2026-07-17 00:15 by wangze12014
[Óлú½»Á÷] ²®°·Éϼ׻ùÇóÖú 100+4 002tmumu 2026-07-14 7/350 2026-07-16 19:47 by 002tmumu
[ÂÛÎÄͶ¸å] ¿ç³ö°æÉçÉÌͶ¸å 20+5 ÄߺÃ520 2026-07-13 5/250 2026-07-16 17:24 by ÎÞÊÓ¾üÍÅ
[»ù½ðÉêÇë] ÉúÉúÃüѧ²¿»áÆÀ +4 wuke100666 2026-07-15 4/200 2026-07-16 00:12 by À²À²Ð¡ÄÝ×Ó
[»ù½ðÉêÇë] H¿Ú£¬ÃæÉÏ£¬Ê±¼ä´Á7ÔÂ7ÈÕ¡£ +3 plumage5 2026-07-15 3/150 2026-07-15 21:06 by 6543yes
[»ù½ðÉêÇë] Сľ³æÃ»ÂäÁË£¬³ýÁËÆíµ»Ìû×Ó£¬¼¸ºõ¿´²»µ½ÓмÛÖµµÄÌû×Ó +13 botar 2026-07-14 14/700 2026-07-15 19:28 by º®Á÷32
[»ù½ðÉêÇë] »áÆÀ +5 ÎÞÃûÕßµÇɽ 2026-07-15 5/250 2026-07-15 18:15 by ¸Ü¾ÍÊÇÄã¶Ô
[»ù½ðÉêÇë] E¿Ú»áÆÀ +11 ²¼²¼ºÍÒ»¶þ 2026-07-13 13/650 2026-07-15 16:34 by Kittylucky
[»ù½ðÉêÇë] E¿ÚÇàC»áÆÀ½áÊøÁËÂ𣿠40+3 ССÊ鳿c 2026-07-14 9/450 2026-07-15 16:04 by °²¾²µÄÖªÁË
[ÂÛÎÄͶ¸å] ũҵ»úеѧ±¨Í¶¸åÖÜÆÚ +3 G0DLIN 2026-07-14 7/350 2026-07-15 09:26 by xs74101122
[»ù½ðÉêÇë] ¹ú×ÔÈ»ÃæÉÏD¿ÚÆíµ» +4 monkeynana 2026-07-14 4/200 2026-07-15 09:14 by °×Ë®Öó
[»ù½ðÉêÇë] ûÊÕµ½ÏûÏ¢£¬ÔÙ´ÎÅãÅÜ +3 Ìì¿ÕÐdz½fly 2026-07-14 3/150 2026-07-14 19:14 by 6543yes
[»ù½ðÉêÇë] Ã÷ÌìE¿ÚÃæÉÏ»áÆÀ +8 ²¼²¼ºÍÒ»¶þ 2026-07-12 9/450 2026-07-13 22:59 by QTSorange
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û