Fortran Wiki
stderr (changes)

Skip the Navigation Links | Home Page | All Pages | Recently Revised | Authors | Feeds | Export |

Showing changes from revision #1 to #2: (追記) Added (追記ここまで) | (削除) Removed (削除ここまで) | (削除) Chan (削除ここまで)(追記) ged (追記ここまで)

!-------------------------------------------------------------------------------
! Example: writing messages to standard error
! Standard: Fortran 2003
!
SUBROUTINE stderr(message)
! "@(#) stderr writes a message to standard error using a standard f2003 method"
 USE ISO_FORTRAN_ENV, ONLY : ERROR_UNIT ! access computing environment
 (追記) IMPLICIT (追記ここまで)(追記)  (追記ここまで)(追記) NONE (追記ここまで)(追記) 
 (追記ここまで)CHARACTER(LEN(削除) =*) (削除ここまで)(追記) =*), (追記ここまで)(削除)  (削除ここまで)(追記) INTENT (追記ここまで)(追記) ( (追記ここまで)(追記) IN (追記ここまで)(追記) ) (追記ここまで)(追記)  (追記ここまで):: message
 WRITE(ERROR_UNIT,'(a)')(追記) trim (追記ここまで)(追記) ( (追記ここまで)message(追記) ) (追記ここまで) ! write message to standard error
END SUBROUTINE stderr
!-------------------------------------------------------------------------------

Revised on January 20, 2023 14:48:10 by urbanjost (73.40.218.30) (640 characters / 0.0 pages)

Edit | Back in time (1 revision) | Hide changes | History | Views: Print | TeX | Source | Linked from: Code, FAQ