changed extension from .i90 to .inc

to avoid conflicts with intel preprocessor produced files

.gitattributes

@@ -1 +1 @@
-*.i90 linguist-language=fortran
+*.inc linguist-language=fortran

.gitignore

@@ -37,4 +37,5 @@
 /tmp
 /archive
 .DS_Store
-/*.png
+/*.png
+__pycache__

scripts/generate_files.py

@@ -300,7 +300,7 @@ def write_property_file(fixed_or_variable : str, methods : list):
 ################################################################################################
 def write_property_interface_file(fixed_or_variable : str, methods : list):
     """Interfaces for the property methods (creates an include file)"""
-    with open(f'./src/rklib_{fixed_or_variable}_property_interfaces.i90', 'w') as f:
+    with open(f'./src/rklib_{fixed_or_variable}_property_interfaces.inc', 'w') as f:
         for m in methods:
             short_name, long_name, props, order, stages, registers, cfl, reference = m
             f.write(f'pure module function {short_name}_properties(me) result(p)\n')
@@ -312,7 +312,7 @@ def write_property_interface_file(fixed_or_variable : str, methods : list):
 ################################################################################################
 def write_class_file(fixed_or_variable : str, methods : list):
     """Defines the integrator classes (creates an include file)"""
-    with open(f'./src/rklib_{fixed_or_variable}_classes.i90', 'w') as f:
+    with open(f'./src/rklib_{fixed_or_variable}_classes.inc', 'w') as f:
         f.write(f'    ! {fixed_or_variable.capitalize()} step methods:\n\n')
         for m in methods:
             short_name, long_name, props, order, stages, registers, cfl, reference = m
@@ -329,7 +329,7 @@ def write_class_file(fixed_or_variable : str, methods : list):
 
 def write_step_interface_file(fixed_or_variable : str, methods : list):
     """Interfaces for the step methods (creates an include file)"""
-    with open(f'./src/rklib_{fixed_or_variable}_step_interfaces.i90', 'w') as f:
+    with open(f'./src/rklib_{fixed_or_variable}_step_interfaces.inc', 'w') as f:
         f.write(f'    ! {fixed_or_variable} step interfaces\n\n')
         for m in methods:
             short_name, long_name, props, order, stages, registers, cfl, reference = m
@@ -349,7 +349,7 @@ def write_step_interface_file(fixed_or_variable : str, methods : list):
 
 def write_allocate_and_test_file(methods : list):
     """Generate list of method allocations and test calls (creates an include file)"""
-    with open(f'./test/rklib_allocate_and_test.i90', 'w') as f:
+    with open(f'./test/rklib_allocate_and_test.inc', 'w') as f:
         for m in methods:
             f.write(f"    allocate({m[0]}_class :: s); call run_test()\n")
 

src/rklib_module.F90

@@ -234,8 +234,8 @@ module rklib_module
         procedure,public :: set_fsal_cache
     end type rk_variable_step_fsal_class
 
-#include "rklib_fixed_classes.i90"
-#include "rklib_variable_classes.i90"
+#include "rklib_fixed_classes.inc"
+#include "rklib_variable_classes.inc"
 
     abstract interface
 
@@ -318,10 +318,10 @@ end function properties_func
 
     ! submodule procedures:
     interface
-#include "rklib_fixed_step_interfaces.i90"
-#include "rklib_variable_step_interfaces.i90"
-#include "rklib_fixed_property_interfaces.i90"
-#include "rklib_variable_property_interfaces.i90"
+#include "rklib_fixed_step_interfaces.inc"
+#include "rklib_variable_step_interfaces.inc"
+#include "rklib_fixed_property_interfaces.inc"
+#include "rklib_variable_property_interfaces.inc"
     end interface
 
     ! public routines:

test/rk_test_order.F90

@@ -20,7 +20,7 @@ program rk_test_order
     write(*, '(a10, a10, a24, a9)') 'Method', "Variable", "xf", "Success"
     write(*, *) "----------------------------------------------------"
 
-#include "rklib_allocate_and_test.i90"
+#include "rklib_allocate_and_test.inc"
 
 contains