{"id":159,"date":"2017-09-13T10:39:57","date_gmt":"2017-09-13T13:39:57","guid":{"rendered":"http:\/\/www.professores.uff.br\/diomarcesarlobao\/?page_id=159"},"modified":"2017-09-13T10:39:57","modified_gmt":"2017-09-13T13:39:57","slug":"ranges-f","status":"publish","type":"page","link":"https:\/\/www.professores.uff.br\/diomarcesarlobao\/ranges-f\/","title":{"rendered":"ranges.f"},"content":{"rendered":"<pre>c&lt;html&gt;\r\nc&lt;head&gt;&lt;title&gt;ranges.f&lt;\/title&gt;&lt;\/head&gt;\r\nc&lt;body&gt;\r\nc&lt;pre&gt;\r\n\r\n      program ranges\r\nc\r\nc       John Mahaffy,  Penn State University, CmpSc 201 Example\r\nc       1\/26\/96\r\nc\r\nc\r\nc  Display  The smallest and largest absolute values that\r\nc  can be represented with each of several data types\r\nc\r\nc  This relies on the Fortran 90 intrinsic functions:\r\nc\r\nc  tiny  -  Looks at the kind of real passed as its argument\r\nc           and returns the smallest absolute value that it\r\nc           could contain\r\nc\r\nc  huge -   Looks at the type and kind of its argument and\r\nc           returns the largest value that it could contain\r\nc\r\nc\r\n      real(4) r4,tr4,hr4\r\n      real(8) r8,tr8,hr8\r\n      real(16) r16,tr16,hr16\r\n      integer(1) i1,hi1\r\n      integer(2) i2,hi2\r\n      integer(4) i4,hi4\r\n      integer(8) i8,hi8\r\n      data r4,r8,r16,i4,i8\/1.,1.,1.,1,1\/\r\n      tr4=tiny(r4)\r\nc     &lt;a name=2&gt;&lt;font color=FF0000&gt;\r\n      hr4=huge(r4)\r\nc     &lt;\/font&gt;\r\nc     &lt;a name=1&gt;&lt;font color=235345&gt;\r\n      tr8=tiny(r8)\r\nc     &lt;\/font&gt;\r\n      hr8=huge(r8)\r\n      tr16=tiny(r16)\r\n      hr16=huge(r16)\r\n      hi1=huge(i1)\r\n      hi2=huge(i2)\r\n      hi4=huge(i4)\r\n      hi8=huge(i8)\r\n      print *, 'Range in absolute values of 4 Byte Reals:',\r\n     1   tr4,' to ',hr4\r\n      print *\r\n      print *, 'Range in absolute values of 8 Byte Reals:'\r\n      print *, tr8,' to ',hr8\r\n      print *\r\n      print *, 'Range in absolute values of 16 Byte Reals:'\r\n      print *, tr16,' to ',hr16\r\n      print *\r\n      print *, 'Largest signed integer in 1 Bytes:', hi1\r\n      print *\r\n      print *, 'Largest signed integer in 2 Bytes:', hi2\r\n      print *\r\n      print *, 'Largest signed integer in 4 Bytes:', hi4\r\n      print *\r\n      print *, 'Largest signed integer in 8 Bytes:', hi8\r\n      return\r\n      end\r\nc&lt;\/pre&gt;\r\nc&lt;\/body&gt;\r\nc&lt;\/html&gt;<\/pre>\n","protected":false},"excerpt":{"rendered":"<p>c&lt;html&gt; c&lt;head&gt;&lt;title&gt;ranges.f&lt;\/title&gt;&lt;\/head&gt; c&lt;body&gt; c&lt;pre&gt; program ranges c c John Mahaffy, Penn State University, CmpSc 201 Example c 1\/26\/96 c c c Display The smallest and largest absolute values that c can be represented with each of several data types c c This relies on the Fortran 90 intrinsic functions: c c tiny &#8211; Looks at [&hellip;]<\/p>\n","protected":false},"author":22,"featured_media":0,"parent":0,"menu_order":0,"comment_status":"closed","ping_status":"closed","template":"","meta":{"_exactmetrics_skip_tracking":false,"_exactmetrics_sitenote_active":false,"_exactmetrics_sitenote_note":"","_exactmetrics_sitenote_category":0,"footnotes":""},"categories":[],"tags":[],"class_list":["post-159","page","type-page","status-publish","hentry"],"_links":{"self":[{"href":"https:\/\/www.professores.uff.br\/diomarcesarlobao\/wp-json\/wp\/v2\/pages\/159","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.professores.uff.br\/diomarcesarlobao\/wp-json\/wp\/v2\/pages"}],"about":[{"href":"https:\/\/www.professores.uff.br\/diomarcesarlobao\/wp-json\/wp\/v2\/types\/page"}],"author":[{"embeddable":true,"href":"https:\/\/www.professores.uff.br\/diomarcesarlobao\/wp-json\/wp\/v2\/users\/22"}],"replies":[{"embeddable":true,"href":"https:\/\/www.professores.uff.br\/diomarcesarlobao\/wp-json\/wp\/v2\/comments?post=159"}],"version-history":[{"count":1,"href":"https:\/\/www.professores.uff.br\/diomarcesarlobao\/wp-json\/wp\/v2\/pages\/159\/revisions"}],"predecessor-version":[{"id":160,"href":"https:\/\/www.professores.uff.br\/diomarcesarlobao\/wp-json\/wp\/v2\/pages\/159\/revisions\/160"}],"wp:attachment":[{"href":"https:\/\/www.professores.uff.br\/diomarcesarlobao\/wp-json\/wp\/v2\/media?parent=159"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.professores.uff.br\/diomarcesarlobao\/wp-json\/wp\/v2\/categories?post=159"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.professores.uff.br\/diomarcesarlobao\/wp-json\/wp\/v2\/tags?post=159"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}