File IN_DOWN.OCC:
      syncro.slave; num.active; pc; return.control
        to.sim ! syncro.slave; num.active; pc; return.control
File MONITOR.OCC:
        syncro.slave; t.origen; num.active; pc; return.control
File SIMULA.OCC:
  --INT t.origen :             -- Source transputer of the syncro.slave signal
            from.child[child] ? CASE syncro.slave; local.active; local.pc; return.control
            to.parent ! syncro.slave; active.total;
            to.parent ! syncro.slave; active.total;
      --write.st.int.2(i.trans,"*Nenviando syncro.slave PC = ",PC,
      to.parent ! syncro.slave; num.active; PC; return.control
            to.parent ! syncro.slave; num.active; PC; return.control
      to.parent ! syncro.slave; num.active; PC; TRUE
File SIMULA0.OCC:
            from.child[child] ? CASE syncro.slave; local.active;
File OUT_UPI.OCC:
syncro.slave; t.origen; num.active; pc; return.control
      to.parent ! syncro.slave; t.origen; num.active; pc; return.control
File PRAM.INC:
    syncro.slave; INT; INT; BOOL        -- 1: Active PRAM processors 2: Local PC