############################################################
# Sample output from 'p410fsa'  illustrating use of 
# 'p410f' utility routines.
############################################################
% p410fsa
 usage: p410fsa <i4arg> <r8arg> <sarg>

% p410fsa  10  3.14   'A string'
 p410fsa: Integer argument           10
 p410fsa: Real*8 argument    3.140000000000000    
 p410fsa: String argument A string
 p410fsa: Next available unit number           10

% p410fsa bad_integer bad_real string
 p410fsa: Integer argument           -1
 p410fsa: Real*8 argument   -1.000000000000000    
 p410fsa: String argument string
 p410fsa: Next available unit number           10

############################################################
# For 'i4arg' and 'r8arg', a single dot ('.') is parsed into
# the default value.
############################################################
% p410fsa . . .
 p410fsa: Integer argument           -1
 p410fsa: Real*8 argument   -1.000000000000000    
 p410fsa: String argument .
 p410fsa: Next available unit number