#include <iostream>
#include <vector>
#include <algorithm>
#include <memory>
using namespace std;

const string LETTERS="ABCDEFGHIJKLMNOP";
const int L_SZ=16;
const int S_SZ=4;

class Possible {
    vector<bool> _b;
public:
    Possible() : _b(L_SZ, true) {}
    bool   is_on(int i) const { return _b[i-1]; }
    int    count()      const { return std::count(_b.begin(), _b.end(), true); }
    void   eliminate(int i)   { _b[i-1] = false; }
    int    val()        const {
        auto it = find(_b.begin(), _b.end(), true);
        return (it != _b.end() ? 1 + (it - _b.begin()) : -1);
    }
    string str(int wth) const;
};

string Possible::str(int width) const {
    string s(width, ' ');
    int k = 0;
    for (int i = 1; i <= L_SZ; i++) {
        if (is_on(i)) s[k++] = 'A' + i;
    }
    return s;
}

class Sudoku {
    vector<Possible> _cells;
    static vector< vector<int> > _group, _neighbors, _groups_of;

    bool     eliminate(int k, int val);
public:
    Sudoku(string s);
    static void init();

    Possible possible(int k) const { return _cells[k]; }
    bool     is_solved() const;
    bool     assign(int k, int val);
    int      least_count() const;
    void     write(ostream& o) const;
};

bool Sudoku::is_solved() const {
    for (int k = 0; k < _cells.size(); k++) {
        if (_cells[k].count() != 1) {
            return false;
        }
    }
    return true;
}

void Sudoku::write(ostream& o) const {
    int width = 1;
    for (int k = 0; k < _cells.size(); k++) {
        width = max(width, 1 + _cells[k].count());
    }
    const string sep(S_SZ * width, '-');
    for (int i = 0; i < L_SZ; i++) {
        if (i == 4 || i == 8 || i == 12) {
            o << sep << "+-" << sep << "+" << sep << endl;
        }
        for (int j = 0; j < L_SZ; j++) {
            if (i == 4 || i == 8 || i == 12) o << "| ";
            o << _cells[i*L_SZ + j].str(width);
        }
        o << endl;
    }
}

vector< vector<int> >
Sudoku::_group(S_SZ*L_SZ), Sudoku::_neighbors(L_SZ*L_SZ), Sudoku::_groups_of(L_SZ*L_SZ);

void Sudoku::init() {
    for (int i = 0; i < L_SZ; i++) {
        for (int j = 0; j < L_SZ; j++) {
            const int k = i*L_SZ + j;
            //            const int x[3] = {i, 9 + j, 18 + (i/3)*3 + j/3,};
            const int x[4] = {i, L_SZ + j, L_SZ*2 + (i/S_SZ)*S_SZ + j/S_SZ,L_SZ*3 + (i/(2*S_SZ))*(2*S_SZ) + j/(2*S_SZ)};
            for (int g = 0; g < 4; g++) {
                _group[x[g]].push_back(k);
                _groups_of[k].push_back(x[g]);
            }
        }
    }
    for (int k = 0; k < _neighbors.size(); k++) {
        for (int x = 0; x < _groups_of[k].size(); x++) {
            for (int j = 0; j < L_SZ; j++) {
                int k2 = _group[_groups_of[k][x]][j];
                if (k2 != k) _neighbors[k].push_back(k2);
            }
        }
    }
}

bool Sudoku::assign(int k, int val) {
    for (int i = 1; i <= L_SZ; i++) {
        if (i != val) {
            if (!eliminate(k, i)) return false;
        }
    }
    return true;
}

bool Sudoku::eliminate(int k, int val) {
    if (!_cells[k].is_on(val)) {
        return true;
    }
    _cells[k].eliminate(val);
    const int N = _cells[k].count();
    if (N == 0) {
        return false;
    } else if (N == 1) {
        const int v = _cells[k].val();
        for (int i = 0; i < _neighbors[k].size(); i++) {
            if (!eliminate(_neighbors[k][i], v)) return false;
        }
    }
    for (int i = 0; i < _groups_of[k].size(); i++) {
        const int x = _groups_of[k][i];
        int n = 0, ks;
        for (int j = 0; j < L_SZ; j++) {
            const int p = _group[x][j];
            if (_cells[p].is_on(val)) {
                n++, ks = p;
            }
        }
        if (n == 0) {
            return false;
        } else if (n == 1) {
            if (!assign(ks, val)) {
                return false;
            }
        }
    }
    return true;
}

int Sudoku::least_count() const {
    int k = -1, min;
    for (int i = 0; i < _cells.size(); i++) {
        const int m = _cells[i].count();
        if (m > 1 && (k == -1 || m < min)) {
            min = m, k = i;
        }
    }
    return k;
}

Sudoku::Sudoku(string s)
: _cells(L_SZ*L_SZ)
{
    int k = 0;
    for (int i = 0; i < s.size(); i++) {
        if (s[i] >= 'A' && s[i] <= 'A') {
            if (!assign(k, s[i] - 'A')) {
                cerr << "error" << endl;
                return;
            }
            k++;
        } else if (s[i] == '-' || s[i] == '.') {
            k++;
        }
    }
}

unique_ptr<Sudoku> solve(unique_ptr<Sudoku> S) {
    if (S == nullptr || S->is_solved()) {
        return S;
    }
    int k = S->least_count();
    Possible p = S->possible(k);
    for (int i = 1; i <= L_SZ; i++) {
        if (p.is_on(i)) {
            unique_ptr<Sudoku> S1(new Sudoku(*S));
            if (S1->assign(k, i)) {
                if (auto S2 = solve(std::move(S1))) {
                    return S2;
                }
            }
        }
    }
    return {};
}

int main() {
    Sudoku::init();
    string line;
    while (getline(cin, line)) {
        if (auto S = solve(unique_ptr<Sudoku>(new Sudoku(line)))) {
            S->write(cout);
        } else {
            cout << "No solution";
        }
        cout << endl;
    }
}