↑ Up

Prover9---2026-6A.UNS-CRf.s

View TPTP
Problem
Process solution in
SystemOnTSTP
Download .tgz
%------------------------------------------------------------------------------
% File     : Prover9---2026-6A
% Problem  : SWV633-1 : TPTP v9.3.1. Released v4.1.0.
% Transfm  : none
% Format   : tptp:raw
% Command  : prover9 -casc 300 -f /export/starexec/sandbox/benchmark/theBenchmark.p

% Computer : n009.cluster.edu
% Model    : x86_64 x86_64
% CPU      : Intel(R) Xeon(R) CPU E5-2620 v4 2.10GHz
% Memory   : 8046.5625MB
% OS       : Linux 6.8.0-71-generic
% CPULimit : 300s
% WCLimit  : 300s
% DateTime : Sun Sep 27 09:08:51 AM UTC 2026

% Result   : Unsatisfiable 9.30s 2.78s
% Output   : CNFRefutation 9.30s
% Verified : 
% SZS Type : Refutation
%            Derivation depth      :   16
%            Number of leaves      :    7
% Syntax   : Number of formulae    :   31 (  31 unt;   0 def)
%            Number of atoms       :   31 (  30 equ)
%            Maximal formula atoms :    1 (   1 avg)
%            Number of connectives :   14 (  14   ~;   0   |;   0   &)
%                                         (   0 <=>;   0  =>;   0  <=;   0 <~>)
%            Maximal formula depth :    4 (   2 avg)
%            Maximal term depth    :    7 (   2 avg)
%            Number of predicates  :    2 (   0 usr;   1 prp; 0-2 aty)
%            Number of functors    :   16 (  16 usr;   6 con; 0-3 aty)
%            Number of variables   :   16 (   0 sgn   7   !;   0   ?)

% Comments : 
%------------------------------------------------------------------------------
fof(cls_One__nat__def_0,axiom,
    c_HOL_Oone__class_Oone(tc_nat) = c_Suc(c_HOL_Ozero__class_Ozero(tc_nat)),
    file('theBenchmark.p',cls_One__nat__def_0) ).

cnf(c_287,plain,
    c_HOL_Oone__class_Oone(tc_nat) = c_Suc(c_HOL_Ozero__class_Ozero(tc_nat)),
    inference(clausify,[status(thm)],[cls_One__nat__def_0]) ).

cnf(c_288,plain,
    c_Suc(c_HOL_Ozero__class_Ozero(tc_nat)) = c_HOL_Oone__class_Oone(tc_nat),
    inference(copy,[status(thm)],[c_287]) ).

fof(cls_add__mult__distrib2_0,axiom,
    ! [VAR_0,VAR_1,VAR_2] : c_HOL_Otimes__class_Otimes(VAR_0,c_HOL_Oplus__class_Oplus(VAR_1,VAR_2,tc_nat),tc_nat) = c_HOL_Oplus__class_Oplus(c_HOL_Otimes__class_Otimes(VAR_0,VAR_1,tc_nat),c_HOL_Otimes__class_Otimes(VAR_0,VAR_2,tc_nat),tc_nat),
    file('theBenchmark.p',cls_add__mult__distrib2_0) ).

cnf(c_540,plain,
    c_HOL_Otimes__class_Otimes(A,c_HOL_Oplus__class_Oplus(B,C,tc_nat),tc_nat) = c_HOL_Oplus__class_Oplus(c_HOL_Otimes__class_Otimes(A,B,tc_nat),c_HOL_Otimes__class_Otimes(A,C,tc_nat),tc_nat),
    inference(clausify,[status(thm)],[cls_add__mult__distrib2_0]) ).

fof(cls_numeral__2__eq__2_0,axiom,
    c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat) = c_Suc(c_Suc(c_HOL_Ozero__class_Ozero(tc_nat))),
    file('theBenchmark.p',cls_numeral__2__eq__2_0) ).

cnf(c_592,plain,
    c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat) = c_Suc(c_Suc(c_HOL_Ozero__class_Ozero(tc_nat))),
    inference(clausify,[status(thm)],[cls_numeral__2__eq__2_0]) ).

cnf(c_593,plain,
    c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat) = c_Suc(c_HOL_Oone__class_Oone(tc_nat)),
    inference(paramod,[status(thm)],[c_288,c_592]) ).

fof(cls_nat__mult__2__right_0,axiom,
    ! [VAR_0] : c_HOL_Otimes__class_Otimes(VAR_0,c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),tc_nat) = c_HOL_Oplus__class_Oplus(VAR_0,VAR_0,tc_nat),
    file('theBenchmark.p',cls_nat__mult__2__right_0) ).

cnf(c_740,plain,
    c_HOL_Otimes__class_Otimes(A,c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),tc_nat) = c_HOL_Oplus__class_Oplus(A,A,tc_nat),
    inference(clausify,[status(thm)],[cls_nat__mult__2__right_0]) ).

