include file: SWFSWTBD 2
      INTEGER FSWTBD          ! First "wet" band (water vapour absorbs)    SWFSWTBD.2      
      PARAMETER (FSWTBD=2)                                                 SWFSWTBD.3