
[01;34mwith[m Gmface[31m.[mGm_MIdi[31m.[mInstruments[31m;[m
[01;34muse[m Gmface[31m.[mGm_Midi[31m.[mInstruments[31m;[m
[01;34mwith[m Gmface[31m.[mGm_Processing[31m.[mGm_Work_Processing[31m;[m
[01;34muse[m Gmface[31m.[mGm_Processing[31m.[mGm_Work_Processing[31m;[m
[01;34mwith[m Gmface[31m.[mGm_Virtual[31m.[mGmface[31m.[mGmface_Work[31m;[m
[01;34muse[m Gmface[31m.[mGm_Virtual[31m.[mGmface[31m.[mGmface_Work[31m;[m
[01;34mwith[m Gmface[31m.[mGm_Processing[31m.[mGmface[31m.[mGm_Plugin_Processing[31m;[m
[01;34muse[m Gmface[31m.[mGm_Processing[31m.[mGmface[31m.[mGm_Plugin_Processing[31m;[m
[01;34mpackage[m Gmface[31m.[mGm_Processing[31m.[mGmface[31m.[mWork_Processing [01;34mis[m            
   
   
   [01;34mfunction[m [01;30mProcess_Initialize[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 Gm_Plugin_Processing_Access[31m;[m
   
   
   [01;34mtype[m Gmface_Work_Processing[31m;[m
   
   
   [01;34mtask[m [01;34mtype[m [01;30mWork_Process[m[31m([mProcessing [31m:[m [01;34maccess[m Gmface_Work_Processing[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 Gmface_Work_Processing [01;34mis[m
     [01;34mnew[m Work_Processing_Record [01;34mwith[m
      [01;34mrecord[m
	 Work         [31m:[m Gmface_Work_Access[31m;[m
	 Process      [31m:[m [01;30mWork_Process[m[31m([mGmface_Work_Processing'[01;34mAccess[m[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 Gmface_Work_Processing[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 Gmface[31m.[mGm_Processing[31m.[mGmface[31m.[mWork_Processing[31m;[m
