package Ġorg . from source . ki wi . core . number Ċ Ċ import Ġorg . from source . ki wi . core . should Ċ import Ġjava . math . BigDecimal Ċ import Ġkotlin . test . Test Ċ Ċ class ĠBigDecimal Should Test Ġ{ ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` should Ġfail Ġwhen Ġnumbers Ġare Ġnot Ġequ aled `() Ġ{ ĊĠĠĠĠĠĠĠ Ġrun Catch ing Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġmore . should Ġbe Equal Ġless ĊĠĠĠĠĠĠĠ Ġ}. should ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. be Failure ( AssertionError :: class ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. have Failure Message ("$ more Ġshould Ġ== Ġ$ less ") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` should Ġguarantee Ġnumbers Ġare Ġequ aled `() Ġ{ ĊĠĠĠĠĠĠĠ Ġmore . should Ġbe Equal Ġmore ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` should Ġfail Ġbecause Ġnegative Ġis Ġnot Ġpositive `() Ġ{ ĊĠĠĠĠĠĠĠ Ġrun Catch ing Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġnegative . should . be Positive () ĊĠĠĠĠĠĠĠ Ġ}. should ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. be Failure ( AssertionError :: class ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. have Failure Message ("$ negative Ġshould Ġbe Ġ> Ġ 0 ") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` should Ġfail Ġbecause Ġzero Ġis Ġnot Ġpositive `() Ġ{ ĊĠĠĠĠĠĠĠ Ġrun Catch ing Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġzero . should . be Positive () ĊĠĠĠĠĠĠĠ Ġ}. should ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. be Failure ( AssertionError :: class ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. have Failure Message ("$ zero Ġshould Ġbe Ġ> Ġ 0 ") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` should Ġguarantee Ġnumber Ġis Ġpositive `() Ġ{ ĊĠĠĠĠĠĠĠ Ġpositive . should . be Positive () ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` should Ġfail Ġbecause Ġpositive Ġnumber Ġis Ġnot Ġneg atives `() Ġ{ ĊĠĠĠĠĠĠĠ Ġrun Catch ing Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġpositive . should . be Negative () ĊĠĠĠĠĠĠĠ Ġ}. should ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. be Failure ( AssertionError :: class ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. have Failure Message ("$ positive Ġshould Ġbe Ġ< Ġ 0 ") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` should Ġfail Ġbecause Ġzero Ġnumber Ġis Ġnot Ġneg atives `() Ġ{ ĊĠĠĠĠĠĠĠ Ġrun Catch ing Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġzero . should . be Negative () ĊĠĠĠĠĠĠĠ Ġ}. should ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. be Failure ( AssertionError :: class ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. have Failure Message ("$ zero Ġshould Ġbe Ġ< Ġ 0 ") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` should Ġguarantee Ġnumber Ġis Ġnegative `() Ġ{ ĊĠĠĠĠĠĠĠ Ġnegative . should . be Negative () ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` should Ġfail Ġwhen Ġnumber Ġis Ġnot Ġless Ġthan `() Ġ{ ĊĠĠĠĠĠĠĠ Ġrun Catch ing Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġmore . should Ġbe LessThan Ġless ĊĠĠĠĠĠĠĠ Ġ}. should ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. be Failure ( AssertionError :: class ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. have Failure Message ("$ more Ġshould Ġbe Ġ< Ġ$ less ") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` should Ġguarantee Ġthan Ġnumber Ġis Ġless Ġthan `() Ġ{ ĊĠĠĠĠĠĠĠ Ġless . should Ġbe LessThan Ġmore ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` should Ġfail Ġwhen Ġnumber Ġis Ġnot Ġless Ġor Ġequal Ġthan `() Ġ{ ĊĠĠĠĠĠĠĠ Ġrun Catch ing Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġmore . should Ġbe Less OrEqual Than Ġless ĊĠĠĠĠĠĠĠ Ġ}. should ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. be Failure ( AssertionError :: class ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. have Failure Message ("$ more Ġshould Ġbe Ġ<= Ġ$ less ") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` should Ġfail Ġwhen Ġbecause Ġnumber Ġis Ġnot Ġzero `() Ġ{ ĊĠĠĠĠĠĠĠ Ġrun Catch ing Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġpositive . should . be Zero () ĊĠĠĠĠĠĠĠ Ġ}. should ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. be Failure ( AssertionError :: class ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. have Failure Message ("$ positive Ġshould Ġ== Ġ$ zero ") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` should Ġguarantee Ġnumber Ġis Ġzero `() Ġ{ ĊĠĠĠĠĠĠĠ Ġzero . should . be Zero () ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġcompanion Ġobject Ġ{ ĊĠĠĠĠĠĠĠ Ġprivate Ġval Ġmore Ġ= ĠBigDecimal . TEN ĊĠĠĠĠĠĠĠ Ġprivate Ġval Ġless Ġ= ĠBigDecimal . ONE ĊĊĠĠĠĠĠĠĠ Ġprivate Ġval Ġzero Ġ= ĠBigDecimal . ZERO ĊĠĠĠĠĠĠĠ Ġprivate Ġval Ġnegative Ġ= ĠBigDecimal ("- 2 0 . 0 1 ") ĊĠĠĠĠĠĠĠ Ġprivate Ġval Ġpositive Ġ= ĠBigDecimal (" 2 0 . 0 1 ") ĊĠĠĠ Ġ} Ċ }