Arts2
{
  StringCreate( hitranpath )
  StringCreate( outpath )
  StringCreate( hitranfile )
  StringCreate( hitranlocation )
  StringSet( hitranpath, "/storage3/data/catalogue/hitran/hitran2012/" )
  StringSet( outpath, "hitran/" )


### species with <3THz transitions

  abs_speciesSet( species=[
#      4     8     10      12    13     16    17     18      21    22     23
    "N2O", "NO", "NO2", "HNO3", "OH", "HBr", "HI", "ClO", "HOCl", "N2", "HCN",
#       24      26       32   34      37       39      43      44    45    46
    "CH3Cl", "C2H2", "HCOOH", "O", "HOBr", "CH3OH", "C4H2", "HC3N", "H2", "CS",
#     47
    "SO3" ] )

  StringSet( hitranfile, "HITRAN2012.par" )
  Copy( hitranlocation, hitranpath )
  Append( hitranlocation, hitranfile )

  abs_linesReadFromHitran(abs_lines, hitranlocation, 0, 3e12)
  abs_lines_per_speciesCreateFromLines
  abs_lines_per_speciesWriteToSplitArtscat("zascii", abs_lines_per_species,
                                           outpath)

### species with (SO FAR!) NO <3THz transitions

  abs_speciesSet( species=[
#      27      29     30        35     36      38       40       41     42
    "C2H6", "COF2", "SF6", "ClONO2", "NO+", "C2H4", "CH3Br", "CH3CN", "CF4" ] )

  StringSet( hitranfile, "HITRAN2012.par" )
  Copy( hitranlocation, hitranpath )
  Append( hitranlocation, hitranfile )

  abs_linesReadFromHitran(abs_lines, hitranlocation, 0, 3e12)
  abs_lines_per_speciesCreateFromLines
  abs_lines_per_speciesWriteToSplitArtscat("zascii", abs_lines_per_species,
                                           outpath)


### species with (SO FAR!) NO lines in HITRAN at all (but valid ARTS species)

  abs_speciesSet( species=[
    "OClO", "BrO", "H2SO4", "Cl2O2", "HNC", "SO", "C3H8", "H", "He", "Ar" ] )

  StringSet( hitranfile, "HITRAN2012.par" )
  Copy( hitranlocation, hitranpath )
  Append( hitranlocation, hitranfile )

  abs_linesReadFromHitran(abs_lines, hitranlocation, 0, 3e12)
  abs_lines_per_speciesCreateFromLines
  abs_lines_per_speciesWriteToSplitArtscat("zascii", abs_lines_per_species,
                                           outpath)

### for processing single species (from single species HITRAN files)

#  SpeciesSet(abs_species, [ "CH3Br" ])
#  SpeciesSet(abs_species, [ "CF4" ])
#
#  StringSet( hitranfile, "HITRAN2012/By-Molecule/Uncompressed-files/40_hit08.par" )
#  StringSet( hitranfile, "HITRAN2012/Supplemental/42_hit08.par" )
#  Copy( hitranlocation, hitranpath )
#  Append( hitranlocation, hitranfile )
#
#  abs_linesReadFromHitran(abs_lines, hitranlocation, 0, 3e12)
#  abs_lines_per_speciesCreateFromLines
#  abs_lines_per_speciesWriteToSplitArtscat("zascii", abs_lines_per_species,
#                                           outpath)

}