I'll add this test case a little later after I update the Perl script
to check for transition dipole moments

