package Ġcom . c ave . library . test Utils Ċ Ċ fun Ġare Within Error ( value 1 : ĠDouble , Ġvalue 2 : ĠDouble , Ġerror : ĠDouble ): ĠBoolean Ġ{ ĊĠĠĠ Ġreturn Ġvalue 1 Ġ> Ġvalue 2 Ġ- Ġerror Ġ&& Ġvalue 1 Ġ< Ġvalue 2 Ġ+ Ġerror Ċ } Ċ Ċ fun Ġcreate Ident ify able Matrix 4 Double Array () Ġ= Ġdouble ArrayOf ( ĊĠĠĠĠ 0 . 0 , Ġ 0 . 1 , Ġ 0 . 2 , Ġ 0 . 3 , ĊĠĠĠĠ 1 . 0 , Ġ 1 . 1 , Ġ 1 . 2 , Ġ 1 . 3 , ĊĠĠĠĠ 2 . 0 , Ġ 2 . 1 , Ġ 2 . 2 , Ġ 2 . 3 , ĊĠĠĠĠ 3 . 0 , Ġ 3 . 1 , Ġ 3 . 2 , Ġ 3 . 3 , Ċ ) Ċ Ċ fun ĠFloat Array . toDouble Array (): ĠDouble Array Ġ{ ĊĠĠĠ Ġval Ġdouble Array Ġ= ĠDouble Array ( this . size ) ĊĠĠĠ Ġfor Ġ( i Ġin Ġthis . indices ) Ġ{ ĊĠĠĠĠĠĠĠ Ġdouble Array [ i ] Ġ= Ġthis [ i ]. toDouble () ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġreturn Ġdouble Array Ċ } Ċ Ċ fun ĠDouble Array . content Equals ( other : ĠDouble Array , Ġerror : ĠDouble ): ĠBoolean Ġ{ ĊĠĠĠ Ġreturn Ġfind Une qual ( other , Ġerror ) Ġ== Ġ- 1 Ċ } Ċ Ċ fun ĠDouble Array . find Une qual ( other : ĠDouble Array , Ġerror : ĠDouble ): ĠInt Ġ{ ĊĠĠĠ Ġfor Ġ( i Ġin Ġthis . indices ) Ġ{ ĊĠĠĠĠĠĠĠ Ġif Ġ(! are Within Error ( this [ i ], Ġother [ i ], Ġerror )) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġreturn Ġi ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĠĠĠ Ġreturn Ġ- 1 Ċ } Ċ