Parallel Kernel inheritance problem for Protect

Question

for the following program:

Unprotect[Power];
Power[0, 0] = 1;
Protect[Power];
ParallelTable[0^0, {4}]

I have the following result:

(kernel 1) Power::indet : Indeterminate expression 0^0 encountered.
(kernel 2) Power::indet : Indeterminate expression 0^0 encountered.
(kernel 1)Power::indet : Indeterminate expression 0^0 encountered.
(kernel 2)Power::indet : Indeterminate expression 0^0 encountered. {Indeterminate, Indeterminate, Indeterminate, Indeterminate}

This certainly means that the kernels do not inherit the modification of Power since

Table[0^0, {4}]

leads to:

{1, 1, 1, 1}

How can I do to propagate the modification of Power to the kernels ? Thank you

Answer 1

You need to evaluate the modification of Power in all Kernels. Try using ParallelEvaluate like this:

ParallelEvaluate[
    CompoundExpression[
       Unprotect[Power],
       Power[0, 0] = 1,
       Protect[Power]
    ]
];

Now

ParallelTable[0^0, {4}]
(* {1, 1, 1, 1} *)