Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl

...
push @{ $solvent_face{ $1 }{ $3 } }, $2 while
  /\b (F\S+) \h+ ([-\d.]+) (?=.*? (\S+) \h+ 0.00000000 )/gsx;
use Data::Dump 'dd'; dd \%solvent_face;
  2. or download this
    {
  "acetonitrile" => {
...
  "h2o_F11-1" => 29.58963453,
  "h2o_F111" => 30.24092207,
}