/* Ċ ĠCopyright Ġ 2 0 2 1 ĠSpl endo ĠConsult ing ĠB . V . ĠThe ĠNe therlands ĊĊĠĠĠ Ġ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 Ġcom . spl endo . kal uga . scientific . unit Ċ Ċ import Ġcom . spl endo . kal uga . scientific . assertEqual Sc ientific Value Ċ import Ġcom . spl endo . kal uga . scientific . converter . energy . e quivalent D ose By Ċ import Ġcom . spl endo . kal uga . scientific . converter . specific Energy . as Equivalent D ose Ċ import Ġcom . spl endo . kal uga . scientific . invoke Ċ import Ġkotlin . test . Test Ċ Ċ class ĠIon izing Rad iation Equivalent D ose UnitTest Ġ{ ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġion izing Rad iation Equivalent D ose Conversion Test () Ġ{ ĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠSie vert , Ġ 1 e + 9 , ĠNan os ie vert ) ĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠSie vert , Ġ 1 e + 6 , ĠMicro s ie vert ) ĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠSie vert , Ġ 1 0 0 0 . 0 , ĠM illis ie vert ) ĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠSie vert , Ġ 1 0 0 . 0 , ĠCent is ie vert ) ĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠSie vert , Ġ 1 0 . 0 , ĠDec is ie vert ) ĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠSie vert , Ġ 0 . 1 , ĠDec as ie vert ) ĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠSie vert , Ġ 0 . 0 1 , ĠH ect os ie vert ) ĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠSie vert , Ġ 0 . 0 0 1 , ĠKi los ie vert ) ĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠSie vert , Ġ 1 e - 6 , ĠMe gas ie vert ) ĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠSie vert , Ġ 1 e - 9 , ĠG ig as ie vert ) ĊĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠSie vert , Ġ 1 0 0 . 0 , ĠRo ent gen Equivalent Man ) ĊĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠRo ent gen Equivalent Man , Ġ 1 e + 9 , ĠNan oro ent gen Equivalent Man ) ĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠRo ent gen Equivalent Man , Ġ 1 e + 6 , ĠM ic ror o ent gen Equivalent Man ) ĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠRo ent gen Equivalent Man , Ġ 1 0 0 0 . 0 , ĠM illi ro ent gen Equivalent Man ) ĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠRo ent gen Equivalent Man , Ġ 1 0 0 . 0 , ĠCent iro ent gen Equivalent Man ) ĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠRo ent gen Equivalent Man , Ġ 1 0 . 0 , ĠDec iro ent gen Equivalent Man ) ĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠRo ent gen Equivalent Man , Ġ 0 . 1 , ĠDec aro ent gen Equivalent Man ) ĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠRo ent gen Equivalent Man , Ġ 0 . 0 1 , ĠH ector o ent gen Equivalent Man ) ĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠRo ent gen Equivalent Man , Ġ 0 . 0 0 1 , ĠK il oro ent gen Equivalent Man ) ĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠRo ent gen Equivalent Man , Ġ 1 e - 6 , ĠMe gar o ent gen Equivalent Man ) ĊĠĠĠĠĠĠĠ Ġassert Sc ientific Conversion ( 1 , ĠRo ent gen Equivalent Man , Ġ 1 e - 9 , ĠG ig aro ent gen Equivalent Man ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġequivalent D ose From Energy And Weight Test () Ġ{ ĊĠĠĠĠĠĠĠ Ġassert Equal Sc ientific Value ( 1 ( Ro ent gen Equivalent Man ), Ġ 2 0 0 ( E rg ) Ġequivalent D ose By Ġ 2 ( Gram )) ĊĠĠĠĠĠĠĠ Ġassert Equal Sc ientific Value ( 1 ( Ro ent gen Equivalent Man ), Ġ 2 0 0 0 ( De ci erg ) Ġequivalent D ose By Ġ 2 ( Gram )) ĊĠĠĠĠĠĠĠ Ġassert Equal Sc ientific Value ( 1 ( Sie vert ), Ġ 2 ( J ou le ) Ġequivalent D ose By Ġ 2 ( K ilog ram )) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġspecific Energy From Equivalent D ose Test () Ġ{ ĊĠĠĠĠĠĠĠ Ġassert Equal Sc ientific Value ( 2 ( Sie vert ), Ġ 2 ( J ou le Ġper ĠK ilog ram ). as Equivalent D ose ()) ĊĠĠĠ Ġ} Ċ } Ċ