! REGUL.INIT TASK\FILE "Input dirty map" DIRTY$ TASK\FILE "Input support map" SUPPORT$ TASK\FILE "Input dirty beam" BEAM$ TASK\FILE "Output residual map" RESIDUAL$ TASK\FILE "Output regularized map" REGUL$ TASK\FILE "Output filter map" FILTER$ TASK\INTEGER "Maximum number of iteration" ITERMAX$ TASK\INTEGER "Minimum number of iteration" ITERMIN$ ! TASK\REAL "Relativ Euclidean norm of residual (% first)" FRES$ TASK\REAL "Euclidean norm of residual" ARES$ TASK\REAL "Relativ Truncation in the Fourier space" TRUNC$ TASK\LOGICAL "Interferometry" INTERF$ ! TASK\INTEGER "Bottom left corner of regularizing box" BLC$[4] 0 0 0 0 ! TASK\INTEGER "Top right corner of regularizing box" TRC$[4] 0 0 0 0 ! TASK\LOGICAL "Keep cleaning after convergence" KEEP$ NO TASK\GO