it's possible to access the output array of fftw:ft with a different size:
                                                   (image-processing:.abs
						      (make-array (list 600 600)
								  :element-type '(complex double-float)
								  :displaced-to *out-c*))