Synopsis
		sfsnr2 < signal.rsf noise=noise.rsf > snrf.rsf

SNR=10 log10(sum(clean)/sum(noise))

August 2019 program of the month:
http://ahay.org/blog/2019/08/10/program-of-the-month-sfsnr2/

Parameters
		file noise= auxiliary input file name

Used In
		JLU          apefsnsep/simplegroll fspfint/curve fspfint/noise_curve fspfint/sean   TCCS          asa/dipping asa/simple cs/sean cs/synth dealiase/linear dealiase/synth dealiase/synth30Hz dealiase2/bei dealiase2/hyper dealiase2/hypern demulemd/syn dsd/conflict dsd/field1 dsd/field2 dsd/sig halfthr/hyper halfthr/linear halfthr/sean intshape/fsyn intshape/sean ortho/orthocomplex ortho/orthocsimul ortho/orthofair pcastack/synth shemd/hyperoil shemd/synth1   XJTU          test/fpocs2d