SUBROUTINE ad_rpcg_lanczos
      RETURN
      END SUBROUTINE ad_rpcg_lanczos