
[01;34mwith[m Libsens[31m.[mMIDI[31m.[mInstruments[31m;[m          [01;34muse[m Libsens[31m.[mMIDI[31m.[mInstruments[31m;[m
[01;34mwith[m Libsens[31m.[mVirtual[31m;[m                   [01;34muse[m Libsens[31m.[mVirtual[31m;[m
[01;34mwith[m Libsens[31m.[mVirtual[31m.[mWork_Class[31m;[m        [01;34muse[m Libsens[31m.[mVirtual[31m.[mWork_Class[31m;[m
[01;34mwith[m Libsens[31m.[mProcessing[31m.[mCommon[31m;[m         [01;34muse[m Libsens[31m.[mProcessing[31m.[mCommon[31m;[m
[01;34mwith[m Libsens[31m.[mProcessing[31m.[mPlugins[31m;[m        [01;34muse[m Libsens[31m.[mProcessing[31m.[mPlugins[31m;[m

[01;34mpackage[m Libsens[31m.[mProcessing[31m.[mWork_Processing [01;34mis[m
   
   
   [01;34mtype[m Plugin_Processing_Access [01;34mis[m [01;34maccess[m [01;34mall[m Plugin_Processing'Class[31m;[m
   
   
   [01;34mfunction[m [01;30mInitialize[m[31m([mClass [31m:[m [01;34min[m Plugin_Enum[31m;[m
		       Plugin [31m:[m [01;34min[m Abstract_Plugin_Access[31m)[m [01;34mreturn[m Plugin_Processing_Access[31m;[m
   
   
   [01;34mtype[m Process_Array [01;34mis[m [01;34marray[m [31m([mPlugin_Num'[01;34mRange[m[31m)[m [01;34mof[m Plugin_Processing_Access[31m;[m
   
   [01;34mtype[m Work_Processing_Record[31m;[m
   
   [01;34mtask[m [01;34mtype[m [01;30mWork_Process[m[31m([mProcessing [31m:[m [01;34maccess[m Work_Processing_Record[31m)[m [01;34mis[m
      [01;34mentry[m Initialize[31m;[m
      [01;34mentry[m Start[31m;[m
      [01;34mentry[m Stop[31m;[m
      [01;34mentry[m [01;30mMod_Rec[m[31m([mStatus [31m:[m [01;34min[m [32mBoolean[m[31m);[m
      [01;34mentry[m [01;30mMod_Play[m[31m([mStatus [31m:[m [01;34min[m [32mBoolean[m[31m);[m
      [01;34mentry[m Mod_Reset[31m;[m
      [01;34mentry[m End_Of_Process[31m;[m
      [01;34mentry[m Halt[31m;[m
   [01;34mend[m Work_Process[31m;[m
   
   
   
   [01;34mtype[m Work_Processing_Record [01;34mis[m [01;34mtagged[m [01;34mlimited[m
      [01;34mrecord[m
	 Work         [31m:[m Work_Access[31m;[m
	 Box          [31m:[m [01;34maliased[m Messages_box[31m;[m
	 Process      [31m:[m [01;30mWork_Process[m[31m([mWork_Processing_Record'[01;34mAccess[m[31m);[m
	 Processes    [31m:[m Process_Array[31m;[m	 
	 Instruments  [31m:[m [01;34maccess[m Bandmaster_Record[31m;[m
      [01;34mend[m [01;34mrecord[m[31m;[m
   
   [01;34mprocedure[m [01;30mInitialize[m[31m([mProcessing [31m:[m [01;34min[m [01;34mout[m Work_Processing_Record[31m;[m
			Work       [31m:[m [01;34min[m Work_Access[31m;[m
			Insts      [31m:[m [01;34maccess[m Bandmaster_record[31m);[m   
            
[01;34mend[m Libsens[31m.[mProcessing[31m.[mWork_Processing[31m;[m
