| ²é¿´: 4098 | »Ø¸´: 9 | |||
| µ±Ç°Ö»ÏÔʾÂú×ãÖ¸¶¨Ìõ¼þµÄ»ØÌû£¬µã»÷ÕâÀï²é¿´±¾»°ÌâµÄËùÓлØÌû | |||
fish8900½ð³æ (СÓÐÃûÆø)
|
[ÇóÖú]
fortranÖÐÔËÐÐÖгöÏÖÎÞÇî´óµÄÊýÔõô´¦Àí
|
||
|
ÔÚ¼ÆËãµÄ¹ý³ÌÖгöÏÖÁËÎÞÇî´óµÄÊý£¨È»ºó³ÌÐòÖÕÖ¹£©£¬ÎÒÏë½øÐÐÒÔϼ¸ÖÖ³¢ÊÔ£¬²»ÖªÈçºÎ½øÐÐ 1¡¢µ±A±äµÃÎÞÇî´óºó£¬ÎÒÏë¶ÔËü½øÐи³Öµ£¬ÁîA=1.0E+10 2¡¢µ±A±äµÃÎÞÇî´óºó£¬ÏëÓÃÒ»¸öÅоÝÀ´½øÐкóÀ´µÄÆäËû¼ÆË㣬Õâ¸öÅоݸÃÔõôÉèÖà 3¡¢ÈçºÎÅжÏA±äµÃÎÞÇî´óÁË |
» ÊÕ¼±¾ÌûµÄÌÔÌûר¼ÍƼö
±±´ó¿ÆÑзÖÏí |
» ²ÂÄãϲ»¶
314Çóµ÷¼Á
ÒѾÓÐ8È˻ظ´
08¹¤¿Æ 320×Ü·Ö Çóµ÷¼Á
ÒѾÓÐ5È˻ظ´
085601ר˶£¬×Ü·Ö342Çóµ÷¼Á£¬µØÇø²»ÏÞ
ÒѾÓÐ5È˻ظ´
085600²ÄÁÏÓ뻯¹¤µ÷¼Á 324·Ö
ÒѾÓÐ4È˻ظ´
311Çóµ÷¼Á
ÒѾÓÐ6È˻ظ´
»¯¹¤Ñ§Ë¶306Çóµ÷¼Á
ÒѾÓÐ10È˻ظ´
286Çóµ÷¼Á
ÒѾÓÐ8È˻ظ´
²ÄÁÏÓ뻯¹¤Ò»Ö¾Ô¸Äϲý´óѧ327Çóµ÷¼ÁÍÆ¼ö
ÒѾÓÐ9È˻ظ´
311Çóµ÷¼Á
ÒѾÓÐ12È˻ظ´
271²ÄÁϹ¤³ÌÇóµ÷¼Á
ÒѾÓÐ3È˻ظ´
» ±¾Ö÷ÌâÏà¹Ø¼ÛÖµÌùÍÆ¼ö£¬¶ÔÄúͬÑùÓаïÖú:
fortranÖÐIdintº¯ÊýÊÇʲôÒâ˼£¿
ÒѾÓÐ4È˻ظ´
ÈçºÎŷŵ¸öfortranÓïÑÔÌáÈ¡³öÎÒÏëÒªµÄ²¿·ÖÊý¾Ý
ÒѾÓÐ6È˻ظ´
ÇóÖú£º¹ØÓÚfortran½¨Êý×éÎÊÌ⣬лл£¡
ÒѾÓÐ4È˻ظ´
ʹÓÃMultiwfn»æÖÆÔ×Ó¹ìµÀͼÐΡ¢Ñо¿Ô×ӿDzã½á¹¹¼°Ïà¶ÔÂÛЧӦµÄÓ°Ïì
ÒѾÓÐ17È˻ظ´
fortranÖмÆËãÊý¾ÝдÈëÎı¾Îª NANµÄÎÊÌâ
ÒѾÓÐ4È˻ظ´
FortranÖÐÊý×éµÄʹÓÃ
ÒѾÓÐ4È˻ظ´
fortranÖÐÈçºÎ´¦Àí×Ö·ûºÍÊý¾Ý»ìºÏµÄÎļþ
ÒѾÓÐ6È˻ظ´
FortranÊý¾Ý¶ÁÈë¸ñʽµÄÐÞ¸Ä
ÒѾÓÐ5È˻ظ´
fortranÖе½µ×¸ÃÈçºÎ±È½ÏÁ½¸öʵÊýÊÇ·ñÏàµÈ
ÒѾÓÐ8È˻ظ´
FortranÖÐ×Ó³ÌÐòÓ뺯ÊýµÄÇø±ð
ÒѾÓÐ7È˻ظ´
FortranÖйØÓÚÊý×éµÄ±ä»¯
ÒѾÓÐ5È˻ظ´
¡¾ÇóÖú¡¿¶ÁÎı¾Êý¾Ý³öÏֶδíÎó[fortran]
ÒѾÓÐ14È˻ظ´
Çë½Ìfortranµ¼txtÊý¾Ý½øoriginÎÊÌâ
ÒѾÓÐ1È˻ظ´
¡¾ÇóÖú¡¿ASPENÔËÐÐÖгöÏÖFORTRAN or Internal Error!
ÒѾÓÐ7È˻ظ´
¡¾ÇóÖú¡¿fortran¼ÆËãʱ³öÏÖNaN
ÒѾÓÐ11È˻ظ´
dfj2015
гæ (³õÈëÎÄ̳)
- Ó¦Öú: 0 (Ó×¶ùÔ°)
- ½ð±Ò: 1.5
- Ìû×Ó: 1
- ÔÚÏß: 1.2Сʱ
- ³æºÅ: 3968836
- ×¢²á: 2015-07-13
9Â¥2015-07-13 20:44:25
mechaniclmw
ľ³æ (СÓÐÃûÆø)
- Ó¦Öú: 9 (Ó×¶ùÔ°)
- ½ð±Ò: 2548
- É¢½ð: 197
- ºì»¨: 2
- Ìû×Ó: 292
- ÔÚÏß: 205.8Сʱ
- ³æºÅ: 2001977
- ×¢²á: 2012-09-15
- ÐÔ±ð: GG
- רҵ: ¶¯Á¦Ñ§Óë¿ØÖÆ
2Â¥2013-03-03 14:28:58
zeppe
½ð³æ (СÓÐÃûÆø)
- Ó¦Öú: 15 (СѧÉú)
- ½ð±Ò: 3901.3
- É¢½ð: 58
- ºì»¨: 4
- Ìû×Ó: 205
- ÔÚÏß: 254.1Сʱ
- ³æºÅ: 573594
- ×¢²á: 2008-06-14
- ÐÔ±ð: GG
- רҵ: ÀíÂۺͼÆË㻯ѧ
¡¾´ð°¸¡¿Ó¦Öú»ØÌû
¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï
fish8900: ½ð±Ò+30, ¡ï¡ï¡ïºÜÓаïÖú 2013-04-07 11:14:16
fish8900: ½ð±Ò+30, ¡ï¡ï¡ïºÜÓаïÖú 2013-04-07 11:14:16
|
ÄúºÃ£¬ÕâÊǸù¾ÝÒªÇóдµÄÒ»µã´úÂ룬ϣÍû¶ÔÄúÓаïÖú¡£ LOGICAL ISLARGE !Âß¼±äÁ¿£¬ÊÇ·ñÊÇ´óÊý REAL LARGENUM, A PARAMETER(LARGENUM=1.0E10) !Ò²¿É°´ÐèÇóÉèΪÆäËû´óÊý ISLARGE=.FALSE. !ÅжÏAÊÇ·ñÊÇ´óÊý£¬Ö»¿¼ÂÇÁËÕýÊýÇé¿ö£¬ IF(A.GE.LARGENUM) !Èç¹û»¹Òª¿¼ÂǸºÊýÇé¿öÔò¸ÄΪIF(ABS(A).GE.LARGENUM) A=1.0E10 !ÊÇ´óÊýÔòÉ趨ֵΪ1.0E10 ISLARGE=.TRUE. ENDIF IF(ISLARGE) PRINT 'A is very large' !Êä³öÐÅÏ¢£¬ÅжÏAΪ´óÊýÖ®ºóµÄºóÐø²Ù×÷ ENDIF |
3Â¥2013-04-03 15:37:00
fish8900
½ð³æ (СÓÐÃûÆø)
- Ó¦Öú: 0 (Ó×¶ùÔ°)
- ½ð±Ò: 701.9
- É¢½ð: 103
- Ìû×Ó: 105
- ÔÚÏß: 34Сʱ
- ³æºÅ: 1496643
- ×¢²á: 2011-11-17
- ÐÔ±ð: GG
- רҵ: Áã¼þ¼Ó¹¤ÖÆÔì
4Â¥2013-04-07 11:20:51













»Ø¸´´ËÂ¥