ABC1/Language.cpp at main · timonchiks/ABC1 · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
//------------------------------------------------------------------------------
// Language.cpp - contains PROCEDURE language
//------------------------------------------------------------------------------

#include <stdexcept>
#include "Language.h"

//------------------------------------------------------------------------------
// Input parameters from file.
Language *In(FILE *file) {
    Language *mat;
    int k;
    fscanf(file, "%d", &k);
    switch (k) {
        case 1:
            mat = new Language;
            mat->k = Language::PROCEDURE;
            In(mat->c, file);
            return mat;
        case 2:
            mat = new Language;
            mat->k = Language::OBJECTIVE;
            In(mat->d, file);
            return mat;
        case 3:
            mat = new Language;
            mat->k = Language::FUNCTIONAL;
            In(mat->t, file);
            return mat;
        default:
            throw std::invalid_argument("Incorrect");
    }

}

// Random values
Language *InRnd() {
    Language *mat;
    int k = rand() % 2 + 1;
    switch (k) {
        case 1:
            mat = new Language;
            mat->k = Language::PROCEDURE;
            InRnd(mat->c);
            return mat;
        case 2:
            mat = new Language;
            mat->k = Language::OBJECTIVE;
            InRnd(mat->d);
            return mat;
        case 3:
            mat = new Language;
            mat->k = Language::FUNCTIONAL;
            InRnd(mat->t);
            return mat;
        default:
            return nullptr;
    }
}

//------------------------------------------------------------------------------
// Output Language.
void Out(Language &m, FILE *file) {
    switch (m.k) {
        case Language::PROCEDURE:
            Out(m.c, file);
            break;
        case Language::OBJECTIVE:
            Out(m.d, file);
            break;
        case Language::FUNCTIONAL:
            Out(m.t, file);
            break;
        default:
            fprintf(file, "%s", "Incorrect");
    }
}

//------------------------------------------------------------------------------
// Get average
double Average(Language &m) {
    switch (m.k) {
        case Language::PROCEDURE:
            return Average(m.c);
        case Language::OBJECTIVE:
            return Average(m.d);
        case Language::FUNCTIONAL:
            return Average(m.t);
        default:
            return 0.0;
    }
}

//------------------------------------------------------------------------------
// Swap function
void Swap(Language &m1, Language &m2) {
    Language temp;
    temp = m1;
    m1 = m2;
    m2 = temp;
}