SEDOLs: Difference between revisions

177 bytes removed ,  18 days ago
m
(Added Easylang)
(4 intermediate revisions by 2 users not shown)
Line 2,368:
 
=={{header|Kotlin}}==
<syntaxhighlight lang="scalakotlin">// version 1.1.0
val weights = listOfarrayOf(1, 3, 1, 7, 3, 9, 1)
 
val validChars = (('0'..'9') + ('A'..'Z')).toSet() - "AEIOU".toSet()
val weights = listOf(1, 3, 1, 7, 3, 9, 1)
 
fun sedol7(sedol6: String): String {
if require(sedol6.length !== 6) throw{ IllegalArgumentException("Length of argument string must be 6") }
require(sedol6.all { it in validChars }) { else -> throw IllegalArgumentException("Argument string contains an invalid character") }
var sum = 0
 
for (i in 0..5) {
val sum = sedol6.map { it.digitToInt(36) }.zip(weights, Int::times).sum()
val c = sedol6[i]
val vcheck = when (c-sum).mod(10) {
return sedol6 + in ('0'..'9' ->+ c.toInt(check) - 48
in 'A'..'Z' -> c.toInt() - 55
else -> throw IllegalArgumentException("Argument string contains an invalid character")
}
sum += v * weights[i]
}
val check = (10 - (sum % 10)) % 10
return sedol6 + (check + 48).toChar()
}
 
fun main(args: Array<String>) {
val sedol6s = listOf("710889", "B0YBKJ", "406566", "B0YBLH", "228276", "B0YBKL",
"710889", "557910B0YBKJ", "B0YBKR406566", "585284B0YBLH", "B0YBKT228276", "B00030B0YBKL"),
"557910", "B0YBKR", "585284", "B0YBKT", "B00030"
for (sedol6 in sedol6s) println("$sedol6 -> ${sedol7(sedol6)}")
})
}</syntaxhighlight>
for (isedol6 in 0..5sedol6s) {
for (sedol6 in sedol6s) println("$sedol6 -> ${sedol7(sedol6)}")
}
}</syntaxhighlight>
 
{{out}}
Line 2,411 ⟶ 2,408:
=={{header|langur}}==
{{trans|Go}}
<syntaxhighlight lang="langur">val .csd = ffn(.code) {
switch len(.code) {
case 0:
Line 2,427 ⟶ 2,424:
val .nums = s2n .code
val .sum = for[=0] .i of .nums {
_for += .nums[.i] x* .weight[.i]
}
 
Line 2,433 ⟶ 2,430:
}
 
val .h = h{
# invalid...
"": 0,
Line 3,207 ⟶ 3,204:
sedol, sedolweight)
)
return str((10 - (tmp % 10)) % 10)
 
for sedol in '''
Line 3,251 ⟶ 3,248:
Right(0)
)
)(lambda d: Right(str((10 - (d % 10)) % 10)))
 
 
885

edits