Function: QCLN2 Purpose: Fast subtract routine for CLEAN Category: MISC Author: K.G. Begeman Use: CALL QCLN2( MAP, Input/Output REAL ARRAY AP , Input REAL ARRAY ACMP , Input REAL NL ) Input INTEGER MAP Array containing the 2D dirty data. AP Array containing the antenna pattern. ACMP Amplitude of component to subtract. NL Size in X of map. Updates: Apr 17, 1991: KGB Document created.