Add IAVM debug comment tag

src/cluster/cluster.cpp

@@ -1153,7 +1153,7 @@ int cluster_jxi488_cycle(int jxi488, ScattererConfiguration *sconf, GeometryConf
 		output->vec_qschuc2[jindex - 1] = qschum;
 		output->vec_pschuc2[jindex - 1] = pschum;
 		output->vec_s0magc2[jindex - 1] = s0magm;
-	      }
+	      } // ipol polarization switch
 	      if (ilr210 == 1 && jlr == 2) {
 		output->vec_fsac11[jindex - 1] = cid->c1->fsacm[0][0];
 		output->vec_fsac21[jindex - 1] = cid->c1->fsacm[1][0];
@@ -1492,14 +1492,14 @@ int cluster_jxi488_cycle(int jxi488, ScattererConfiguration *sconf, GeometryConf
 	    }
 	    // label 318
 	    for (int i = 0; i < 4; i++) {
-	      oindex = 16 * (jindex - 1) + 4 * i;
+	      oindex = 16 * (jindex - 1) + 4 * i; // if IAVM fails, try adding directions
 	      output->vec_dir_mulc[oindex] = cid->cmul[i][0];
 	      output->vec_dir_mulc[oindex + 1] = cid->cmul[i][1];
 	      output->vec_dir_mulc[oindex + 2] = cid->cmul[i][2];
 	      output->vec_dir_mulc[oindex + 3] = cid->cmul[i][3];
 	    }
 	    for (int i = 0; i < 4; i++) {
-	      oindex = 16 * (jindex - 1) + 4 * i;
+	      oindex = 16 * (jindex - 1) + 4 * i; // if IAVM fails, try adding directions
 	      output->vec_dir_mulclr[oindex] = cid->cmullr[i][0];
 	      output->vec_dir_mulclr[oindex + 1] = cid->cmullr[i][1];
 	      output->vec_dir_mulclr[oindex + 2] = cid->cmullr[i][2];