FORTRAN 77 Language Reference

Examples

Example 1: Simple backspace


       BACKSPACE 2 
       LUNIT = 2 
       BACKSPACE LUNIT 

:

Example 2: Backspace with error trap:


       INTEGER CODE
       BACKSPACE ( 2, IOSTAT=CODE, ERR=9 ) 
       ... 
9      WRITE (*,*) 'Error during BACKSPACE' 
       STOP