Fix implicit SAVE on files_loaded/ios/ios2, fileNames buffer size, and unused Cantera imports

Author: sbryngelson

examples/2D_premixed_flame_vortex/case.py

@@ -5,12 +5,8 @@
 import math
 import os
 
-import cantera as ct
-
 current_dir = os.path.dirname(os.path.abspath(__file__))
 ctfile = "h2o2.yaml"
-sol_L = ct.Solution(ctfile)
-sol_L.TPX = 300, 101325, "H:1"
 
 L = 0.016
 Nx = 1023

examples/2D_premixed_landau_insta/case.py

@@ -5,12 +5,8 @@
 import math
 import os
 
-import cantera as ct
-
 current_dir = os.path.dirname(os.path.abspath(__file__))
 ctfile = "h2o2.yaml"
-sol_L = ct.Solution(ctfile)
-sol_L.TPX = 300, 101325, "H:1"
 
 Lx = 0.0155147
 Ly = 0.00775735

src/common/include/ExtrusionHardcodedIC.fpp

@@ -42,16 +42,16 @@
     real(wp)                                :: dummy_x, dummy_y, dummy_z, x0, y0
     integer                                 :: global_offset_x, global_offset_y  !< MPI subdomain offset
     real(wp)                                :: delta_x, delta_y
-    character(len=150), dimension(sys_size) :: fileNames                         !< Arrays to store all data from files
+    character(len=300), dimension(sys_size) :: fileNames                         !< Arrays to store all data from files
     character(len=200)                      :: errmsg
     real(wp), allocatable                   :: stored_values(:,:,:)
     real(wp), allocatable                   :: x_coords(:), y_coords(:)
     logical                                 :: files_loaded = .false.
     real(wp)                                :: domain_xstart, domain_xend, domain_ystart, domain_yend
     character(len=20)                       :: file_num_str                      !< For storing the file number as a string
     character(len=20)                       :: zeros_part                        !< For the trailing zeros part
-    integer                                 :: ios = 0
-    integer                                 :: ios2 = 0
+    integer                                 :: ios
+    integer                                 :: ios2
 #:enddef
 
 #:def HardcodedReadValues()
@@ -201,4 +201,6 @@
     if (allocated(y_coords)) then
         @:DEALLOCATE(y_coords)
     end if
+
+    files_loaded = .false.
 #:enddef