AI-LibNeural
view release on metacpan - search on metacpan
view release on metacpan or search on metacpan
t/00.AILibNeural.t view on Meta::CPAN
#
# You should have received a copy of the GNU Library General Public
# License along with this library; if not, write to the
# Free Software Foundation, Inc., 59 Temple Place - Suite 330,
# Boston, MA 02111-1307 USA.
#
#########################
use strict;
use Test::More tests => 31;
BEGIN { use_ok('AI::LibNeural', ':all') };
#########################
my $nn;
ok( $nn = AI::LibNeural->new( 2, 4, 1 ) );
ok( $nn =~ m/AI::LibNeural=SCALAR(.*)/ );
ok( ALL == 0 );
ok( INPUT == 1 );
ok( HIDDEN == 2 );
ok( OUTPUT == 3 );
t/01.AILibNeuralChild.t view on Meta::CPAN
#
# You should have received a copy of the GNU Library General Public
# License along with this library; if not, write to the
# Free Software Foundation, Inc., 59 Temple Place - Suite 330,
# Boston, MA 02111-1307 USA.
#
#########################
use strict;
use Test::More tests => 31;
BEGIN { use_ok('AI::LibNeural', ':all') };
#########################
package AI::LibNeural::Child;
our @ISA = qw(AI::LibNeural);
package main;
my $nn;
view all matches for this distributionview release on metacpan - search on metacpan
( run in 0.666 second using v1.00-cache-2.02-grep-82fe00e-cpan-585fae043c8 )