Курсовая работа. Вариант 16 / kurs / DMP7

#ifndef _DMP7_CPP_
#define _DMP7_CPP_

#include "voc.h"

const char AF7_x_sz = 12;
const char AF7_y_sz = 15;
SYMB AF7_x[AF7_x_sz] = {_rbo_, _rbc_, _num_, _fnum_, _add_, _sub_, _mul_, _div_, _det_, __VAR7__, _transp_, _eps_};
SYMB AF7_y[AF7_y_sz] = {_AEX_, _T_, _P_, _rbo_, _rbc_, _num_, _fnum_, _add_, _sub_, _mul_, _div_, _det_, __VAR7__, _transp_, _bs_};


const char n_rul7 = 12;
const char max_rul7 = 6;
SYMB gr7_0x[max_rul7] = {_AEX_, _AEX_, _add_, _T_, _op_add_};
SYMB gr7_1x[max_rul7] = {_AEX_, _AEX_, _sub_, _T_, _op_sub_};
SYMB gr7_2x[max_rul7] = {_AEX_, _T_};
SYMB gr7_3x[max_rul7] = {_T_, _T_, _mul_, _P_, _op_mul_};
SYMB gr7_4x[max_rul7] = {_T_, _T_, _div_, _P_, _op_div_};
SYMB gr7_5x[max_rul7] = {_T_, _P_};
SYMB gr7_6x[max_rul7] = {_P_, _det_, _rbo_, _AEX_, _rbc_, _op_det_};
SYMB gr7_7x[max_rul7] = {_P_, _transp_, _rbo_, _AEX_, _rbc_, _op_transp_};
SYMB gr7_8x[max_rul7] = {_P_, _rbo_, _AEX_, _rbc_};
SYMB gr7_9x[max_rul7] = {_P_, _num_};
SYMB gr7_10x[max_rul7] = {_P_, _fnum_};
SYMB gr7_11x[max_rul7] = {_P_, __VAR7__};


SYMB* gram7[n_rul7] = {gr7_0x, gr7_1x, gr7_2x, gr7_3x, gr7_4x, gr7_5x, gr7_6x, gr7_7x, gr7_8x, gr7_9x, gr7_10x, gr7_11x};


char n_symb_subgram7[1] = {1};
SYMB symb_subgram7_0x[1] = {_id_};
SYMB* symb_subgram7[1]= {symb_subgram7_0x};
SUB_GRAM sub_gram7 = {n_symb_subgram7,  symb_subgram7};


// ‡­ зҐ­Ёп  ваЁЎгв®ў
ATTR gr7_a00x[4] = {{4, 2}};
ATTR gr7_a01x[4] = {{0, 0}};
ATTR gr7_a04x[4] = {{1, 0}, {3, 0}, {20, 3}};
ATTR gr7_a20x[4] = {{1, 0}};
ATTR gr7_a80x[4] = {{2, 0}};
ATTR gr7_a60x[4] = {{5, 1}};
ATTR gr7_a65x[4] = {{3, 0}, {20, 3}};

ATTR* gr7_a0xx[max_rul7] = {gr7_a00x, gr7_a01x, gr7_a01x, gr7_a01x, gr7_a04x, gr7_a01x};
ATTR* gr7_a2xx[max_rul7] = {gr7_a20x, gr7_a01x, gr7_a01x, gr7_a01x, gr7_a01x, gr7_a01x};
ATTR* gr7_a8xx[max_rul7] = {gr7_a80x, gr7_a01x, gr7_a01x, gr7_a01x, gr7_a01x, gr7_a01x};
ATTR* gr7_a6xx[max_rul7] = {gr7_a60x, gr7_a01x, gr7_a01x, gr7_a01x, gr7_a01x, gr7_a65x};

ATTR** gram7_attr[n_rul7] = {
gr7_a0xx, gr7_a0xx, gr7_a2xx, gr7_a0xx, gr7_a0xx, gr7_a2xx,
gr7_a6xx, gr7_a6xx, gr7_a8xx, gr7_a2xx, gr7_a2xx, gr7_a2xx
};


char gr7_idx_0x[2] = {3, 1};
char gr7_idx_1x[2] = {3, 1};
char gr7_idx_2x[2] = {1, 0};
char gr7_idx_3x[2] = {3, 1};
char gr7_idx_4x[2] = {3, 1};
char gr7_idx_5x[2] = {1, 0};
char gr7_idx_6x[2] = {4, 1};
char gr7_idx_7x[2] = {4, 1};
char gr7_idx_8x[2] = {3, 0};
char gr7_idx_9x[2] = {1, 0};
char gr7_idx_10x[2] = {1, 0};
char gr7_idx_11x[2] = {1, 0};