cnf(c_741,plain,
    c_HOL_Otimes__class_Otimes(A,c_Suc(c_HOL_Oone__class_Oone(tc_nat)),tc_nat) = c_HOL_Oplus__class_Oplus(A,A,tc_nat),
    inference(paramod,[status(thm)],[c_593,c_740]) ).

fof(cls_nat__mult__2_0,axiom,
    ! [VAR_0] : c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),VAR_0,tc_nat) = c_HOL_Oplus__class_Oplus(VAR_0,VAR_0,tc_nat),
    file('theBenchmark.p',cls_nat__mult__2_0) ).

cnf(c_742,plain,
    c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),A,tc_nat) = c_HOL_Oplus__class_Oplus(A,A,tc_nat),
    inference(clausify,[status(thm)],[cls_nat__mult__2_0]) ).

cnf(c_743,plain,
    c_HOL_Otimes__class_Otimes(c_Suc(c_HOL_Oone__class_Oone(tc_nat)),A,tc_nat) = c_HOL_Oplus__class_Oplus(A,A,tc_nat),
    inference(paramod,[status(thm)],[c_593,c_742]) ).

fof(cls_nat__mult__commute_0,axiom,
    ! [VAR_0,VAR_1] : c_HOL_Otimes__class_Otimes(VAR_0,VAR_1,tc_nat) = c_HOL_Otimes__class_Otimes(VAR_1,VAR_0,tc_nat),
    file('theBenchmark.p',cls_nat__mult__commute_0) ).

cnf(c_779,plain,
    c_HOL_Otimes__class_Otimes(A,B,tc_nat) = c_HOL_Otimes__class_Otimes(B,A,tc_nat),
    inference(clausify,[status(thm)],[cls_nat__mult__commute_0]) ).

fof(cls_conjecture_0,axiom,
    c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),v_m,tc_nat)),c_HOL_Otimes__class_Otimes(v_i,c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),v_j,tc_nat),tc_nat),tc_Complex_Ocomplex) != c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),v_m,tc_nat)),c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex),
    file('theBenchmark.p',cls_conjecture_0) ).

cnf(c_783,plain,
    c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),v_m,tc_nat)),c_HOL_Otimes__class_Otimes(v_i,c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),v_j,tc_nat),tc_nat),tc_Complex_Ocomplex) != c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),v_m,tc_nat)),c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex),
    inference(clausify,[status(thm)],[cls_conjecture_0]) ).

cnf(c_785,plain,
    c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Otimes__class_Otimes(c_Suc(c_HOL_Oone__class_Oone(tc_nat)),v_m,tc_nat)),c_HOL_Otimes__class_Otimes(v_i,c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),v_j,tc_nat),tc_nat),tc_Complex_Ocomplex) != c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),v_m,tc_nat)),c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex),
    inference(paramod,[status(thm)],[c_593,c_783]) ).

cnf(c_786,plain,
    c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Otimes__class_Otimes(v_m,c_Suc(c_HOL_Oone__class_Oone(tc_nat)),tc_nat)),c_HOL_Otimes__class_Otimes(v_i,c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),v_j,tc_nat),tc_nat),tc_Complex_Ocomplex) != c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),v_m,tc_nat)),c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex),
    inference(paramod,[status(thm)],[c_779,c_785]) ).

cnf(c_787,plain,
    c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Oplus__class_Oplus(v_m,v_m,tc_nat)),c_HOL_Otimes__class_Otimes(v_i,c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),v_j,tc_nat),tc_nat),tc_Complex_Ocomplex) != c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),v_m,tc_nat)),c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex),
    inference(paramod,[status(thm)],[c_741,c_786]) ).

cnf(c_788,plain,
    c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Oplus__class_Oplus(v_m,v_m,tc_nat)),c_HOL_Otimes__class_Otimes(v_i,c_HOL_Otimes__class_Otimes(c_Suc(c_HOL_Oone__class_Oone(tc_nat)),v_j,tc_nat),tc_nat),tc_Complex_Ocomplex) != c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),v_m,tc_nat)),c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex),
    inference(paramod,[status(thm)],[c_593,c_787]) ).

cnf(c_789,plain,
    c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Oplus__class_Oplus(v_m,v_m,tc_nat)),c_HOL_Otimes__class_Otimes(v_i,c_HOL_Otimes__class_Otimes(v_j,c_Suc(c_HOL_Oone__class_Oone(tc_nat)),tc_nat),tc_nat),tc_Complex_Ocomplex) != c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),v_m,tc_nat)),c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex),
    inference(paramod,[status(thm)],[c_779,c_788]) ).

cnf(c_790,plain,
    c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Oplus__class_Oplus(v_m,v_m,tc_nat)),c_HOL_Otimes__class_Otimes(v_i,c_HOL_Oplus__class_Oplus(v_j,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex) != c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),v_m,tc_nat)),c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex),
    inference(paramod,[status(thm)],[c_741,c_789]) ).

