±±¾©Ê¯ÓÍ»¯¹¤Ñ§Ôº2026ÄêÑо¿ÉúÕÐÉú½ÓÊÕµ÷¼Á¹«¸æ
²é¿´: 2864  |  »Ø¸´: 1

btx97

½ð³æ (СÓÐÃûÆø)


[½»Á÷] Module procedureºÍexternal procedureÖ®¼äÓÐÇø±ðÂð£¿

ǰ¶Îʱ¼äÎÒ°Ñ×Ô¼ºÐ´µÄ×Ó³ÌÐò¶¼·ÅÔÚÁËModuleÀïÃæ£¬È»ºóͨ¹ýuseµ÷Óᣠµ«ÕâÁ½ÌìͻȻ·¢ÏÖºÃÏñ²»ÐèҪרÃÅŪ¸öModuleÀ´·ÅÕâЩ×Ó³ÌÐò£¬Ö±½Óµ±³ÉÍⲿ×Ó³ÌÐò¾ÍÐÐÁË¡£
ÕâÑùÏëÏ룬ֱ½Óµ±³ÉÍⲿ×Ó³ÌÐò¼´ÉÙдÁËЩ´úÂëÓÖÉÙÉú³ÉÁËЩÖмäÎļþ£¬ÕâÑù²»ÊǸüºÃÂ𣿠ËùÒÔÏëÎÊϸ÷λ¸ßÊÖÓбØÒª°Ñ×Ó³ÌÐò·Åµ½moduleÀïÂð£¬Ê²Ã´Ê±ºòÓбØÒª£¿

¸ù¾Ýfortran95±ê×¼ÉϵÄ˵Ã÷£¬ÔÚµ÷ÓÃModule procedureʱÆä½Ó¿ÚÊÇexplicitµÄ£¬¶øÔÚµ÷ÓÃexternal procedureʱÆä½Ó¿ÚÊÇimplicitµÄ¡£¶ÔÓÚÕâ¸ö˵Ã÷ÎÒÓÐʱÀí½â²»¹ýÀ´£¬Ìå»á²»ÉϣÍûÓÐÌå»áµÄÈËÀ´Ö¸½ÌÏ¡£
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

» ÇÀ½ð±ÒÀ²£¡»ØÌû¾Í¿ÉÒԵõ½:

²é¿´È«²¿É¢½ðÌù

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

virtualzx

ľ³æ (ÖøÃûдÊÖ)


¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï
Сľ³æ: ½ð±Ò+0.5, ¸ø¸öºì°ü£¬Ð»Ð»»ØÌû
btx97: ½ð±Ò+10, ¸ÐлÄãÕâôÏêϸµÄ½â´ð¡£ºÜÓаïÖú£¬Ð»Ð»¡£ 2013-11-22 05:56:48
·ÅÔÚmoduleÀïºÃ´¦²»ÉÙ£¡Ê×ÏȲ»»á¶àд´úÂë°É£¬Ö»ÊǶàÁËmodule/contains/end moduleÈýÐС£ÓÃmoduleµÄ»°¿ÉÒÔ°ÑÏàͬ¹¦ÄܵÄ×Ó³ÌÐòÒÔ¼°¶ÔÓ¦µÄÊý¾Ý·â×°ÔÚͬһ¸ömoduleÀͬʱһ¸öÀàµÄ¶¨ÒåÒ²¿ÉÒÔºÍÓëÕâ¸öÀàÏà¹ØµÄ×Ó³ÌÐò·ÅÔÚÒ»Æð¡£

explicitµÄÒâ˼ÊǺ¯ÊýµÄinterfaceÒþº¬ÔÚmoduleÀïÁË£¬¾ÍÊÇmodule±¾Éí±£´æÁ˱äÁ¿¸öÊý¡¢ÀàÐÍ¡¢Î¬¶ÈÖ®ÀàµÄÐÅÏ¢¡£Èç¹ûÓÃimplicit interface£¬±àÒëÆ÷±àÒëʱֻ֪µÀ¹ý³ÌµÄÃû×Ö£¬ÉõÖÁÈç¹ûÄãµÄ±äÁ¿¸öÊý²»¶Ô£¬±àÒëʱ¶¼ÎÞ·¨·¢ÏÖ¡£Èç¹ûÒª¼ÓÈëÕâÑùµÄÐÅÏ¢£¬ÐèÒªÔÚµ÷ÓÃÕâ¸ö¹ý³ÌµÄ³ÌÐò¼ÓÈëinterface block¡£useÁËÒ»¸öÀàµÄ»°£¬¾Í²»ÐèÒª

