Updated makeStr.90 to avoid warning. Exported co_ca from io_utils.f90. Changed FFLAGS for gfortran to avoid people worrying warnings that are not important. Removed unused variables to avoid warnings.

Author: Gus Hart

aux_src/makeStr.f90

@@ -10,7 +10,7 @@ PROGRAM makeStr
 implicit none
 character(80) fname, title, strname, strNstring
 character(maxLabLength) :: labeling
-integer ioerr, iline, ic, i, ilab, pgOps, nD, hnfN, iAt, jAt, iSpec, nSpec, idx, foutput_unit
+integer ioerr, iline, ic, i, ilab, pgOps, nD, hnfN, iAt, jAt, nSpec, idx, foutput_unit
 integer k, strN, istrN, strNi, strNf, sizeN, n, diag(3), a,b,c,d,e,f, nType
 integer HNF(3,3), L(3,3), hnf_degen, lab_degen, tot_degen
 integer, pointer :: gIndx(:)

src/Makefile

@@ -15,7 +15,8 @@ ifeq (${F90},gfortran)  # gfortran compiler
      FFLAGS = -O3 -ffree-line-length-none -fno-underscoring -I${LBD1}
      FOUND = true
   else
-     FFLAGS = -fPIC -g -fbounds-check -Wall -ffree-line-length-none -fno-underscoring -I${LBD1}
+	FFLAGS = -fPIC -g -fbounds-check -ffree-line-length-none -fno-underscoring -I${LBD1}
+     #FFLAGS = -fPIC -g -fbounds-check -Wall -ffree-line-length-none -fno-underscoring -I${LBD1}
      FOUND = true
   endif
 endif

src/derivative_structure_generator.f90

@@ -1269,7 +1269,7 @@ SUBROUTINE gen_multilattice_derivatives(title, parLV, nDFull, dFull, k, nMin, nM
 
     ! Beginning of main routine for enumeration
     open(23,file="VERSION.enum")
-    write(23,'(A)') "v2.0.4-65-g49c3-dirty"
+    write(23,'(A)') "v2.0.4-67-g6e2d-dirty"
     close(23)
 
     ![TODO] Get rid of all the junk that crept in (writing files, making inactives table, etc. These should all be in routines so that this main routine is still readable)

src/io_utils.f90

@@ -9,7 +9,7 @@ MODULE io_utils
 
 private
 public read_input, write_lattice_symmetry_ops, write_rotperms_list, read_in_cells_from_file, &
-       read_struct_enum_out, read_arrows, check_for_fixed_cells
+       read_struct_enum_out, read_arrows, check_for_fixed_cells, co_ca
 
 CONTAINS
    !!<summary> This routine looks to see if the enumeration should be limited to a set of fixed cell shapes. If so,