Ошибка: specialization of '.' after instantiation

class Text {
private:
    Array<LETTER> str;// << ошибка
public:
...
}

template <>
Array<LETTER>::Array(){this->type="LETTER";}

#include <iostream>
 
using namespace std;
 
//Variables
using POINTER=void*;        // указатель
using LOGIC=bool;           // 0..1
using RANGE=int8_t;     // -128..127
using LETTER=char;      // буква
using BYTE=uint8_t;         // 0..255
using INT_S=int16_t;        // -32768..32767
using INT_W=uint16_t;   // 0..65535
using INT_M=int32_t;        // -2147483648..2147483647
using INT_L=uint32_t;       // 0..4294967295
using INT_T=int64_t;        // -9223372036854775808..9223372036854775807
using INT_B=uint64_t;       // 0..18446744073709551615
using FLOAT=float;          // 1.8E-38..1.8E+38
using DOUBLE=double;    // 2.2E-308..1.8E+308
 
struct Bits {
    unsigned b0:1;
    unsigned b1:1;
    unsigned b2:1;
    unsigned b3:1;
    unsigned b4:1;
    unsigned b5:1;
    unsigned b6:1;
    unsigned b7:1;
};
struct Bytes {
    BYTE b0;
    BYTE b1;
    BYTE b2;
    BYTE b3;
    BYTE b4;
    BYTE b5;
    BYTE b6;
    BYTE b7;
};
 
union Code {
    BYTE byte;
    Bits bit;
};
union Block {
    uint64_t data;
    Bytes byte;
};
 
template <typename dTYPE>
class Array {
private:
    dTYPE *vars;
    STRING type;
    INT_L it=0,sz=0,tl=0,rv=0;
    void Vindex(INT_L &index);
public:
    Array();
    ~Array();
    INT_L Size();
    INT_L Total();
    LOGIC Prev();
    LOGIC Next();
    INT_L Index();
    void Index(INT_L ct);
    dTYPE Get(INT_L index=0);
    void Put(dTYPE val,INT_L index=0);
    void Set(dTYPE val,INT_L index=0);
    void Init(INT_L size=1,INT_L reserve=0);
    void Print(){// здесь реализация временная пока тестирую
        cout << this->type << "(" << this->sz << "," << this->tl << ")" << endl;
        for (INT_L nx=0;nx<this->sz;nx++)
            cout << nx+1 <<  " = " << this->vars[nx] << endl;
    }
};
 
class Text {
private:
    // Если раскомментировать, то будет ошибка
    //Array<LETTER> str; // РАЗКОММЕНТИРОВАТЬ
public:
    Text(const LETTER str[],INT_L rv=0){// здесь реализация временная пока тестирую
        INT_L sz=0;
        while(str[sz]!='\0')sz++;
        //cout << this->str.Type() << endl;
        //this->str.Init(sz,rv);
        //this->str.Print();
    }
    //~Object() ;
};

#include "Variables.h"
 
template <>
Array<LOGIC>::Array(){this->type="LOGIC";}
template <>
Array<RANGE>::Array(){this->type="RANGE";}
template <> // тут тоже ошибка возникает
Array<LETTER>::Array(){this->type="LETTER";}
template <>
Array<BYTE>::Array(){this->type="BYTE";}
template <>
Array<INT_S>::Array(){this->type="INT_S";}
template <>
Array<INT_W>::Array(){this->type="INT_W";}
template <>
Array<INT_M>::Array(){this->type="INT_M";}
template <>
Array<INT_L>::Array(){this->type="INT_L";}
template <>
Array<INT_T>::Array(){this->type="INT_T";}
template <>
Array<INT_B>::Array(){this->type="INT_B";}
template <>
Array<FLOAT>::Array(){this->type="FLOAT";}
template <>
Array<DOUBLE>::Array(){this->type="DOUBLE";}
 
template <typename dTYPE>
Array<dTYPE>::~Array(){
    delete []this->vars;
}
template <typename dTYPE>
void Array<dTYPE>::Vindex(INT_L &index){
    if(index>this->sz){index=~index+1;
        if(index<this->sz)index=this->sz-index;
            else index=this->sz-1;
    }else if(index>0)index--;
}
template <typename dTYPE>
INT_L Array<dTYPE>::Size(){return this->sz;}
template <typename dTYPE>
INT_L Array<dTYPE>::Total(){return this->tl;}
template <typename dTYPE>
LOGIC Array<dTYPE>::Prev(){
    if(this->it>0){
        this->it--;return true;
    }else return false;
}
template <typename dTYPE>
LOGIC Array<dTYPE>::Next(){
    if(this->it<this->sz-1){
        this->it++;return true;
    }else return false;
}
template <typename dTYPE>
INT_L Array<dTYPE>::Index(){return this->it+1;}
template <typename dTYPE>
void Array<dTYPE>::Index(INT_L it){
    this->Vindex(it);this->it=it;
}
template <typename dTYPE>
dTYPE Array<dTYPE>::Get(INT_L index){
    if(index==0)index=this->it;
    else this->Vindex(index);
    return this->vars[index];
}
 
template <typename dTYPE>
void Array<dTYPE>::Put(dTYPE val,INT_L index){
    this->Vindex(index);this->sz++;
    if(this->sz>this->tl){
        this->tl+=this->rv+1;
        dTYPE *vars=new dTYPE[this->tl] ;
        INT_L nx=0;
        while(nx<index){
            vars[nx]=this->vars[nx];nx++;
        }
        while(nx<this->sz){
            vars[nx+1]=this->vars[nx];nx++;
        }
        delete []this->vars;
        this->vars=vars;
    }else if(index<this->sz){
        for(INT_L nx=this->sz;nx>index;nx--)
            this->vars[nx]=this->vars[nx-1];
    }
    //cout << "Put[" << index+1 << "]=" << val << endl;
    this->vars[index]=val;
    //this->Print();
}
template <typename dTYPE>
void Array<dTYPE>::Set(dTYPE val,INT_L index){
    if(index==0)index=this->it;
    this->vars[index]=val;
}
template <typename dTYPE>
void Array<dTYPE>::Init(INT_L size,INT_L reserve){
    this->sz=size;this->rv=reserve;this->tl=size+reserve;
    this->vars=new dTYPE[this->tl];
}
 
int main(){
    setlocale(LC_ALL,"");
    Array<INT_L> obj;
    obj.Init(2,3);
    INT_L nx=1;
    do{
        obj.Set(nx);nx++;
    }while(obj.Next());
    obj.Put(nx,2);obj.Put(33,2);obj.Put(44,0);obj.Put(99,-1);
    obj.Put(888,2);obj.Put(5555,5);obj.Put(5555,7);obj.Put(5555,3);
    obj.Print();
    cout << "----------------" << endl;
    if(obj.Size()){
        obj.Index(-1);
        do{
            cout << obj.Get() << endl;
        }while(obj.Prev());
    }
    cout << "----------------" << endl;
    Array<LETTER> str;
    str.Init(2,3);
    str.Set('Ф');
    str.Print();
    
    // Для создания объекта типа Text
    // Text txt("проверка12"); // РАЗКОММЕНТИРОВАТЬ
    
    system("pause");
    return 0;
}

template <> // тут тоже ошибка возникает
Array<LETTER>::Array(){this->type="LETTER";}

template <> Array<LETTER>::Array();
template <> Array<INT_L>::Array();
// И т.д.