DEFINITION MODULE R;
(*$ Implementation:=FALSE *)

(*
 * 24.8.90/bp Konstanten für Register-Variablen
 * Dadurch einfache Benutzung:
 * IMPORT R;
 * ... base{R.A6},name{R.A1},val{R.D2}...
 *)

CONST

  D0=00B;  D1=01B;  D2=02B;  D3=03B;
  D4=04B;  D5=05B;  D6=06B;  D7=07B;

  A0=10B;  A1=11B;  A2=12B;  A3=13B;
  A4=14B;  A5=15B;  A6=16B;  A7=17B;

 FP0=20B; FP1=21B; FP2=22B; FP3=23B;
 FP4=24B; FP5=25B; FP6=26B; FP7=27B;

END R.
