[ CnUnix ] in KIDS ±Û ¾´ ÀÌ(By): superm (hohoho) ³¯ Â¥ (Date): 2002³â 7¿ù 12ÀÏ ±Ý¿äÀÏ ¿ÀÀü 06½Ã 38ºÐ 06ÃÊ Á¦ ¸ñ(Title): [Áú¹®]c ÇÁ·Î±×·¥¿¡¼­ fortran ÇÁ·Î±×·¥ ca Á¦¸ñó·³ cÇÁ·Î±×·¥³»¿¡¼­ fortran ¼­ºê·çƾÀ» callÇÒ·Á°í Çϴµ¥ ¾î¶»°Ô ÇؾßÇÏ´ÂÁö¿ä? ±×¸®°í ÀÌ ³ðµéÀ» ÄÄÆÄÀÏÇؼ­ executable ÇÒ¶§´Â ¾î¶»°Ô ÇؾßÇÏ´ÂÁö °í¼öµéÀÇ ´äº¯ ºÎŹµå¸³´Ï´Ù. ¿¹¸¦ µé¾î¼­ Æ÷Æ®¶õ ¼­ºê·çƾÀÌ ´ÙÀ½°ú °°À»¶§ SUB(INTEGER A(50), DOUBLE B(100), INTEGER C, DOUBLE D)¿Í °°ÀÌ »ý°åÀ»¶§(Á¦°¡ Æ÷Æ®¶õÀ» ¸ð¸£´Â °ü°è·Î À§ÀÇ ÇÁ·ÎÅäŸÀÔÀÌ Æ÷Æ®¶õ ½ÅÅýº¿¡ ¸Â´ÂÁö´Â ¸ð¸£°Ú½À´Ï´Ù.) ¾ÏÆ° À§¿Í °°Àº ³ðÀ» ¾¾ ÇÁ·Î±×·¥¿¡¼­ ÄÝÇÒ·Á¸é ¾î¶»°Ô ÇؾßÇÏ´ÂÁö.. [ CnUnix ] in KIDS ±Û ¾´ ÀÌ(By): terzeron (microkid) ³¯ Â¥ (Date): 2002³â 7¿ù 12ÀÏ ±Ý¿äÀÏ ¿ÀÀü 10½Ã 52ºÐ 53ÃÊ Á¦ ¸ñ(Title): Re: [Áú¹®]c ÇÁ·Î±×·¥¿¡¼­ fortran ÇÁ·Î±×¡¤ ÀÏ´Ü Æ÷Æ®¶õ ÆÄÀÏÀÌ ¼Ò½º ÄÚµå ÇüÅ·ΠÁ¸ÀçÇÑ´Ù¸é f2c³ª fort77°°Àº ÆÐÅ°Áö¸¦ ¼³Ä¡ÇÏ°í À̸¦ ÀÌ¿ëÇÏ¿© C·Î º¯È¯Çؼ­ ¾²½Ç ¼ö ÀÖ½À´Ï´Ù. http://www.netlib.org ¿ÀºêÁ§Æ®·Î Á¸ÀçÇÏ°í API¸¸ ¾Ë·ÁÁ® ÀÖ´Ù¸é (ÀÌ°Ç Àß ¸ô¶ó¼­ È®½ÇÄ¡ ¾ÊÀºµ¥) ½Ã½ºÅÛ¿¡ fortran ¶óÀ̺귯¸®°¡ ÀÖ´ÂÁö È®ÀÎÇغ¸½Ã°í ½Ã½ºÅÛ¿¡ µû¶ó ÀÌ°É ÀÌ¿ëÇÏ´Â ¹æ¹ýÀÌ ÀÖ½À´Ï´Ù. ¸¶Ä¡ C ÇÔ¼ö »ç¿ëÇϵí Æ÷Æ®¶õÀÇ ¼­ºê ·çƾÀ» »ç¿ëÇÏ´Â ¹æ¹ýÀÌ ÀÖ½À´Ï´Ù¸¸... ¸Å°³º¯¼öÀÇ type mismatch ¹®Á¦¸¦ ¶óÀ̺귯¸®¿¡¼­ ÇØ°áÇØÁà¾ß°ÚÁÒ. [ CnUnix ] in KIDS ±Û ¾´ ÀÌ(By): LEEIDE (jjunior) ³¯ Â¥ (Date): 2002³â 7¿ù 12ÀÏ ±Ý¿äÀÏ ¿ÀÈÄ 12½Ã 42ºÐ 22ÃÊ Á¦ ¸ñ(Title): Re: [Áú¹®]c ÇÁ·Î±×·¥¿¡¼­ fortran ÇÁ·Î±×¡¤ ¸»¾¸ÇϽô°ɷΠºÁ¼­´Â ¼Ò½º¸¦ °¡Áö°í °è½Å°Í °°±º¿ä. À­ºÐÀÌ ¼³¸íÇϽô ¹æ¹ýµµ ±¦ÂúÀ»°Å°í, ´Ù¸§ ·¹ÆÛ·±½º¸¦ º¸½Ã´Â °Íµµ ±¦ÂúÀ»°Ì´Ï´Ù. http://usgibm.nersc.gov/vacpp/batch/tasks/tucsampl.htm ¿©±âÀÇ Related Tasks ¸µÅ©¸¦ µû¶ó°¡ º¸½Ã¸é ´Ù ãÀ» ¼ö ÀÖÀ»°Í °°±º¿ä. ³»¿ëÀº ÀÚ¼¼È÷ º¸Áö ¾Ê¾Æ¼­ ÇÑ°¡Áö µ¡ºÙÀδٸé, C¿Í FortranÀº array¿¡ ´ëÇÑ majoringÀÌ ´Ù¸£´Ù´Â °ÍÀ» ¿°µÎ¿¡ µÎ½Ã±â ¹Ù¶ø´Ï´Ù. row major¿Í column major´Ï±î C¿¡¼­ Æ÷Æ®¶õÀ» ºÎ¸¦¶§ transpose¸¦ ½ÃÅ°°í, ³¡³­ÈÄ ´Ù½Ã transpose¸¦ ½ÃÄÑ¾ß Çß´ø°É·Î ±â¾ïÇÕ´Ï´Ù. ±×·³ Àß ÇØ°áÇϽñæ... ps. À¥¿¡¼­ °Ë»öÇÏ½Ã¸é ´õ ¸¹Àº °á°ú¸¦ ¾òÀ» ¼ö ÀÖÀ»°Ì´Ï´Ù.