From: clubley@remove_me.eisner.decus.org-Earth.UFP   
      
   On 2025-01-31, Arne Vajhøj wrote:   
   >   
   > Fortran got some other rather unique usages   
   > of logicals:   
   >   
   > $ type morelogfun.for   
   > program morelogfun   
   > logical*1 a(12)   
   > data a/1hH,1he,1hl,1hl,1ho,1h ,1hw,1ho,1hr,1hl,1hd,1h!/   
   > integer*4 i   
   > write(*,*) (a(i),i=1,12)   
   > write(*,'(1x,12a1)') (a(i),i=1,12)   
   > end   
   > $ for morelogfun   
      
   DEC Fortran still allows Hollerith constants without having to specify   
   a compiler option to enable them ?   
      
   For people who do not know historical Fortran, see:   
      
   https://en.wikipedia.org/wiki/Hollerith_constant   
      
   Hollerith constants have been removed from the current Fortran language   
   standards (and rightly so).   
      
   > $ lin morelogfun   
   > $ run morelogfun   
   > F T F F T F T T F F F T   
   > Hello world!   
   >   
      
   Simon.   
      
   --   
   Simon Clubley, clubley@remove_me.eisner.decus.org-Earth.UFP   
   Walking destinations on a map are further away than they appear.   
      
   --- SoupGate-DOS v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)   
|