package Ġgov . cdc . prime . router Ċ Ċ import Ġassert k . assertThat Ċ import Ġassert k . assertions . isEqualTo Ċ import Ġassert k . assertions . isNull Ċ import Ġgov . cdc . prime . router . metadata . Lookup Table Ċ import Ġjava . io . ByteArray InputStream Ċ import Ġjava . lang . IllegalArgumentException Ċ import Ġkotlin . test . Test Ċ import Ġkotlin . test . assert Fails Ċ import Ġkotlin . test . assert Fails With Ċ import Ġkotlin . test . fail Ċ Ċ class ĠMapper Tests Ġ{ ĊĠĠĠ Ġprivate Ġval Ġli vd Path Ġ= Ġ"./ metadata / tables / LI VD - SAR S - Co V - 2 - 2 0 2 1 - 0 1 - 2 0 . csv " ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test ĠMiddle Initial Mapper `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠMiddle Initial Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf (" test _ element ") ĊĠĠĠĠĠĠĠ Ġval Ġelement Ġ= ĠElement (" test ") ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element , Ġargs , ĠlistOf ( Element And Value ( element , Ġ" R ick ")) )). isEqualTo (" R ") ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element , Ġargs , ĠlistOf ( Element And Value ( element , Ġ" rick ")) )). isEqualTo (" R ") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test ĠLookup Mapper `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġcsv Ġ= Ġ""" ĊĠĠĠĠĠĠĠĠĠĠĠ Ġa , b , c ĊĠĠĠĠĠĠĠĠĠĠĠĠ 1 , 2 , x ĊĠĠĠĠĠĠĠĠĠĠĠĠ 3 , 4 , y ĊĠĠĠĠĠĠĠĠĠĠĠĠ 5 , 6 , z ĊĠĠĠĠĠĠĠ Ġ""" . trim Indent () ĊĠĠĠĠĠĠĠ Ġval Ġtable Ġ= ĠLookup Table . read ( ByteArray InputStream ( csv . toByteArray ())) ĊĠĠĠĠĠĠĠ Ġval Ġschema Ġ= ĠSchema ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" test ", Ġtopic Ġ= Ġ" test ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġelements Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠElement (" a ", Ġtype Ġ= ĠElement . Type . TABLE , Ġtable Ġ= Ġ" test ", Ġtable Column Ġ= Ġ" a "), ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠElement (" c ", Ġtype Ġ= ĠElement . Type . TABLE , Ġtable Ġ= Ġ" test ", Ġtable Column Ġ= Ġ" c ") ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġmetadata Ġ= ĠMetadata ( schema Ġ= Ġschema , Ġtable Ġ= Ġtable , ĠtableName Ġ= Ġ" test ") ĊĠĠĠĠĠĠĠ Ġval Ġindex Element Ġ= Ġmetadata . find Schema (" test ") ?. findElement (" a ") Ġ?: Ġfail ("") ĊĠĠĠĠĠĠĠ Ġval Ġlookup Element Ġ= Ġmetadata . find Schema (" test ") ?. findElement (" c ") Ġ?: Ġfail ("") ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠLookup Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf (" a ") ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . value Names ( lookup Element , Ġargs )). isEqualTo ( listOf (" a ")) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( lookup Element , Ġargs , ĠlistOf ( Element And Value ( index Element , Ġ" 3 ")) )). isEqualTo (" y ") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test ĠLookup Mapper Ġwith Ġtwo `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġcsv Ġ= Ġ""" ĊĠĠĠĠĠĠĠĠĠĠĠ Ġa , b , c ĊĠĠĠĠĠĠĠĠĠĠĠĠ 1 , 2 , x ĊĠĠĠĠĠĠĠĠĠĠĠĠ 3 , 4 , y ĊĠĠĠĠĠĠĠĠĠĠĠĠ 5 , 6 , z ĊĠĠĠĠĠĠĠ Ġ""" . trim Indent () ĊĠĠĠĠĠĠĠ Ġval Ġtable Ġ= ĠLookup Table . read ( ByteArray InputStream ( csv . toByteArray ())) ĊĠĠĠĠĠĠĠ Ġval Ġschema Ġ= ĠSchema ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" test ", Ġtopic Ġ= Ġ" test ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġelements Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠElement (" a ", Ġtype Ġ= ĠElement . Type . TABLE , Ġtable Ġ= Ġ" test ", Ġtable Column Ġ= Ġ" a "), ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠElement (" b ", Ġtype Ġ= ĠElement . Type . TABLE , Ġtable Ġ= Ġ" test ", Ġtable Column Ġ= Ġ" b "), ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠElement (" c ", Ġtype Ġ= ĠElement . Type . TABLE , Ġtable Ġ= Ġ" test ", Ġtable Column Ġ= Ġ" c ") ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġmetadata Ġ= ĠMetadata ( schema Ġ= Ġschema , Ġtable Ġ= Ġtable , ĠtableName Ġ= Ġ" test ") ĊĠĠĠĠĠĠĠ Ġval Ġlookup Element Ġ= Ġmetadata . find Schema (" test ") ?. findElement (" c ") Ġ?: Ġfail ("") ĊĠĠĠĠĠĠĠ Ġval Ġindex Element Ġ= Ġmetadata . find Schema (" test ") ?. findElement (" a ") Ġ?: Ġfail ("") ĊĠĠĠĠĠĠĠ Ġval Ġindex 2 Element Ġ= Ġmetadata . find Schema (" test ") ?. findElement (" b ") Ġ?: Ġfail ("") ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠLookup Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf (" a ", Ġ" b ") ĊĠĠĠĠĠĠĠ Ġval Ġelement And Values Ġ= ĠlistOf ( Element And Value ( index Element , Ġ" 3 "), ĠElement And Value ( index 2 Element , Ġ" 4 ")) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . value Names ( lookup Element , Ġargs )). isEqualTo ( listOf (" a ", Ġ" b ")) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( lookup Element , Ġargs , Ġelement And Values )). isEqualTo (" y ") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġli vd Lookup Ġwith ĠDevice Id `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġlookup Table Ġ= ĠLookup Table . read ( li vd Path ) ĊĠĠĠĠĠĠĠ Ġval Ġcode Element Ġ= ĠElement ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" ordered _ test _ code ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtable Ref Ġ= Ġlookup Table , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtable Column Ġ= Ġ" Test ĠOrdered ĠLO INC ĠCode " ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġdevice Element Ġ= ĠElement (" device _ id ") ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠL IV DL ook up Mapper () ĊĊĠĠĠĠĠĠĠ Ġ// ĠTest Ġwith Ġa ĠE UA ĊĠĠĠĠĠĠĠ Ġval Ġev 1 Ġ= ĠElement And Value ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġdevice Element , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" Bin ax NOW ĠCOVID - 1 9 ĠAg ĠCard ĠHome ĠTest _ Ab bot t ĠDi agnostics ĠS car bor ough , ĠInc ._ E UA " ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( code Element , Ġempty List (), ĠlistOf ( ev 1 ))). isEqualTo (" 9 4 5 5 8 - 4 ") ĊĊĠĠĠĠĠĠĠ Ġ// ĠTest Ġwith Ġa Ġtruncated Ġdevice ĠID ĊĠĠĠĠĠĠĠ Ġval Ġev 1 a Ġ= ĠElement And Value ( device Element , Ġ" Bin ax NOW ĠCOVID - 1 9 ĠAg ĠCard ĠHome ĠTest _ Ab b # ") ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( code Element , Ġempty List (), ĠlistOf ( ev 1 a ))). isEqualTo (" 9 4 5 5 8 - 4 ") ĊĊĠĠĠĠĠĠĠ Ġ// ĠTest Ġwith Ġa ĠID ĠNOW Ġdevice Ġid Ġwhich Ġis Ġhas Ġa ĠF DA Ġnumber ĊĠĠĠĠĠĠĠ Ġval Ġev 2 Ġ= ĠElement And Value ( device Element , Ġ" 1 0 8 1 1 8 7 7 0 1 1 2 6 9 _ DI I ") ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( code Element , Ġempty List (), ĠlistOf ( ev 2 ))). isEqualTo (" 9 4 5 3 4 - 5 ") ĊĊĠĠĠĠĠĠĠ Ġ// ĠWith ĠG UD ID ĠDI ĊĠĠĠĠĠĠĠ Ġval Ġev 3 Ġ= ĠElement And Value ( device Element , Ġ" 1 0 8 1 1 8 7 7 0 1 1 2 6 9 ") ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( code Element , Ġempty List (), ĠlistOf ( ev 3 ))). isEqualTo (" 9 4 5 3 4 - 5 ") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġli vd Lookup Ġwith ĠE quipment ĠModel ĠName `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġlookup Table Ġ= ĠLookup Table . read ( li vd Path ) ĊĠĠĠĠĠĠĠ Ġval Ġcode Element Ġ= ĠElement ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" ordered _ test _ code ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtable Ref Ġ= Ġlookup Table , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtable Column Ġ= Ġ" Test ĠOrdered ĠLO INC ĠCode " ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġmodel Element Ġ= ĠElement (" equipment _ model _ name ") ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠL IV DL ook up Mapper () ĊĊĠĠĠĠĠĠĠ Ġ// ĠTest Ġwith Ġa ĠE UA ĊĠĠĠĠĠĠĠ Ġval Ġev 1 Ġ= ĠElement And Value ( model Element , Ġ" Bin ax NOW ĠCOVID - 1 9 ĠAg ĠCard ") ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( code Element , Ġempty List (), ĠlistOf ( ev 1 ))). isEqualTo (" 9 4 5 5 8 - 4 ") ĊĊĠĠĠĠĠĠĠ Ġ// ĠTest Ġwith Ġa ĠID ĠNOW Ġdevice Ġid ĊĠĠĠĠĠĠĠ Ġval Ġev 2 Ġ= ĠElement And Value ( model Element , Ġ" ID ĠNOW ") ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( code Element , Ġempty List (), ĠlistOf ( ev 2 ))). isEqualTo (" 9 4 5 3 4 - 5 ") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġli vd Lookup Ġfor ĠS of ia Ġ 2 `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġlookup Table Ġ= ĠLookup Table . read ("./ metadata / tables / LI VD - SAR S - Co V - 2 - 2 0 2 1 - 0 4 - 2 8 . csv ") ĊĠĠĠĠĠĠĠ Ġval Ġcode Element Ġ= ĠElement ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" ordered _ test _ code ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtable Ref Ġ= Ġlookup Table , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtable Column Ġ= Ġ" Test ĠPer formed ĠLO INC ĠLong ĠName " ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġmodel Element Ġ= ĠElement (" equipment _ model _ name ") ĊĠĠĠĠĠĠĠ Ġval Ġtest Performed Element Ġ= ĠElement (" test _ per formed _ code ") ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠL IV DL ook up Mapper () ĊĊĠĠĠĠĠĠĠ Ġmapper . apply ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġcode Element , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġempty List (), ĊĠĠĠĠĠĠĠĠĠĠĠ ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( model Element , Ġ" S of ia Ġ 2 ĠFl u Ġ+ ĠS ARS ĠAnt igen ĠF IA * "), ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( test Performed Element , Ġ" 9 5 2 0 9 - 3 ") ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġ). let Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ ĠassertThat ( it ) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ. equals (" SAR S - Co V + SAR S - Co V - 2 Ġ( CO VID - 1 9 ) ĠAg Ġ[ Presence ] Ġin ĠResp ir atory Ġspec imen Ġby ĠR apid Ġim mun o ass ay ") ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġli vd Lookup Ġsupp lement al Ġtable Ġby Ġdevice _ id `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġlookup Table Ġ= ĠLookup Table . read ("./ metadata / tables / LI VD - Supp lement al - 2 0 2 1 - 0 6 - 0 7 . csv ") ĊĠĠĠĠĠĠĠ Ġval Ġcode Element Ġ= ĠElement ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" test _ authorized _ for _ ot c ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtable Ref Ġ= Ġlookup Table , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtable Column Ġ= Ġ" is _ ot c " ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġdevice Element Ġ= ĠElement (" device _ id ") ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠL IV DL ook up Mapper () ĊĊĠĠĠĠĠĠĠ Ġ// ĠTest Ġwith Ġan ĠF DA Ġdevice Ġid ĊĠĠĠĠĠĠĠ Ġval Ġev 1 Ġ= ĠElement And Value ( device Element , Ġ" 1 0 8 1 1 8 7 7 0 1 1 3 3 7 ") ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( code Element , Ġempty List (), ĠlistOf ( ev 1 ))). isEqualTo (" N ") ĊĊĠĠĠĠĠĠĠ Ġ// ĠTest Ġwith Ġa Ġtruncated Ġdevice ĠID ĊĠĠĠĠĠĠĠ Ġval Ġev 1 a Ġ= ĠElement And Value ( device Element , Ġ" Bin ax NOW ĠCOVID - 1 9 ĠAg ĠCard Ġ 2 ĠHome # ") ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( code Element , Ġempty List (), ĠlistOf ( ev 1 a ))). isEqualTo (" Y ") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġli vd Lookup Ġsupp lement al Ġtable Ġby Ġmodel `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġlookup Table Ġ= ĠLookup Table . read ("./ metadata / tables / LI VD - Supp lement al - 2 0 2 1 - 0 6 - 0 7 . csv ") ĊĠĠĠĠĠĠĠ Ġval Ġcode Element Ġ= ĠElement ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" test _ authorized _ for _ ot c ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtable Ref Ġ= Ġlookup Table , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtable Column Ġ= Ġ" is _ ot c " ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġdevice Element Ġ= ĠElement (" equipment _ model _ name ") ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠL IV DL ook up Mapper () ĊĊĠĠĠĠĠĠĠ Ġ// ĠTest Ġwith Ġan ĠF DA Ġdevice Ġid ĊĠĠĠĠĠĠĠ Ġval Ġev 1 Ġ= ĠElement And Value ( device Element , Ġ" Bin ax NOW ĠCOVID - 1 9 ĠAg ĠCard ĠHome ĠTest ") ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( code Element , Ġempty List (), ĠlistOf ( ev 1 ))). isEqualTo (" N ") ĊĊĠĠĠĠĠĠĠ Ġ// ĠTest Ġwith Ġanother ĊĠĠĠĠĠĠĠ Ġval Ġev 1 a Ġ= ĠElement And Value ( device Element , Ġ" Bin ax NOW ĠCOVID - 1 9 ĠAg ĠCard Ġ 2 ĠHome ĠTest ") ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( code Element , Ġempty List (), ĠlistOf ( ev 1 a ))). isEqualTo (" Y ") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġli vd Lookup Ġmodel Ġvariation Ġlookup `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġlookup Table Ġ= ĠLookup Table . read ("./ metadata / tables / LI VD - SAR S - Co V - 2 - 2 0 2 1 - 0 9 - 2 9 . csv ") ĊĠĠĠĠĠĠĠ Ġval Ġelement Ġ= ĠElement ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" ordered _ test _ code ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtable Ref Ġ= Ġlookup Table , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġtable Column Ġ= Ġ" Test ĠOrdered ĠLO INC ĠCode " ĊĠĠĠĠĠĠĠ Ġ) ĊĊĠĠĠĠĠĠĠ Ġ// ĠC ue ĠCOVID - 1 9 ĠTest Ġdoes Ġnot Ġhave Ġan Ġ* Ġin Ġthe Ġtable ĊĠĠĠĠĠĠĠ Ġvar Ġtest Model Ġ= Ġ" C ue ĠCOVID - 1 9 ĠTest " ĊĠĠĠĠĠĠĠ Ġvar Ġexpected Test Ordered L oin c Ġ= Ġ" 9 5 4 0 9 - 9 " ĊĠĠĠĠĠĠĠ ĠassertThat ( LI V DL ook up Mapper . lookup By Equipment ModelName ( element , Ġtest Model , Ġempty Map ())) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo ( expected Test Ordered L oin c ) ĊĊĠĠĠĠĠĠĠ Ġ// ĠAdd Ġan Ġ* Ġto Ġthe Ġend Ġof Ġthe Ġmodel Ġname ĊĠĠĠĠĠĠĠ ĠassertThat ( LI V DL ook up Mapper . lookup By Equipment ModelName ( element , Ġ"$ test Model *", Ġempty Map ())) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo ( expected Test Ordered L oin c ) ĊĊĠĠĠĠĠĠĠ Ġ// ĠAdd Ġsome Ġother Ġcharacter Ġto Ġfail Ġthe Ġlookup ĊĠĠĠĠĠĠĠ ĠassertThat ( LI V DL ook up Mapper . lookup By Equipment ModelName ( element , Ġ"$ test Model ^ ", Ġempty Map ())) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isNull () ĊĊĠĠĠĠĠĠĠ Ġ// ĠAcc ula ĠS ARS - Cov - 2 ĠTest Ġdoes Ġhave Ġan Ġ* Ġin Ġthe Ġtable ĊĠĠĠĠĠĠĠ Ġtest Model Ġ= Ġ" Acc ula ĠS ARS - Cov - 2 ĠTest " ĊĠĠĠĠĠĠĠ Ġexpected Test Ordered L oin c Ġ= Ġ" 9 5 4 0 9 - 9 " ĊĠĠĠĠĠĠĠ ĠassertThat ( LI V DL ook up Mapper . lookup By Equipment ModelName ( element , Ġtest Model , Ġempty Map ())) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo ( expected Test Ordered L oin c ) ĊĊĠĠĠĠĠĠĠ Ġ// ĠAdd Ġan Ġ* Ġto Ġthe Ġend Ġof Ġthe Ġmodel Ġname ĊĠĠĠĠĠĠĠ ĠassertThat ( LI V DL ook up Mapper . lookup By Equipment ModelName ( element , Ġ"$ test Model *", Ġempty Map ())) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo ( expected Test Ordered L oin c ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġvalue Ġvariation `() Ġ{ ĊĠĠĠĠĠĠĠ ĠassertThat ( LI V DL ook up Mapper . getValue Variation (" dummy ", Ġ"* ")). isEqualTo (" dummy * ") ĊĠĠĠĠĠĠĠ ĠassertThat ( LI V DL ook up Mapper . getValue Variation (" dummy *", Ġ"* ")). isEqualTo (" dummy ") ĊĠĠĠĠĠĠĠ ĠassertThat ( LI V DL ook up Mapper . getValue Variation (" dummy ???? ", Ġ" ??? ")). isEqualTo (" dummy ?") ĊĊĠĠĠĠĠĠĠ ĠassertThat ( LI V DL ook up Mapper . getValue Variation (" dummy Ca Se ", Ġ" CASE ")). isEqualTo (" dummy ") ĊĠĠĠĠĠĠĠ ĠassertThat ( LI V DL ook up Mapper . getValue Variation (" dummy Ca Se ", Ġ" CASE ", Ġfalse )). isEqualTo (" dummy Ca Se CASE ") ĊĊĠĠĠĠĠĠĠ Ġassert Fails With < IllegalArgumentException >( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġblock Ġ= Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠL IV DL ook up Mapper . getValue Variation (" dummy ", Ġ"") ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ) ĊĊĠĠĠĠĠĠĠ Ġassert Fails With < IllegalArgumentException >( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġblock Ġ= Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠL IV DL ook up Mapper . getValue Variation ("", Ġ"* ") ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġif Present `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġelement Ġ= ĠElement (" a ") ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠIf Present Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf (" a ", Ġ" const ") ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . value Names ( element , Ġargs )). isEqualTo ( listOf (" a ")) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element , Ġargs , ĠlistOf ( Element And Value ( element , Ġ" 3 ")) )). isEqualTo (" const ") ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element , Ġargs , Ġempty List ())). isNull () ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġuse `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġelement A Ġ= ĠElement (" a ") ĊĠĠĠĠĠĠĠ Ġval Ġelement B Ġ= ĠElement (" b ") ĊĠĠĠĠĠĠĠ Ġval Ġelement C Ġ= ĠElement (" c ") ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠUse Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf (" b ", Ġ" c ") ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . value Names ( element A , Ġargs )). isEqualTo ( listOf (" b ", Ġ" c ")) ĊĠĠĠĠĠĠĠ ĠassertThat ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġmapper . apply ( element A , Ġargs , ĠlistOf ( Element And Value ( element B , Ġ" B "), ĠElement And Value ( element C , Ġ" C "))) ĊĠĠĠĠĠĠĠ Ġ). isEqualTo (" B ") ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġargs , ĠlistOf ( Element And Value ( element C , Ġ" C ")) )). isEqualTo (" C ") ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġargs , Ġempty List ())). isNull () ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test ĠConcat enate Mapper `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠConcat enate Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf (" a ", Ġ" b ", Ġ" c ") ĊĠĠĠĠĠĠĠ Ġval Ġelement A Ġ= ĠElement (" a ") ĊĠĠĠĠĠĠĠ Ġval Ġelement B Ġ= ĠElement (" b ") ĊĠĠĠĠĠĠĠ Ġval Ġelement C Ġ= ĠElement (" c ") ĊĠĠĠĠĠĠĠ Ġval Ġvalues Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( element A , Ġ" string 1 "), ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( element B , Ġ" string 2 "), ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( element C , Ġ" string 3 ") ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġargs , Ġvalues )). isEqualTo (" string 1 , Ġstring 2 , Ġstring 3 ") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġconcatenate Ġmapper Ġwith Ġcustom Ġdelimiter `() Ġ{ ĊĠĠĠĠĠĠĠ Ġ// Ġarrange ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠConcat enate Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf (" a ", Ġ" b ", Ġ" c ") ĊĠĠĠĠĠĠĠ Ġval Ġelement A Ġ= ĠElement (" a ", Ġdelimiter Ġ= Ġ"^ ") ĊĠĠĠĠĠĠĠ Ġval Ġelement B Ġ= ĠElement (" b ") ĊĠĠĠĠĠĠĠ Ġval Ġelement C Ġ= ĠElement (" c ") ĊĠĠĠĠĠĠĠ Ġval Ġvalues Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( element A , Ġ" string 1 "), ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( element B , Ġ" string 2 "), ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( element C , Ġ" string 3 ") ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġ// Ġact ĊĠĠĠĠĠĠĠ Ġval Ġexpected Ġ= Ġ" string 1 ^ string 2 ^ string 3 " ĊĠĠĠĠĠĠĠ Ġval Ġactual Ġ= Ġmapper . apply ( element A , Ġargs , Ġvalues ) ĊĠĠĠĠĠĠĠ Ġ// Ġassert ĊĠĠĠĠĠĠĠ ĠassertThat ( actual ). isEqualTo ( expected ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġdate Ġtime Ġoffset Ġmapper Ġwith Ġseconds `() Ġ{ ĊĠĠĠĠĠĠĠ Ġ// Ġarrange ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠDateTimeOffset Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" a ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" seconds ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" 6 " ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġelement Ġ= ĠElement (" a ") ĊĠĠĠĠĠĠĠ Ġval Ġvalues Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( element , Ġ" 2 0 2 1 0 3 0 2 0 0 0 0 - 0 6 0 0 ") ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġ// Ġact ĊĠĠĠĠĠĠĠ Ġval Ġexpected Ġ= Ġ" 2 0 2 1 0 3 0 2 0 0 0 0 0 6 . 0 0 0 0 - 0 6 0 0 " ĊĠĠĠĠĠĠĠ Ġval Ġactual Ġ= Ġmapper . apply ( element , Ġargs , Ġvalues ) ĊĠĠĠĠĠĠĠ Ġ// Ġassert ĊĠĠĠĠĠĠĠ ĠassertThat ( actual ). isEqualTo ( expected ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġdate Ġtime Ġoffset Ġmapper Ġwith Ġnegative Ġseconds `() Ġ{ ĊĠĠĠĠĠĠĠ Ġ// Ġarrange ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠDateTimeOffset Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" a ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" seconds ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ"- 6 " ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġelement Ġ= ĠElement (" a ") ĊĠĠĠĠĠĠĠ Ġval Ġvalues Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( element , Ġ" 2 0 2 1 0 3 0 2 0 0 0 0 0 6 . 0 0 0 0 - 0 6 0 0 ") ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġ// Ġact ĊĠĠĠĠĠĠĠ Ġval Ġexpected Ġ= Ġ" 2 0 2 1 0 3 0 2 0 0 0 0 0 0 . 0 0 0 0 - 0 6 0 0 " ĊĠĠĠĠĠĠĠ Ġval Ġactual Ġ= Ġmapper . apply ( element , Ġargs , Ġvalues ) ĊĠĠĠĠĠĠĠ Ġ// Ġassert ĊĠĠĠĠĠĠĠ ĠassertThat ( actual ). isEqualTo ( expected ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġdate Ġtime Ġoffset Ġmapper Ġwith Ġminutes `() Ġ{ ĊĠĠĠĠĠĠĠ Ġ// Ġarrange ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠDateTimeOffset Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" a ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" minutes ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" 1 " ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġelement Ġ= ĠElement (" a ") ĊĠĠĠĠĠĠĠ Ġval Ġvalues Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( element , Ġ" 2 0 2 1 0 3 0 2 0 0 0 0 - 0 6 0 0 ") ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġ// Ġact ĊĠĠĠĠĠĠĠ Ġval Ġexpected Ġ= Ġ" 2 0 2 1 0 3 0 2 0 0 0 1 0 0 . 0 0 0 0 - 0 6 0 0 " ĊĠĠĠĠĠĠĠ Ġval Ġactual Ġ= Ġmapper . apply ( element , Ġargs , Ġvalues ) ĊĠĠĠĠĠĠĠ Ġ// Ġassert ĊĠĠĠĠĠĠĠ ĠassertThat ( actual ). isEqualTo ( expected ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġdate Ġtime Ġoffset Ġmapper Ġwith Ġnegative Ġminutes `() Ġ{ ĊĠĠĠĠĠĠĠ Ġ// Ġarrange ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠDateTimeOffset Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" a ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" minutes ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ"- 1 " ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġelement Ġ= ĠElement (" a ") ĊĠĠĠĠĠĠĠ Ġval Ġvalues Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( element , Ġ" 2 0 2 1 0 3 0 2 0 0 0 1 0 0 . 0 0 0 0 - 0 6 0 0 ") ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġ// Ġact ĊĠĠĠĠĠĠĠ Ġval Ġexpected Ġ= Ġ" 2 0 2 1 0 3 0 2 0 0 0 0 0 0 . 0 0 0 0 - 0 6 0 0 " ĊĠĠĠĠĠĠĠ Ġval Ġactual Ġ= Ġmapper . apply ( element , Ġargs , Ġvalues ) ĊĠĠĠĠĠĠĠ Ġ// Ġassert ĊĠĠĠĠĠĠĠ ĠassertThat ( actual ). isEqualTo ( expected ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġco alesce Ġmapper `() Ġ{ ĊĠĠĠĠĠĠĠ Ġ// Ġarrange ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠCo alesce Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf (" a ", Ġ" b ", Ġ" c ") ĊĠĠĠĠĠĠĠ Ġval Ġelement Ġ= ĠElement (" target ") ĊĠĠĠĠĠĠĠ Ġvar Ġvalues Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( Element (" a "), Ġ""), ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( Element (" b "), Ġ""), ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( Element (" c "), Ġ" c ") ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġ// Ġact ĊĠĠĠĠĠĠĠ Ġvar Ġexpected Ġ= Ġ" c " ĊĠĠĠĠĠĠĠ Ġvar Ġactual Ġ= Ġmapper . apply ( element , Ġargs , Ġvalues ) ĊĠĠĠĠĠĠĠ Ġ// Ġassert ĊĠĠĠĠĠĠĠ ĠassertThat ( actual ). isEqualTo ( expected ) ĊĊĠĠĠĠĠĠĠ Ġvalues Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( Element (" a "), Ġ""), ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( Element (" b "), Ġ" b "), ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( Element (" c "), Ġ" c ") ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġexpected Ġ= Ġ" b " ĊĠĠĠĠĠĠĠ Ġactual Ġ= Ġmapper . apply ( element , Ġargs , Ġvalues ) ĊĠĠĠĠĠĠĠ ĠassertThat ( actual ). isEqualTo ( expected ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġstrip Ġformatting Ġmapper `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠStrip Phone Formatting Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf (" patient _ phone _ number _ raw ") ĊĠĠĠĠĠĠĠ Ġval Ġelement Ġ= ĠElement (" patient _ phone _ number ") ĊĠĠĠĠĠĠĠ Ġval Ġvalues Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( Element (" patient _ phone _ number _ raw "), Ġ"( 8 5 0 ) Ġ 9 9 9 - 9 9 9 9 x HOME ") ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġexpected Ġ= Ġ" 8 5 0 9 9 9 9 9 9 9 : 1 :" ĊĠĠĠĠĠĠĠ Ġval Ġactual Ġ= Ġmapper . apply ( element , Ġargs , Ġvalues ) ĊĠĠĠĠĠĠĠ ĠassertThat ( actual ). isEqualTo ( expected ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġstrip Ġnumeric Ġmapper `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠStrip Numeric Data Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf (" patient _ age _ and _ units ") ĊĠĠĠĠĠĠĠ Ġval Ġelement Ġ= ĠElement (" patient _ age ") ĊĠĠĠĠĠĠĠ Ġval Ġvalues Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( Element (" patient _ age _ and _ units "), Ġ" 9 9 Ġyears ") ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġexpected Ġ= Ġ" years " ĊĠĠĠĠĠĠĠ Ġval Ġactual Ġ= Ġmapper . apply ( element , Ġargs , Ġvalues ) ĊĠĠĠĠĠĠĠ ĠassertThat ( actual ). isEqualTo ( expected ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġstrip Ġnon Ġnumeric Ġmapper `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠStrip Non Numeric Data Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf (" patient _ age _ and _ units ") ĊĠĠĠĠĠĠĠ Ġval Ġelement Ġ= ĠElement (" patient _ age ") ĊĠĠĠĠĠĠĠ Ġval Ġvalues Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( Element (" patient _ age _ and _ units "), Ġ" 9 9 Ġyears ") ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġexpected Ġ= Ġ" 9 9 " ĊĠĠĠĠĠĠĠ Ġval Ġactual Ġ= Ġmapper . apply ( element , Ġargs , Ġvalues ) ĊĠĠĠĠĠĠĠ ĠassertThat ( actual ). isEqualTo ( expected ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġsplit Ġmapper `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠSplit Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf (" patient _ name ", Ġ" 0 ") ĊĠĠĠĠĠĠĠ Ġval Ġelement Ġ= ĠElement (" patient _ first _ name ") ĊĠĠĠĠĠĠĠ Ġval Ġvalues Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( Element (" patient _ name "), Ġ" John ĠDoe ") ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġexpected Ġ= Ġ" John " ĊĠĠĠĠĠĠĠ Ġval Ġactual Ġ= Ġmapper . apply ( element , Ġargs , Ġvalues ) ĊĠĠĠĠĠĠĠ ĠassertThat ( actual ). isEqualTo ( expected ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġsplit Ġmapper Ġwith Ġerror Ġcondition `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠSplit Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf (" patient _ name ", Ġ" 1 ") ĊĠĠĠĠĠĠĠ Ġval Ġelement Ġ= ĠElement (" patient _ first _ name ") ĊĠĠĠĠĠĠĠ Ġval Ġvalues Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( Element (" patient _ name "), Ġ" There Are No Spaces Here ") ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġactual Ġ= Ġmapper . apply ( element , Ġargs , Ġvalues ) ĊĠĠĠĠĠĠĠ ĠassertThat ( actual ). isNull () ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġsplit Ġby Ġcomma Ġmapper `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠSplit By Comma Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf (" patient _ name ", Ġ" 2 ") ĊĠĠĠĠĠĠĠ Ġval Ġelement Ġ= ĠElement (" patient _ first _ name ") ĊĠĠĠĠĠĠĠ Ġval Ġvalues Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( Element (" patient _ name "), Ġ" Ant ley , ĠAR NP , ĠMon a ") ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġexpected Ġ= Ġ" Mon a " ĊĠĠĠĠĠĠĠ Ġval Ġactual Ġ= Ġmapper . apply ( element , Ġargs , Ġvalues ) ĊĠĠĠĠĠĠĠ ĠassertThat ( actual ). isEqualTo ( expected ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġsplit Ġby Ġcomma Ġmapper Ġerror Ġcondition `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠSplit By Comma Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf (" patient _ name ", Ġ" 2 ") ĊĠĠĠĠĠĠĠ Ġval Ġelement Ġ= ĠElement (" patient _ first _ name ") ĊĠĠĠĠĠĠĠ Ġval Ġvalues Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( Element (" patient _ name "), Ġ" I Ġhave Ġno Ġcommas ") ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġactual Ġ= Ġmapper . apply ( element , Ġargs , Ġvalues ) ĊĠĠĠĠĠĠĠ ĠassertThat ( actual ). isNull () ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġzip Ġcode Ġto Ġcount y Ġmapper `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠZip Code To Count y Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġcsv Ġ= Ġ""" ĊĠĠĠĠĠĠĠĠĠĠĠ Ġzip code , county ĊĠĠĠĠĠĠĠĠĠĠĠĠ 3 2 3 0 3 , Le on ĊĠĠĠĠĠĠĠ Ġ""" . trim Indent () ĊĠĠĠĠĠĠĠ Ġval Ġtable Ġ= ĠLookup Table . read ( ByteArray InputStream ( csv . toByteArray ())) ĊĠĠĠĠĠĠĠ Ġval Ġschema Ġ= ĠSchema ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" test ", Ġtopic Ġ= Ġ" test ", ĊĠĠĠĠĠĠĠĠĠĠĠ Ġelements Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠElement (" a ", Ġtype Ġ= ĠElement . Type . TABLE , Ġtable Ġ= Ġ" test ", Ġtable Column Ġ= Ġ" a "), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġmetadata Ġ= ĠMetadata ( schema Ġ= Ġschema , Ġtable Ġ= Ġtable , ĠtableName Ġ= Ġ" test ") ĊĠĠĠĠĠĠĠ Ġval Ġlookup Element Ġ= Ġmetadata . find Schema (" test ") ?. findElement (" a ") Ġ?: Ġfail (" Schema Ġelement Ġmissing ") ĊĠĠĠĠĠĠĠ Ġval Ġvalues Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( Element (" patient _ zip _ code "), Ġ" 3 2 3 0 3 - 4 5 0 9 ") ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġexpected Ġ= Ġ" Le on " ĊĠĠĠĠĠĠĠ Ġval Ġactual Ġ= Ġmapper . apply ( lookup Element , ĠlistOf (" patient _ zip _ code "), Ġvalues ) ĊĠĠĠĠĠĠĠ ĠassertThat ( actual ). isEqualTo ( expected ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test ĠHash Mapper `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠHash Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġelement A Ġ= ĠElement (" a ") ĊĠĠĠĠĠĠĠ Ġval Ġelement B Ġ= ĠElement (" b ") ĊĠĠĠĠĠĠĠ Ġval Ġelement C Ġ= ĠElement (" c ") ĊĊĠĠĠĠĠĠĠ Ġ// ĠSingle Ġvalue Ġconversion ĊĠĠĠĠĠĠĠ Ġval Ġarg Ġ= ĠlistOf (" a ") ĊĠĠĠĠĠĠĠ Ġval Ġvalue Ġ= ĠlistOf ( Element And Value ( element A , Ġ" 6 0 8 6 edf 8 e 4 1 2 6 5 0 0 3 2 4 0 8 e 9 6 ")) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġarg , Ġvalue )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo (" 4 7 4 9 6 ca fa 0 4 e 9 c 4 8 9 4 4 4 b 6 0 5 7 5 3 9 9 f 5 1 e 9 abc 0 6 1 f 4 fdd a 4 0 c 3 1 d 8 1 4 3 2 5 bfc 2 2 3 ") ĊĠĠĠĠĠĠĠ Ġ// ĠMultiple Ġvalues Ġconcaten ated ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf (" a ", Ġ" b ", Ġ" c ") ĊĠĠĠĠĠĠĠ Ġval Ġvalues Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( element A , Ġ" string 1 "), ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( element B , Ġ" string 2 "), ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( element C , Ġ" string 3 ") ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġargs , Ġvalues )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo (" c 8 fa 7 7 3 cd 5 4 e 7 a 7 eb 7 ca 0 8 5 7 7 d 0 bd 2 3 e 6 ce 3 a 7 3 e 6 1 df 1 7 6 2 1 3 d 9 ec 9 0 f 0 6 cb 4 5 f ") ĊĠĠĠĠĠĠĠ Ġ// ĠUn happy Ġpath Ġcases ĊĠĠĠĠĠĠĠ Ġassert Fails Ġ{ Ġmapper . apply ( element A , ĠlistOf (), ĠlistOf ()) Ġ} Ġ// Ġmust Ġpass Ġa Ġfield Ġname ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġarg , ĠlistOf ())). isNull () Ġ// Ġcolumn Ġnot Ġfound Ġin Ġthe Ġdata . ĊĠĠĠĠĠĠĠ Ġ// Ġcolumn Ġhas Ġempty Ġdata ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġarg , ĠlistOf ( Element And Value ( element A , Ġ"")) )). isNull () ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test Ġparse Mapper Field Ġvalidation Ġ- Ġallow Ġmapper Ġtokens Ġto Ġbe Ġparsed `() Ġ{ ĊĠĠĠĠĠĠĠ Ġ// Ġit Ġshould Ġallow Ġmapper Ġtokens Ġto Ġbe Ġparsed : Ġi . e . Ġ"$ index " ĊĠĠĠĠĠĠĠ Ġvar Ġvals Ġ= ĠMap pers . parse Mapper Field (" concat ( patient _ id , Ġ\$ index )") ĊĠĠĠĠĠĠĠ ĠassertThat ( vals . second [ 1 ]). isEqualTo ("\ $ index ") ĊĊĠĠĠĠĠĠĠ Ġ// Ġit Ġshould Ġallow Ġmapper Ġtokens Ġto Ġbe Ġparsed Ġwith Ġsemi - colon Ġliteral Ġvalues : Ġi . e . Ġ"$ date Format : some - valid - date - format " ĊĠĠĠĠĠĠĠ Ġvals Ġ= ĠMap pers . parse Mapper Field (" null Date Validator (\ $ date Format : some - valid - date - format , Ġtest _ result _ date )") ĊĠĠĠĠĠĠĠ ĠassertThat ( vals . second [ 0 ]). isEqualTo ("\ $ date Format : some - valid - date - format ") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test ĠNull Date Validator `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠNull Date Validator () ĊĠĠĠĠĠĠĠ Ġval Ġelement A Ġ= ĠElement (" a ") ĊĠĠĠĠĠĠĠ Ġval Ġelement B Ġ= ĠElement (" b ") ĊĊĠĠĠĠĠĠĠ Ġ// Ġ$ date Format : yyyy MM dd , Ġa Ġ( element Ġname ) ĊĠĠĠĠĠĠĠ Ġ// Ġshould Ġreturn Ġthe Ġoriginal Ġelement 's Ġvalue ĊĠĠĠĠĠĠĠ Ġval Ġargs Ġ= ĠlistOf (" yyyy MM dd ", Ġ" a ") ĊĠĠĠĠĠĠĠ Ġvar Ġvalue Ġ= ĠlistOf ( Element And Value ( element A , Ġ" yyyy MM dd "), ĠElement And Value ( element B , Ġ" 2 0 2 1 1 0 2 8 ")) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġargs , Ġvalue )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo (" 2 0 2 1 1 0 2 8 ") ĊĊĠĠĠĠĠĠĠ Ġ// Ġ$ date Format : MM / dd / yyyy , Ġa Ġ( element Ġname ) ĊĠĠĠĠĠĠĠ Ġ// Ġshould Ġreturn Ġthe Ġoriginal Ġelement 's Ġvalue ĊĠĠĠĠĠĠĠ Ġval Ġargs 2 Ġ= ĠlistOf (" MM / dd / yyyy ", Ġ" a ") ĊĠĠĠĠĠĠĠ Ġvalue Ġ= ĠlistOf ( Element And Value ( element A , Ġ" MM / dd / yyyy "), ĠElement And Value ( element B , Ġ" 1 0 / 2 8 / 2 0 2 1 ")) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġargs 2 , Ġvalue )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo (" 1 0 / 2 8 / 2 0 2 1 ") ĊĊĠĠĠĠĠĠĠ Ġ// Ġmis matched Ġformatting ĊĠĠĠĠĠĠĠ Ġ// Ġshould Ġreturn Ġan Ġempty Ġstring ĊĠĠĠĠĠĠĠ Ġvalue Ġ= ĠlistOf ( Element And Value ( element A , Ġ" yyyy MM dd "), ĠElement And Value ( element B , Ġ" a Ġweek Ġago ")) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġargs , Ġvalue )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo ("") ĊĊĠĠĠĠĠĠĠ Ġ// Ġempty Ġvalues ĊĠĠĠĠĠĠĠ Ġ// Ġshould Ġreturn Ġan Ġempty Ġstring ĊĠĠĠĠĠĠĠ Ġvalue Ġ= ĠlistOf () ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġargs , Ġvalue )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo ("") ĊĊĠĠĠĠĠĠĠ Ġ// Ġempty Ġargs ĊĠĠĠĠĠĠĠ Ġ// Ġshould Ġreturn Ġan Ġempty Ġstring ĊĠĠĠĠĠĠĠ Ġvalue Ġ= ĠlistOf ( Element And Value ( element A , Ġ" yyyy MM dd "), ĠElement And Value ( element B , Ġ" a Ġweek Ġago ")) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , ĠlistOf (), Ġvalue )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo ("") ĊĊĠĠĠĠĠĠĠ Ġ// Ġinvalid Ġformatting ĊĠĠĠĠĠĠĠ Ġ// Ġshould Ġreturn Ġan Ġempty Ġstring ĊĠĠĠĠĠĠĠ Ġvalue Ġ= ĠlistOf ( Element And Value ( element A , Ġ" i Nv Al Id "), ĠElement And Value ( element B , Ġ" 1 0 / 2 8 / 2 0 2 1 ")) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġargs , Ġvalue )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo ("") ĊĊĠĠĠĠĠĠĠ Ġvalue Ġ= ĠlistOf ( Element And Value ( element A , Ġ""), ĠElement And Value ( element B , Ġ" 1 0 / 2 8 / 2 0 2 1 ")) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġargs , Ġvalue )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo ("") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġ` test ĠIf Not Present Ġmapper `() Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġmapper Ġ= ĠIf Not Present Mapper () ĊĠĠĠĠĠĠĠ Ġval Ġelement A Ġ= ĠElement (" a ") ĊĠĠĠĠĠĠĠ Ġval Ġelement B Ġ= ĠElement (" lookup _ field ") ĊĠĠĠĠĠĠĠ Ġval Ġelement C 1 Ġ= ĠElement (" condition _ field _ 1 ") ĊĠĠĠĠĠĠĠ Ġval Ġelement C 2 Ġ= ĠElement (" condition _ field _ 2 ") ĊĊĠĠĠĠĠĠĠ Ġ// Ġ$ mode :" literal " Ġtests ĊĊĠĠĠĠĠĠĠ Ġ// Ġconditional Ġfields Ġare Ġblank : Ġshould Ġreturn Ġthe Ġ"$ string " Ġvalue ĊĠĠĠĠĠĠĠ Ġvar Ġargs Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ"\ $ mode : literal ", Ġ"\ $ string :** * ĠNo ĠAddress ĠGiven Ġ*** ", Ġ" condition _ field _ 1 ", Ġ" condition _ field _ 2 " ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġvar Ġvalues Ġ= ĠlistOf ( Element And Value ( element C 1 , Ġ""), ĠElement And Value ( element C 2 , Ġ"")) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġargs , Ġvalues )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo (" *** ĠNo ĠAddress ĠGiven Ġ*** ") ĊĊĠĠĠĠĠĠĠ Ġ// Ġany Ġconditional Ġfield Ġis Ġnon - blank : Ġshould Ġreturn Ġnull ĊĠĠĠĠĠĠĠ Ġargs Ġ= ĠlistOf ("\ $ mode : literal ", Ġ"\ $ string :** * ĠNo ĠAddress ĠGiven Ġ*** ", Ġ" condition _ field _ 1 ", Ġ" condition _ field _ 2 ") ĊĠĠĠĠĠĠĠ Ġvalues Ġ= ĠlistOf ( Element And Value ( element C 1 , Ġ""), ĠElement And Value ( element C 2 , Ġ" non Blank ")) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġargs , Ġvalues )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo ( null ) ĊĊĠĠĠĠĠĠĠ Ġ// Ġconditional Ġfields Ġnot Ġpresent : Ġshould Ġreturn Ġthe Ġ"$ string " Ġvalue ĊĠĠĠĠĠĠĠ Ġargs Ġ= ĠlistOf ("\ $ mode : literal ", Ġ"\ $ string :** * ĠNo ĠAddress ĠGiven Ġ*** ", Ġ" condition _ field _ 1 ", Ġ" condition _ field _ 2 ") ĊĠĠĠĠĠĠĠ Ġvalues Ġ= ĠlistOf ( Element And Value ( element A , Ġ"")) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġargs , Ġvalues )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo (" *** ĠNo ĠAddress ĠGiven Ġ*** ") ĊĊĠĠĠĠĠĠĠ Ġ// Ġ$ mode :" lookup " Ġtests ĊĊĠĠĠĠĠĠĠ Ġ// Ġconditional Ġfields Ġare Ġblank : Ġshould Ġreturn Ġthe Ġvalue Ġof Ġlookup _ field Ġ( Element ĠB ) ĊĠĠĠĠĠĠĠ Ġargs Ġ= ĠlistOf ("\ $ mode : lookup ", Ġ" lookup _ field ", Ġ" condition _ field _ 1 ", Ġ" condition _ field _ 2 ") ĊĠĠĠĠĠĠĠ Ġvalues Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( element B , Ġ" value Ġof ĠB "), ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( element C 1 , Ġ""), ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( element C 2 , Ġ"") ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġargs , Ġvalues )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo (" value Ġof ĠB ") ĊĊĠĠĠĠĠĠĠ Ġ// Ġany Ġconditional Ġfield Ġis Ġnon - blank : Ġshould Ġreturn Ġnull ĊĠĠĠĠĠĠĠ Ġargs Ġ= ĠlistOf ("\ $ mode : lookup ", Ġ" lookup _ field ", Ġ" condition _ field _ 1 ", Ġ" condition _ field _ 2 ") ĊĠĠĠĠĠĠĠ Ġvalues Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( element B , Ġ" value Ġof ĠB "), ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( element C 1 , Ġ""), ĊĠĠĠĠĠĠĠĠĠĠĠ ĠElement And Value ( element C 2 , Ġ" non Blank ") ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġargs , Ġvalues )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo ( null ) ĊĊĠĠĠĠĠĠĠ Ġ// Ġconditional Ġfields Ġnot Ġpresent : Ġshould Ġreturn Ġthe Ġvalue Ġof Ġlookup _ field Ġ( Element ĠB ) ĊĠĠĠĠĠĠĠ Ġargs Ġ= ĠlistOf ("\ $ mode : lookup ", Ġ" lookup _ field ", Ġ" condition _ field _ 1 ", Ġ" condition _ field _ 2 ") ĊĠĠĠĠĠĠĠ Ġvalues Ġ= ĠlistOf ( Element And Value ( element A , Ġ""), ĠElement And Value ( element B , Ġ" value Ġof ĠB ")) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġargs , Ġvalues )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo (" value Ġof ĠB ") ĊĊĠĠĠĠĠĠĠ Ġ// Ġsingle Ġnon - blank Ġcondition : Ġshould Ġreturn Ġnull ĊĠĠĠĠĠĠĠ Ġargs Ġ= ĠlistOf ("\ $ mode : lookup ", Ġ" lookup _ field ", Ġ" condition _ field _ 1 ") ĊĠĠĠĠĠĠĠ Ġvalues Ġ= ĠlistOf ( Element And Value ( element B , Ġ" value Ġof ĠB "), ĠElement And Value ( element C 1 , Ġ" non Blank ")) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġargs , Ġvalues )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo ( null ) ĊĊĠĠĠĠĠĠĠ Ġ// Ġinvalid Ġ$ mode Ġshould Ġreturn Ġnull ĊĠĠĠĠĠĠĠ Ġargs Ġ= ĠlistOf ("\ $ mode : i Nv Al Id ", Ġ" lookup _ field ", Ġ" condition _ field _ 1 ", Ġ" condition _ field _ 2 ") ĊĠĠĠĠĠĠĠ Ġvalues Ġ= ĠlistOf ( Element And Value ( element A , Ġ""), ĠElement And Value ( element B , Ġ" value Ġof ĠB ")) ĊĠĠĠĠĠĠĠ ĠassertThat ( mapper . apply ( element A , Ġargs , Ġvalues )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. isEqualTo ( null ) ĊĠĠĠ Ġ} Ċ }