E:={
  p=2^160-2933,
  a=260304558782498478937947576884532782721650322528,
  b=173536372521665652625298384589688521814433548352}:
q:=620595175087432237029165529381611169224913337:
P:=[
   1274104368818450369805339056822189386313630230379,
   572219058580438390033539991201426547874286552166
  ]:  
R := [
   993774253034996263602282266042347943674442738459,
   702394637650171869877389758714526368768875789008
  ]:


# Zur Ergebniskontrolle: Ist 2 Q = R, so betrachte:
convert( convert( Q[1], base, 256), bytes );