1function gbtest3 2%GBTEST3 test dnn 3 4% SuiteSparse:GraphBLAS, Timothy A. Davis, (c) 2017-2021, All Rights Reserved. 5% SPDX-License-Identifier: GPL-3.0-or-later 6 7help GrB.dnn 8 9rng ('default') ; 10levels = 4 ; 11nfeatures = 6 ; 12nneurons = 16 ; 13 14for level = 1:levels 15 W {level} = sprand (nneurons, nneurons, 0.5) ; %#ok<*AGROW> 16 bias {level} = -0.3 * ones (1, nneurons) ; 17end 18 19Y0 = sprandn (nfeatures, nneurons, 0.5) ; 20 21Y1 = dnn_matlab (W, bias, Y0) ; 22 23[W, bias, Y0] = dnn_mat2gb (W, bias, Y0) ; 24Y2 = GrB.dnn (W, bias, Y0) ; 25 26err = norm (Y1-Y2,1) ; 27assert (err < 1e-5) ; 28 29fprintf ('gbtest3: all tests passed\n') ; 30 31