MEAM/C: code commenting

  int augt1, ialloy, mix_ref_t, erose_form;

  int emb_lin_neg, bkgd_dyn;

  double gsmooth_factor;

  int vind2D[3][3], vind3D[3][3][3];

  int v2D[6], v3D[10];

  int vind2D[3][3], vind3D[3][3][3];                  // x-y-z to Voigt-like index

  int v2D[6], v3D[10];                                // multiplicity of Voigt index (i.e. [1] -> xy+yx = 2

  int nr, nrar;

  double dr, rdrar;

    else if (xi <= 0.0)

      return 0.0;

    else {

      // ( 1.d0 - (1.d0 - xi)**4 )**2, but with better codegen

      a = 1.0 - xi;

      a *= a; a *= a;

      a = 1.0 - a;