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

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

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

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