package Ġde . h ud de ld ad del . euler . extensions Ċ Ċ import Ġde . h ud de ld ad del . euler . math . Fraction Ċ import Ġjava . math . BigInteger Ċ Ċ operator Ġfun ĠBigInteger . plus ( other : ĠFraction ): ĠFraction Ġ{ ĊĠĠĠ Ġreturn ĠFraction ( this , ĠBigInteger . ONE ) Ġ+ Ġother Ċ } Ċ Ċ fun ĠBigInteger . is Prime (): ĠBoolean Ġ{ ĊĠĠĠ Ġif Ġ( this Ġ< ĠBigInteger . TWO ) ĊĠĠĠĠĠĠĠ Ġreturn Ġfalse ĊĊĠĠĠ Ġif Ġ( BigInteger . ZERO Ġ== Ġthis . mod ( BigInteger . TWO )) ĊĠĠĠĠĠĠĠ Ġreturn Ġthis Ġ== ĠBigInteger . TWO ĊĊĠĠĠ Ġvar Ġl Ġ= Ġ 3 . to BigInteger () ĊĠĠĠ Ġwhile Ġ( l Ġ* Ġl Ġ<= Ġthis ) Ġ{ ĊĠĠĠĠĠĠĠ Ġif Ġ( BigInteger . ZERO Ġ== Ġthis . mod ( l )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġreturn Ġfalse ĊĠĠĠĠĠĠĠ Ġl Ġ+= ĠBigInteger . TWO ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġreturn Ġtrue Ċ } Ċ