Sim-OPT

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

            "Data::Dump" : "0",
            "Data::Dumper" : "0",
            "Devel::REPL" : "0",
            "File::Copy" : "0",
            "IO::Tee" : "0",
            "List::AllUtils" : "0",
            "List::Compare" : "0",
            "List::MoreUtils" : "0",
            "List::Util" : "0",
            "MCE::Loop" : "0",
            "Math::Polygon::Tree" : "0",
            "Math::Round" : "0",
            "Math::Trig" : "0",
            "Moose" : "0",
            "Regexp::Common" : "0",
            "Scalar::Util" : "0",
            "Set::Intersection" : "0",
            "Statistics::Basic" : "0",
            "Storable" : "0",
            "Vector::Object3D::Polygon" : "0",
            "warnings::unused" : "0"

META.yml  view on Meta::CPAN

  Data::Dump: '0'
  Data::Dumper: '0'
  Devel::REPL: '0'
  File::Copy: '0'
  IO::Tee: '0'
  List::AllUtils: '0'
  List::Compare: '0'
  List::MoreUtils: '0'
  List::Util: '0'
  MCE::Loop: '0'
  Math::Polygon::Tree: '0'
  Math::Round: '0'
  Math::Trig: '0'
  Moose: '0'
  Regexp::Common: '0'
  Scalar::Util: '0'
  Set::Intersection: '0'
  Statistics::Basic: '0'
  Storable: '0'
  Vector::Object3D::Polygon: '0'
  warnings::unused: '0'

Makefile.PL  view on Meta::CPAN

			'List::MoreUtils' => '0',
			'List::Compare'  => '0',
			'Moose'  => '0',
			'Statistics::Basic'  => '0',
			'IO::Tee'  => '0',
			'Set::Intersection'  => '0',
			'Storable'  => '0',
			'File::Copy' => '0',
			'warnings::unused' => '0',
			'Vector::Object3D::Polygon' => '0',
			'Math::Polygon::Tree' => '0',
			'Devel::REPL' => '0',
			'Regexp::Common' => '0',
			#'Parallel::ForkManager' => '0',
			'MCE::Loop' => '0',
			'Scalar::Util' => '0',
			}, # e.g., Module::Name => 1.1
    ($] >= 5.014 ?     ## Add these new keywords supported since 5.005
      (ABSTRACT       => 'Sim::OPT is a optimization and parametric exploration program that can mix sequential and parallel block search methods.', # retrieve abstract from module
       AUTHOR         => 'Gian Luca Brunetti <gianluca.brunetti@polimi.it>') : ()),
);

lib/Sim/OPT/Modish.pm  view on Meta::CPAN

use Exporter;
use vars qw( $VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS );
use Math::Trig;
use List::Util qw[ min max reduce shuffle any];
use List::MoreUtils qw(uniq);
use List::AllUtils qw(sum);
use Statistics::Basic qw(:all);
use Data::Dump qw(dump);
use Regexp::Common;
use Vector::Object3D::Polygon;
use Math::Polygon::Tree;
use Storable qw(store retrieve dclone);
#use Parallel::ForkManager;
use feature 'say';
no strict;
no warnings;
use Switch::Back;
use feature 'smartmatch';
no warnings 'experimental::smartmatch';

our @ISA = qw(Exporter);

lib/Sim/OPT/Modish.pm  view on Meta::CPAN

  }

  my $count = 0;
  my ( $vert_xys, $vert_xzs, $vert_yzs, $polyxy, $polyxz, $polyyz );
  my ( @verts_xys, @verts_xzs, @verts_yzs);
  foreach my $case ( @boxvertxy )
  {
    $vert_xys = $boxvertxy[$count];
    $vert_xzs = $boxvertxz[$count];
    $vert_yzs = $boxvertyz[$count];
    $polyxy = Math::Polygon::Tree->new( $vert_xys );
    $polyxz = Math::Polygon::Tree->new( $vert_xzs );
    $polyyz = Math::Polygon::Tree->new( $vert_yzs );
    $count++;
  }

  my $count = 0;
  my @newbox;
  foreach my $caseref ( @gridpoints )
  {
    my @case = @$caseref;
    my $surfnum = $case[ 1 ];
    my $dirvector = $case[ 2 ];