val Ġr na Ġ= Ġmap Of (' G ' Ġto Ġ' C ', Ġ' C ' Ġto Ġ' G ', Ġ' A ' Ġto Ġ' U ', Ġ' T ' Ġto Ġ' A ') Ċ fun Ġtran scribe To R na ( dna : ĠString ): ĠString Ġ= Ġd na . map Ġ{ Ġr na [ it ] Ġ}. join ToString ("") Ċ