#!/usr/bin/perl
# wrapper to run fft for APR/wARP 7.x with refmac5D
for ($i=0,$ARGV=""; $i<@ARGV; $i++) {
  $ARG="$ARG $ARGV[$i]";
}
if ( $ENV{CCP4_BIN} !~ /^$/ ) { system("$ENV{CCP4_BIN}/fft $ARG"); }
else { die "CCP4_BIN enviroment variable not found."; }
