Working version of CACmb capable of building simple models for lammpsCAC

src/main.f90

@@ -27,6 +27,17 @@ program main
     ! Command line parsing
     arg_num = command_argument_count()
 
+    !First check if we are writing out to lammpscac format by looping over all arguments
+    do i = 1, arg_num
+        call get_command_argument(i, argument)
+        select case(argument(scan(argument,'.',.true.)+1:))
+        case('cac')
+            lmpcac = .true.
+        case default
+            continue
+        end select
+    end do 
+
     !Determine if a mode is being used and what it is. The first argument has to be the mode
     !if a mode is being used
     call get_command_argument(1, argument)