User Tools

Site Tools


tutorials:fortran

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revision Previous revision
Next revision
Previous revision
tutorials:fortran [2022/03/19 09:49]
papa
tutorials:fortran [2022/03/19 09:52]
papa [CPU/Elapsed time report on program termination]
Line 17: Line 17:
 This message can be suppressed by adding the following line to your program source: This message can be suppressed by adding the following line to your program source:
  
-  CALL QUIETX+        CALL QUIETX
  
 ==== DATE subroutine bug ==== ==== DATE subroutine bug ====
Line 25: Line 25:
 DATE is supposed to return a ten-character string representing the current system date with the format: DATE is supposed to return a ten-character string representing the current system date with the format:
  
-  dd-mmm-yyb+''dd-mmm-yyb''
  
 Where: Where:
  
-| dd | Day of month (leading zero converted to blank) | +''dd'' | Day of month (leading zero converted to blank) | 
-| mmm | Three-character abbreviation of month ("Jan", "Feb", ...) | +''mmm'' | Three-character abbreviation of month ("Jan", "Feb", ...) | 
-| yy | Last two digits of year | +''yy'' | Last two digits of year | 
-| b | blank character |+''b'' | blank character |
  
-However, since the year 2000, the subroutine has set the "yybportion of the returned date to the //first// three digits of the current year, giving the same value for all years of a given decade. For example, for every year between 2010 and 2019, DATE returned "201" in the "yybportion of the date string.+However, since the year 2000, the DATE has set the ''yyb'' portion of the returned date to the //first three// digits of the current year, giving the same value for all years of a given decade. For example, for every year between 2010 and 2019, DATE returned "201" in the ''yyb'' portion of the date string.
  
-This renders the year portion of DATE's output useless for most purposes. A work-around is to program a date subroutine in another language that correctly processes the TOPS-20 system date (such as MACRO assembly language) and call that subroutine from your FORTRAN source instead of the FORTRAN DATE subroutine.+This renders the year portion of DATE's output useless for most purposes. A work-around is to program a date subroutine in another language that correctly processes the TOPS-20 system date (such as MACRO assembly language) and call that subroutine from your FORTRAN program instead of the FORTRAN DATE subroutine.
  
 ==== Input/Output Devices ==== ==== Input/Output Devices ====
tutorials/fortran.txt · Last modified: 2022/03/19 09:52 by papa