class ĠCell ( var Ġx : ĠInt ) Ġ{ ĊĠĠĠ Ġoperator Ġfun Ġget ( i : ĠInt ) Ġ= Ġx ĊĠĠĠ Ġoperator Ġfun Ġset ( i : ĠInt , Ġv : ĠInt ) Ġ{ Ġx Ġ= Ġv Ġ} Ċ } Ċ Ċ fun Ġbox (): ĠString Ġ{ ĊĠĠĠ Ġval Ġc Ġ= ĠCell ( 0 ) ĊĠĠĠ Ġ( c [ 0 ]) ++ ĊĠĠĠ Ġif Ġ( c [ 0 ] Ġ!= Ġ 1 ) Ġreturn Ġ" Fail " ĊĠĠĠ Ġreturn Ġ" OK " Ċ }