#!/usr/bin/perl
# wrapper to run mapmask 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}/mapmask $ARG"); }
else { die "CCP4_BIN enviroment variable not found."; }
