RosettaCodeData/Task/Modular-inverse/Dc/modular-inverse.dc
2023-07-01 13:44:08 -04:00

1 line
94 B
Text

dc -e "[m=]P?dsm[a=]P?dsa1sv[dsb~rsqlbrldlqlv*-lvsdsvd0<x]dsxxldd[dlmr+]sx0>xdla*lm%[p]sx1=x"