{"type":"rich","image_url":"https://cdn.user.blog.st-hatena.com/default_entry_og_image/89449353/1514224948935857","blog_url":"https://koideforest.hatenadiary.com/","description":"\u7df4\u7fd2\u3068\u3057\u3066\u3001\u30aa\u30d7\u30b7\u30e7\u30ca\u30eb\u5f15\u6570\u3092\u4f7f\u3063\u305f\u30b5\u30f3\u30d7\u30eb\u30d7\u30ed\u30b0\u30e9\u30e0\u3092\u4f5c\u3063\u305f\u3002Fortran \u5165\u9580: \u30b5\u30d6\u30eb\u30fc\u30c1\u30f3\u3068\u95a2\u6570\uff08\u81ea\u4f5c\u624b\u7d9a\uff09 program ex call ex_sub( 1, z = 3 ) contains subroutine ex_sub( x, y, z ) implicit none !integer, intent( in ) :: x, y, z integer, optional :: x, y, z if ( .not. present( x ) ) x = 0 if ( .not. present( y ) ) y = 0 if ( .not. present( z ) ) \u2026","blog_title":"nano_exit","url":"https://koideforest.hatenadiary.com/entry/2019/12/09/233817","provider_name":"Hatena Blog","author_url":"https://blog.hatena.ne.jp/koideforest/","width":"100%","categories":["\u30d7\u30ed\u30b0\u30e9\u30df\u30f3\u30b0"],"published":"2019-12-09 23:38:17","version":"1.0","height":"190","title":"fortran \u306e\u30aa\u30d7\u30b7\u30e7\u30ca\u30eb\u5f15\u6570","author_name":"koideforest","provider_url":"https://hatena.blog","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fkoideforest.hatenadiary.com%2Fentry%2F2019%2F12%2F09%2F233817\" title=\"fortran \u306e\u30aa\u30d7\u30b7\u30e7\u30ca\u30eb\u5f15\u6570 - nano_exit\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>"}