AP6156z = Take[AP6156, 4 ;; 4];
AP6157z = Take[AP6157, 4 ;; 4];
AP6158z = Take[AP6158, 4 ;; 4];
AP6159z = Take[AP6159, 4 ;; 4];
AP6160z = Take[AP6160, 4 ;; 4];
AP6161z = Take[AP6161, 4 ;; 4];
AP6162z = Take[AP6162, 4 ;; 4];
AP6162z = Take[AP6162, 4 ;; 4];
AP6163z = Take[AP6163, 4 ;; 4];
AP6164z = Take[AP6164, 4 ;; 4];
AP6165z = Take[AP6165, 4 ;; 4];
AP6166z = Take[AP6166, 4 ;; 4];
AP6167z = Take[AP6167, 4 ;; 4];