TSTP Solution File: SET798+4 by nanoCoP---2.0

View Problem - Process Solution

%------------------------------------------------------------------------------
% File     : nanoCoP---2.0
% Problem  : SET798+4 : TPTP v8.1.2. Released v3.2.0.
% Transfm  : none
% Format   : tptp:raw
% Command  : nanocop.sh %s %d

% Computer : n010.cluster.edu
% Model    : x86_64 x86_64
% CPU      : Intel(R) Xeon(R) CPU E5-2620 v4 2.10GHz
% Memory   : 8042.1875MB
% OS       : Linux 3.10.0-693.el7.x86_64
% CPULimit : 300s
% WCLimit  : 300s
% DateTime : Fri May 19 11:56:27 EDT 2023

% Result   : Theorem 43.46s 42.74s
% Output   : Proof 43.46s
% Verified : 
% SZS Type : -

% Comments : 
%------------------------------------------------------------------------------
%----WARNING: Could not form TPTP format derivation
%------------------------------------------------------------------------------
%----ORIGINAL SYSTEM OUTPUT
% 0.06/0.12  % Problem  : SET798+4 : TPTP v8.1.2. Released v3.2.0.
% 0.06/0.12  % Command  : nanocop.sh %s %d
% 0.12/0.33  % Computer : n010.cluster.edu
% 0.12/0.33  % Model    : x86_64 x86_64
% 0.12/0.33  % CPU      : Intel(R) Xeon(R) CPU E5-2620 v4 @ 2.10GHz
% 0.12/0.33  % Memory   : 8042.1875MB
% 0.12/0.33  % OS       : Linux 3.10.0-693.el7.x86_64
% 0.12/0.33  % CPULimit : 300
% 0.12/0.33  % WCLimit  : 300
% 0.12/0.33  % DateTime : Thu May 18 19:06:12 EDT 2023
% 0.12/0.34  % CPUTime  : 
% 43.46/42.74  
% 43.46/42.74  /export/starexec/sandbox/benchmark/theBenchmark.p is a Theorem
% 43.46/42.74  Start of proof for /export/starexec/sandbox/benchmark/theBenchmark.p
% 43.46/42.74  %-----------------------------------------------------
% 43.46/42.74  ncf(matrix, plain, [(855 ^ _148652) ^ [] : [-(subset(852 ^ [], 849 ^ []))], (851 ^ _148652) ^ [] : [-(order(848 ^ [], 849 ^ []))], (864 ^ _148652) ^ [] : [lower_bound(860 ^ [], 848 ^ [], 852 ^ [])], (859 ^ _148652) ^ [] : [-(subset(852 ^ [], 853 ^ []))], (862 ^ _148652) ^ [] : [-(lower_bound(860 ^ [], 848 ^ [], 853 ^ []))], (857 ^ _148652) ^ [] : [-(subset(853 ^ [], 849 ^ []))], !, (318 ^ _117985) ^ [_128914, _128916] : [_128916 = _128914, -(product(_128916) = product(_128914))], (644 ^ _117985) ^ [_140916, _140918, _140920] : [lower_bound(_140916, _140920, _140918), 647 ^ _117985 : [(648 ^ _117985) ^ [_141060] : [member(_141060, _140918), -(apply(_140920, _140916, _141060))]]], (663 ^ _117985) ^ [_141668, _141670, _141672] : [greatest(_141668, _141672, _141670), 666 ^ _117985 : [(669 ^ _117985) ^ [_141886] : [member(_141886, _141670), -(apply(_141672, _141886, _141668))], (667 ^ _117985) ^ [] : [-(member(_141668, _141670))]]], (744 ^ _117985) ^ [_144627, _144629, _144631] : [min(_144627, _144631, _144629), 747 ^ _117985 : [(750 ^ _117985) ^ [_144851] : [-(_144627 = _144851), member(_144851, _144629), apply(_144631, _144851, _144627)], (748 ^ _117985) ^ [] : [-(member(_144627, _144629))]]], (587 ^ _117985) ^ [_138756, _138758] : [total_order(_138758, _138756), 590 ^ _117985 : [(593 ^ _117985) ^ [_138998, _139000] : [member(_139000, _138756), member(_138998, _138756), -(apply(_138758, _139000, _138998)), -(apply(_138758, _138998, _139000))], (591 ^ _117985) ^ [] : [-(order(_138758, _138756))]]], (120 ^ _117985) ^ [_122141, _122143, _122145, _122147, _122149, _122151, _122153, _122155] : [-(least_upper_bound(_122153, _122149, _122145, _122141)), least_upper_bound(_122155, _122151, _122147, _122143), _122155 = _122153, _122151 = _122149, _122147 = _122145, _122143 = _122141], (381 ^ _117985) ^ [_131158, _131160, _131162] : [-(member(_131162, intersection(_131160, _131158))), member(_131162, _131160), member(_131162, _131158)], (373 ^ _117985) ^ [_130907, _130909, _130911] : [member(_130911, intersection(_130909, _130907)), 376 ^ _117985 : [(379 ^ _117985) ^ [] : [-(member(_130911, _130907))], (377 ^ _117985) ^ [] : [-(member(_130911, _130909))]]], (478 ^ _117985) ^ [_134517, _134519] : [member(_134519, product(_134517)), 481 ^ _117985 : [(482 ^ _117985) ^ [_134658] : [member(_134658, _134517), -(member(_134519, _134658))]]], (459 ^ _117985) ^ [_133829, _133831] : [member(_133831, sum(_133829)), 463 ^ _117985 : [(466 ^ _117985) ^ [] : [-(member(_133831, 462 ^ [_133829, _133831]))], (464 ^ _117985) ^ [] : [-(member(462 ^ [_133829, _133831], _133829))]]], (441 ^ _117985) ^ [_133232, _133234, _133236] : [member(_133236, unordered_pair(_133234, _133232)), -(_133236 = _133234), -(_133236 = _133232)], (654 ^ _117985) ^ [_141247, _141249, _141251] : [656 ^ _117985 : [(659 ^ _117985) ^ [] : [apply(_141251, _141247, 655 ^ [_141247, _141249, _141251])], (657 ^ _117985) ^ [] : [-(member(655 ^ [_141247, _141249, _141251], _141249))]], -(lower_bound(_141247, _141251, _141249))], (286 ^ _117985) ^ [_127808, _127810, _127812, _127814] : [-(difference(_127814, _127810) = difference(_127812, _127808)), _127814 = _127812, _127810 = _127808], (266 ^ _117985) ^ [_127090, _127092, _127094, _127096] : [-(intersection(_127096, _127092) = intersection(_127094, _127090)), _127096 = _127094, _127092 = _127090], (429 ^ _117985) ^ [_132807, _132809] : [member(_132809, singleton(_132807)), -(_132809 = _132807)], (343 ^ _117985) ^ [_129915, _129917] : [equal_set(_129917, _129915), 346 ^ _117985 : [(349 ^ _117985) ^ [] : [-(subset(_129915, _129917))], (347 ^ _117985) ^ [] : [-(subset(_129917, _129915))]]], (48 ^ _117985) ^ [_119677, _119679, _119681, _119683, _119685, _119687] : [-(greatest(_119685, _119681, _119677)), greatest(_119687, _119683, _119679), _119687 = _119685, _119683 = _119681, _119679 = _119677], (760 ^ _117985) ^ [_145137, _145139, _145141] : [-(min(_145137, _145141, _145139)), member(_145137, _145139), 766 ^ _117985 : [(771 ^ _117985) ^ [] : [_145137 = 765 ^ [_145137, _145139, _145141]], (769 ^ _117985) ^ [] : [-(apply(_145141, 765 ^ [_145137, _145139, _145141], _145137))], (767 ^ _117985) ^ [] : [-(member(765 ^ [_145137, _145139, _145141], _145139))]]], (276 ^ _117985) ^ [_127449, _127451, _127453, _127455] : [-(union(_127455, _127451) = union(_127453, _127449)), _127455 = _127453, _127451 = _127449], (324 ^ _117985) ^ [_129215, _129217] : [subset(_129217, _129215), 327 ^ _117985 : [(328 ^ _117985) ^ [_129352] : [member(_129352, _129217), -(member(_129352, _129215))]]], (34 ^ _117985) ^ [_119205, _119207, _119209, _119211] : [-(total_order(_119209, _119205)), total_order(_119211, _119207), _119211 = _119209, _119207 = _119205], (497 ^ _117985) ^ [_135263, _135265] : [order(_135265, _135263), 500 ^ _117985 : [(525 ^ _117985) ^ [_136256, _136258, _136260] : [member(_136260, _135263), member(_136258, _135263), member(_136256, _135263), -(apply(_135265, _136260, _136256)), apply(_135265, _136260, _136258), apply(_135265, _136258, _136256)], (507 ^ _117985) ^ [_135739, _135741] : [member(_135741, _135263), member(_135739, _135263), -(_135741 = _135739), apply(_135265, _135741, _135739), apply(_135265, _135739, _135741)], (501 ^ _117985) ^ [_135517] : [member(_135517, _135263), -(apply(_135265, _135517, _135517))]]], (409 ^ _117985) ^ [_132056] : [member(_132056, empty_set)], (20 ^ _117985) ^ [_118761, _118763, _118765, _118767] : [-(equal_set(_118765, _118761)), equal_set(_118767, _118763), _118767 = _118765, _118763 = _118761], (196 ^ _117985) ^ [_124746, _124748, _124750, _124752, _124754, _124756] : [-(apply(_124754, _124750, _124746)), apply(_124756, _124752, _124748), _124756 = _124754, _124752 = _124750, _124748 = _124746], (435 ^ _117985) ^ [_132973, _132975] : [_132975 = _132973, -(member(_132975, singleton(_132973)))], (367 ^ _117985) ^ [_130648, _130650] : [subset(_130650, _130648), -(member(_130650, power_set(_130648)))], (182 ^ _117985) ^ [_124274, _124276, _124278, _124280] : [-(member(_124278, _124274)), member(_124280, _124276), _124280 = _124278, _124276 = _124274], (830 ^ _117985) ^ [_147713, _147715, _147717, _147719] : [-(greatest_lower_bound(_147719, _147717, _147715, _147713)), member(_147719, _147717), lower_bound(_147719, _147715, _147717), 840 ^ _117985 : [(845 ^ _117985) ^ [] : [apply(_147715, 839 ^ [_147713, _147715, _147717, _147719], _147719)], (843 ^ _117985) ^ [] : [-(lower_bound(839 ^ [_147713, _147715, _147717, _147719], _147715, _147717))], (841 ^ _117985) ^ [] : [-(member(839 ^ [_147713, _147715, _147717, _147719], _147713))]]], (102 ^ _117985) ^ [_121504, _121506, _121508, _121510, _121512, _121514] : [-(min(_121512, _121508, _121504)), min(_121514, _121510, _121506), _121514 = _121512, _121510 = _121508, _121506 = _121504], (312 ^ _117985) ^ [_128716, _128718] : [_128718 = _128716, -(sum(_128718) = sum(_128716))], (214 ^ _117985) ^ [_125327, _125329, _125331, _125333] : [-(order(_125331, _125327)), order(_125333, _125329), _125333 = _125331, _125329 = _125327], (488 ^ _117985) ^ [_134835, _134837] : [490 ^ _117985 : [(493 ^ _117985) ^ [] : [member(_134837, 489 ^ [_134835, _134837])], (491 ^ _117985) ^ [] : [-(member(489 ^ [_134835, _134837], _134835))]], -(member(_134837, product(_134835)))], (700 ^ _117985) ^ [_142996, _142998, _143000] : [-(least(_142996, _143000, _142998)), member(_142996, _142998), 706 ^ _117985 : [(709 ^ _117985) ^ [] : [apply(_143000, _142996, 705 ^ [_142996, _142998, _143000])], (707 ^ _117985) ^ [] : [-(member(705 ^ [_142996, _142998, _143000], _142998))]]], (775 ^ _117985) ^ [_145758, _145760, _145762, _145764] : [least_upper_bound(_145764, _145762, _145760, _145758), 778 ^ _117985 : [(783 ^ _117985) ^ [_146069] : [-(apply(_145760, _145764, _146069)), member(_146069, _145758), upper_bound(_146069, _145760, _145762)], (781 ^ _117985) ^ [] : [-(upper_bound(_145764, _145760, _145762))], (779 ^ _117985) ^ [] : [-(member(_145764, _145762))]]], (4 ^ _117985) ^ [_118216, _118218] : [_118218 = _118216, -(_118216 = _118218)], (729 ^ _117985) ^ [_144020, _144022, _144024] : [-(max(_144020, _144024, _144022)), member(_144020, _144022), 735 ^ _117985 : [(740 ^ _117985) ^ [] : [_144020 = 734 ^ [_144020, _144022, _144024]], (738 ^ _117985) ^ [] : [-(apply(_144024, _144020, 734 ^ [_144020, _144022, _144024]))], (736 ^ _117985) ^ [] : [-(member(734 ^ [_144020, _144022, _144024], _144022))]]], (713 ^ _117985) ^ [_143510, _143512, _143514] : [max(_143510, _143514, _143512), 716 ^ _117985 : [(719 ^ _117985) ^ [_143734] : [-(_143510 = _143734), member(_143734, _143512), apply(_143514, _143510, _143734)], (717 ^ _117985) ^ [] : [-(member(_143510, _143512))]]], (66 ^ _117985) ^ [_120286, _120288, _120290, _120292, _120294, _120296] : [-(least(_120294, _120290, _120286)), least(_120296, _120292, _120288), _120296 = _120294, _120292 = _120290, _120288 = _120286], (419 ^ _117985) ^ [_132458, _132460, _132462] : [-(member(_132462, difference(_132458, _132460))), member(_132462, _132458), -(member(_132462, _132460))], (793 ^ _117985) ^ [_146371, _146373, _146375, _146377] : [-(least_upper_bound(_146377, _146375, _146373, _146371)), member(_146377, _146375), upper_bound(_146377, _146373, _146375), 803 ^ _117985 : [(808 ^ _117985) ^ [] : [apply(_146373, _146377, 802 ^ [_146371, _146373, _146375, _146377])], (806 ^ _117985) ^ [] : [-(upper_bound(802 ^ [_146371, _146373, _146375, _146377], _146373, _146375))], (804 ^ _117985) ^ [] : [-(member(802 ^ [_146371, _146373, _146375, _146377], _146371))]]], (451 ^ _117985) ^ [_133500, _133502, _133504] : [452 ^ _117985 : [(455 ^ _117985) ^ [] : [_133504 = _133500], (453 ^ _117985) ^ [] : [_133504 = _133502]], -(member(_133504, unordered_pair(_133502, _133500)))], (260 ^ _117985) ^ [_126844, _126846] : [_126846 = _126844, -(power_set(_126846) = power_set(_126844))], (688 ^ _117985) ^ [_142589, _142591, _142593] : [least(_142589, _142593, _142591), 691 ^ _117985 : [(694 ^ _117985) ^ [_142807] : [member(_142807, _142591), -(apply(_142593, _142589, _142807))], (692 ^ _117985) ^ [] : [-(member(_142589, _142591))]]], (296 ^ _117985) ^ [_128139, _128141] : [_128141 = _128139, -(singleton(_128141) = singleton(_128139))], (547 ^ _117985) ^ [_136863, _136865] : [-(order(_136865, _136863)), 551 ^ _117985 : [(554 ^ _117985) ^ [] : [apply(_136865, 550 ^ [_136863, _136865], 550 ^ [_136863, _136865])], (552 ^ _117985) ^ [] : [-(member(550 ^ [_136863, _136865], _136863))]], 559 ^ _117985 : [(560 ^ _117985) ^ [] : [-(member(557 ^ [_136863, _136865], _136863))], (564 ^ _117985) ^ [] : [-(apply(_136865, 557 ^ [_136863, _136865], 558 ^ [_136863, _136865]))], (568 ^ _117985) ^ [] : [557 ^ [_136863, _136865] = 558 ^ [_136863, _136865]], (566 ^ _117985) ^ [] : [-(apply(_136865, 558 ^ [_136863, _136865], 557 ^ [_136863, _136865]))], (562 ^ _117985) ^ [] : [-(member(558 ^ [_136863, _136865], _136863))]], 572 ^ _117985 : [(575 ^ _117985) ^ [] : [-(member(570 ^ [_136863, _136865], _136863))], (573 ^ _117985) ^ [] : [-(member(569 ^ [_136863, _136865], _136863))], (583 ^ _117985) ^ [] : [apply(_136865, 569 ^ [_136863, _136865], 571 ^ [_136863, _136865])], (579 ^ _117985) ^ [] : [-(apply(_136865, 569 ^ [_136863, _136865], 570 ^ [_136863, _136865]))], (581 ^ _117985) ^ [] : [-(apply(_136865, 570 ^ [_136863, _136865], 571 ^ [_136863, _136865]))], (577 ^ _117985) ^ [] : [-(member(571 ^ [_136863, _136865], _136863))]]], (228 ^ _117985) ^ [_125771, _125773, _125775, _125777] : [-(subset(_125775, _125771)), subset(_125777, _125773), _125777 = _125775, _125773 = _125771], (675 ^ _117985) ^ [_142075, _142077, _142079] : [-(greatest(_142075, _142079, _142077)), member(_142075, _142077), 681 ^ _117985 : [(684 ^ _117985) ^ [] : [apply(_142079, 680 ^ [_142075, _142077, _142079], _142075)], (682 ^ _117985) ^ [] : [-(member(680 ^ [_142075, _142077, _142079], _142077))]]], (401 ^ _117985) ^ [_131786, _131788, _131790] : [402 ^ _117985 : [(405 ^ _117985) ^ [] : [member(_131790, _131786)], (403 ^ _117985) ^ [] : [member(_131790, _131788)]], -(member(_131790, union(_131788, _131786)))], (812 ^ _117985) ^ [_147100, _147102, _147104, _147106] : [greatest_lower_bound(_147106, _147104, _147102, _147100), 815 ^ _117985 : [(820 ^ _117985) ^ [_147411] : [-(apply(_147102, _147411, _147106)), member(_147411, _147100), lower_bound(_147411, _147102, _147104)], (818 ^ _117985) ^ [] : [-(lower_bound(_147106, _147102, _147104))], (816 ^ _117985) ^ [] : [-(member(_147106, _147104))]]], (411 ^ _117985) ^ [_132206, _132208, _132210] : [member(_132210, difference(_132206, _132208)), 414 ^ _117985 : [(417 ^ _117985) ^ [] : [member(_132210, _132208)], (415 ^ _117985) ^ [] : [-(member(_132210, _132206))]]], (607 ^ _117985) ^ [_139384, _139386] : [-(total_order(_139386, _139384)), order(_139386, _139384), 614 ^ _117985 : [(617 ^ _117985) ^ [] : [-(member(613 ^ [_139384, _139386], _139384))], (619 ^ _117985) ^ [] : [apply(_139386, 612 ^ [_139384, _139386], 613 ^ [_139384, _139386])], (621 ^ _117985) ^ [] : [apply(_139386, 613 ^ [_139384, _139386], 612 ^ [_139384, _139386])], (615 ^ _117985) ^ [] : [-(member(612 ^ [_139384, _139386], _139384))]]], (302 ^ _117985) ^ [_128385, _128387, _128389, _128391] : [-(unordered_pair(_128391, _128387) = unordered_pair(_128389, _128385)), _128391 = _128389, _128387 = _128385], (635 ^ _117985) ^ [_140495, _140497, _140499] : [637 ^ _117985 : [(640 ^ _117985) ^ [] : [apply(_140499, 636 ^ [_140495, _140497, _140499], _140495)], (638 ^ _117985) ^ [] : [-(member(636 ^ [_140495, _140497, _140499], _140497))]], -(upper_bound(_140495, _140499, _140497))], (334 ^ _117985) ^ [_129529, _129531] : [336 ^ _117985 : [(339 ^ _117985) ^ [] : [member(335 ^ [_129529, _129531], _129529)], (337 ^ _117985) ^ [] : [-(member(335 ^ [_129529, _129531], _129531))]], -(subset(_129531, _129529))], (468 ^ _117985) ^ [_134140, _134142] : [-(member(_134142, sum(_134140))), 469 ^ _117985 : [(470 ^ _117985) ^ [_134234] : [member(_134234, _134140), member(_134142, _134234)]]], (10 ^ _117985) ^ [_118420, _118422, _118424] : [-(_118424 = _118420), _118424 = _118422, _118422 = _118420], (84 ^ _117985) ^ [_120895, _120897, _120899, _120901, _120903, _120905] : [-(max(_120903, _120899, _120895)), max(_120905, _120901, _120897), _120905 = _120903, _120901 = _120899, _120897 = _120895], (242 ^ _117985) ^ [_126223, _126225, _126227, _126229, _126231, _126233] : [-(lower_bound(_126231, _126227, _126223)), lower_bound(_126233, _126229, _126225), _126233 = _126231, _126229 = _126227, _126225 = _126223], (160 ^ _117985) ^ [_123540, _123542, _123544, _123546, _123548, _123550, _123552, _123554] : [-(greatest_lower_bound(_123552, _123548, _123544, _123540)), greatest_lower_bound(_123554, _123550, _123546, _123542), _123554 = _123552, _123550 = _123548, _123546 = _123544, _123542 = _123540], (351 ^ _117985) ^ [_130152, _130154] : [-(equal_set(_130154, _130152)), subset(_130154, _130152), subset(_130152, _130154)], (391 ^ _117985) ^ [_131518, _131520, _131522] : [member(_131522, union(_131520, _131518)), -(member(_131522, _131520)), -(member(_131522, _131518))], (625 ^ _117985) ^ [_140164, _140166, _140168] : [upper_bound(_140164, _140168, _140166), 628 ^ _117985 : [(629 ^ _117985) ^ [_140308] : [member(_140308, _140166), -(apply(_140168, _140308, _140164))]]], (361 ^ _117985) ^ [_130482, _130484] : [member(_130484, power_set(_130482)), -(subset(_130484, _130482))], (142 ^ _117985) ^ [_122903, _122905, _122907, _122909, _122911, _122913] : [-(upper_bound(_122911, _122907, _122903)), upper_bound(_122913, _122909, _122905), _122913 = _122911, _122909 = _122907, _122905 = _122903], (2 ^ _117985) ^ [_118109] : [-(_118109 = _118109)]], input).
% 43.46/42.74  ncf('1',plain,[-(subset(852 ^ [], 853 ^ []))],start(859 ^ 0)).
% 43.46/42.74  ncf('1.1',plain,[subset(852 ^ [], 853 ^ []), 328 : member(655 ^ [860 ^ [], 852 ^ [], 848 ^ []], 852 ^ []), 328 : -(member(655 ^ [860 ^ [], 852 ^ [], 848 ^ []], 853 ^ []))],extension(324 ^ 1,bind([[_129215, _129217, _129352], [853 ^ [], 852 ^ [], 655 ^ [860 ^ [], 852 ^ [], 848 ^ []]]]))).
% 43.46/42.74  ncf('1.1.1',plain,[-(member(655 ^ [860 ^ [], 852 ^ [], 848 ^ []], 852 ^ [])), -(lower_bound(860 ^ [], 848 ^ [], 852 ^ []))],extension(654 ^ 4,bind([[_141247, _141249, _141251], [860 ^ [], 852 ^ [], 848 ^ []]]))).
% 43.46/42.74  ncf('1.1.1.1',plain,[lower_bound(860 ^ [], 848 ^ [], 852 ^ [])],extension(864 ^ 5)).
% 43.46/42.74  ncf('1.1.2',plain,[member(655 ^ [860 ^ [], 852 ^ [], 848 ^ []], 853 ^ []), 648 : -(apply(848 ^ [], 860 ^ [], 655 ^ [860 ^ [], 852 ^ [], 848 ^ []])), 648 : lower_bound(860 ^ [], 848 ^ [], 853 ^ [])],extension(644 ^ 4,bind([[_140916, _140918, _140920, _141060], [860 ^ [], 853 ^ [], 848 ^ [], 655 ^ [860 ^ [], 852 ^ [], 848 ^ []]]]))).
% 43.46/42.74  ncf('1.1.2.1',plain,[apply(848 ^ [], 860 ^ [], 655 ^ [860 ^ [], 852 ^ [], 848 ^ []]), -(lower_bound(860 ^ [], 848 ^ [], 852 ^ []))],extension(654 ^ 7,bind([[_141247, _141249, _141251], [860 ^ [], 852 ^ [], 848 ^ []]]))).
% 43.46/42.74  ncf('1.1.2.1.1',plain,[lower_bound(860 ^ [], 848 ^ [], 852 ^ [])],extension(864 ^ 8)).
% 43.46/42.74  ncf('1.1.2.2',plain,[-(lower_bound(860 ^ [], 848 ^ [], 853 ^ []))],extension(862 ^ 5)).
% 43.46/42.74  %-----------------------------------------------------
% 43.46/42.74  End of proof for /export/starexec/sandbox/benchmark/theBenchmark.p
%------------------------------------------------------------------------------