PetscSNESVIRedundancyCheckInternal
Date: 2013-07-02

    function
       petsc-3.4.2 2013-07-02 [err] = PetscSNESVIRedundancyCheckInternal(pidsnes,pidis_act,pidis_redact,funcname,ctx)
    %
    %   Used by vi->checkredundancy
    %
    %
    err       = 0;
    snes      = PetscSNES(pidsnes,'pobj');
    isact     = PetscIS(pidis_act,'pobj');
    is_redact = PetscIS(pidis_redact,'pobj');

    [err,is_redact] = feval(funcname,snes,isact,is_redact,ctx);