samer@0: % audio_format - make javax.sound.sampled.AudioFormat object
samer@0: %
samer@0: % audio_format :: 
samer@0: %    N:natural ~'number of channels',
samer@0: %    R:nonneg  ~'sampling rate in Hz'
samer@0: % -> javax.sound.sampled.AudioFormat.
samer@0: 
samer@0: function f=audio_format(channels,rate,bits,bigendian)
samer@0: 	if isnan(channels), channels=-1; end
samer@0: 	if isnan(rate), rate=-1; end
samer@0: 	if nargin<3, bits=16; end
samer@0: 	if nargin<4, bigendian=false; end
samer@0: 	f=javax.sound.sampled.AudioFormat(rate,bits,channels,true,bigendian);