Function cmaes_WriteToFilePtr

plugin/seq/cmaes.cpp:1034–1528

--------------------------------------------------------- */

/* --------------------------------------------------------- */
void cmaes_WriteToFilePtr(cmaes_t *t, const char *key, FILE *fp) {
  /* this hack reads key words from input key for data to be written to
   * a file, see file signals.par as input file. The length of the keys
   * is mostly fixed, see key += number in the code! If the key phrase
   * does not match the expectation the output might be strange.  for
   * cmaes_t *t == 0 it solely prints key as a header line. Input key
   * must be zero terminated.
   */
  int i, k, N = (t ? t->sp.N : 0);
  char const *keyend;
  const char *s = "few";

  if (key == nullptr) {
    key = s;
  }

  keyend = key + strlen(key);

  while (key < keyend) {
    if (strncmp(key, "axisratio", 9) == 0) {
      fprintf(fp, "%.2e", sqrt(t->maxEW / t->minEW));

      while (*key != '+' && *key != '\0' && key < keyend) {
        ++key;
      }

      fprintf(fp, "%c", (*key == '+') ? '\t' : '\n');
    }

    if (strncmp(key, "idxminSD", 8) == 0) {
      int mini = 0;

      for (i = N - 1; i > 0; --i) {
        if (t->mindiagC == t->C[i][i]) {
          mini = i;
        }
      }

      fprintf(fp, "%d", mini + 1);

      while (*key != '+' && *key != '\0' && key < keyend) {
        ++key;
      }

      fprintf(fp, "%c", (*key == '+') ? '\t' : '\n');
    }

    if (strncmp(key, "idxmaxSD", 8) == 0) {
      int maxi = 0;

      for (i = N - 1; i > 0; --i) {
        if (t->maxdiagC == t->C[i][i]) {
          maxi = i;
        }
      }

      fprintf(fp, "%d", maxi + 1);