The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

Photonic::NonRetarded::SH

VERSION

version 0.007

SYNOPSIS

use Photonic::NonRetarded::SH;
my $nrsh=Photonic::NonRetarded::SH->
          new(shp=>$shp, epsA1=>$epsA1, epsB1=>$epsB1,
              epsA2=>$epsA2, epsB2=>$epsB2); 
my $PL_G=$nrsh->selfConsistentL_G;

DESCRIPTION

Calculates the non retarded SH polarizations and fields of arbitrary a periodic composite made up of centrosymmetric isotropic component materials, using the continuous dipolium model.

METHODS

  • new(shp=>$shp, epsA1=>$epsA1, epsB1=>$epsB1, epsA2=>$epsA2, epsB2=>epsB2);

    Initializes the structure

    $shp is a Photonic::NonRetarded::SHP object with the invariant part of the data structures for the calculations

    $epsA1, $epsB1, $epsA2, $epsB2 are the dielectric functions of the A and B materials at the fundamental and the second harmonic frequency