sub_idx_to_slc  IS OP  sub  idx  - generate slice that specifies idxA for each itm of sub  
				slicer  :=  sub_idx_to_slc  sub  idx  ;  
	sub_idx_to_slc  IS OP  sub  idx  {  idx  EACHBOTH +  (EACH tell (gage shape  sub))  }  
   sub_idx_to_slc  IS OP  sub  idx  - generate slice that specifies idxA for each itm of sub  
				slicer  :=  sub_idx_to_slc  sub  idx  ;  
	sub_idx_to_slc  IS OP  sub  idx  {  idx  EACHBOTH +  (EACH tell (gage shape  sub))  }  
   sub_idx_to_slc  IS OP  sub  idx  - generate slice that specifies idxA for each itm of sub  
				slicer  :=  sub_idx_to_slc  sub  idx  ;  
	sub_idx_to_slc  IS OP  sub  idx  {  idx  EACHBOTH +  (EACH tell (gage shape  sub))  }  
   sub_idx_to_slc  IS OP  sub  idx  - generate slice that specifies idxA for each itm of sub  
				slicer  :=  sub_idx_to_slc  sub  idx  ;  
	sub_idx_to_slc  IS OP  sub  idx  {  idx  EACHBOTH +  (EACH tell (gage shape  sub))  }  
   sub_idx_to_slc  IS OP  sub  idx  - generate slice that specifies idxA for each itm of sub  
				slicer  :=  sub_idx_to_slc  sub  idx  ;  
	sub_idx_to_slc  IS OP  sub  idx  {  idx  EACHBOTH +  (EACH tell (gage shape  sub))  }  
   sub_idx_to_slc  IS OP  sub  idx  - generate slice that specifies idxA for each itm of sub  
				slicer  :=  sub_idx_to_slc  sub  idx  ;  
	sub_idx_to_slc  IS OP  sub  idx  {  idx  EACHBOTH +  (EACH tell (gage shape  sub))  }  
   sub_idx_to_slc  IS OP  sub  idx  - generate slice that specifies idxA for each itm of sub  
				slicer  :=  sub_idx_to_slc  sub  idx  ;  
	sub_idx_to_slc  IS OP  sub  idx  {  idx  EACHBOTH +  (EACH tell (gage shape  sub))  }  
   sub_idx_to_slc  IS OP  sub  idx  - generate slice that specifies idxA for each itm of sub  
				slicer  :=  sub_idx_to_slc  sub  idx  ;  
	sub_idx_to_slc  IS OP  sub  idx  {  idx  EACHBOTH +  (EACH tell (gage shape  sub))  }  
   sub_idx_to_slc  IS OP  sub  idx  - generate slice that specifies idxA for each itm of sub  
				slicer  :=  sub_idx_to_slc  sub  idx  ;  
	sub_idx_to_slc  IS OP  sub  idx  {  idx  EACHBOTH +  (EACH tell (gage shape  sub))  }  
   sub_idx_to_slc  IS OP  sub  idx  - generate slice that specifies idxA for each itm of sub  
				slicer  :=  sub_idx_to_slc  sub  idx  ;  
	sub_idx_to_slc  IS OP  sub  idx  {  idx  EACHBOTH +  (EACH tell (gage shape  sub))  }  
   sub_idx_to_slc  IS OP  sub  idx  - generate slice that specifies idxA for each itm of sub  
				slicer  :=  sub_idx_to_slc  sub  idx  ;  
	sub_idx_to_slc  IS OP  sub  idx  {  idx  EACHBOTH +  (EACH tell (gage shape  sub))  }  
   sub_idx_to_slc  IS OP  sub  idx  - generate slice that specifies idxA for each itm of sub  
				slicer  :=  sub_idx_to_slc  sub  idx  ;  
	sub_idx_to_slc  IS OP  sub  idx  {  idx  EACHBOTH +  (EACH tell (gage shape  sub))  }  
   sub_idx_to_slc  IS OP  sub  idx  - generate slice that specifies idxA for each itm of sub  
				slicer  :=  sub_idx_to_slc  sub  idx  ;  
	sub_idx_to_slc  IS OP  sub  idx  {  idx  EACHBOTH +  (EACH tell (gage shape  sub))  }