;
; ; SOURCE: spider/docs/techs/recon/newprogs/resizevol.spi ; ; PURPOSE: Resize a reference volume to the current window size. ; This procedure is run in the top-level project directory. ; ; I/O PARAMETERS AND FILES ARE SET HERE: ; ; ------------------ Input files ------------------------------------- [params] = 'params' ; Parameter file - window size (key #17) must be nonzero! [input] = 'orig_reference_volume' ; Input reference volume ; --------------- Output file ------------------------------------- [output] = 'reference_volume' ; Resized reference volume ; -------------- END BATCH HEADER ------------------------------ UD 17,[sp_winsiz] ; Retrieve window size from parameter file [params] IP ; Resize image [input] [output] [sp_winsiz],[sp_winsiz],[sp_winsiz] EN ;