Dark monochrome eggplant to ugly purple gradient palette editor

/* https://grabient.com/_gJ_gKkgGCgIBgJPgLLgDAgBkgBhgJFgINgK0 */

background: linear-gradient(90deg, #311821 0.000%, #401b33 16.667%, #532045 33.333%, #692658 50.000%, #822e6a 66.667%, #9c377c 83.333%, #b6428f 100.000%);

<svg xmlns="http://www.w3.org/2000/svg" width="800" height="400" viewBox="0 0 800 400" preserveAspectRatio="none">
            <!-- https://grabient.com/_gJ_gKkgGCgIBgJPgLLgDAgBkgBhgJFgINgK0 -->
            <defs>
              <linearGradient id="gradient" x1="0.000" y1="0.500" x2="1.000" y2="0.500">
        <stop offset="0.000" stop-color="#311821" /><stop offset="0.167" stop-color="#401b33" /><stop offset="0.333" stop-color="#532045" /><stop offset="0.500" stop-color="#692658" /><stop offset="0.667" stop-color="#822e6a" /><stop offset="0.833" stop-color="#9c377c" /><stop offset="1.000" stop-color="#b6428f" />
              </linearGradient>
            </defs>
            <rect x="0" y="0" width="800" height="400" fill="url(#gradient)" />
          </svg>

["#311821", "#401b33", "#532045", "#692658", "#822e6a", "#9c377c", "#b6428f"]

// https://grabient.com/_gJ_gKkgGCgIBgJPgLLgDAgBkgBhgJFgINgK0
// cosine gradient palette — https://iquilezles.org/articles/palettes/
const float STEPS = 7.0;
const float ANGLE = 90.0;

vec3 palette(float t) {
    vec3 a = vec3(0.639, 0.676, 0.386);
    vec3 b = vec3(0.513, 0.591, 0.715);
    vec3 c = vec3(0.192, 0.100, 0.097);
    vec3 d = vec3(0.581, 0.525, 0.692);
    return a + b * cos(6.283185 * (c * t + d));
}

// N stops sampled from the palette, blended like the CSS gradient
vec3 stops(float t) {
    float n = STEPS - 1.0;
    float x = clamp(t, 0.0, 1.0) * n;
    return mix(palette(floor(x) / n), palette(min(floor(x) + 1.0, n) / n), fract(x));
}

void mainImage(out vec4 fragColor, in vec2 fragCoord) {
    vec2 p = fragCoord - 0.5 * iResolution.xy;
    // CSS angle: 0 = up, clockwise; span = CSS gradient-line length
    vec2 dir = vec2(sin(radians(ANGLE)), cos(radians(ANGLE)));
    float len = abs(iResolution.x * dir.x) + abs(iResolution.y * dir.y);
    float t = dot(p, dir) / len + 0.5;
    fragColor = vec4(stops(t), 1.0);
}

[
  [0.639, 0.676, 0.386],
  [0.513, 0.591, 0.715],
  [0.192, 0.100, 0.097],
  [0.581, 0.525, 0.692]
]