get vibrational modes
&data
   ntrun = 1,
   cut = 99.0,
   ilevel = 1,
&end  
