view release on metacpan or search on metacpan
t/Relativity.test view on Meta::CPAN
03. Space and Time in Classical Mechanics
04. The Galileian System of Co-ordinates
05. The Principle of Relativity (in the Restricted Sense)
06. The Theorem of the Addition of Velocities employed in
Classical Mechanics
07. The Apparent Incompatability of the Law of Propagation of
Light with the Principle of Relativity
08. On the Idea of Time in Physics
09. The Relativity of Simultaneity
10. On the Relativity of the Conception of Distance
11. The Lorentz Transformation
t/Relativity.test view on Meta::CPAN
ideas. Geometry ought to refrain from such a course, in order to give
to its structure the largest possible logical unity. The practice, for
example, of seeing in a "distance" two marked positions on a
practically rigid body is something which is lodged deeply in our
habit of thought. We are accustomed further to regard three points as
being situated on a straight line, if their apparent positions can be
made to coincide for observation with one eye, under suitable choice
of our place of observation.
If, in pursuance of our habit of thought, we now supplement the
propositions of Euclidean geometry by the single proposition that two
t/Relativity.test view on Meta::CPAN
A priori it is by no means certain that this last measurement will
supply us with the same result as the first. Thus the length of the
train as measured from the embankment may be different from that
obtained by measuring in the train itself. This circumstance leads us
to a second objection which must be raised against the apparently
obvious consideration of Section 6. Namely, if the man in the
carriage covers the distance w in a unit of time -- measured from the
train, -- then this distance -- as measured from the embankment -- is
not necessarily also equal to w.
t/Relativity.test view on Meta::CPAN
THE LORENTZ TRANSFORMATION
The results of the last three sections show that the apparent
incompatibility of the law of propagation of light with the principle
of relativity (Section 7) has been derived by means of a
consideration which borrowed two unjustifiable hypotheses from
classical mechanics; these are as follows:
t/Relativity.test view on Meta::CPAN
disappears, because the theorem of the addition of velocities derived
in Section 6 becomes invalid. The possibility presents itself that
the law of the propagation of light in vacuo may be compatible with
the principle of relativity, and the question arises: How have we to
modify the considerations of Section 6 in order to remove the
apparent disagreement between these two fundamental results of
experience? This question leads to a general one. In the discussion of
Section 6 we have to do with places and times relative both to the
train and to the embankment. How are we to find the place and time of
an event in relation to the train, when we know the place and time of
the event with respect to the railway embankment ? Is there a
t/Relativity.test view on Meta::CPAN
here the fact that the theory of relativity enables us to predict the
effects produced on the light reaching us from the fixed stars. These
results are obtained in an exceedingly simple manner, and the effects
indicated, which are due to the relative motion of the earth with
reference to those fixed stars are found to be in accord with
experience. We refer to the yearly movement of the apparent position
of the fixed stars resulting from the motion of the earth round the
sun (aberration), and to the influence of the radial components of the
relative motions of the fixed stars with respect to the earth on the
colour of the light reaching us from them. The latter effect manifests
itself in a slight displacement of the spectral lines of the light
t/Relativity.test view on Meta::CPAN
one, for reasons which will become evident at a later stage.
Since the introduction of the special principle of relativity has been
justified, every intellect which strives after generalisation must
feel the temptation to venture the step towards the general principle
of relativity. But a simple and apparently quite reliable
consideration seems to suggest that, for the present at any rate,
there is little hope of success in such an attempt; Let us imagine
ourselves transferred to our old friend the railway carriage, which is
travelling at a uniform rate. As long as it is moving unifromly, the
occupant of the carriage is not sensible of its motion, and it is for
t/Relativity.test view on Meta::CPAN
gravitational field. Before proceeding farther, however, I must warn
the reader against a misconception suggested by these considerations.
A gravitational field exists for the man in the chest, despite the
fact that there was no such field for the co-ordinate system first
chosen. Now we might easily suppose that the existence of a
gravitational field is always only an apparent one. We might also
think that, regardless of the kind of gravitational field which may be
present, we could always choose another reference-body such that no
gravitational field exists with reference to it. This is by no means
true for all gravitational fields, but only for those of quite special
form. It is, for instance, impossible to choose a body of reference
t/Relativity.test view on Meta::CPAN
incidence is nevertheless 1.7 seconds of arc. This ought to manifest
itself in the following way. As seen from the earth, certain fixed
stars appear to be in the neighbourhood of the sun, and are thus
capable of observation during a total eclipse of the sun. At such
times, these stars ought to appear to be displaced outwards from the
sun by an amount indicated above, as compared with their apparent
position in the sky when the sun is situated at another part of the
heavens. The examination of the correctness or otherwise of this
deduction is a problem of the greatest importance, the early solution
of which is to be expected of astronomers.[2]*
view release on metacpan or search on metacpan
inc/Module/Install.pm view on Meta::CPAN
my $cwd = Cwd::cwd();
my $sym = "${who}::AUTOLOAD";
$sym->{$cwd} = sub {
my $pwd = Cwd::cwd();
if ( my $code = $sym->{$pwd} ) {
# Delegate back to parent dirs
goto &$code unless $cwd eq $pwd;
}
unless ($$sym =~ s/([^:]+)$//) {
# XXX: it looks like we can't retrieve the missing function
# via $$sym (usually $main::AUTOLOAD) in this case.
view release on metacpan or search on metacpan
my ($build) = @_;
my $prefix = Path::Tiny::path($build->install_prop->{prefix});
my $output = Path::Tiny::path($build_dir, $output_dir);
my $prefix_bin_name = $prefix->child('bin', $bin_name);
$prefix_bin_name->parent->mkpath;
File::Copy::Recursive::fcopy($output->child($bin_name), $prefix_bin_name);
}
];
after build => sub {
my($build) = @_;
$_->remove for $_7zip->children( qr/\.chm$|History\.txt|readme\.txt/ );
my $bin_dir = $cwd->child('bin');
$bin_dir->mkpath;
File::Copy::Recursive::rmove( "$_7zip/*", $bin_dir );
$_7zip->remove_tree;
$_7zip->parent->remove_tree unless $_7zip->parent->children;
};
plugin 'Build::Copy';
after build => sub {
my($build) = @_;
$build->runtime_prop->{'style'} = 'binary';
view release on metacpan or search on metacpan
inc/Module/Install.pm view on Meta::CPAN
my $cwd = Cwd::cwd();
my $sym = "${who}::AUTOLOAD";
$sym->{$cwd} = sub {
my $pwd = Cwd::cwd();
if ( my $code = $sym->{$pwd} ) {
# Delegate back to parent dirs
goto &$code unless $cwd eq $pwd;
}
unless ($$sym =~ s/([^:]+)$//) {
# XXX: it looks like we can't retrieve the missing function
# via $$sym (usually $main::AUTOLOAD) in this case.
view release on metacpan or search on metacpan
lib/Alien/Adaptagrams.pm view on Meta::CPAN
# ABSTRACT: Alien package for the Adaptagrams adaptive diagram library
$Alien::Adaptagrams::VERSION = '0.001';
use strict;
use warnings;
use parent qw(Alien::Base);
sub pkg_config_path {
my ($class) = @_;
if( $class->install_type eq 'share' ) {
return File::Spec->catfile( File::Spec->rel2abs($class->dist_dir), qw(lib pkgconfig) );
view release on metacpan or search on metacpan
lib/Alien/BCM2835.pm view on Meta::CPAN
package Alien::BCM2835;
use strict;
use warnings;
use parent 'Alien::Base';
our $VERSION = '1.056';
1;
view release on metacpan or search on metacpan
lib/Alien/Base/Dino/darwin.pm view on Meta::CPAN
use strict;
use warnings;
use 5.008001;
# Apparently no OS specific operations need to be done
# on OS X / darwin
1;
__END__
view release on metacpan or search on metacpan
lib/Alien/Base/ModuleBuild.pm view on Meta::CPAN
package Alien::Base::ModuleBuild;
use strict;
use warnings;
use 5.008001;
use parent 'Module::Build';
use Capture::Tiny 0.17 qw/capture tee/;
use File::chdir;
use File::Spec;
use File::Basename qw/fileparse/;
use Carp;
lib/Alien/Base/ModuleBuild.pm view on Meta::CPAN
=over
=item General Usage (L<Module::Build>)
This is the landing document for L<Alien::Base::ModuleBuild>'s parent class.
It describes basic usage and background information.
Its main purpose is to assist the user who wants to learn how to invoke
and control C<Module::Build> scripts at the command line.
It also lists the extra documentation for its use. Users and authors of Alien::
view release on metacpan or search on metacpan
xt/author/version.t view on Meta::CPAN
use YAML qw( LoadFile );
use FindBin;
use File::Spec;
plan skip_all => "test not built yet (run dzil test)"
unless -e dir( $FindBin::Bin)->parent->parent->file('Makefile.PL')
|| -e dir( $FindBin::Bin)->parent->parent->file('Build.PL');
my $config_filename = File::Spec->catfile(
$FindBin::Bin, File::Spec->updir, File::Spec->updir, 'author.yml'
);
view release on metacpan or search on metacpan
lib/Alien/Base.pm view on Meta::CPAN
package Alien::MyLibrary;
use strict;
use warnings;
use parent 'Alien::Base';
1;
(for details on the C<Makefile.PL> or C<Build.PL> and L<alienfile>
that should be bundled with your L<Alien::Base> subclass, please see
view release on metacpan or search on metacpan
inc/Module/Install.pm view on Meta::CPAN
my $cwd = Cwd::cwd();
my $sym = "${who}::AUTOLOAD";
$sym->{$cwd} = sub {
my $pwd = Cwd::cwd();
if ( my $code = $sym->{$pwd} ) {
# delegate back to parent dirs
goto &$code unless $cwd eq $pwd;
}
$$sym =~ /([^:]+)$/ or die "Cannot autoload $who - $sym";
unless ( uc($1) eq $1 ) {
unshift @_, ( $self, $1 );
view release on metacpan or search on metacpan
lib/Alien/Bazel/Util.pm view on Meta::CPAN
}
if( my $javac = which('javac') ) {
my ($version, $exit) = capture_stdout { system($javac, qw(--version)) };
if( !$exit && $version =~ /javac/s ) {
my $java_home = path($javac)->realpath->parent(2);
push @checks, { home => $java_home,
src => 'javac in PATH' };
}
}
view release on metacpan or search on metacpan
maint/update-corpus.pl view on Meta::CPAN
use warnings;
use autodie qw( :all );
use 5.010;
use Path::Tiny qw( path );
chdir(path(__FILE__)->absolute->parent->parent->child('corpus')->stringify);
system 'rm -rf Alien-Build-Git-Example1 example1.tar example1';
system 'git clone git@github.com:plicease/Alien-Build-Git-Example1.git Alien-Build-Git-Example1';
system 'mv Alien-Build-Git-Example1 example1';
system 'tar cvf example1.tar example1';
view release on metacpan or search on metacpan
lib/Alien/Build/MB.pm view on Meta::CPAN
sub _alien_touch ($)
{
my($name) = @_;
my $path = Path::Tiny->new("_alien/mb/$name");
$path->parent->mkpath;
$path->touch;
}
sub ACTION_alien_download
lib/Alien/Build/MB.pm view on Meta::CPAN
{
my @parts = split /-/, $self->dist_name;
my $package = join '::', @parts;
my $install_files = Path::Tiny->new("./blib/lib")->child( @parts, 'Install', 'Files.pm' );
$install_files->parent->mkpath;
$install_files->spew_utf8(
"package ${package}::Install::Files;\n",
"use strict;\n",
"use warnings;\n",
"require ${package};\n",
view release on metacpan or search on metacpan
t/alien_build_plugin_build_make.t view on Meta::CPAN
path('install.pl')->spew("#!$^X\n", q{
use strict;
use warnings;
use Path::Tiny qw( path );
my($from, $to) = map { path($_) } @ARGV;
$to->parent->mkpath;
$from->copy($to);
print "copy $from $to\n";
});
path('foo.c')->spew(
view release on metacpan or search on metacpan
lib/Alien/Build/Plugin/Cleanse/BuildDir.pm view on Meta::CPAN
$build->log ("Going to delete $build_dir\n");
$build->log ("Currently in " . getcwd() . "\n");
my $curdir = getcwd();
if (path($curdir)->subsumes ($build_dir)) {
$build->log ("Going to parent of build directory\n");
chdir "$build_dir/..";
}
my $count = eval {
remove_tree ($build_dir, {
view release on metacpan or search on metacpan
lib/Alien/Build/Plugin/Fetch/Cache.pm view on Meta::CPAN
}
my $res = $orig->($build, $url);
if(defined $local_file)
{
$local_file->parent->mkpath;
if($res->{type} eq 'file')
{
my $md5 = Digest::MD5->new;
if($res->{content})
lib/Alien/Build/Plugin/Fetch/Cache.pm view on Meta::CPAN
}
my $data = Path::Tiny->new(bsd_glob '~/.alienbuild/plugin_fetch_cache/payload')
->child($md5->hexdigest)
->child($res->{filename});
$data->parent->mkpath;
my $res2 = {
type => 'file',
filename => $res->{filename},
path => $data->stringify,
view release on metacpan or search on metacpan
xt/author/version.t view on Meta::CPAN
use YAML qw( LoadFile );
use FindBin;
use File::Spec;
plan skip_all => "test not built yet (run dzil test)"
unless -e dir( $FindBin::Bin)->parent->parent->file('Makefile.PL')
|| -e dir( $FindBin::Bin)->parent->parent->file('Build.PL');
my $config_filename = File::Spec->catfile(
$FindBin::Bin, File::Spec->updir, File::Spec->updir, 'author.yml'
);
view release on metacpan or search on metacpan
xt/author/version.t view on Meta::CPAN
use YAML qw( LoadFile );
use FindBin;
use File::Spec;
plan skip_all => "test not built yet (run dzil test)"
unless -e dir( $FindBin::Bin)->parent->parent->file('Makefile.PL')
|| -e dir( $FindBin::Bin)->parent->parent->file('Build.PL');
my $config_filename = File::Spec->catfile(
$FindBin::Bin, File::Spec->updir, File::Spec->updir, 'author.yml'
);
view release on metacpan or search on metacpan
corpus/lib/Alien/Foo1.pm view on Meta::CPAN
package Alien::Foo1;
use strict;
use warnings;
use parent qw( Alien::Base );
1;
view release on metacpan or search on metacpan
lib/Alien/CImg.pm view on Meta::CPAN
package Alien::CImg;
use strict;
use warnings;
our $VERSION = '0.01';
use parent 'Alien::Base';
1;
__END__
view release on metacpan or search on metacpan
$version_base );
my %paths_changed;
# Turn paths from PYTHON_FRAMEWORK_PREFIX to @rpath/Python.framework.
my $frameworks_path = path(PYTHON_FRAMEWORK_PREFIX)->parent;
my $rpathify = sub {
my ($path) = @_;
return unless index($path, PYTHON_FRAMEWORK_PREFIX . '/') == 0;
return File::Spec->catfile(
'@rpath',
$paths_changed{$change_path} = 1;
$change_path->chmod('u+w');
my $path_rel_ver = $change_path->relative( $version_base );
if( $path_rel_ver->parent eq 'bin' || $path_rel_ver eq 'Resources/Python.app/Contents/MacOS/Python' ) {
my $exec_path_rpath = File::Spec->catfile(
'@executable_path',
$base->relative($change_path->parent),
);
$build->log("-add_rpath for $change_path: $exec_path_rpath\n");
IPC::Cmd::run( command => [
qw(install_name_tool -add_rpath),
$exec_path_rpath,
my $framework_dst_dir = path('Python.framework');
$framework_dst_dir->mkpath;
File::Copy::Recursive::rmove( "$framework_src_dir/Payload/*", $framework_dst_dir );
$framework_src_dir->remove_tree( { safe => 0 } );
macos_relocatable_python($build, $framework_dst_dir->parent);
};
plugin 'Build::Copy';
after build => sub {
view release on metacpan or search on metacpan
lib/Alien/Capstone.pm view on Meta::CPAN
package Alien::Capstone;
use parent 'Alien::Base';
use Alien::Capstone::ConfigData;
our $VERSION = '0.07';
sub is_installed {
view release on metacpan or search on metacpan
lib/Alien/Chipmunk.pm view on Meta::CPAN
package Alien::Chipmunk;
use strict;
use warnings;
use parent qw(Alien::Base);
our $VERSION = '0.001002';
$VERSION = eval $VERSION;
1;
view release on metacpan or search on metacpan
cp/codepress/codepress.js view on Meta::CPAN
for(var i=0,n=t.length;i<n;i++) {
if(t[i].className.match('codepress')) {
id = t[i].id;
t[i].id = id+'_cp';
eval(id+' = new CodePress(t[i])');
t[i].parentNode.insertBefore(eval(id), t[i]);
}
}
}
if(window.attachEvent) window.attachEvent('onload',CodePress.run);
view release on metacpan or search on metacpan
lib/Alien/DDC/Concordance.pm view on Meta::CPAN
package Alien::DDC::Concordance;
use strict;
use warnings;
use parent 'Alien::Base';
our $VERSION = '0.007';
__END__
=pod
view release on metacpan or search on metacpan
inc/Module/Install.pm view on Meta::CPAN
my $cwd = Cwd::cwd();
my $sym = "${who}::AUTOLOAD";
$sym->{$cwd} = sub {
my $pwd = Cwd::cwd();
if ( my $code = $sym->{$pwd} ) {
# Delegate back to parent dirs
goto &$code unless $cwd eq $pwd;
}
$$sym =~ /([^:]+)$/ or die "Cannot autoload $who - $sym";
my $method = $1;
if ( uc($method) eq $method ) {
view release on metacpan or search on metacpan
DjVuLibre.pm view on Meta::CPAN
package Alien::DjVuLibre;
use parent qw(Alien::Base);
use strict;
use warnings;
our $VERSION = 0.07;
view release on metacpan or search on metacpan
lib/Alien/Doxyparse.pm view on Meta::CPAN
package Alien::Doxyparse;
use strict;
use warnings;
use parent 'Alien::Base';
our $VERSION = '0.17';
=head1 NAME
view release on metacpan or search on metacpan
lib/Alien/DuckDB.pm view on Meta::CPAN
package Alien::DuckDB;
use strict;
use warnings;
use parent qw( Alien::Base );
use 5.008004;
our $VERSION = '0.03';
1;