/* Ċ Ġ* ĠCopyright Ġ 2 0 2 0 - 2 0 2 1 ĠSl aw om ir ĠC zer win ski Ċ Ġ* Ċ Ġ* ĠLicensed Ġunder Ġthe ĠApache ĠLicense , ĠVersion Ġ 2 . 0 Ġ( the Ġ" License "); Ċ Ġ* Ġyou Ġmay Ġnot Ġuse Ġthis Ġfile Ġexcept Ġin Ġcompliance Ġwith Ġthe ĠLicense . Ċ Ġ* ĠYou Ġmay Ġobtain Ġa Ġcopy Ġof Ġthe ĠLicense Ġat Ċ Ġ* Ċ Ġ* ĠĠĠĠ Ġhttp :// www . apache . org / licenses / LICENSE - 2 . 0 Ċ Ġ* Ċ Ġ* ĠUnless Ġrequired Ġby Ġapplicable Ġlaw Ġor Ġagreed Ġto Ġin Ġwriting , Ġsoftware Ċ Ġ* Ġdistributed Ġunder Ġthe ĠLicense Ġis Ġdistributed Ġon Ġan Ġ" AS ĠIS " ĠBASIS , Ċ Ġ* ĠWITHOUT ĠWARRANTIES ĠOR ĠCONDITIONS ĠOF ĠANY ĠKIND , Ġeither Ġexpress Ġor Ġimplied . Ċ Ġ* ĠSee Ġthe ĠLicense Ġfor Ġthe Ġspecific Ġlanguage Ġgoverning Ġpermissions Ġand Ċ Ġ* Ġlimitations Ġunder Ġthe ĠLicense . Ċ Ġ* Ċ Ġ*/ Ċ Ċ package Ġgraphics . g limp se . assertions Ċ Ċ import Ġgraphics . g limp se . types . Mat 3 Ċ import Ġgraphics . g limp se . types . Mat 4 Ċ import Ġgraphics . g limp se . types . Vec 3 Ċ import Ġgraphics . g limp se . types . Vec 4 Ċ import Ġkotlin . math . abs Ċ import Ġkotlin . test . assertEquals Ċ import Ġkotlin . test . assertTrue Ċ Ċ /** Ċ Ġ* ĠAssert s Ġthat Ġthe Ġ[ actual ] Ġvalue Ġis Ġequal Ġto Ġthe Ġ[ expected ] Ġvalue Ġplus / minus Ġ[ delta ], Ċ Ġ* Ġwith Ġan Ġoptional Ġ[ message ]. Ċ Ġ*/ Ċ fun ĠassertEquals With Delta ( ĊĠĠĠ Ġexpected : ĠFloat , ĊĠĠĠ Ġactual : ĠFloat , ĊĠĠĠ Ġdelta : ĠDelta Ġ= ĠDelta . F INE , ĊĠĠĠ Ġmessage : ĠString ? Ġ= Ġnull Ċ ) Ġ{ ĊĠĠĠ Ġval Ġmessage Prefix Ġ= Ġmessage Prefix ( message ) ĊĠĠĠ ĠassertTrue ( ĊĠĠĠĠĠĠĠ Ġactual Ġ= Ġabs ( x Ġ= Ġactual Ġ- Ġexpected ) Ġ< Ġdelta . delta , ĊĠĠĠĠĠĠĠ Ġmessage Ġ= Ġ"${ message Prefix } Expected Ġ<$ expected Ġ\ u 0 0 B 1 Ġ${ delta . delta } >, Ġactual Ġ<$ actual > ." ĊĠĠĠ Ġ) Ċ } Ċ Ċ /** Ċ Ġ* ĠAssert s Ġthat Ġthe Ġ[ actual ] Ġvalues Ġare Ġequal Ġto Ġthe Ġ[ expected ] Ġvalues Ġplus / minus Ġ[ delta ], Ċ Ġ* Ġwith Ġan Ġoptional Ġ[ message ]. Ċ Ġ*/ Ċ fun ĠassertEquals With Delta ( ĊĠĠĠ Ġexpected : ĠList < Float >, ĊĠĠĠ Ġactual : ĠList < Float >, ĊĠĠĠ Ġdelta : ĠDelta Ġ= ĠDelta . F INE , ĊĠĠĠ Ġmessage : ĠString ? Ġ= Ġnull Ċ ) Ġ{ ĊĠĠĠ Ġval Ġmessage Prefix Ġ= Ġmessage Prefix ( message ) ĊĠĠĠ ĠassertEquals ( ĊĠĠĠĠĠĠĠ Ġexpected Ġ= Ġexpected . size , ĊĠĠĠĠĠĠĠ Ġactual Ġ= Ġactual . size , ĊĠĠĠĠĠĠĠ Ġmessage Ġ= Ġ"${ message Prefix } Different Ġsizes " ĊĠĠĠ Ġ) ĊĠĠĠ Ġfor Ġ( index Ġin Ġexpected . indices ) Ġ{ ĊĠĠĠĠĠĠĠ ĠassertEquals With Delta ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġexpected Ġ= Ġexpected [ index ], ĊĠĠĠĠĠĠĠĠĠĠĠ Ġactual Ġ= Ġactual [ index ], ĊĠĠĠĠĠĠĠĠĠĠĠ Ġdelta Ġ= Ġdelta , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġmessage Ġ= Ġ"${ message Prefix } Different Ġvalues Ġat Ġindex Ġ<$ index >" ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠ Ġ} Ċ } Ċ Ċ /** Ċ Ġ* ĠAssert s Ġthat Ġthe Ġ[ actual ] Ġvector Ġis Ġequal Ġto Ġthe Ġ[ expected ] Ġvector Ġplus / minus Ġ[ delta ] Ċ Ġ* Ġ( comp ared Ġper Ġcoordinate ), Ġwith Ġan Ġoptional Ġ[ message ]. Ċ Ġ*/ Ċ fun ĠassertEquals With Delta ( ĊĠĠĠ Ġexpected : ĠVec 3 , ĊĠĠĠ Ġactual : ĠVec 3 , ĊĠĠĠ Ġdelta : ĠDelta Ġ= ĠDelta . F INE , ĊĠĠĠ Ġmessage : ĠString ? Ġ= Ġnull Ċ ) Ġ{ ĊĠĠĠ Ġval Ġmessage Prefix Ġ= Ġmessage Prefix ( message ) ĊĠĠĠ ĠassertEquals With Delta ( ĊĠĠĠĠĠĠĠ Ġexpected Ġ= Ġexpected . toFloat Array (). toList (), ĊĠĠĠĠĠĠĠ Ġactual Ġ= Ġactual . toFloat Array (). toList (), ĊĠĠĠĠĠĠĠ Ġdelta Ġ= Ġdelta , ĊĠĠĠĠĠĠĠ Ġmessage Ġ= Ġ"${ message Prefix } Vectors Ġare Ġdifferent " ĊĠĠĠ Ġ) Ċ } Ċ Ċ /** Ċ Ġ* ĠAssert s Ġthat Ġthe Ġ[ actual ] Ġvector Ġis Ġequal Ġto Ġthe Ġ[ expected ] Ġvector Ġplus / minus Ġ[ delta ] Ċ Ġ* Ġ( comp ared Ġper Ġcoordinate ), Ġwith Ġan Ġoptional Ġ[ message ]. Ċ Ġ*/ Ċ fun ĠassertEquals With Delta ( ĊĠĠĠ Ġexpected : ĠVec 4 , ĊĠĠĠ Ġactual : ĠVec 4 , ĊĠĠĠ Ġdelta : ĠDelta Ġ= ĠDelta . F INE , ĊĠĠĠ Ġmessage : ĠString ? Ġ= Ġnull Ċ ) Ġ{ ĊĠĠĠ Ġval Ġmessage Prefix Ġ= Ġmessage Prefix ( message ) ĊĠĠĠ ĠassertEquals With Delta ( ĊĠĠĠĠĠĠĠ Ġexpected Ġ= Ġexpected . toFloat Array (). toList (), ĊĠĠĠĠĠĠĠ Ġactual Ġ= Ġactual . toFloat Array (). toList (), ĊĠĠĠĠĠĠĠ Ġdelta Ġ= Ġdelta , ĊĠĠĠĠĠĠĠ Ġmessage Ġ= Ġ"${ message Prefix } Vectors Ġare Ġdifferent " ĊĠĠĠ Ġ) Ċ } Ċ Ċ /** Ċ Ġ* ĠAssert s Ġthat Ġthe Ġ[ actual ] Ġmatrix Ġis Ġequal Ġto Ġthe Ġ[ expected ] Ġmatrix Ġplus / minus Ġ[ delta ] Ċ Ġ* Ġ( comp ared Ġper Ġelement ), Ġwith Ġan Ġoptional Ġ[ message ]. Ċ Ġ*/ Ċ fun ĠassertEquals With Delta ( ĊĠĠĠ Ġexpected : ĠMat 3 , ĊĠĠĠ Ġactual : ĠMat 3 , ĊĠĠĠ Ġdelta : ĠDelta Ġ= ĠDelta . F INE , ĊĠĠĠ Ġmessage : ĠString ? Ġ= Ġnull Ċ ) Ġ{ ĊĠĠĠ Ġval Ġmessage Prefix Ġ= Ġmessage Prefix ( message ) ĊĠĠĠ ĠassertEquals With Delta ( ĊĠĠĠĠĠĠĠ Ġexpected Ġ= Ġexpected . toFloat Array (). toList (), ĊĠĠĠĠĠĠĠ Ġactual Ġ= Ġactual . toFloat Array (). toList (), ĊĠĠĠĠĠĠĠ Ġdelta Ġ= Ġdelta , ĊĠĠĠĠĠĠĠ Ġmessage Ġ= Ġ"${ message Prefix } Mat rices Ġare Ġdifferent " ĊĠĠĠ Ġ) Ċ } Ċ Ċ /** Ċ Ġ* ĠAssert s Ġthat Ġthe Ġ[ actual ] Ġmatrix Ġis Ġequal Ġto Ġthe Ġ[ expected ] Ġmatrix Ġplus / minus Ġ[ delta ] Ċ Ġ* Ġ( comp ared Ġper Ġelement ), Ġwith Ġan Ġoptional Ġ[ message ]. Ċ Ġ*/ Ċ fun ĠassertEquals With Delta ( ĊĠĠĠ Ġexpected : ĠMat 4 , ĊĠĠĠ Ġactual : ĠMat 4 , ĊĠĠĠ Ġdelta : ĠDelta Ġ= ĠDelta . F INE , ĊĠĠĠ Ġmessage : ĠString ? Ġ= Ġnull Ċ ) Ġ{ ĊĠĠĠ Ġval Ġmessage Prefix Ġ= Ġmessage Prefix ( message ) ĊĠĠĠ ĠassertEquals With Delta ( ĊĠĠĠĠĠĠĠ Ġexpected Ġ= Ġexpected . toFloat Array (). toList (), ĊĠĠĠĠĠĠĠ Ġactual Ġ= Ġactual . toFloat Array (). toList (), ĊĠĠĠĠĠĠĠ Ġdelta Ġ= Ġdelta , ĊĠĠĠĠĠĠĠ Ġmessage Ġ= Ġ"${ message Prefix } Mat rices Ġare Ġdifferent " ĊĠĠĠ Ġ) Ċ } Ċ Ċ private Ġfun Ġmessage Prefix ( message : ĠString ?) Ġ= Ġif Ġ( message Ġ== Ġnull ) Ġ"" Ġelse Ġ"$ message . Ġ" Ċ