char* gram7_idx[n_rul7] = {
gr7_idx_0x, gr7_idx_1x, gr7_idx_2x, gr7_idx_3x, gr7_idx_4x, gr7_idx_5x,
gr7_idx_6x, gr7_idx_7x, gr7_idx_8x, gr7_idx_9x, gr7_idx_10x, gr7_idx_11x
};

char AF7_0x[AF7_x_sz] =  {0, 51,0, 0, 1, 1, 0, 0, 0, 0, 0, 0};
char AF7_1x[AF7_x_sz] =  {0, 2, 0, 0, 2, 2, 1, 1, 0, 0, 0, 2};
char AF7_2x[AF7_x_sz] =  {0, 2, 0, 0, 2, 2, 2, 2, 0, 0, 0, 2};
char AF7_3x[AF7_x_sz] =  {50,0, 1, 1, 0, 0, 0, 0, 1, 12,1, 0};
char AF7_4x[AF7_x_sz] =  {0, 2, 0, 0, 2, 2, 2, 2, 0, 0, 0, 2};
char AF7_5x[AF7_x_sz] =  {0, 2, 0, 0, 2, 2, 2, 2, 0, 0, 0, 2};
char AF7_6x[AF7_x_sz] =  {0, 2, 0, 0, 2, 2, 2, 2, 0, 0, 0, 2};
char AF7_7x[AF7_x_sz] =  {50,0, 1, 1, 0, 0, 0, 0, 1, 12,1, 0};
char AF7_8x[AF7_x_sz] =  {50,0, 1, 1, 0, 0, 0, 0, 1, 12,1, 0};
char AF7_9x[AF7_x_sz] =  {50,0, 1, 1, 0, 0, 0, 0, 1, 12,1, 0};
char AF7_10x[AF7_x_sz] = {50,0, 1, 1, 0, 0, 0, 0, 1, 12,1, 0};
char AF7_11x[AF7_x_sz] = {50,0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
char AF7_12x[AF7_x_sz] = {0, 2, 0, 0, 2, 2, 2, 2, 0, 0, 0, 2};
char AF7_13x[AF7_x_sz] = {50,0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
char AF7_14x[AF7_x_sz] = {50,0, 1, 1, 0, 0, 0, 0, 1, 12,1, 0};
char AF7_15x[AF7_x_sz] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3};


char* AF7[AF7_y_sz + 1] = {
AF7_0x, AF7_1x, AF7_2x, AF7_3x, AF7_4x, AF7_5x, AF7_6x, AF7_7x, AF7_8x,
AF7_9x, AF7_10x, AF7_11x, AF7_12x, AF7_13x, AF7_14x, AF7_15x
};



char AG7_0x[n_rul7] =  {0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  0, 0};
char AG7_1x[n_rul7] =  {0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  0, 0};
char AG7_2x[n_rul7] =  {0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  0, 0};
char AG7_3x[n_rul7] =  {1, 2, 3, 5, 6, 4, 7, 8, 9, 10, 11,12};
char AG7_4x[n_rul7] =  {0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  0, 0};
char AG7_5x[n_rul7] =  {0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  0, 0};
char AG7_6x[n_rul7] =  {0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  0, 0};
char AG7_7x[n_rul7] =  {0, 0, 3, 5, 6, 4, 7, 8, 9, 10, 11,12};
char AG7_8x[n_rul7] =  {0, 0, 3, 5, 6, 4, 7, 8, 9, 10, 11,12};
char AG7_9x[n_rul7] =  {0, 0, 0, 0, 0, 0, 7, 8, 9, 10, 11,12};
char AG7_10x[n_rul7] = {0, 0, 0, 0, 0, 0, 7, 8, 9, 10, 11,12};
char AG7_11x[n_rul7] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  0, 0};
char AG7_12x[n_rul7] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  0, 0};
char AG7_13x[n_rul7] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  0, 0};
char AG7_14x[n_rul7] = {1, 2, 3, 5, 6, 4, 7, 8, 9, 10, 11,12};

char* AG7[AF7_y_sz] = {AG7_0x, AG7_1x, AG7_2x, AG7_3x, AG7_4x, AG7_5x, AG7_6x, AG7_7x, AG7_8x, AG7_9x, AG7_10x, AG7_11x, AG7_12x, AG7_13x, AG7_14x};


