c**ft2d2.mac FT of dimension 2, TPPI data ; Biosym Felix 2.3 ; macro for processing the indirect dimension (d2) of ; Bruker 2D TPPI data ; W. M. Westler (9/26/95) ; ; Allows for processing of data with fewer collected rows than the ; final matrix size ty ft2d2 get 'number of experiments' nexpts get 'matrix size (d2)' nmat eva zfsize (&nmat*2) bun 2 for vec 1 &vector lwb &vec ss &nexpts 90 zf &zfsize rft ph red swb &vec ty v &vec / &vector $ esc getout if &getout ne 0 quit next ty quit: bun 0 end