Searched refs:display_format (Results 1 - 2 of 2) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/
H A DComplex.t201 print "# package display_format cartesian?\n";
202 print "not " unless Math::Complex->display_format eq 'cartesian';
209 \$j->display_format('polar');
214 print "# j display_format polar?\n";
215 print "not " unless \$j->display_format eq 'polar';
225 my %display_format;
227 %display_format = \$j->display_format;
232 print "# display_format{style} polar?\n";
233 print "not " unless \$display_format{styl
[all...]
H A DComplex.pm174 $self->display_format('cartesian');
222 $self->display_format('polar');
1292 # display_format
1293 # ->display_format
1296 # don't happen to have overridden it via ->display_format
1304 sub display_format { subroutine
1306 my %display_format = %DISPLAY_FORMAT;
1309 if (exists $self->{display_format}) {
1310 my %obj = %{$self->{display_format}};
1311 @display_format{key
[all...]

Completed in 23 milliseconds