%pal nprocs 2  end

%maxcore 28000
!UKS r2SCAN def2-SV(P) def2/J CPCM(thf) FREQ  defgrid3
* xyzfile 0 1 4-whole-HAT-S.xyz