Algorithm 4—pseudocode:

initialisation; size(matching [][])←[size(TEST_FRAMES),2]; for i = 1 to size (TEST_FRAMES) do   begin     for k = 1 to size(FEATURES_ACTIVITIES[]) to      begin       for l = 1 to size(FEATURES_ACTIVITIES[k][]) do        begin          if (compare(features(TEST_FRAMES[i]),FEATURES_ACTIVITIES[k,l]) = true) then            begin             for m = 1 to size(OBJECTS_FOR_ACTIVITIES[k][l][]) to              begin                 If objects(TEST_FRAMES[i]) = OBJECTS_FOR_                   ACTIVITIES[k,l,m]) then                 begin                   matching[i][0] = k;                   matching[i][1] = l;                   send→ (k,l);                 end;              end;            end;          end;      end; send→ (matching[][])