### ----------------------------------------------------
### -- Geo::Ellipsoid
### -- Licenses: Artistic-2.0
### -- Authors: Tom Browder <tbrowder@acm.org> (translator Perl 5 to Raku, current maintainer), Jim Gibson (CPAN Perl 5 author, v1.12)
### -- File: dev/T.raku
### ----------------------------------------------------
#!/usr/bin/env raku

use v6;
use lib '.';
use T;
my $t = T.new;
say "\$t.a = {$t.a}";
say "\$t.b = {$t.b}";
say "\$t.c = {$t.c.defined ?? $t.c !! 'undefined'}";
$t.set_b(20);
$t.c = 'defined';
say "\$t.a = {$t.a}";
say "\$t.b = {$t.b}";
say "\$t.c = {$t.c.defined ?? $t.c !! 'undefined'}";

say "SHOW:";
$t.show;

=begin pod

say "d is both an attribute and a method:";
say $t.d();
say $t.d('seven');

=end pod


