Added RMCprofile format 6 to import

Author: rneder

discus/prog/appl_dis.hlp

@@ -30,6 +30,7 @@
 !p chem       ! Enter CHEM level (see chem level for details)
 !p connect    ! Enter CONNECTIVITY level
 !p copy       ! Copy atom or molecule within the crystal
+!p decorate   ! Enter  DECORATE level
 !p d2r        ! Transform vector from real to reciprocal space
 !p define     ! Define DISCUS specific settings
 !p diff-four  ! Enter DIFFERENCE FOURIER transform level
@@ -69,6 +70,9 @@
 2  News
 
    Here you find a list of recent changes, additions, bug corrections
+3  2017_Nov
+
+   Added RMCprofile version 5 format to imports 
 3  2017_Oct
 
    Space Groups

discus/prog/discus_err_appl.f90

@@ -9,11 +9,12 @@ SUBROUTINE discus_errlist_appl
 !
 !
       integer       iu,io
-      PARAMETER    (IU=-145,IO=4)
+      PARAMETER    (IU=-146,IO=4)
 !
       CHARACTER(LEN=45) ::  ERROR(IU:IO)
 !
       DATA ERROR ( IU : -141) /                          &
+     &  'No. of atoms not an integer multiple of sites', & !-146 ! discus
      &  'Decoration name not recognized      ',          & !-145 ! discus
      &  'Too few atoms in ligand molecule    ',          & !-144 ! discus
      &  'Wrong parameters for this bond type ',          & !-143 ! discus