WRAPIT -in -L fftpack5 -l fftpack -n spectra2d spc2di.f 
