Fix offset increment in matrix packing.

Now it works for a z-dipole system.


Former-commit-id: 3e4aa9d4736ecc18e561d0ba5c2c19b0a027e37c

qpms/scatsystem.c

@@ -1053,8 +1053,8 @@ complex double *qpms_scatsys_irrep_pack_matrix(complex double *target_packed,
         }
         fullvec_offsetC += otC->bspecn;
       }
-      fullvec_offsetR += otR->bspecn;
     }
+    fullvec_offsetR += otR->bspecn;
   }
   free(tmp);
   return target_packed;