implicit interfaceÓкܶ๦Äܶ¼Óò»ÁË£¬±ÈÈçÓпÉÑ¡²ÎÊýµÄº¯Êý£¬elemental procedure,ÓÐ×Ô¶¯Êý×éά¶ÈµÄÊý×飨assumed shaped array£©£¬generic interfaceµÈ£¬ÄãÒ²²»Äܰ´²ÎÊýÃûÖ¸¶¨²ÎÊý(±ÈÈçcall sub(a=x,b=c))£¬ÁíÍâÖ»ÓÐÒ»¸ömoduleÄÚ²¿µÄ¹ý³Ì²ÅÄܵ÷ÓÃÕâ¸ömoduleµÄprivate component¡£»ù±¾ÉÏf90±È½ÏºÃÓõÄй¦Äܶ¼Óò»ÁË¡£external procedure±ØÐëÔÚµ÷ÓÃʱ¼Óinterface block²ÅÄÜÓÐexplicit interface¡£
2Â¥2013-11-21 23:35:46
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ïà¹Ø°æ¿éÌø×ª ÎÒÒª¶©ÔÄÂ¥Ö÷ btx97 µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] ²ÄÁÏ¿¼Ñе÷¼Á +9 Gs´óÍõ 2026-04-02 9/450 2026-04-02 10:24 by olim
[¿¼ÑÐ] 298ÇóBÇøµ÷¼Á +3 zzz£¬£¬r 2026-04-02 3/150 2026-04-02 09:18 by wxiongid
[¿¼ÑÐ] Ò»Ö¾Ô¸346ÉϺ£´óѧÉúÎïѧ +3 ÉϺ£´óѧ346µ÷¼Á 2026-04-01 3/150 2026-04-02 08:36 by w³æ³æ123
[¿¼ÑÐ] 271Çóµ÷¼Á +14 ÀÕ²¼ÀÊ@ 2026-03-31 19/950 2026-04-02 00:01 by ÀÕ²¼ÀÊ@
[¿¼ÑÐ] 318Çóµ÷¼Á£¬¼ÆËã²ÄÁÏ·½Ïò +7 Îüß÷Óк¦óÏÃü 2026-04-01 8/400 2026-04-01 23:54 by ÒåÎÄwang
[¿¼ÑÐ] 266·Ö£¬Ò»Ö¾Ô¸µçÆø¹¤³Ì£¬±¾¿Æ²ÄÁÏ£¬Çó²ÄÁÏרҵµ÷¼Á +10 ÍÛºôºßºôºß 2026-04-01 11/550 2026-04-01 21:48 by chyhaha
[¿¼ÑÐ] ½¨»·£¬ÄÜÔ´£¬ÍÁľÀÏʦ·¹ý¿´Ò»¿´£¡£¡£¡ +4 ºÙºÙuu 2026-04-01 4/200 2026-04-01 20:42 by ÎÞи¿É»÷111
[¿¼ÑÐ] 0817»¯¹¤Ñ§Ë¶µ÷¼Á +11 ŬÁ¦Éϰ¶ÖУ¡ 2026-03-31 11/550 2026-04-01 20:30 by Àµ´ºÑÞ
[¿¼ÑÐ] Ò»Ö¾Ô¸Äϲý´óѧ324Çóµ÷¼Á +7 hanamiko 2026-03-30 7/350 2026-04-01 13:22 by JourneyLucky
[¿¼ÑÐ] 322Çóµ÷¼Á +8 ÈýË®sss 2026-04-01 8/400 2026-04-01 10:19 by ÌÆãå¶ù
[¿¼ÑÐ] 309·Ö085801Çóµ÷¼Á +7 ѧԱGtwj7W 2026-03-31 7/350 2026-04-01 02:36 by BruceLiu320
[¿¼ÑÐ] 370Çóµ÷¼Á +3 080700µ÷¼Á 2026-03-30 3/150 2026-03-31 01:09 by A_Zhe
[¿¼ÑÐ] ²ÄÁÏר˶ 085600Çóµ÷¼Á +7 BBQ233 2026-03-30 7/350 2026-03-30 17:44 by oooqiao
[¿¼ÑÐ] Ò»Ö¾Ô¸±±¾©Àí¹¤´óѧ±¾¿Æ211²ÄÁϹ¤³Ì294Çóµ÷¼Á +8 mikasaµÄΧ½í 2026-03-28 8/400 2026-03-29 12:48 by Î޼ʵIJÝÔ­
[¿¼ÑÐ] 305Çóµ÷¼Á +8 RuiFairyrui 2026-03-28 8/400 2026-03-29 08:22 by fmesaito
[¿¼ÑÐ] 081200-11408-276ѧ˶Çóµ÷¼Á +6 ´Þwj 2026-03-26 6/300 2026-03-29 01:11 by hanserlol
[¿¼ÑÐ] 081200-314 +3 LILIQQ 2026-03-27 4/200 2026-03-28 09:41 by ±£»¤µØÇòÄãÎÒ×öÆ
[¿¼ÑÐ] 330Ò»Ö¾Ô¸Öйúº£Ñó´óѧ »¯Ñ§¹¤³Ì 085602 ÓжÁ²©ÒâÔ¸ Çóµ÷¼Á +3 wywy.. 2026-03-27 4/200 2026-03-28 03:32 by fmesaito
[¿¼ÑÐ] ¸´ÊÔµ÷¼Á£¬Ò»Ö¾Ô¸ÄÏÅ©083200ʳƷ¿ÆÑ§Ó빤³Ì +5 XQTJZ 2026-03-26 5/250 2026-03-27 14:49 by ¿ñìÅÂóµ±µ±
[¿¼ÑÐ] 305Çóµ÷¼Á +5 ÍÛ¬¿¨¿â 2026-03-26 5/250 2026-03-27 14:01 by laoshidan
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û