cnf(c_791,plain,
    c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Oplus__class_Oplus(v_m,v_m,tc_nat)),c_HOL_Oplus__class_Oplus(c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex) != c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),v_m,tc_nat)),c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex),
    inference(paramod,[status(thm)],[c_540,c_790]) ).

cnf(c_792,plain,
    c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Oplus__class_Oplus(v_m,v_m,tc_nat)),c_HOL_Oplus__class_Oplus(c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex) != c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Otimes__class_Otimes(c_Suc(c_HOL_Oone__class_Oone(tc_nat)),v_m,tc_nat)),c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex),
    inference(paramod,[status(thm)],[c_593,c_791]) ).

cnf(c_793,plain,
    c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Oplus__class_Oplus(v_m,v_m,tc_nat)),c_HOL_Oplus__class_Oplus(c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex) != c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Otimes__class_Otimes(v_m,c_Suc(c_HOL_Oone__class_Oone(tc_nat)),tc_nat)),c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex),
    inference(paramod,[status(thm)],[c_779,c_792]) ).

cnf(c_794,plain,
    c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Oplus__class_Oplus(v_m,v_m,tc_nat)),c_HOL_Oplus__class_Oplus(c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex) != c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Oplus__class_Oplus(v_m,v_m,tc_nat)),c_HOL_Otimes__class_Otimes(c_Int_Onumber__class_Onumber__of(c_Int_OBit0(c_Int_OBit1(c_Int_OPls)),tc_nat),c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex),
    inference(paramod,[status(thm)],[c_741,c_793]) ).

cnf(c_795,plain,
    c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Oplus__class_Oplus(v_m,v_m,tc_nat)),c_HOL_Oplus__class_Oplus(c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex) != c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Oplus__class_Oplus(v_m,v_m,tc_nat)),c_HOL_Otimes__class_Otimes(c_Suc(c_HOL_Oone__class_Oone(tc_nat)),c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex),
    inference(paramod,[status(thm)],[c_593,c_794]) ).

cnf(c_796,plain,
    c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Oplus__class_Oplus(v_m,v_m,tc_nat)),c_HOL_Oplus__class_Oplus(c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex) != c_Power_Opower__class_Opower(c_FFT__Mirabelle_Oroot(c_HOL_Oplus__class_Oplus(v_m,v_m,tc_nat)),c_HOL_Oplus__class_Oplus(c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),c_HOL_Otimes__class_Otimes(v_i,v_j,tc_nat),tc_nat),tc_Complex_Ocomplex),
    inference(paramod,[status(thm)],[c_743,c_795]) ).

cnf(c_784,plain,
    $false,
    inference(copy,[status(thm)],[c_796]) ).

%------------------------------------------------------------------------------
%----ORIGINAL SYSTEM OUTPUT
% 0.00/0.03  % Problem  : SWV633-1 : TPTP v9.3.1. Released v4.1.0.
% 0.00/0.04  % Command  : prover9 -casc 300 -f /export/starexec/sandbox/benchmark/theBenchmark.p
% 0.11/0.36  % Computer : n009.cluster.edu
% 0.11/0.36  % Model    : x86_64 x86_64
% 0.11/0.36  % CPU      : Intel(R) Xeon(R) CPU E5-2620 v4 @ 2.10GHz
% 0.11/0.36  % Memory   : 8046.5625MB
% 0.11/0.36  % OS       : Linux 6.8.0-71-generic
% 0.11/0.36  % CPULimit : 300
% 0.11/0.36  % WCLimit  : 300
% 0.11/0.36  % DateTime : Sat Sep 26 14:38:59 UTC 2026
% 0.11/0.36  % CPUTime  : 
% 0.11/0.36  % Prover9 (64) version 2026-6A, July 2026, CASC-J13.
% 0.11/0.36  % Process 406560 was started by sandbox on n009,
% 0.11/0.36  % Sat Sep 26 14:38:59 2026
% 0.11/0.36  % The command was "/export/starexec/sandbox/solver/bin/prover9 -casc 300 -f /export/starexec/sandbox/benchmark/theBenchmark.p".
% 0.14/0.42  
% 0.14/0.42  % From the command line: assign(max_seconds, 300).
% 9.30/2.78  
% 9.30/2.78  % SZS status Unsatisfiable for theBenchmark
% 9.30/2.78  
% 9.30/2.78  % Proof 1 at 1.19 (+ 0.01) seconds.
% 9.30/2.78  % Length of proof is 12.
% 9.30/2.78  % Level of proof is 4.
% 9.30/2.78  % Maximum clause weight is 18.000.
% 9.30/2.78  % Given clauses 0.
% 9.30/2.78  
% 9.30/2.78  % SZS output start CNFRefutation for theBenchmark
% See solution above
%------------------------------------------------------------------------------