package Ġstri kt Ċ Ċ import Ġorg . junit . jupiter . api . Test Ċ import Ġorg . junit . jupiter . api . assert Throws Ċ import Ġorg . opent est 4 j . Assertion Failed Error Ċ import Ġstri kt . api . expect That Ċ import Ġstri kt . assertions . contains Exactly Ċ import Ġstri kt . assertions . first Ċ import Ġstri kt . assertions . get Ċ import Ġstri kt . assertions . has Length Ċ import Ġstri kt . assertions . has Size Ċ import Ġstri kt . assertions . is A Ċ import Ġstri kt . assertions . isEqualTo Ċ import Ġstri kt . assertions . isFalse Ċ import Ġstri kt . assertions . is GreaterThan Ċ import Ġstri kt . assertions . is LessThan Ċ import Ġstri kt . assertions . isNot EqualTo Ċ import Ġstri kt . assertions . isTrue Ċ import Ġstri kt . assertions . is UpperCase Ċ import Ġstri kt . assertions . length Ċ import Ġstri kt . assertions . message Ċ import Ġstri kt . assertions . startsWith Ċ import Ġstri kt . internal . opent est 4 j . Compound Assertion Failure Ċ Ċ class ĠExceptions Ġ{ ĊĠ Ġ@ Test ĊĠ Ġfun Ġ` chain ed Ġassertions Ġraise Ġan Ġatomic Ġexception `() Ġ{ ĊĠĠĠ ĠassertThrows < AssertionError > Ġ{ ĊĠĠĠĠĠ Ġexpect That (" fn ord "). has Length ( 5 ). is UpperCase (). startsWith (" f ") ĊĠĠĠ Ġ}. let Ġ{ Ġerror Ġ-> ĊĠĠĠĠĠ Ġexpect That ( error ) ĊĠĠĠĠĠĠĠ Ġ. is A < Assertion Failed Error >() ĊĠĠĠĠĠĠĠ Ġ. message ĊĠĠĠĠĠĠĠ Ġ. isEqualTo ( ĊĠĠĠĠĠĠĠĠĠ Ġ""" âĸ ¼ ĠExpect Ġthat Ġ" fn ord ": ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ| Ġ Ġâľĵ Ġhas Ġlength Ġ 5 ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ| Ġ Ġâľ Ĺ Ġis Ġupper Ġcase """ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. trim Margin () ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠ Ġ} ĊĠ Ġ} ĊĊĠ Ġ@ Test ĊĠ Ġfun Ġ` block Ġassertions Ġraise Ġa Ġcompound Ġexception `() Ġ{ ĊĠĠĠ ĠassertThrows < AssertionError > Ġ{ ĊĠĠĠĠĠ Ġexpect That (" fn ord ") Ġ{ ĊĠĠĠĠĠĠĠ Ġhas Length ( 5 ) ĊĠĠĠĠĠĠĠ Ġis UpperCase () ĊĠĠĠĠĠĠĠ Ġstart sWith (" f ") ĊĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ}. let Ġ{ Ġerror Ġ-> ĊĠĠĠĠĠ Ġexpect That ( error ) ĊĠĠĠĠĠĠĠ Ġ. is A < Compound Assertion Failure >() ĊĠĠĠĠĠĠĠ Ġ. and Ġ{ ĊĠĠĠĠĠĠĠĠĠ Ġmessage . isEqualTo ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ""" âĸ ¼ ĠExpect Ġthat Ġ" fn ord ": ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| Ġ Ġâľĵ Ġhas Ġlength Ġ 5 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| Ġ Ġâľ Ĺ Ġis Ġupper Ġcase ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| Ġ Ġâľĵ Ġstarts Ġwith Ġ" f """" ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ. trim Margin () ĊĠĠĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠĠĠ Ġget Ġ{ Ġfailures Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. has Size ( 1 ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. first () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. is A < Assertion Failed Error >() ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. message . isEqualTo ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ""" âĸ ¼ ĠExpect Ġthat Ġ" fn ord ": ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| Ġ Ġâľ Ĺ Ġis Ġupper Ġcase """ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ. trim Margin () ĊĠĠĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĠ Ġ} ĊĊĠ Ġ@ Test ĊĠ Ġfun Ġ` chains Ġinvol ving Ġ" and " Ġraise Ġa Ġsingle Ġcompound Ġexception `() Ġ{ ĊĠĠĠ ĠassertThrows < AssertionError > Ġ{ ĊĠĠĠĠĠ Ġexpect That (" fn ord ") ĊĠĠĠĠĠĠĠ Ġ. length ĊĠĠĠĠĠĠĠ Ġ. is GreaterThan ( 0 ) ĊĠĠĠĠĠĠĠ Ġ. and Ġ{ ĊĠĠĠĠĠĠĠĠĠ Ġis EqualTo ( 1 ) ĊĠĠĠĠĠĠĠĠĠ Ġis LessThan ( 2 ) ĊĠĠĠĠĠĠĠĠĠ Ġis Not EqualTo ( 5 ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ}. let Ġ{ Ġerror Ġ-> ĊĠĠĠĠĠ Ġexpect That ( error ) ĊĠĠĠĠĠĠĠ Ġ. is A < Compound Assertion Failure >() ĊĠĠĠĠĠĠĠ Ġ. and Ġ{ ĊĠĠĠĠĠĠĠĠĠ Ġmessage . isEqualTo ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ""" âĸ ¼ ĠExpect Ġthat Ġ" fn ord ": ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| Ġ Ġâĸ ¼ Ġvalue Ġof Ġproperty Ġlength : ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľĵ Ġis Ġgreater Ġthan Ġ 0 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľ Ĺ Ġis Ġequal Ġto Ġ 1 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠĠĠĠĠĠĠĠĠ Ġfound Ġ 5 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľ Ĺ Ġis Ġless Ġthan Ġ 2 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľ Ĺ Ġis Ġnot Ġequal Ġto Ġ 5 """ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ. trim Margin () ĊĠĠĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ. get Ġ{ Ġfailures Ġ} ĊĠĠĠĠĠĠĠ Ġ. has Size ( 3 ) ĊĠĠĠĠĠĠĠ Ġ. and Ġ{ ĊĠĠĠĠĠĠĠĠĠ Ġfirst () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. is A < Assertion Failed Error >() ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. message ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo ( ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ""" âĸ ¼ ĠExpect Ġthat Ġ" fn ord ": ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| Ġ Ġâĸ ¼ Ġvalue Ġof Ġproperty Ġlength : ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľ Ĺ Ġis Ġequal Ġto Ġ 1 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠĠĠĠĠĠĠĠĠ Ġfound Ġ 5 """ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ. trim Margin () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ. and Ġ{ ĊĠĠĠĠĠĠĠĠĠ Ġget ( 1 ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. is A < Assertion Failed Error >() ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. message ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo ( ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ""" âĸ ¼ ĠExpect Ġthat Ġ" fn ord ": ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| Ġ Ġâĸ ¼ Ġvalue Ġof Ġproperty Ġlength : ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľ Ĺ Ġis Ġless Ġthan Ġ 2 """ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ. trim Margin () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ. and Ġ{ ĊĠĠĠĠĠĠĠĠĠ Ġget ( 2 ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. is A < Assertion Failed Error >() ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. message ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo ( ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ""" âĸ ¼ ĠExpect Ġthat Ġ" fn ord ": ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| Ġ Ġâĸ ¼ Ġvalue Ġof Ġproperty Ġlength : ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľ Ĺ Ġis Ġnot Ġequal Ġto Ġ 5 """ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ. trim Margin () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĠ Ġ} ĊĊĠ Ġ@ Test ĊĠ Ġfun Ġ` blocks Ġinvol ving Ġ" and " Ġraise Ġa Ġsingle Ġcompound Ġexception `() Ġ{ ĊĠĠĠ ĠassertThrows < AssertionError > Ġ{ ĊĠĠĠĠĠ Ġexpect That (" fn ord ") Ġ{ ĊĠĠĠĠĠĠĠ Ġlength ĊĠĠĠĠĠĠĠĠĠ Ġ. is GreaterThan ( 0 ) ĊĠĠĠĠĠĠĠĠĠ Ġ. and Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġis EqualTo ( 1 ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġis LessThan ( 2 ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġis Not EqualTo ( 5 ) ĊĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ}. let Ġ{ Ġerror Ġ-> ĊĠĠĠĠĠ Ġexpect That ( error ) ĊĠĠĠĠĠĠĠ Ġ. is A < Compound Assertion Failure >() ĊĠĠĠĠĠĠĠ Ġ. and Ġ{ ĊĠĠĠĠĠĠĠĠĠ Ġmessage . isEqualTo ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ""" âĸ ¼ ĠExpect Ġthat Ġ" fn ord ": ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| Ġ Ġâĸ ¼ Ġvalue Ġof Ġproperty Ġlength : ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľĵ Ġis Ġgreater Ġthan Ġ 0 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľ Ĺ Ġis Ġequal Ġto Ġ 1 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠĠĠĠĠĠĠĠĠ Ġfound Ġ 5 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľ Ĺ Ġis Ġless Ġthan Ġ 2 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľ Ĺ Ġis Ġnot Ġequal Ġto Ġ 5 """ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ. trim Margin () ĊĠĠĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ. get Ġ{ Ġfailures Ġ} ĊĠĠĠĠĠĠĠ Ġ. has Size ( 1 ) ĊĠĠĠĠĠĠĠ Ġ. first () ĊĠĠĠĠĠĠĠ Ġ. is A < Assertion Failed Error >() ĊĠĠĠĠĠĠĠ Ġ. message ĊĠĠĠĠĠĠĠ Ġ. isEqualTo ( ĊĠĠĠĠĠĠĠĠĠ Ġ""" âĸ ¼ ĠExpect Ġthat Ġ" fn ord ": ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ| Ġ Ġâĸ ¼ Ġvalue Ġof Ġproperty Ġlength : ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľĵ Ġis Ġgreater Ġthan Ġ 0 ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľ Ĺ Ġis Ġequal Ġto Ġ 1 ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠĠĠĠĠĠĠĠĠ Ġfound Ġ 5 ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľ Ĺ Ġis Ġless Ġthan Ġ 2 ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľ Ĺ Ġis Ġnot Ġequal Ġto Ġ 5 """ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. trim Margin () ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠ Ġ} ĊĠ Ġ} ĊĊĠ Ġ@ Test ĊĠ Ġfun Ġ` composed Ġassertions Ġraise Ġan Ġatomic Ġexception `() Ġ{ ĊĠĠĠ ĠassertThrows < AssertionError > Ġ{ ĊĠĠĠĠĠ Ġexpect That ( listOf (" cat fl ap ", Ġ" rub ber plant ", Ġ" mar zip an ")) ĊĠĠĠĠĠĠĠ Ġ. contains Exactly (" cat fl ap ", Ġ" rub ber plant ") ĊĠĠĠ Ġ} ĊĠĠĠĠĠ Ġ. let Ġ{ Ġerror Ġ-> ĊĠĠĠĠĠĠĠ Ġexpect That ( error ) ĊĠĠĠĠĠĠĠĠĠ Ġ. is A < Assertion Failed Error >() ĊĠĠĠĠĠĠĠĠĠ Ġ. message ĊĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ""" âĸ ¼ ĠExpect Ġthat Ġ[" cat fl ap ", Ġ" rub ber plant ", Ġ" mar zip an "]: ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| Ġ Ġâľ Ĺ Ġcontains Ġexactly Ġthe Ġelements Ġ[" cat fl ap ", Ġ" rub ber plant "] ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľĵ Ġcontains Ġ" cat fl ap " ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľĵ ĠâĢ¦ at Ġindex Ġ 0 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľĵ Ġcontains Ġ" rub ber plant " ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľĵ ĠâĢ¦ at Ġindex Ġ 1 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľ Ĺ Ġcontains Ġno Ġfurther Ġelements ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠĠĠ Ġfound Ġ[" mar zip an "] """ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ. trim Margin () ĊĠĠĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠ Ġ} ĊĠ Ġ} ĊĊĠ Ġ@ Test ĊĠ Ġfun Ġ` composed Ġassertions Ġin Ġa Ġblock Ġare Ġgrouped `() Ġ{ ĊĠĠĠ ĠassertThrows < AssertionError > Ġ{ ĊĠĠĠĠĠ Ġexpect That ( listOf (" cat fl ap ", Ġ" rub ber plant ", Ġ" mar zip an ")) Ġ{ ĊĠĠĠĠĠĠĠ Ġhas Size ( 2 ) ĊĠĠĠĠĠĠĠ Ġcontains Exactly (" cat fl ap ", Ġ" rub ber plant ") ĊĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĠĠĠĠĠ Ġ. let Ġ{ Ġerror Ġ-> ĊĠĠĠĠĠĠĠ Ġexpect That ( error ) ĊĠĠĠĠĠĠĠĠĠ Ġ. is A < Compound Assertion Failure >() ĊĠĠĠĠĠĠĠĠĠ Ġ. get Ġ{ Ġfailures Ġ} ĊĠĠĠĠĠĠĠĠĠ Ġ. has Size ( 2 ) ĊĠĠĠĠĠĠĠĠĠ Ġ. and Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġfirst () ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ. is A < Assertion Failed Error >() ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ. message ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo ( ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ""" âĸ ¼ ĠExpect Ġthat Ġ[" cat fl ap ", Ġ" rub ber plant ", Ġ" mar zip an "]: ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| Ġ Ġâľ Ĺ Ġhas Ġsize Ġ 2 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠĠĠĠ Ġfound Ġ 3 """ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ. trim Margin () ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġget ( 1 ) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ. is A < Assertion Failed Error >() ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ. message ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo ( ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ""" âĸ ¼ ĠExpect Ġthat Ġ[" cat fl ap ", Ġ" rub ber plant ", Ġ" mar zip an "]: ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| Ġ Ġâľ Ĺ Ġcontains Ġexactly Ġthe Ġelements Ġ[" cat fl ap ", Ġ" rub ber plant "] ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľĵ Ġcontains Ġ" cat fl ap " ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľĵ ĠâĢ¦ at Ġindex Ġ 0 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľĵ Ġcontains Ġ" rub ber plant " ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľĵ ĠâĢ¦ at Ġindex Ġ 1 ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠ Ġâľ Ĺ Ġcontains Ġno Ġfurther Ġelements ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ| ĠĠĠĠĠ Ġfound Ġ[" mar zip an "] """ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ. trim Margin () ĊĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠ Ġ} ĊĠ Ġ} ĊĊĠ Ġ@ Test ĊĠ Ġfun Ġ` expected Ġand Ġactual Ġare Ġundefined Ġif Ġa Ġfailure Ġdoes Ġnot Ġspecify Ġan Ġactual `() Ġ{ ĊĠĠĠ ĠassertThrows < AssertionError > Ġ{ ĊĠĠĠĠĠ Ġexpect That (" fn ord ") ĊĠĠĠĠĠĠĠ Ġ. assert (" is Ġ% s ", Ġ" something ") Ġ{ ĊĠĠĠĠĠĠĠĠĠ Ġfail (" o Ġno es ") ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ}. let Ġ{ Ġerror Ġ-> ĊĠĠĠĠĠ Ġexpect That ( error ) ĊĠĠĠĠĠĠĠ Ġ. is A < Assertion Failed Error >() ĊĠĠĠĠĠĠĠ Ġ. and Ġ{ ĊĠĠĠĠĠĠĠĠĠ Ġget ( Assertion Failed Error :: is Expected Defined ). isFalse () ĊĠĠĠĠĠĠĠĠĠ Ġget ( Assertion Failed Error :: is Actual Defined ). isFalse () ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĠ Ġ} ĊĊĠ Ġ@ Test ĊĠ Ġfun Ġ` expected Ġand Ġactual Ġare Ġdefined Ġif Ġa Ġfailure Ġspecifies Ġan Ġactual `() Ġ{ ĊĠĠĠ ĠassertThrows < AssertionError > Ġ{ ĊĠĠĠĠĠ Ġexpect That (" fn ord ") ĊĠĠĠĠĠĠĠ Ġ. assert (" is Ġ% s ", Ġ" something ") Ġ{ ĊĠĠĠĠĠĠĠĠĠ Ġfail (" something Ġelse ", Ġ" o Ġno es ") ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ}. let Ġ{ Ġerror Ġ-> ĊĠĠĠĠĠ Ġexpect That ( error ) ĊĠĠĠĠĠĠĠ Ġ. is A < Assertion Failed Error >() ĊĠĠĠĠĠĠĠ Ġ. and Ġ{ ĊĠĠĠĠĠĠĠĠĠ Ġget ( Assertion Failed Error :: is Expected Defined ). isTrue () ĊĠĠĠĠĠĠĠĠĠ Ġget Ġ{ Ġexpected . value Ġ}. isEqualTo (" something ") ĊĠĠĠĠĠĠĠĠĠ Ġget ( Assertion Failed Error :: is Actual Defined ). isTrue () ĊĠĠĠĠĠĠĠĠĠ Ġget Ġ{ Ġactual . value Ġ}. isEqualTo (" something Ġelse ") ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĠ Ġ} Ċ } Ċ