#include <stdio.h>
#include <math.h>

#define EPSILON 1e-7   
#define MAX_ITER 100

// 1つ目の行列の特性方程式 f(λ)
double f(double lambda) {
    return pow(lambda, 4) + pow(lambda, 3) - 88.0 * pow(lambda, 2) - 132.0 * lambda + 603.0;
}

// 導関数 f'(λ)
double df(double lambda) {
    return 4.0 * pow(lambda, 3) + 3.0 * pow(lambda, 2) - 176.0 * lambda - 132.0;
}

void solve_newton(int attempt, double lambda0) {
    double lambda = lambda0;
    int iter = 0;

    while (iter <= MAX_ITER) {
        double f_val = f(lambda);
        double df_val = df(lambda);

        // 収束判定のチェック
        if (fabs(f_val) < EPSILON) {
            printf("試行 #%d (初期値 %5.1f) -> 収束成功 (%2d回) | 固有値解 λ = %.10f\n", 
                   attempt, lambda0, iter, lambda);
            return;
        }

        if (fabs(df_val) < 1e-12) {
            printf("試行 #%d (初期値 %5.1f) -> 導関数が0に近いため失敗\n", attempt, lambda0);
            return;
        }

        lambda -= f_val / df_val;
        iter++;
    }
    printf("試行 #%d (初期値 %5.1f) -> %d回以内に収束せず失敗\n", attempt, lambda0, MAX_ITER);
}

int main() {
    // 4つの異なる初期値からそれぞれの根（固有値）を直接探し出す
    double initial_lambda[] = {8.0, 5.0, -1.0, -9.0};

    printf("=== ニュートン・ラフソン法による実数解（固有値）の探索結果 ===\n");
    for (int i = 0; i < 4; i++) {
        solve_newton(i + 1, initial_lambda[i]);
    }

    return 0;
}