test_fclayer_delta_propagation.cpp

#include <Pds/Ra>
#include <Pds/Nn>
 
int main(void)
{        
    Pds::Vector X="1 4 1 2 -1"; X.Print("<<X>>\n");
    Pds::Vector Y="-1 1";       Y.Print("<<Y>>\n");
    
    Pds::FCLayer L1=Pds::FCLayer(5,8,Pds::Sigmoid,Pds::DSigmoid);
    Pds::FCLayer L2=Pds::FCLayer(8,2,Pds::Sigmoid,Pds::DSigmoid);
    
    Pds::Vector A1(8), Z1(8);
    L1.Predict(X,A1,Z1);
    A1.Print("\n<<A1>>\n");    Z1.Print("<<Z1>>\n");
        
    Pds::Vector A2(2), Z2(2);        
    L2.Predict(A1,A2,Z2);
    A2.Print("\n<<A2>>\n");    Z2.Print("<<Z2>>\n");
    
    Pds::Vector d2=(A2-Y);
    d2.Print("\n<<d2>>\n");
    
    Pds::Vector d1(8);
    Pds::FCLayer::DeltaBackPropagation(L2.GetW(),d2,Pds::DTanh,Z1,d1);
    d1.Print("<<d1>>\n");
    
    return 0;
}