/*
” ©« : "L8P.TXT" .

ЊЂ’ђ€–Ђ Џђ…„…‘’‚Ћ‚ЂЌ€џ :
---- ( Є®«ЁзҐбвў® н«Ґ¬Ґ­в®ў : 15 * 15 ) :
=================================================================
I   IAEX!T  !P  !(  !)  !num!fnm!+  !-  !*  !/  !det!var!!  !EpsI
=================================================================
IAEXI   !   !   !   ! = !   !   ! = ! = !   !   !   !   !   !   I
I---I---+---+---+---+---+---+---+---+---+---+---+---+---+---+---I
IT  I   !   !   !   ! > !   !   ! > ! > ! = ! = !   !   !   ! > I
I---I---+---+---+---+---+---+---+---+---+---+---+---+---+---+---I
IP  I   !   !   !   ! > !   !   ! > ! > ! > ! > !   !   !   ! > I
I---I---+---+---+---+---+---+---+---+---+---+---+---+---+---+---I
I(  I=< ! < ! < ! < !   ! < ! < !   !   !   !   ! < ! < ! < !   I
I---I---+---+---+---+---+---+---+---+---+---+---+---+---+---+---I
I)  I   !   !   !   ! > !   !   ! > ! > ! > ! > !   !   !   ! > I
I---I---+---+---+---+---+---+---+---+---+---+---+---+---+---+---I
InumI   !   !   !   ! > !   !   ! > ! > ! > ! > !   !   !   ! > I
I---I---+---+---+---+---+---+---+---+---+---+---+---+---+---+---I
IfnmI   !   !   !   ! > !   !   ! > ! > ! > ! > !   !   !   ! > I
I---I---+---+---+---+---+---+---+---+---+---+---+---+---+---+---I
I+  I   !=< ! < ! < !   ! < ! < !   !   !   !   ! < ! < ! < !   I
I---I---+---+---+---+---+---+---+---+---+---+---+---+---+---+---I
I-  I   !=< ! < ! < !   ! < ! < !   !   !   !   ! < ! < ! < !   I
I---I---+---+---+---+---+---+---+---+---+---+---+---+---+---+---I
I*  I   !   ! = ! < !   ! < ! < !   !   !   !   ! < ! < ! < !   I
I---I---+---+---+---+---+---+---+---+---+---+---+---+---+---+---I
I/  I   !   ! = ! < !   ! < ! < !   !   !   !   ! < ! < ! < !   I
I---I---+---+---+---+---+---+---+---+---+---+---+---+---+---+---I
IdetI   !   !   ! = !   !   !   !   !   !   !   !   !   !   !   I
I---I---+---+---+---+---+---+---+---+---+---+---+---+---+---+---I
IvarI   !   !   !   ! > !   !   ! > ! > ! > ! > !   !   !   ! > I
I---I---+---+---+---+---+---+---+---+---+---+---+---+---+---+---I
I!  I   !   !   ! = !   !   !   !   !   !   !   !   !   !   !   I
I---I---+---+---+---+---+---+---+---+---+---+---+---+---+---+---I
I Б I < ! < ! < ! < !   ! < ! < !   !   !   !   ! < ! < ! < !   I
=================================================================

”“ЌЉ–€€ ’€ЏЂ "Џ…ђ…ЌЋ‘-‘‚…ђ’ЉЂ" :
---- дг­ЄжЁп "ЇҐаҐ­®б" ( Є®«ЁзҐбвў® н«Ґ¬Ґ­в®ў : 16 * 12 ) :
========================================================
I      I(  !)  !num!fnm!+  !-  !*  !/  !det!var!!  !EpsI
========================================================
IAEX   IЋ !Џ…ђ!Ћ !Ћ !Џ…ђ!Џ…ђ!Ћ !Ћ !Ћ !Ћ !Ћ !Ћ I
I------I---+---+---+---+---+---+---+---+---+---+---+---I
IT     IЋ ! C !Ћ !Ћ ! C ! C !Џ…ђ!Џ…ђ!Ћ !Ћ !Ћ ! C I
I------I---+---+---+---+---+---+---+---+---+---+---+---I
IP     IЋ ! C !Ћ !Ћ ! C ! C ! C ! C !Ћ !Ћ !Ћ ! C I
I------I---+---+---+---+---+---+---+---+---+---+---+---I
I(     IЏ…ђ!Ћ !Џ…ђ!Џ…ђ!Ћ !Ћ !Ћ !Ћ !Џ…ђ!Џ…ђ!Џ…ђ!Ћ I
I------I---+---+---+---+---+---+---+---+---+---+---+---I
I)     IЋ ! C !Ћ !Ћ ! C ! C ! C ! C !Ћ !Ћ !Ћ ! C I
I------I---+---+---+---+---+---+---+---+---+---+---+---I
Inum   IЋ ! C !Ћ !Ћ ! C ! C ! C ! C !Ћ !Ћ !Ћ ! C I
I------I---+---+---+---+---+---+---+---+---+---+---+---I
Ifnm   IЋ ! C !Ћ !Ћ ! C ! C ! C ! C !Ћ !Ћ !Ћ ! C I
I------I---+---+---+---+---+---+---+---+---+---+---+---I
I+     IЏ…ђ!Ћ !Џ…ђ!Џ…ђ!Ћ !Ћ !Ћ !Ћ !Џ…ђ!Џ…ђ!Џ…ђ!Ћ I
I------I---+---+---+---+---+---+---+---+---+---+---+---I
I-     IЏ…ђ!Ћ !Џ…ђ!Џ…ђ!Ћ !Ћ !Ћ !Ћ !Џ…ђ!Џ…ђ!Џ…ђ!Ћ I
I------I---+---+---+---+---+---+---+---+---+---+---+---I
I*     IЏ…ђ!Ћ !Џ…ђ!Џ…ђ!Ћ !Ћ !Ћ !Ћ !Џ…ђ!Џ…ђ!Џ…ђ!Ћ I
I------I---+---+---+---+---+---+---+---+---+---+---+---I
I/     IЏ…ђ!Ћ !Џ…ђ!Џ…ђ!Ћ !Ћ !Ћ !Ћ !Џ…ђ!Џ…ђ!Џ…ђ!Ћ I
I------I---+---+---+---+---+---+---+---+---+---+---+---I
Idet   IЏ…ђ!Ћ !Ћ !Ћ !Ћ !Ћ !Ћ !Ћ !Ћ !Ћ !Ћ !Ћ I
I------I---+---+---+---+---+---+---+---+---+---+---+---I
Ivar   IЋ ! C !Ћ !Ћ ! C ! C ! C ! C !Ћ !Ћ !Ћ ! C I
I------I---+---+---+---+---+---+---+---+---+---+---+---I
I!     IЏ…ђ!Ћ !Ћ !Ћ !Ћ !Ћ !Ћ !Ћ !Ћ !Ћ !Ћ !Ћ I
I------I---+---+---+---+---+---+---+---+---+---+---+---I
I Б    IЏ…ђ!Ћ !Џ…ђ!Џ…ђ!Ћ !Ћ !Ћ !Ћ !Џ…ђ!Џ…ђ!Џ…ђ!Ћ I
I------I---+---+---+---+---+---+---+---+---+---+---+---I
I Б AEXIЋ !Ћ !Ћ !Ћ !Ћ !Ћ !Ћ !Ћ !Ћ !Ћ !Ћ !„ЋЏI
========================================================

---- дг­ЄжЁп "ᢥавЄ " ( Є®«ЁзҐбвў® н«Ґ¬Ґ­в®ў : 15 * 12 ) :
============================================
I      I1 !2 !3 !4 !5 !6 !7 !8 !9 !10!11!12I
============================================
IAEX   IЋ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!ЋI
I------I--+--+--+--+--+--+--+--+--+--+--+--I
IT     IЋ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!ЋI
I------I--+--+--+--+--+--+--+--+--+--+--+--I
IP     IЋ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!ЋI
I------I--+--+--+--+--+--+--+--+--+--+--+--I
I(     I1 !2 !3 !4 !5 !6 !7 !8 !9 !10!11!12I
I------I--+--+--+--+--+--+--+--+--+--+--+--I
I)     IЋ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!ЋI
I------I--+--+--+--+--+--+--+--+--+--+--+--I
Inum   IЋ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!ЋI
I------I--+--+--+--+--+--+--+--+--+--+--+--I
Ifnm   IЋ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!ЋI
I------I--+--+--+--+--+--+--+--+--+--+--+--I
I+     IЋ!Ћ!3 !4 !5 !6 !7 !8 !9 !10!11!12I
I------I--+--+--+--+--+--+--+--+--+--+--+--I
I-     IЋ!Ћ!3 !4 !5 !6 !7 !8 !9 !10!11!12I
I------I--+--+--+--+--+--+--+--+--+--+--+--I
I*     IЋ!Ћ!Ћ!Ћ!Ћ!Ћ!7 !8 !9 !10!11!12I
I------I--+--+--+--+--+--+--+--+--+--+--+--I
I/     IЋ!Ћ!Ћ!Ћ!Ћ!Ћ!7 !8 !9 !10!11!12I
I------I--+--+--+--+--+--+--+--+--+--+--+--I
Idet   IЋ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!ЋI
I------I--+--+--+--+--+--+--+--+--+--+--+--I
Ivar   IЋ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!ЋI
I------I--+--+--+--+--+--+--+--+--+--+--+--I
I!     IЋ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!Ћ!ЋI
I------I--+--+--+--+--+--+--+--+--+--+--+--I
I Б    I1 !2 !3 !4 !5 !6 !7 !8 !9 !10!11!12I
============================================

--- Їа ўЁ«  Ја ¬¬ вЁЄЁ :
  1) AEX -> AEX +   T
  2) AEX -> AEX -   T
  3) AEX -> T
  4) T   -> P
  5) T   -> T   *   P
  6) T   -> T   /   P
  7) P   -> (   AEX )
  8) P   -> det (   AEX )
  9) P   -> !   (   AEX )
 10) P   -> num
 11) P   -> fnm
 12) P   -> var

Љ®­Ґж.

*/

#endif