{"published":"2018-04-22 02:21:57","author_url":"https://blog.hatena.ne.jp/fortran66/","author_name":"fortran66","blog_title":"fortran66\u306e\u30d6\u30ed\u30b0","width":"100%","provider_url":"https://hatena.blog","height":"190","blog_url":"https://fortran66.hatenablog.com/","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Ffortran66.hatenablog.com%2Fentry%2F2018%2F04%2F22%2F022157\" title=\"\u3010\u30e1\u30e2\u5e33\u3011\u30a2\u30cb\u30e1 gif  - fortran66\u306e\u30d6\u30ed\u30b0\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","categories":[],"type":"rich","version":"1.0","image_url":"https://cdn-ak.f.st-hatena.com/images/fotolife/f/fortran66/20180422/20180422021827.gif","title":"\u3010\u30e1\u30e2\u5e33\u3011\u30a2\u30cb\u30e1 gif ","url":"https://fortran66.hatenablog.com/entry/2018/04/22/022157","provider_name":"Hatena Blog","description":"animated gif \u30c6\u30b9\u30c8 \u5148\u4eba\u306e\u99b4\u3089\u3057\u3066\u304f\u308c\u305f\u9053\u3092\u9032\u3093\u3067\u3001\u5b9f\u884c\u4f8b\u3092\u4f5c\u308b\u3053\u3068\u304c\u3067\u304d\u307e\u3057\u305f\u3002 GIF\u30d5\u30a9\u30fc\u30de\u30c3\u30c8\u306e\u8a73\u7d30\u6b21\u306f LZW \u90e8\u5206\u306b\u9032\u307f\u305f\u3044\u3068\u601d\u3044\u307e\u3059\u3002 \u5b9f\u884c\u7d50\u679c \u30bd\u30fc\u30b9\u30fb\u30d7\u30ed\u30b0\u30e9\u30e0 program gif use, intrinsic :: iso_fortran_env implicit none integer :: iw integer(int16) :: m integer(int16), parameter :: nx = 160, ny = 160 type :: t_gif_header sequence character(3) :: signature = 'GI\u2026"}