Remove committed build output (Rust target/, CMake build dir, __pycache__) containing third-party code

build_final2/.ninja_log

@@ -1,47 +0,0 @@
-# ninja log v6
-52	478	8062663004855321	CMakeFiles/bob_quantum.dir/src/bob_integrator.f90-pp.f90	e0cfa5f3d8942c1b
-52	478	8062663004855321	CMakeFiles/bob_quantum.dir/src/bob_integrator.f90.obj.ddi	e0cfa5f3d8942c1b
-21	514	8062663004545324	CMakeFiles/bob_quantum.dir/src/bob_errors.f90-pp.f90	c578e9951fe765f2
-21	514	8062663004545324	CMakeFiles/bob_quantum.dir/src/bob_errors.f90.obj.ddi	c578e9951fe765f2
-6	566	8062663004395324	CMakeFiles/bob_quantum.dir/src/bob_abi.f90-pp.f90	715a2be7c4f64378
-6	566	8062663004395324	CMakeFiles/bob_quantum.dir/src/bob_abi.f90.obj.ddi	715a2be7c4f64378
-27	604	8062663004605332	CMakeFiles/bob_quantum.dir/src/bob_gates.f90-pp.f90	74633093bdc6a7e0
-27	604	8062663004605332	CMakeFiles/bob_quantum.dir/src/bob_gates.f90.obj.ddi	74633093bdc6a7e0
-36	616	8062663004695310	CMakeFiles/bob_quantum.dir/src/bob_goldilocks.f90-pp.f90	99fcceba57c36578
-36	616	8062663004695310	CMakeFiles/bob_quantum.dir/src/bob_goldilocks.f90.obj.ddi	99fcceba57c36578
-72	625	8062663005060785	CMakeFiles/bob_quantum.dir/src/bob_measurement.f90-pp.f90	2b3c8cec260d0d62
-72	625	8062663005060785	CMakeFiles/bob_quantum.dir/src/bob_measurement.f90.obj.ddi	2b3c8cec260d0d62
-14	702	8062663004475320	CMakeFiles/bob_quantum.dir/src/bob_circuit.f90-pp.f90	c1e87e7783f5cb3e
-14	702	8062663004475320	CMakeFiles/bob_quantum.dir/src/bob_circuit.f90.obj.ddi	c1e87e7783f5cb3e
-65	727	8062663004985494	CMakeFiles/bob_quantum.dir/src/bob_lattice.f90-pp.f90	4b3d180dfd0e8349
-65	727	8062663004985494	CMakeFiles/bob_quantum.dir/src/bob_lattice.f90.obj.ddi	4b3d180dfd0e8349
-478	838	8062663009112478	CMakeFiles/bob_quantum.dir/src/bob_metrics.f90-pp.f90	9fa7ce1d6e398729
-478	838	8062663009112478	CMakeFiles/bob_quantum.dir/src/bob_metrics.f90.obj.ddi	9fa7ce1d6e398729
-59	940	8062663004920404	CMakeFiles/bob_quantum.dir/src/bob_kinds.f90-pp.f90	9bc134fe5f6a1db3
-59	940	8062663004920404	CMakeFiles/bob_quantum.dir/src/bob_kinds.f90.obj.ddi	9bc134fe5f6a1db3
-702	1148	8062663011355314	CMakeFiles/bob_quantum.dir/src/fortran_quantum_interface.f90-pp.f90	863ac3ed15b82166
-702	1148	8062663011355314	CMakeFiles/bob_quantum.dir/src/fortran_quantum_interface.f90.obj.ddi	863ac3ed15b82166
-566	1172	8062663009990069	CMakeFiles/bob_quantum.dir/src/bob_rng.f90-pp.f90	15e51218f65ffa75
-566	1172	8062663009990069	CMakeFiles/bob_quantum.dir/src/bob_rng.f90.obj.ddi	15e51218f65ffa75
-617	1179	8062663010500218	CMakeFiles/bob_quantum.dir/src/bob_worm.f90-pp.f90	431aefea975889db
-617	1179	8062663010500218	CMakeFiles/bob_quantum.dir/src/bob_worm.f90.obj.ddi	431aefea975889db
-43	1221	8062663004765305	CMakeFiles/bob_quantum.dir/src/bob_hamiltonian.f90-pp.f90	681cf4c432bba625
-43	1221	8062663004765305	CMakeFiles/bob_quantum.dir/src/bob_hamiltonian.f90.obj.ddi	681cf4c432bba625
-625	1272	8062663010590223	CMakeFiles/bob_quantum.dir/src/boolean_spectral_lens.f90-pp.f90	eee6a29ce8bda322
-625	1272	8062663010590223	CMakeFiles/bob_quantum.dir/src/boolean_spectral_lens.f90.obj.ddi	eee6a29ce8bda322
-604	1273	8062663010370232	CMakeFiles/bob_quantum.dir/src/bob_state.f90-pp.f90	413d798fedc867dd
-604	1273	8062663010370232	CMakeFiles/bob_quantum.dir/src/bob_state.f90.obj.ddi	413d798fedc867dd
-514	1273	8062663009472473	CMakeFiles/bob_quantum.dir/src/bob_phdae.f90-pp.f90	32d20cf1f364abc6
-514	1273	8062663009472473	CMakeFiles/bob_quantum.dir/src/bob_phdae.f90.obj.ddi	32d20cf1f364abc6
-940	1374	8062663013735312	CMakeFiles/bob_quantum.dir/src/mlir_forge_kernels.f90-pp.f90	3d370d26c06ac2d3
-940	1374	8062663013735312	CMakeFiles/bob_quantum.dir/src/mlir_forge_kernels.f90.obj.ddi	3d370d26c06ac2d3
-727	1385	8062663011610477	CMakeFiles/bob_quantum.dir/src/jordan_block.f90-pp.f90	a43bb3e06547e612
-727	1385	8062663011610477	CMakeFiles/bob_quantum.dir/src/jordan_block.f90.obj.ddi	a43bb3e06547e612
-1221	1533	8062663016539084	CMakeFiles/bob_quantum.dir/src/training_adjoint.f90-pp.f90	8a7bfd0d02b91b5f
-1221	1533	8062663016539084	CMakeFiles/bob_quantum.dir/src/training_adjoint.f90.obj.ddi	8a7bfd0d02b91b5f
-1148	1535	8062663015818155	CMakeFiles/bob_quantum.dir/src/sov_monster_kernel.f90-pp.f90	6c92237463bfd5a4
-1148	1535	8062663015818155	CMakeFiles/bob_quantum.dir/src/sov_monster_kernel.f90.obj.ddi	6c92237463bfd5a4
-1172	1554	8062663016056201	CMakeFiles/bob_quantum.dir/src/spe_encoder.f90-pp.f90	94e155a00fa30352
-1172	1554	8062663016056201	CMakeFiles/bob_quantum.dir/src/spe_encoder.f90.obj.ddi	94e155a00fa30352
-1179	1562	8062663016131215	CMakeFiles/bob_quantum.dir/src/test_fortran_quantum.f90-pp.f90	a2223905f46feef2
-1179	1562	8062663016131215	CMakeFiles/bob_quantum.dir/src/test_fortran_quantum.f90.obj.ddi	a2223905f46feef2

build_final2/BINDINGS_SUMMARY.txt

@@ -1,4 +0,0 @@
-Racket: bob_quantum.rkt (FFI to C ABI) - installed to share/bob_quantum/racket
-Janet: bob_quantum.janet (native bindings to C ABI) - installed to share/bob_quantum/janet
-Zig: src/bob_quantum.zig (FFI to C ABI) - installed to share/bob_quantum/zig
-Odin: bob_quantum.odin (foreign bindings to C ABI) - installed to share/bob_quantum/odin

build_final2/CMakeCache.txt

@@ -1,706 +0,0 @@
-# This is the CMakeCache file.
-# For build in directory: c:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2
-# It was generated by CMake: C:/Strawberry/c/bin/cmake.exe
-# You can edit this file to change values found and used by cmake.
-# If you do not want to change any of the values, simply exit the editor.
-# If you do want to change a value, simply edit, save, and exit the editor.
-# The syntax for the file is as follows:
-# KEY:TYPE=VALUE
-# KEY is the name of a variable in the cache.
-# TYPE is a hint to GUIs for the type of VALUE, DO NOT EDIT TYPE!.
-# VALUE is the current value for the KEY.
-
-########################
-# EXTERNAL cache entries
-########################
-
-//Path to a library.
-BLAS_Accelerate_LIBRARY:FILEPATH=BLAS_Accelerate_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_acml_LIBRARY:FILEPATH=BLAS_acml_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_acml_mp_LIBRARY:FILEPATH=BLAS_acml_mp_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_armpl_lp64_LIBRARY:FILEPATH=BLAS_armpl_lp64_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_blas_LIBRARY:FILEPATH=BLAS_blas_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_blis_LIBRARY:FILEPATH=BLAS_blis_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_complib_sgimath_LIBRARY:FILEPATH=BLAS_complib_sgimath_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_cxml_LIBRARY:FILEPATH=BLAS_cxml_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_dxml_LIBRARY:FILEPATH=BLAS_dxml_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_eml_LIBRARY:FILEPATH=BLAS_eml_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_essl_LIBRARY:FILEPATH=BLAS_essl_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_fjlapack_LIBRARY:FILEPATH=BLAS_fjlapack_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_flexiblas_LIBRARY:FILEPATH=BLAS_flexiblas_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_goto2_LIBRARY:FILEPATH=BLAS_goto2_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_mkl_intel_c_dll_LIBRARY:FILEPATH=BLAS_mkl_intel_c_dll_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_mkl_intel_lp64_dll_LIBRARY:FILEPATH=BLAS_mkl_intel_lp64_dll_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_mkl_rt_LIBRARY:FILEPATH=BLAS_mkl_rt_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_openblas_LIBRARY:FILEPATH=BLAS_openblas_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_scs_LIBRARY:FILEPATH=BLAS_scs_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_sgemm_LIBRARY:FILEPATH=BLAS_sgemm_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_sunperf_LIBRARY:FILEPATH=BLAS_sunperf_LIBRARY-NOTFOUND
-
-//Path to a library.
-BLAS_vecLib_LIBRARY:FILEPATH=BLAS_vecLib_LIBRARY-NOTFOUND
-
-//Value Computed by CMake
-BOBQuantumCivilizationEngine_BINARY_DIR:STATIC=C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2
-
-//Value Computed by CMake
-BOBQuantumCivilizationEngine_IS_TOP_LEVEL:STATIC=ON
-
-//Value Computed by CMake
-BOBQuantumCivilizationEngine_SOURCE_DIR:STATIC=C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster
-
-//Build Elixir/Erlang NIF bindings
-BOB_BINDING_ELIXIR:BOOL=OFF
-
-//Build Haskell FFI bindings
-BOB_BINDING_HASKELL:BOOL=OFF
-
-//Build Janet native bindings
-BOB_BINDING_JANET:BOOL=ON
-
-//Build Julia bindings
-BOB_BINDING_JULIA:BOOL=ON
-
-//Build Odin foreign bindings
-BOB_BINDING_ODIN:BOOL=ON
-
-//Build Python bindings (ctypes)
-BOB_BINDING_PYTHON:BOOL=ON
-
-//Build R/C++ bindings
-BOB_BINDING_R:BOOL=ON
-
-//Build Racket FFI bindings
-BOB_BINDING_RACKET:BOOL=ON
-
-//Build Rust FFI crate
-BOB_BINDING_RUST:BOOL=OFF
-
-//Build Smalltalk VM plugin
-BOB_BINDING_SMALLTALK:BOOL=OFF
-
-//Build Zig FFI bindings
-BOB_BINDING_ZIG:BOOL=ON
-
-//Build benchmark suite
-BOB_BUILD_BENCHMARKS:BOOL=ON
-
-//Build documentation
-BOB_BUILD_DOCS:BOOL=OFF
-
-//Build shared libraries
-BOB_BUILD_SHARED_LIBS:BOOL=ON
-
-//Build test suite
-BOB_BUILD_TESTS:BOOL=ON
-
-//Enable C++ exceptions
-BOB_ENABLE_EXCEPTIONS:BOOL=ON
-
-//Enable RTTI for bindings
-BOB_ENABLE_RTTI:BOOL=ON
-
-//Path to a program.
-CMAKE_ADDR2LINE:FILEPATH=C:/Strawberry/c/bin/addr2line.exe
-
-//Path to a program.
-CMAKE_AR:FILEPATH=C:/Strawberry/c/bin/ar.exe
-
-//Choose the type of build, options are: None Debug Release RelWithDebInfo
-// MinSizeRel ...
-CMAKE_BUILD_TYPE:STRING=Release
-
-//CXX compiler
-CMAKE_CXX_COMPILER:FILEPATH=C:/Strawberry/c/bin/c++.exe
-
-//A wrapper around 'ar' adding the appropriate '--plugin' option
-// for the GCC compiler
-CMAKE_CXX_COMPILER_AR:FILEPATH=C:/Strawberry/c/bin/gcc-ar.exe
-
-//A wrapper around 'ranlib' adding the appropriate '--plugin' option
-// for the GCC compiler
-CMAKE_CXX_COMPILER_RANLIB:FILEPATH=C:/Strawberry/c/bin/gcc-ranlib.exe
-
-//Flags used by the CXX compiler during all build types.
-CMAKE_CXX_FLAGS:STRING=
-
-//Flags used by the CXX compiler during DEBUG builds.
-CMAKE_CXX_FLAGS_DEBUG:STRING=-g
-
-//Flags used by the CXX compiler during MINSIZEREL builds.
-CMAKE_CXX_FLAGS_MINSIZEREL:STRING=-Os -DNDEBUG
-
-//Flags used by the CXX compiler during RELEASE builds.
-CMAKE_CXX_FLAGS_RELEASE:STRING=-O3 -DNDEBUG
-
-//Flags used by the CXX compiler during RELWITHDEBINFO builds.
-CMAKE_CXX_FLAGS_RELWITHDEBINFO:STRING=-O2 -g -DNDEBUG
-
-//Libraries linked by default with all C++ applications.
-CMAKE_CXX_STANDARD_LIBRARIES:STRING=-lkernel32 -luser32 -lgdi32 -lwinspool -lshell32 -lole32 -loleaut32 -luuid -lcomdlg32 -ladvapi32
-
-//C compiler
-CMAKE_C_COMPILER:FILEPATH=C:/Strawberry/c/bin/gcc.exe
-
-//A wrapper around 'ar' adding the appropriate '--plugin' option
-// for the GCC compiler
-CMAKE_C_COMPILER_AR:FILEPATH=C:/Strawberry/c/bin/gcc-ar.exe
-
-//A wrapper around 'ranlib' adding the appropriate '--plugin' option
-// for the GCC compiler
-CMAKE_C_COMPILER_RANLIB:FILEPATH=C:/Strawberry/c/bin/gcc-ranlib.exe
-
-//Flags used by the C compiler during all build types.
-CMAKE_C_FLAGS:STRING=
-
-//Flags used by the C compiler during DEBUG builds.
-CMAKE_C_FLAGS_DEBUG:STRING=-g
-
-//Flags used by the C compiler during MINSIZEREL builds.
-CMAKE_C_FLAGS_MINSIZEREL:STRING=-Os -DNDEBUG
-
-//Flags used by the C compiler during RELEASE builds.
-CMAKE_C_FLAGS_RELEASE:STRING=-O3 -DNDEBUG
-
-//Flags used by the C compiler during RELWITHDEBINFO builds.
-CMAKE_C_FLAGS_RELWITHDEBINFO:STRING=-O2 -g -DNDEBUG
-
-//Libraries linked by default with all C applications.
-CMAKE_C_STANDARD_LIBRARIES:STRING=-lkernel32 -luser32 -lgdi32 -lwinspool -lshell32 -lole32 -loleaut32 -luuid -lcomdlg32 -ladvapi32
-
-//Path to a program.
-CMAKE_DLLTOOL:FILEPATH=C:/Strawberry/c/bin/dlltool.exe
-
-//Flags used by the linker during all build types.
-CMAKE_EXE_LINKER_FLAGS:STRING=
-
-//Flags used by the linker during DEBUG builds.
-CMAKE_EXE_LINKER_FLAGS_DEBUG:STRING=
-
-//Flags used by the linker during MINSIZEREL builds.
-CMAKE_EXE_LINKER_FLAGS_MINSIZEREL:STRING=
-
-//Flags used by the linker during RELEASE builds.
-CMAKE_EXE_LINKER_FLAGS_RELEASE:STRING=
-
-//Flags used by the linker during RELWITHDEBINFO builds.
-CMAKE_EXE_LINKER_FLAGS_RELWITHDEBINFO:STRING=
-
-//Enable/Disable output of compile commands during generation.
-CMAKE_EXPORT_COMPILE_COMMANDS:BOOL=
-
-//Value Computed by CMake.
-CMAKE_FIND_PACKAGE_REDIRECTS_DIR:STATIC=C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/CMakeFiles/pkgRedirects
-
-//Fortran compiler
-CMAKE_Fortran_COMPILER:FILEPATH=C:/Strawberry/c/bin/gfortran.exe
-
-//A wrapper around 'ar' adding the appropriate '--plugin' option
-// for the GCC compiler
-CMAKE_Fortran_COMPILER_AR:FILEPATH=C:/Strawberry/c/bin/gcc-ar.exe
-
-//A wrapper around 'ranlib' adding the appropriate '--plugin' option
-// for the GCC compiler
-CMAKE_Fortran_COMPILER_RANLIB:FILEPATH=C:/Strawberry/c/bin/gcc-ranlib.exe
-
-//Flags used by the Fortran compiler during all build types.
-CMAKE_Fortran_FLAGS:STRING=
-
-//Flags used by the Fortran compiler during DEBUG builds.
-CMAKE_Fortran_FLAGS_DEBUG:STRING=-g
-
-//Flags used by the Fortran compiler during MINSIZEREL builds.
-CMAKE_Fortran_FLAGS_MINSIZEREL:STRING=-Os
-
-//Flags used by the Fortran compiler during RELEASE builds.
-CMAKE_Fortran_FLAGS_RELEASE:STRING=-O3
-
-//Flags used by the Fortran compiler during RELWITHDEBINFO builds.
-CMAKE_Fortran_FLAGS_RELWITHDEBINFO:STRING=-O2 -g
-
-//Convert GNU import libraries to MS format (requires Visual Studio)
-CMAKE_GNUtoMS:BOOL=OFF
-
-//Install path prefix, prepended onto install directories.
-CMAKE_INSTALL_PREFIX:PATH=C:/Program Files (x86)/BOBQuantumCivilizationEngine
-
-//Path to a program.
-CMAKE_LINKER:FILEPATH=C:/Strawberry/c/bin/ld.exe
-
-//Program used to build from build.ninja files.
-CMAKE_MAKE_PROGRAM:FILEPATH=C:/Strawberry/c/bin/ninja.exe
-
-//Flags used by the linker during the creation of modules during
-// all build types.
-CMAKE_MODULE_LINKER_FLAGS:STRING=
-
-//Flags used by the linker during the creation of modules during
-// DEBUG builds.
-CMAKE_MODULE_LINKER_FLAGS_DEBUG:STRING=
-
-//Flags used by the linker during the creation of modules during
-// MINSIZEREL builds.
-CMAKE_MODULE_LINKER_FLAGS_MINSIZEREL:STRING=
-
-//Flags used by the linker during the creation of modules during
-// RELEASE builds.
-CMAKE_MODULE_LINKER_FLAGS_RELEASE:STRING=
-
-//Flags used by the linker during the creation of modules during
-// RELWITHDEBINFO builds.
-CMAKE_MODULE_LINKER_FLAGS_RELWITHDEBINFO:STRING=
-
-//Path to a program.
-CMAKE_NM:FILEPATH=C:/Strawberry/c/bin/nm.exe
-
-//Path to a program.
-CMAKE_OBJCOPY:FILEPATH=C:/Strawberry/c/bin/objcopy.exe
-
-//Path to a program.
-CMAKE_OBJDUMP:FILEPATH=C:/Strawberry/c/bin/objdump.exe
-
-//Value Computed by CMake
-CMAKE_PROJECT_DESCRIPTION:STATIC=Quantum simulation engine for distributed civilization mesh
-
-//Value Computed by CMake
-CMAKE_PROJECT_HOMEPAGE_URL:STATIC=
-
-//Value Computed by CMake
-CMAKE_PROJECT_NAME:STATIC=BOBQuantumCivilizationEngine
-
-//Value Computed by CMake
-CMAKE_PROJECT_VERSION:STATIC=1.0.0
-
-//Value Computed by CMake
-CMAKE_PROJECT_VERSION_MAJOR:STATIC=1
-
-//Value Computed by CMake
-CMAKE_PROJECT_VERSION_MINOR:STATIC=0
-
-//Value Computed by CMake
-CMAKE_PROJECT_VERSION_PATCH:STATIC=0
-
-//Value Computed by CMake
-CMAKE_PROJECT_VERSION_TWEAK:STATIC=
-
-//Path to a program.
-CMAKE_RANLIB:FILEPATH=C:/Strawberry/c/bin/ranlib.exe
-
-//RC compiler
-CMAKE_RC_COMPILER:FILEPATH=C:/Strawberry/c/bin/windres.exe
-
-//Flags for Windows Resource Compiler during all build types.
-CMAKE_RC_FLAGS:STRING=
-
-//Flags for Windows Resource Compiler during DEBUG builds.
-CMAKE_RC_FLAGS_DEBUG:STRING=
-
-//Flags for Windows Resource Compiler during MINSIZEREL builds.
-CMAKE_RC_FLAGS_MINSIZEREL:STRING=
-
-//Flags for Windows Resource Compiler during RELEASE builds.
-CMAKE_RC_FLAGS_RELEASE:STRING=
-
-//Flags for Windows Resource Compiler during RELWITHDEBINFO builds.
-CMAKE_RC_FLAGS_RELWITHDEBINFO:STRING=
-
-//Path to a program.
-CMAKE_READELF:FILEPATH=C:/Strawberry/c/bin/readelf.exe
-
-//Flags used by the linker during the creation of shared libraries
-// during all build types.
-CMAKE_SHARED_LINKER_FLAGS:STRING=
-
-//Flags used by the linker during the creation of shared libraries
-// during DEBUG builds.
-CMAKE_SHARED_LINKER_FLAGS_DEBUG:STRING=
-
-//Flags used by the linker during the creation of shared libraries
-// during MINSIZEREL builds.
-CMAKE_SHARED_LINKER_FLAGS_MINSIZEREL:STRING=
-
-//Flags used by the linker during the creation of shared libraries
-// during RELEASE builds.
-CMAKE_SHARED_LINKER_FLAGS_RELEASE:STRING=
-
-//Flags used by the linker during the creation of shared libraries
-// during RELWITHDEBINFO builds.
-CMAKE_SHARED_LINKER_FLAGS_RELWITHDEBINFO:STRING=
-
-//If set, runtime paths are not added when installing shared libraries,
-// but are added when building.
-CMAKE_SKIP_INSTALL_RPATH:BOOL=NO
-
-//If set, runtime paths are not added when using shared libraries.
-CMAKE_SKIP_RPATH:BOOL=NO
-
-//Flags used by the linker during the creation of static libraries
-// during all build types.
-CMAKE_STATIC_LINKER_FLAGS:STRING=
-
-//Flags used by the linker during the creation of static libraries
-// during DEBUG builds.
-CMAKE_STATIC_LINKER_FLAGS_DEBUG:STRING=
-
-//Flags used by the linker during the creation of static libraries
-// during MINSIZEREL builds.
-CMAKE_STATIC_LINKER_FLAGS_MINSIZEREL:STRING=
-
-//Flags used by the linker during the creation of static libraries
-// during RELEASE builds.
-CMAKE_STATIC_LINKER_FLAGS_RELEASE:STRING=
-
-//Flags used by the linker during the creation of static libraries
-// during RELWITHDEBINFO builds.
-CMAKE_STATIC_LINKER_FLAGS_RELWITHDEBINFO:STRING=
-
-//Path to a program.
-CMAKE_STRIP:FILEPATH=C:/Strawberry/c/bin/strip.exe
-
-//Path to a program.
-CMAKE_TAPI:FILEPATH=CMAKE_TAPI-NOTFOUND
-
-//If this value is on, makefiles will be generated without the
-// .SILENT directive, and all commands will be echoed to the console
-// during the make.  This is useful for debugging only. With Visual
-// Studio IDE projects all commands are done without /nologo.
-CMAKE_VERBOSE_MAKEFILE:BOOL=FALSE
-
-//CXX compiler flags for OpenMP parallelization
-OpenMP_CXX_FLAGS:STRING=-fopenmp
-
-//CXX compiler libraries for OpenMP parallelization
-OpenMP_CXX_LIB_NAMES:STRING=gomp;mingwthrd;mingwthrd
-
-//C compiler flags for OpenMP parallelization
-OpenMP_C_FLAGS:STRING=-fopenmp
-
-//C compiler libraries for OpenMP parallelization
-OpenMP_C_LIB_NAMES:STRING=gomp;mingwthrd;mingwthrd
-
-//Fortran compiler flags for OpenMP parallelization
-OpenMP_Fortran_FLAGS:STRING=-fopenmp
-
-//Fortran compiler libraries for OpenMP parallelization
-OpenMP_Fortran_LIB_NAMES:STRING=gomp;mingwthrd;mingwthrd;mingwthrd
-
-//Path to the gomp library for OpenMP
-OpenMP_gomp_LIBRARY:FILEPATH=C:/Strawberry/c/lib/libgomp.dll.a
-
-//Path to the mingwthrd library for OpenMP
-OpenMP_mingwthrd_LIBRARY:FILEPATH=C:/Strawberry/c/x86_64-w64-mingw32/lib/libmingwthrd.a
-
-
-########################
-# INTERNAL cache entries
-########################
-
-//ADVANCED property for variable: BLAS_Accelerate_LIBRARY
-BLAS_Accelerate_LIBRARY-ADVANCED:INTERNAL=1
-//Have Fortran function sgemm
-BLAS_WORKS:INTERNAL=
-//ADVANCED property for variable: BLAS_acml_LIBRARY
-BLAS_acml_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: BLAS_acml_mp_LIBRARY
-BLAS_acml_mp_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: BLAS_armpl_lp64_LIBRARY
-BLAS_armpl_lp64_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: BLAS_blas_LIBRARY
-BLAS_blas_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: BLAS_blis_LIBRARY
-BLAS_blis_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: BLAS_complib_sgimath_LIBRARY
-BLAS_complib_sgimath_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: BLAS_cxml_LIBRARY
-BLAS_cxml_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: BLAS_dxml_LIBRARY
-BLAS_dxml_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: BLAS_eml_LIBRARY
-BLAS_eml_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: BLAS_essl_LIBRARY
-BLAS_essl_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: BLAS_fjlapack_LIBRARY
-BLAS_fjlapack_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: BLAS_flexiblas_LIBRARY
-BLAS_flexiblas_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: BLAS_goto2_LIBRARY
-BLAS_goto2_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: BLAS_mkl_intel_c_dll_LIBRARY
-BLAS_mkl_intel_c_dll_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: BLAS_mkl_intel_lp64_dll_LIBRARY
-BLAS_mkl_intel_lp64_dll_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: BLAS_mkl_rt_LIBRARY
-BLAS_mkl_rt_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: BLAS_openblas_LIBRARY
-BLAS_openblas_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: BLAS_scs_LIBRARY
-BLAS_scs_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: BLAS_sgemm_LIBRARY
-BLAS_sgemm_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: BLAS_sunperf_LIBRARY
-BLAS_sunperf_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: BLAS_vecLib_LIBRARY
-BLAS_vecLib_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_ADDR2LINE
-CMAKE_ADDR2LINE-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_AR
-CMAKE_AR-ADVANCED:INTERNAL=1
-//This is the directory where this CMakeCache.txt was created
-CMAKE_CACHEFILE_DIR:INTERNAL=c:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2
-//Major version of cmake used to create the current loaded cache
-CMAKE_CACHE_MAJOR_VERSION:INTERNAL=3
-//Minor version of cmake used to create the current loaded cache
-CMAKE_CACHE_MINOR_VERSION:INTERNAL=29
-//Patch version of cmake used to create the current loaded cache
-CMAKE_CACHE_PATCH_VERSION:INTERNAL=2
-//Path to CMake executable.
-CMAKE_COMMAND:INTERNAL=C:/Strawberry/c/bin/cmake.exe
-//Path to cpack program executable.
-CMAKE_CPACK_COMMAND:INTERNAL=C:/Strawberry/c/bin/cpack.exe
-//Path to ctest program executable.
-CMAKE_CTEST_COMMAND:INTERNAL=C:/Strawberry/c/bin/ctest.exe
-//ADVANCED property for variable: CMAKE_CXX_COMPILER
-CMAKE_CXX_COMPILER-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_CXX_COMPILER_AR
-CMAKE_CXX_COMPILER_AR-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_CXX_COMPILER_RANLIB
-CMAKE_CXX_COMPILER_RANLIB-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_CXX_FLAGS
-CMAKE_CXX_FLAGS-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_CXX_FLAGS_DEBUG
-CMAKE_CXX_FLAGS_DEBUG-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_CXX_FLAGS_MINSIZEREL
-CMAKE_CXX_FLAGS_MINSIZEREL-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_CXX_FLAGS_RELEASE
-CMAKE_CXX_FLAGS_RELEASE-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_CXX_FLAGS_RELWITHDEBINFO
-CMAKE_CXX_FLAGS_RELWITHDEBINFO-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_CXX_STANDARD_LIBRARIES
-CMAKE_CXX_STANDARD_LIBRARIES-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_C_COMPILER
-CMAKE_C_COMPILER-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_C_COMPILER_AR
-CMAKE_C_COMPILER_AR-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_C_COMPILER_RANLIB
-CMAKE_C_COMPILER_RANLIB-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_C_FLAGS
-CMAKE_C_FLAGS-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_C_FLAGS_DEBUG
-CMAKE_C_FLAGS_DEBUG-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_C_FLAGS_MINSIZEREL
-CMAKE_C_FLAGS_MINSIZEREL-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_C_FLAGS_RELEASE
-CMAKE_C_FLAGS_RELEASE-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_C_FLAGS_RELWITHDEBINFO
-CMAKE_C_FLAGS_RELWITHDEBINFO-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_C_STANDARD_LIBRARIES
-CMAKE_C_STANDARD_LIBRARIES-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_DLLTOOL
-CMAKE_DLLTOOL-ADVANCED:INTERNAL=1
-//Executable file format
-CMAKE_EXECUTABLE_FORMAT:INTERNAL=Unknown
-//ADVANCED property for variable: CMAKE_EXE_LINKER_FLAGS
-CMAKE_EXE_LINKER_FLAGS-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_EXE_LINKER_FLAGS_DEBUG
-CMAKE_EXE_LINKER_FLAGS_DEBUG-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_EXE_LINKER_FLAGS_MINSIZEREL
-CMAKE_EXE_LINKER_FLAGS_MINSIZEREL-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_EXE_LINKER_FLAGS_RELEASE
-CMAKE_EXE_LINKER_FLAGS_RELEASE-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_EXE_LINKER_FLAGS_RELWITHDEBINFO
-CMAKE_EXE_LINKER_FLAGS_RELWITHDEBINFO-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_EXPORT_COMPILE_COMMANDS
-CMAKE_EXPORT_COMPILE_COMMANDS-ADVANCED:INTERNAL=1
-//Name of external makefile project generator.
-CMAKE_EXTRA_GENERATOR:INTERNAL=
-//ADVANCED property for variable: CMAKE_Fortran_COMPILER
-CMAKE_Fortran_COMPILER-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_Fortran_COMPILER_AR
-CMAKE_Fortran_COMPILER_AR-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_Fortran_COMPILER_RANLIB
-CMAKE_Fortran_COMPILER_RANLIB-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_Fortran_FLAGS
-CMAKE_Fortran_FLAGS-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_Fortran_FLAGS_DEBUG
-CMAKE_Fortran_FLAGS_DEBUG-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_Fortran_FLAGS_MINSIZEREL
-CMAKE_Fortran_FLAGS_MINSIZEREL-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_Fortran_FLAGS_RELEASE
-CMAKE_Fortran_FLAGS_RELEASE-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_Fortran_FLAGS_RELWITHDEBINFO
-CMAKE_Fortran_FLAGS_RELWITHDEBINFO-ADVANCED:INTERNAL=1
-//Name of generator.
-CMAKE_GENERATOR:INTERNAL=Ninja
-//Generator instance identifier.
-CMAKE_GENERATOR_INSTANCE:INTERNAL=
-//Name of generator platform.
-CMAKE_GENERATOR_PLATFORM:INTERNAL=
-//Name of generator toolset.
-CMAKE_GENERATOR_TOOLSET:INTERNAL=
-//Test CMAKE_HAVE_LIBC_PTHREAD
-CMAKE_HAVE_LIBC_PTHREAD:INTERNAL=1
-//Source directory with the top level CMakeLists.txt file for this
-// project
-CMAKE_HOME_DIRECTORY:INTERNAL=C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster
-//ADVANCED property for variable: CMAKE_LINKER
-CMAKE_LINKER-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_MAKE_PROGRAM
-CMAKE_MAKE_PROGRAM-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_MODULE_LINKER_FLAGS
-CMAKE_MODULE_LINKER_FLAGS-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_MODULE_LINKER_FLAGS_DEBUG
-CMAKE_MODULE_LINKER_FLAGS_DEBUG-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_MODULE_LINKER_FLAGS_MINSIZEREL
-CMAKE_MODULE_LINKER_FLAGS_MINSIZEREL-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_MODULE_LINKER_FLAGS_RELEASE
-CMAKE_MODULE_LINKER_FLAGS_RELEASE-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_MODULE_LINKER_FLAGS_RELWITHDEBINFO
-CMAKE_MODULE_LINKER_FLAGS_RELWITHDEBINFO-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_NM
-CMAKE_NM-ADVANCED:INTERNAL=1
-//number of local generators
-CMAKE_NUMBER_OF_MAKEFILES:INTERNAL=9
-//ADVANCED property for variable: CMAKE_OBJCOPY
-CMAKE_OBJCOPY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_OBJDUMP
-CMAKE_OBJDUMP-ADVANCED:INTERNAL=1
-//Platform information initialized
-CMAKE_PLATFORM_INFO_INITIALIZED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_RANLIB
-CMAKE_RANLIB-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_RC_COMPILER
-CMAKE_RC_COMPILER-ADVANCED:INTERNAL=1
-CMAKE_RC_COMPILER_WORKS:INTERNAL=1
-//ADVANCED property for variable: CMAKE_RC_FLAGS
-CMAKE_RC_FLAGS-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_RC_FLAGS_DEBUG
-CMAKE_RC_FLAGS_DEBUG-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_RC_FLAGS_MINSIZEREL
-CMAKE_RC_FLAGS_MINSIZEREL-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_RC_FLAGS_RELEASE
-CMAKE_RC_FLAGS_RELEASE-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_RC_FLAGS_RELWITHDEBINFO
-CMAKE_RC_FLAGS_RELWITHDEBINFO-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_READELF
-CMAKE_READELF-ADVANCED:INTERNAL=1
-//Path to CMake installation.
-CMAKE_ROOT:INTERNAL=C:/Strawberry/c/share/cmake-3.29
-//ADVANCED property for variable: CMAKE_SHARED_LINKER_FLAGS
-CMAKE_SHARED_LINKER_FLAGS-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_SHARED_LINKER_FLAGS_DEBUG
-CMAKE_SHARED_LINKER_FLAGS_DEBUG-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_SHARED_LINKER_FLAGS_MINSIZEREL
-CMAKE_SHARED_LINKER_FLAGS_MINSIZEREL-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_SHARED_LINKER_FLAGS_RELEASE
-CMAKE_SHARED_LINKER_FLAGS_RELEASE-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_SHARED_LINKER_FLAGS_RELWITHDEBINFO
-CMAKE_SHARED_LINKER_FLAGS_RELWITHDEBINFO-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_SKIP_INSTALL_RPATH
-CMAKE_SKIP_INSTALL_RPATH-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_SKIP_RPATH
-CMAKE_SKIP_RPATH-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_STATIC_LINKER_FLAGS
-CMAKE_STATIC_LINKER_FLAGS-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_STATIC_LINKER_FLAGS_DEBUG
-CMAKE_STATIC_LINKER_FLAGS_DEBUG-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_STATIC_LINKER_FLAGS_MINSIZEREL
-CMAKE_STATIC_LINKER_FLAGS_MINSIZEREL-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_STATIC_LINKER_FLAGS_RELEASE
-CMAKE_STATIC_LINKER_FLAGS_RELEASE-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_STATIC_LINKER_FLAGS_RELWITHDEBINFO
-CMAKE_STATIC_LINKER_FLAGS_RELWITHDEBINFO-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_STRIP
-CMAKE_STRIP-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_TAPI
-CMAKE_TAPI-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: CMAKE_VERBOSE_MAKEFILE
-CMAKE_VERBOSE_MAKEFILE-ADVANCED:INTERNAL=1
-//Details about finding OpenMP
-FIND_PACKAGE_MESSAGE_DETAILS_OpenMP:INTERNAL=[TRUE][TRUE][TRUE][c ][v4.5()]
-//Details about finding OpenMP_C
-FIND_PACKAGE_MESSAGE_DETAILS_OpenMP_C:INTERNAL=[-fopenmp][C:/Strawberry/c/lib/libgomp.dll.a][C:/Strawberry/c/x86_64-w64-mingw32/lib/libmingwthrd.a][C:/Strawberry/c/x86_64-w64-mingw32/lib/libmingwthrd.a][v4.5()]
-//Details about finding OpenMP_CXX
-FIND_PACKAGE_MESSAGE_DETAILS_OpenMP_CXX:INTERNAL=[-fopenmp][C:/Strawberry/c/lib/libgomp.dll.a][C:/Strawberry/c/x86_64-w64-mingw32/lib/libmingwthrd.a][C:/Strawberry/c/x86_64-w64-mingw32/lib/libmingwthrd.a][v4.5()]
-//Details about finding OpenMP_Fortran
-FIND_PACKAGE_MESSAGE_DETAILS_OpenMP_Fortran:INTERNAL=[-fopenmp][C:/Strawberry/c/lib/libgomp.dll.a][C:/Strawberry/c/x86_64-w64-mingw32/lib/libmingwthrd.a][C:/Strawberry/c/x86_64-w64-mingw32/lib/libmingwthrd.a][C:/Strawberry/c/x86_64-w64-mingw32/lib/libmingwthrd.a][v4.5()]
-//Details about finding Threads
-FIND_PACKAGE_MESSAGE_DETAILS_Threads:INTERNAL=[TRUE][v()]
-//Result of TRY_COMPILE
-OpenMP_COMPILE_RESULT_CXX_fopenmp:INTERNAL=TRUE
-//Result of TRY_COMPILE
-OpenMP_COMPILE_RESULT_C_fopenmp:INTERNAL=TRUE
-//Result of TRY_COMPILE
-OpenMP_COMPILE_RESULT_FortranHeader_fopenmp:INTERNAL=TRUE
-//Result of TRY_COMPILE
-OpenMP_COMPILE_RESULT_FortranModule_fopenmp:INTERNAL=TRUE
-//ADVANCED property for variable: OpenMP_CXX_FLAGS
-OpenMP_CXX_FLAGS-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: OpenMP_CXX_LIB_NAMES
-OpenMP_CXX_LIB_NAMES-ADVANCED:INTERNAL=1
-//CXX compiler's OpenMP specification date
-OpenMP_CXX_SPEC_DATE:INTERNAL=201511
-//ADVANCED property for variable: OpenMP_C_FLAGS
-OpenMP_C_FLAGS-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: OpenMP_C_LIB_NAMES
-OpenMP_C_LIB_NAMES-ADVANCED:INTERNAL=1
-//C compiler's OpenMP specification date
-OpenMP_C_SPEC_DATE:INTERNAL=201511
-//ADVANCED property for variable: OpenMP_Fortran_FLAGS
-OpenMP_Fortran_FLAGS-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: OpenMP_Fortran_LIB_NAMES
-OpenMP_Fortran_LIB_NAMES-ADVANCED:INTERNAL=1
-//Fortran compiler's OpenMP specification date
-OpenMP_Fortran_SPEC_DATE:INTERNAL=201511
-//Result of TRY_COMPILE
-OpenMP_SPECTEST_CXX_:INTERNAL=TRUE
-//Result of TRY_COMPILE
-OpenMP_SPECTEST_C_:INTERNAL=TRUE
-//Result of TRY_COMPILE
-OpenMP_SPECTEST_Fortran_:INTERNAL=TRUE
-//ADVANCED property for variable: OpenMP_gomp_LIBRARY
-OpenMP_gomp_LIBRARY-ADVANCED:INTERNAL=1
-//ADVANCED property for variable: OpenMP_mingwthrd_LIBRARY
-OpenMP_mingwthrd_LIBRARY-ADVANCED:INTERNAL=1
-//linker supports push/pop state
-_CMAKE_LINKER_PUSHPOP_STATE_SUPPORTED:INTERNAL=TRUE
-

build_final2/CMakeFiles/3.29.2/CMakeDetermineCompilerABI_C.bin

@@ -1,3 +0,0 @@
-version https://git-lfs.github.com/spec/v1
-oid sha256:48a429195e41d168b0c3e0b7d8c8ce62ed5a9d8b33009876599a0e0c115d978d
-size 63173

build_final2/CMakeFiles/3.29.2/CMakeDetermineCompilerABI_CXX.bin

@@ -1,3 +0,0 @@
-version https://git-lfs.github.com/spec/v1
-oid sha256:d4902004d21da65d822c0ed29482d5bccedb0623232ffa8d94a1827c35b04d5c
-size 63192

build_final2/CMakeFiles/3.29.2/CMakeDetermineCompilerABI_Fortran.bin

@@ -1,3 +0,0 @@
-version https://git-lfs.github.com/spec/v1
-oid sha256:e11261b6b0e4049269284f6560cbe053e9aee67a51f4dce4a2ea244b2db9d022
-size 65411

build_final2/CMakeFiles/3.29.2/CompilerIdC/CMakeCCompilerId.c

@@ -1,895 +0,0 @@
-#ifdef __cplusplus
-# error "A C++ compiler has been selected for C."
-#endif
-
-#if defined(__18CXX)
-# define ID_VOID_MAIN
-#endif
-#if defined(__CLASSIC_C__)
-/* cv-qualifiers did not exist in K&R C */
-# define const
-# define volatile
-#endif
-
-#if !defined(__has_include)
-/* If the compiler does not have __has_include, pretend the answer is
-   always no.  */
-#  define __has_include(x) 0
-#endif
-
-
-/* Version number components: V=Version, R=Revision, P=Patch
-   Version date components:   YYYY=Year, MM=Month,   DD=Day  */
-
-#if defined(__INTEL_COMPILER) || defined(__ICC)
-# define COMPILER_ID "Intel"
-# if defined(_MSC_VER)
-#  define SIMULATE_ID "MSVC"
-# endif
-# if defined(__GNUC__)
-#  define SIMULATE_ID "GNU"
-# endif
-  /* __INTEL_COMPILER = VRP prior to 2021, and then VVVV for 2021 and later,
-     except that a few beta releases use the old format with V=2021.  */
-# if __INTEL_COMPILER < 2021 || __INTEL_COMPILER == 202110 || __INTEL_COMPILER == 202111
-#  define COMPILER_VERSION_MAJOR DEC(__INTEL_COMPILER/100)
-#  define COMPILER_VERSION_MINOR DEC(__INTEL_COMPILER/10 % 10)
-#  if defined(__INTEL_COMPILER_UPDATE)
-#   define COMPILER_VERSION_PATCH DEC(__INTEL_COMPILER_UPDATE)
-#  else
-#   define COMPILER_VERSION_PATCH DEC(__INTEL_COMPILER   % 10)
-#  endif
-# else
-#  define COMPILER_VERSION_MAJOR DEC(__INTEL_COMPILER)
-#  define COMPILER_VERSION_MINOR DEC(__INTEL_COMPILER_UPDATE)
-   /* The third version component from --version is an update index,
-      but no macro is provided for it.  */
-#  define COMPILER_VERSION_PATCH DEC(0)
-# endif
-# if defined(__INTEL_COMPILER_BUILD_DATE)
-   /* __INTEL_COMPILER_BUILD_DATE = YYYYMMDD */
-#  define COMPILER_VERSION_TWEAK DEC(__INTEL_COMPILER_BUILD_DATE)
-# endif
-# if defined(_MSC_VER)
-   /* _MSC_VER = VVRR */
-#  define SIMULATE_VERSION_MAJOR DEC(_MSC_VER / 100)
-#  define SIMULATE_VERSION_MINOR DEC(_MSC_VER % 100)
-# endif
-# if defined(__GNUC__)
-#  define SIMULATE_VERSION_MAJOR DEC(__GNUC__)
-# elif defined(__GNUG__)
-#  define SIMULATE_VERSION_MAJOR DEC(__GNUG__)
-# endif
-# if defined(__GNUC_MINOR__)
-#  define SIMULATE_VERSION_MINOR DEC(__GNUC_MINOR__)
-# endif
-# if defined(__GNUC_PATCHLEVEL__)
-#  define SIMULATE_VERSION_PATCH DEC(__GNUC_PATCHLEVEL__)
-# endif
-
-#elif (defined(__clang__) && defined(__INTEL_CLANG_COMPILER)) || defined(__INTEL_LLVM_COMPILER)
-# define COMPILER_ID "IntelLLVM"
-#if defined(_MSC_VER)
-# define SIMULATE_ID "MSVC"
-#endif
-#if defined(__GNUC__)
-# define SIMULATE_ID "GNU"
-#endif
-/* __INTEL_LLVM_COMPILER = VVVVRP prior to 2021.2.0, VVVVRRPP for 2021.2.0 and
- * later.  Look for 6 digit vs. 8 digit version number to decide encoding.
- * VVVV is no smaller than the current year when a version is released.
- */
-#if __INTEL_LLVM_COMPILER < 1000000L
-# define COMPILER_VERSION_MAJOR DEC(__INTEL_LLVM_COMPILER/100)
-# define COMPILER_VERSION_MINOR DEC(__INTEL_LLVM_COMPILER/10 % 10)
-# define COMPILER_VERSION_PATCH DEC(__INTEL_LLVM_COMPILER    % 10)
-#else
-# define COMPILER_VERSION_MAJOR DEC(__INTEL_LLVM_COMPILER/10000)
-# define COMPILER_VERSION_MINOR DEC(__INTEL_LLVM_COMPILER/100 % 100)
-# define COMPILER_VERSION_PATCH DEC(__INTEL_LLVM_COMPILER     % 100)
-#endif
-#if defined(_MSC_VER)
-  /* _MSC_VER = VVRR */
-# define SIMULATE_VERSION_MAJOR DEC(_MSC_VER / 100)
-# define SIMULATE_VERSION_MINOR DEC(_MSC_VER % 100)
-#endif
-#if defined(__GNUC__)
-# define SIMULATE_VERSION_MAJOR DEC(__GNUC__)
-#elif defined(__GNUG__)
-# define SIMULATE_VERSION_MAJOR DEC(__GNUG__)
-#endif
-#if defined(__GNUC_MINOR__)
-# define SIMULATE_VERSION_MINOR DEC(__GNUC_MINOR__)
-#endif
-#if defined(__GNUC_PATCHLEVEL__)
-# define SIMULATE_VERSION_PATCH DEC(__GNUC_PATCHLEVEL__)
-#endif
-
-#elif defined(__PATHCC__)
-# define COMPILER_ID "PathScale"
-# define COMPILER_VERSION_MAJOR DEC(__PATHCC__)
-# define COMPILER_VERSION_MINOR DEC(__PATHCC_MINOR__)
-# if defined(__PATHCC_PATCHLEVEL__)
-#  define COMPILER_VERSION_PATCH DEC(__PATHCC_PATCHLEVEL__)
-# endif
-
-#elif defined(__BORLANDC__) && defined(__CODEGEARC_VERSION__)
-# define COMPILER_ID "Embarcadero"
-# define COMPILER_VERSION_MAJOR HEX(__CODEGEARC_VERSION__>>24 & 0x00FF)
-# define COMPILER_VERSION_MINOR HEX(__CODEGEARC_VERSION__>>16 & 0x00FF)
-# define COMPILER_VERSION_PATCH DEC(__CODEGEARC_VERSION__     & 0xFFFF)
-
-#elif defined(__BORLANDC__)
-# define COMPILER_ID "Borland"
-  /* __BORLANDC__ = 0xVRR */
-# define COMPILER_VERSION_MAJOR HEX(__BORLANDC__>>8)
-# define COMPILER_VERSION_MINOR HEX(__BORLANDC__ & 0xFF)
-
-#elif defined(__WATCOMC__) && __WATCOMC__ < 1200
-# define COMPILER_ID "Watcom"
-   /* __WATCOMC__ = VVRR */
-# define COMPILER_VERSION_MAJOR DEC(__WATCOMC__ / 100)
-# define COMPILER_VERSION_MINOR DEC((__WATCOMC__ / 10) % 10)
-# if (__WATCOMC__ % 10) > 0
-#  define COMPILER_VERSION_PATCH DEC(__WATCOMC__ % 10)
-# endif
-
-#elif defined(__WATCOMC__)
-# define COMPILER_ID "OpenWatcom"
-   /* __WATCOMC__ = VVRP + 1100 */
-# define COMPILER_VERSION_MAJOR DEC((__WATCOMC__ - 1100) / 100)
-# define COMPILER_VERSION_MINOR DEC((__WATCOMC__ / 10) % 10)
-# if (__WATCOMC__ % 10) > 0
-#  define COMPILER_VERSION_PATCH DEC(__WATCOMC__ % 10)
-# endif
-
-#elif defined(__SUNPRO_C)
-# define COMPILER_ID "SunPro"
-# if __SUNPRO_C >= 0x5100
-   /* __SUNPRO_C = 0xVRRP */
-#  define COMPILER_VERSION_MAJOR HEX(__SUNPRO_C>>12)
-#  define COMPILER_VERSION_MINOR HEX(__SUNPRO_C>>4 & 0xFF)
-#  define COMPILER_VERSION_PATCH HEX(__SUNPRO_C    & 0xF)
-# else
-   /* __SUNPRO_CC = 0xVRP */
-#  define COMPILER_VERSION_MAJOR HEX(__SUNPRO_C>>8)
-#  define COMPILER_VERSION_MINOR HEX(__SUNPRO_C>>4 & 0xF)
-#  define COMPILER_VERSION_PATCH HEX(__SUNPRO_C    & 0xF)
-# endif
-
-#elif defined(__HP_cc)
-# define COMPILER_ID "HP"
-  /* __HP_cc = VVRRPP */
-# define COMPILER_VERSION_MAJOR DEC(__HP_cc/10000)
-# define COMPILER_VERSION_MINOR DEC(__HP_cc/100 % 100)
-# define COMPILER_VERSION_PATCH DEC(__HP_cc     % 100)
-
-#elif defined(__DECC)
-# define COMPILER_ID "Compaq"
-  /* __DECC_VER = VVRRTPPPP */
-# define COMPILER_VERSION_MAJOR DEC(__DECC_VER/10000000)
-# define COMPILER_VERSION_MINOR DEC(__DECC_VER/100000  % 100)
-# define COMPILER_VERSION_PATCH DEC(__DECC_VER         % 10000)
-
-#elif defined(__IBMC__) && defined(__COMPILER_VER__)
-# define COMPILER_ID "zOS"
-  /* __IBMC__ = VRP */
-# define COMPILER_VERSION_MAJOR DEC(__IBMC__/100)
-# define COMPILER_VERSION_MINOR DEC(__IBMC__/10 % 10)
-# define COMPILER_VERSION_PATCH DEC(__IBMC__    % 10)
-
-#elif defined(__open_xl__) && defined(__clang__)
-# define COMPILER_ID "IBMClang"
-# define COMPILER_VERSION_MAJOR DEC(__open_xl_version__)
-# define COMPILER_VERSION_MINOR DEC(__open_xl_release__)
-# define COMPILER_VERSION_PATCH DEC(__open_xl_modification__)
-# define COMPILER_VERSION_TWEAK DEC(__open_xl_ptf_fix_level__)
-
-
-#elif defined(__ibmxl__) && defined(__clang__)
-# define COMPILER_ID "XLClang"
-# define COMPILER_VERSION_MAJOR DEC(__ibmxl_version__)
-# define COMPILER_VERSION_MINOR DEC(__ibmxl_release__)
-# define COMPILER_VERSION_PATCH DEC(__ibmxl_modification__)
-# define COMPILER_VERSION_TWEAK DEC(__ibmxl_ptf_fix_level__)
-
-
-#elif defined(__IBMC__) && !defined(__COMPILER_VER__) && __IBMC__ >= 800
-# define COMPILER_ID "XL"
-  /* __IBMC__ = VRP */
-# define COMPILER_VERSION_MAJOR DEC(__IBMC__/100)
-# define COMPILER_VERSION_MINOR DEC(__IBMC__/10 % 10)
-# define COMPILER_VERSION_PATCH DEC(__IBMC__    % 10)
-
-#elif defined(__IBMC__) && !defined(__COMPILER_VER__) && __IBMC__ < 800
-# define COMPILER_ID "VisualAge"
-  /* __IBMC__ = VRP */
-# define COMPILER_VERSION_MAJOR DEC(__IBMC__/100)
-# define COMPILER_VERSION_MINOR DEC(__IBMC__/10 % 10)
-# define COMPILER_VERSION_PATCH DEC(__IBMC__    % 10)
-
-#elif defined(__NVCOMPILER)
-# define COMPILER_ID "NVHPC"
-# define COMPILER_VERSION_MAJOR DEC(__NVCOMPILER_MAJOR__)
-# define COMPILER_VERSION_MINOR DEC(__NVCOMPILER_MINOR__)
-# if defined(__NVCOMPILER_PATCHLEVEL__)
-#  define COMPILER_VERSION_PATCH DEC(__NVCOMPILER_PATCHLEVEL__)
-# endif
-
-#elif defined(__PGI)
-# define COMPILER_ID "PGI"
-# define COMPILER_VERSION_MAJOR DEC(__PGIC__)
-# define COMPILER_VERSION_MINOR DEC(__PGIC_MINOR__)
-# if defined(__PGIC_PATCHLEVEL__)
-#  define COMPILER_VERSION_PATCH DEC(__PGIC_PATCHLEVEL__)
-# endif
-
-#elif defined(__clang__) && defined(__cray__)
-# define COMPILER_ID "CrayClang"
-# define COMPILER_VERSION_MAJOR DEC(__cray_major__)
-# define COMPILER_VERSION_MINOR DEC(__cray_minor__)
-# define COMPILER_VERSION_PATCH DEC(__cray_patchlevel__)
-# define COMPILER_VERSION_INTERNAL_STR __clang_version__
-
-
-#elif defined(_CRAYC)
-# define COMPILER_ID "Cray"
-# define COMPILER_VERSION_MAJOR DEC(_RELEASE_MAJOR)
-# define COMPILER_VERSION_MINOR DEC(_RELEASE_MINOR)
-
-#elif defined(__TI_COMPILER_VERSION__)
-# define COMPILER_ID "TI"
-  /* __TI_COMPILER_VERSION__ = VVVRRRPPP */
-# define COMPILER_VERSION_MAJOR DEC(__TI_COMPILER_VERSION__/1000000)
-# define COMPILER_VERSION_MINOR DEC(__TI_COMPILER_VERSION__/1000   % 1000)
-# define COMPILER_VERSION_PATCH DEC(__TI_COMPILER_VERSION__        % 1000)
-
-#elif defined(__CLANG_FUJITSU)
-# define COMPILER_ID "FujitsuClang"
-# define COMPILER_VERSION_MAJOR DEC(__FCC_major__)
-# define COMPILER_VERSION_MINOR DEC(__FCC_minor__)
-# define COMPILER_VERSION_PATCH DEC(__FCC_patchlevel__)
-# define COMPILER_VERSION_INTERNAL_STR __clang_version__
-
-
-#elif defined(__FUJITSU)
-# define COMPILER_ID "Fujitsu"
-# if defined(__FCC_version__)
-#   define COMPILER_VERSION __FCC_version__
-# elif defined(__FCC_major__)
-#   define COMPILER_VERSION_MAJOR DEC(__FCC_major__)
-#   define COMPILER_VERSION_MINOR DEC(__FCC_minor__)
-#   define COMPILER_VERSION_PATCH DEC(__FCC_patchlevel__)
-# endif
-# if defined(__fcc_version)
-#   define COMPILER_VERSION_INTERNAL DEC(__fcc_version)
-# elif defined(__FCC_VERSION)
-#   define COMPILER_VERSION_INTERNAL DEC(__FCC_VERSION)
-# endif
-
-
-#elif defined(__ghs__)
-# define COMPILER_ID "GHS"
-/* __GHS_VERSION_NUMBER = VVVVRP */
-# ifdef __GHS_VERSION_NUMBER
-# define COMPILER_VERSION_MAJOR DEC(__GHS_VERSION_NUMBER / 100)
-# define COMPILER_VERSION_MINOR DEC(__GHS_VERSION_NUMBER / 10 % 10)
-# define COMPILER_VERSION_PATCH DEC(__GHS_VERSION_NUMBER      % 10)
-# endif
-
-#elif defined(__TASKING__)
-# define COMPILER_ID "Tasking"
-  # define COMPILER_VERSION_MAJOR DEC(__VERSION__/1000)
-  # define COMPILER_VERSION_MINOR DEC(__VERSION__ % 100)
-# define COMPILER_VERSION_INTERNAL DEC(__VERSION__)
-
-#elif defined(__ORANGEC__)
-# define COMPILER_ID "OrangeC"
-# define COMPILER_VERSION_MAJOR DEC(__ORANGEC_MAJOR__)
-# define COMPILER_VERSION_MINOR DEC(__ORANGEC_MINOR__)
-# define COMPILER_VERSION_PATCH DEC(__ORANGEC_PATCHLEVEL__)
-
-#elif defined(__TINYC__)
-# define COMPILER_ID "TinyCC"
-
-#elif defined(__BCC__)
-# define COMPILER_ID "Bruce"
-
-#elif defined(__SCO_VERSION__)
-# define COMPILER_ID "SCO"
-
-#elif defined(__ARMCC_VERSION) && !defined(__clang__)
-# define COMPILER_ID "ARMCC"
-#if __ARMCC_VERSION >= 1000000
-  /* __ARMCC_VERSION = VRRPPPP */
-  # define COMPILER_VERSION_MAJOR DEC(__ARMCC_VERSION/1000000)
-  # define COMPILER_VERSION_MINOR DEC(__ARMCC_VERSION/10000 % 100)
-  # define COMPILER_VERSION_PATCH DEC(__ARMCC_VERSION     % 10000)
-#else
-  /* __ARMCC_VERSION = VRPPPP */
-  # define COMPILER_VERSION_MAJOR DEC(__ARMCC_VERSION/100000)
-  # define COMPILER_VERSION_MINOR DEC(__ARMCC_VERSION/10000 % 10)
-  # define COMPILER_VERSION_PATCH DEC(__ARMCC_VERSION    % 10000)
-#endif
-
-
-#elif defined(__clang__) && defined(__apple_build_version__)
-# define COMPILER_ID "AppleClang"
-# if defined(_MSC_VER)
-#  define SIMULATE_ID "MSVC"
-# endif
-# define COMPILER_VERSION_MAJOR DEC(__clang_major__)
-# define COMPILER_VERSION_MINOR DEC(__clang_minor__)
-# define COMPILER_VERSION_PATCH DEC(__clang_patchlevel__)
-# if defined(_MSC_VER)
-   /* _MSC_VER = VVRR */
-#  define SIMULATE_VERSION_MAJOR DEC(_MSC_VER / 100)
-#  define SIMULATE_VERSION_MINOR DEC(_MSC_VER % 100)
-# endif
-# define COMPILER_VERSION_TWEAK DEC(__apple_build_version__)
-
-#elif defined(__clang__) && defined(__ARMCOMPILER_VERSION)
-# define COMPILER_ID "ARMClang"
-  # define COMPILER_VERSION_MAJOR DEC(__ARMCOMPILER_VERSION/1000000)
-  # define COMPILER_VERSION_MINOR DEC(__ARMCOMPILER_VERSION/10000 % 100)
-  # define COMPILER_VERSION_PATCH DEC(__ARMCOMPILER_VERSION/100   % 100)
-# define COMPILER_VERSION_INTERNAL DEC(__ARMCOMPILER_VERSION)
-
-#elif defined(__clang__) && defined(__ti__)
-# define COMPILER_ID "TIClang"
-  # define COMPILER_VERSION_MAJOR DEC(__ti_major__)
-  # define COMPILER_VERSION_MINOR DEC(__ti_minor__)
-  # define COMPILER_VERSION_PATCH DEC(__ti_patchlevel__)
-# define COMPILER_VERSION_INTERNAL DEC(__ti_version__)
-
-#elif defined(__clang__)
-# define COMPILER_ID "Clang"
-# if defined(_MSC_VER)
-#  define SIMULATE_ID "MSVC"
-# endif
-# define COMPILER_VERSION_MAJOR DEC(__clang_major__)
-# define COMPILER_VERSION_MINOR DEC(__clang_minor__)
-# define COMPILER_VERSION_PATCH DEC(__clang_patchlevel__)
-# if defined(_MSC_VER)
-   /* _MSC_VER = VVRR */
-#  define SIMULATE_VERSION_MAJOR DEC(_MSC_VER / 100)
-#  define SIMULATE_VERSION_MINOR DEC(_MSC_VER % 100)
-# endif
-
-#elif defined(__LCC__) && (defined(__GNUC__) || defined(__GNUG__) || defined(__MCST__))
-# define COMPILER_ID "LCC"
-# define COMPILER_VERSION_MAJOR DEC(__LCC__ / 100)
-# define COMPILER_VERSION_MINOR DEC(__LCC__ % 100)
-# if defined(__LCC_MINOR__)
-#  define COMPILER_VERSION_PATCH DEC(__LCC_MINOR__)
-# endif
-# if defined(__GNUC__) && defined(__GNUC_MINOR__)
-#  define SIMULATE_ID "GNU"
-#  define SIMULATE_VERSION_MAJOR DEC(__GNUC__)
-#  define SIMULATE_VERSION_MINOR DEC(__GNUC_MINOR__)
-#  if defined(__GNUC_PATCHLEVEL__)
-#   define SIMULATE_VERSION_PATCH DEC(__GNUC_PATCHLEVEL__)
-#  endif
-# endif
-
-#elif defined(__GNUC__)
-# define COMPILER_ID "GNU"
-# define COMPILER_VERSION_MAJOR DEC(__GNUC__)
-# if defined(__GNUC_MINOR__)
-#  define COMPILER_VERSION_MINOR DEC(__GNUC_MINOR__)
-# endif
-# if defined(__GNUC_PATCHLEVEL__)
-#  define COMPILER_VERSION_PATCH DEC(__GNUC_PATCHLEVEL__)
-# endif
-
-#elif defined(_MSC_VER)
-# define COMPILER_ID "MSVC"
-  /* _MSC_VER = VVRR */
-# define COMPILER_VERSION_MAJOR DEC(_MSC_VER / 100)
-# define COMPILER_VERSION_MINOR DEC(_MSC_VER % 100)
-# if defined(_MSC_FULL_VER)
-#  if _MSC_VER >= 1400
-    /* _MSC_FULL_VER = VVRRPPPPP */
-#   define COMPILER_VERSION_PATCH DEC(_MSC_FULL_VER % 100000)
-#  else
-    /* _MSC_FULL_VER = VVRRPPPP */
-#   define COMPILER_VERSION_PATCH DEC(_MSC_FULL_VER % 10000)
-#  endif
-# endif
-# if defined(_MSC_BUILD)
-#  define COMPILER_VERSION_TWEAK DEC(_MSC_BUILD)
-# endif
-
-#elif defined(_ADI_COMPILER)
-# define COMPILER_ID "ADSP"
-#if defined(__VERSIONNUM__)
-  /* __VERSIONNUM__ = 0xVVRRPPTT */
-#  define COMPILER_VERSION_MAJOR DEC(__VERSIONNUM__ >> 24 & 0xFF)
-#  define COMPILER_VERSION_MINOR DEC(__VERSIONNUM__ >> 16 & 0xFF)
-#  define COMPILER_VERSION_PATCH DEC(__VERSIONNUM__ >> 8 & 0xFF)
-#  define COMPILER_VERSION_TWEAK DEC(__VERSIONNUM__ & 0xFF)
-#endif
-
-#elif defined(__IAR_SYSTEMS_ICC__) || defined(__IAR_SYSTEMS_ICC)
-# define COMPILER_ID "IAR"
-# if defined(__VER__) && defined(__ICCARM__)
-#  define COMPILER_VERSION_MAJOR DEC((__VER__) / 1000000)
-#  define COMPILER_VERSION_MINOR DEC(((__VER__) / 1000) % 1000)
-#  define COMPILER_VERSION_PATCH DEC((__VER__) % 1000)
-#  define COMPILER_VERSION_INTERNAL DEC(__IAR_SYSTEMS_ICC__)
-# elif defined(__VER__) && (defined(__ICCAVR__) || defined(__ICCRX__) || defined(__ICCRH850__) || defined(__ICCRL78__) || defined(__ICC430__) || defined(__ICCRISCV__) || defined(__ICCV850__) || defined(__ICC8051__) || defined(__ICCSTM8__))
-#  define COMPILER_VERSION_MAJOR DEC((__VER__) / 100)
-#  define COMPILER_VERSION_MINOR DEC((__VER__) - (((__VER__) / 100)*100))
-#  define COMPILER_VERSION_PATCH DEC(__SUBVERSION__)
-#  define COMPILER_VERSION_INTERNAL DEC(__IAR_SYSTEMS_ICC__)
-# endif
-
-#elif defined(__SDCC_VERSION_MAJOR) || defined(SDCC)
-# define COMPILER_ID "SDCC"
-# if defined(__SDCC_VERSION_MAJOR)
-#  define COMPILER_VERSION_MAJOR DEC(__SDCC_VERSION_MAJOR)
-#  define COMPILER_VERSION_MINOR DEC(__SDCC_VERSION_MINOR)
-#  define COMPILER_VERSION_PATCH DEC(__SDCC_VERSION_PATCH)
-# else
-  /* SDCC = VRP */
-#  define COMPILER_VERSION_MAJOR DEC(SDCC/100)
-#  define COMPILER_VERSION_MINOR DEC(SDCC/10 % 10)
-#  define COMPILER_VERSION_PATCH DEC(SDCC    % 10)
-# endif
-
-
-/* These compilers are either not known or too old to define an
-  identification macro.  Try to identify the platform and guess that
-  it is the native compiler.  */
-#elif defined(__hpux) || defined(__hpua)
-# define COMPILER_ID "HP"
-
-#else /* unknown compiler */
-# define COMPILER_ID ""
-#endif
-
-/* Construct the string literal in pieces to prevent the source from
-   getting matched.  Store it in a pointer rather than an array
-   because some compilers will just produce instructions to fill the
-   array rather than assigning a pointer to a static array.  */
-char const* info_compiler = "INFO" ":" "compiler[" COMPILER_ID "]";
-#ifdef SIMULATE_ID
-char const* info_simulate = "INFO" ":" "simulate[" SIMULATE_ID "]";
-#endif
-
-#ifdef __QNXNTO__
-char const* qnxnto = "INFO" ":" "qnxnto[]";
-#endif
-
-#if defined(__CRAYXT_COMPUTE_LINUX_TARGET)
-char const *info_cray = "INFO" ":" "compiler_wrapper[CrayPrgEnv]";
-#endif
-
-#define STRINGIFY_HELPER(X) #X
-#define STRINGIFY(X) STRINGIFY_HELPER(X)
-
-/* Identify known platforms by name.  */
-#if defined(__linux) || defined(__linux__) || defined(linux)
-# define PLATFORM_ID "Linux"
-
-#elif defined(__MSYS__)
-# define PLATFORM_ID "MSYS"
-
-#elif defined(__CYGWIN__)
-# define PLATFORM_ID "Cygwin"
-
-#elif defined(__MINGW32__)
-# define PLATFORM_ID "MinGW"
-
-#elif defined(__APPLE__)
-# define PLATFORM_ID "Darwin"
-
-#elif defined(_WIN32) || defined(__WIN32__) || defined(WIN32)
-# define PLATFORM_ID "Windows"
-
-#elif defined(__FreeBSD__) || defined(__FreeBSD)
-# define PLATFORM_ID "FreeBSD"
-
-#elif defined(__NetBSD__) || defined(__NetBSD)
-# define PLATFORM_ID "NetBSD"
-
-#elif defined(__OpenBSD__) || defined(__OPENBSD)
-# define PLATFORM_ID "OpenBSD"
-
-#elif defined(__sun) || defined(sun)
-# define PLATFORM_ID "SunOS"
-
-#elif defined(_AIX) || defined(__AIX) || defined(__AIX__) || defined(__aix) || defined(__aix__)
-# define PLATFORM_ID "AIX"
-
-#elif defined(__hpux) || defined(__hpux__)
-# define PLATFORM_ID "HP-UX"
-
-#elif defined(__HAIKU__)
-# define PLATFORM_ID "Haiku"
-
-#elif defined(__BeOS) || defined(__BEOS__) || defined(_BEOS)
-# define PLATFORM_ID "BeOS"
-
-#elif defined(__QNX__) || defined(__QNXNTO__)
-# define PLATFORM_ID "QNX"
-
-#elif defined(__tru64) || defined(_tru64) || defined(__TRU64__)
-# define PLATFORM_ID "Tru64"
-
-#elif defined(__riscos) || defined(__riscos__)
-# define PLATFORM_ID "RISCos"
-
-#elif defined(__sinix) || defined(__sinix__) || defined(__SINIX__)
-# define PLATFORM_ID "SINIX"
-
-#elif defined(__UNIX_SV__)
-# define PLATFORM_ID "UNIX_SV"
-
-#elif defined(__bsdos__)
-# define PLATFORM_ID "BSDOS"
-
-#elif defined(_MPRAS) || defined(MPRAS)
-# define PLATFORM_ID "MP-RAS"
-
-#elif defined(__osf) || defined(__osf__)
-# define PLATFORM_ID "OSF1"
-
-#elif defined(_SCO_SV) || defined(SCO_SV) || defined(sco_sv)
-# define PLATFORM_ID "SCO_SV"
-
-#elif defined(__ultrix) || defined(__ultrix__) || defined(_ULTRIX)
-# define PLATFORM_ID "ULTRIX"
-
-#elif defined(__XENIX__) || defined(_XENIX) || defined(XENIX)
-# define PLATFORM_ID "Xenix"
-
-#elif defined(__WATCOMC__)
-# if defined(__LINUX__)
-#  define PLATFORM_ID "Linux"
-
-# elif defined(__DOS__)
-#  define PLATFORM_ID "DOS"
-
-# elif defined(__OS2__)
-#  define PLATFORM_ID "OS2"
-
-# elif defined(__WINDOWS__)
-#  define PLATFORM_ID "Windows3x"
-
-# elif defined(__VXWORKS__)
-#  define PLATFORM_ID "VxWorks"
-
-# else /* unknown platform */
-#  define PLATFORM_ID
-# endif
-
-#elif defined(__INTEGRITY)
-# if defined(INT_178B)
-#  define PLATFORM_ID "Integrity178"
-
-# else /* regular Integrity */
-#  define PLATFORM_ID "Integrity"
-# endif
-
-# elif defined(_ADI_COMPILER)
-#  define PLATFORM_ID "ADSP"
-
-#else /* unknown platform */
-# define PLATFORM_ID
-
-#endif
-
-/* For windows compilers MSVC and Intel we can determine
-   the architecture of the compiler being used.  This is because
-   the compilers do not have flags that can change the architecture,
-   but rather depend on which compiler is being used
-*/
-#if defined(_WIN32) && defined(_MSC_VER)
-# if defined(_M_IA64)
-#  define ARCHITECTURE_ID "IA64"
-
-# elif defined(_M_ARM64EC)
-#  define ARCHITECTURE_ID "ARM64EC"
-
-# elif defined(_M_X64) || defined(_M_AMD64)
-#  define ARCHITECTURE_ID "x64"
-
-# elif defined(_M_IX86)
-#  define ARCHITECTURE_ID "X86"
-
-# elif defined(_M_ARM64)
-#  define ARCHITECTURE_ID "ARM64"
-
-# elif defined(_M_ARM)
-#  if _M_ARM == 4
-#   define ARCHITECTURE_ID "ARMV4I"
-#  elif _M_ARM == 5
-#   define ARCHITECTURE_ID "ARMV5I"
-#  else
-#   define ARCHITECTURE_ID "ARMV" STRINGIFY(_M_ARM)
-#  endif
-
-# elif defined(_M_MIPS)
-#  define ARCHITECTURE_ID "MIPS"
-
-# elif defined(_M_SH)
-#  define ARCHITECTURE_ID "SHx"
-
-# else /* unknown architecture */
-#  define ARCHITECTURE_ID ""
-# endif
-
-#elif defined(__WATCOMC__)
-# if defined(_M_I86)
-#  define ARCHITECTURE_ID "I86"
-
-# elif defined(_M_IX86)
-#  define ARCHITECTURE_ID "X86"
-
-# else /* unknown architecture */
-#  define ARCHITECTURE_ID ""
-# endif
-
-#elif defined(__IAR_SYSTEMS_ICC__) || defined(__IAR_SYSTEMS_ICC)
-# if defined(__ICCARM__)
-#  define ARCHITECTURE_ID "ARM"
-
-# elif defined(__ICCRX__)
-#  define ARCHITECTURE_ID "RX"
-
-# elif defined(__ICCRH850__)
-#  define ARCHITECTURE_ID "RH850"
-
-# elif defined(__ICCRL78__)
-#  define ARCHITECTURE_ID "RL78"
-
-# elif defined(__ICCRISCV__)
-#  define ARCHITECTURE_ID "RISCV"
-
-# elif defined(__ICCAVR__)
-#  define ARCHITECTURE_ID "AVR"
-
-# elif defined(__ICC430__)
-#  define ARCHITECTURE_ID "MSP430"
-
-# elif defined(__ICCV850__)
-#  define ARCHITECTURE_ID "V850"
-
-# elif defined(__ICC8051__)
-#  define ARCHITECTURE_ID "8051"
-
-# elif defined(__ICCSTM8__)
-#  define ARCHITECTURE_ID "STM8"
-
-# else /* unknown architecture */
-#  define ARCHITECTURE_ID ""
-# endif
-
-#elif defined(__ghs__)
-# if defined(__PPC64__)
-#  define ARCHITECTURE_ID "PPC64"
-
-# elif defined(__ppc__)
-#  define ARCHITECTURE_ID "PPC"
-
-# elif defined(__ARM__)
-#  define ARCHITECTURE_ID "ARM"
-
-# elif defined(__x86_64__)
-#  define ARCHITECTURE_ID "x64"
-
-# elif defined(__i386__)
-#  define ARCHITECTURE_ID "X86"
-
-# else /* unknown architecture */
-#  define ARCHITECTURE_ID ""
-# endif
-
-#elif defined(__clang__) && defined(__ti__)
-# if defined(__ARM_ARCH)
-#  define ARCHITECTURE_ID "Arm"
-
-# else /* unknown architecture */
-#  define ARCHITECTURE_ID ""
-# endif
-
-#elif defined(__TI_COMPILER_VERSION__)
-# if defined(__TI_ARM__)
-#  define ARCHITECTURE_ID "ARM"
-
-# elif defined(__MSP430__)
-#  define ARCHITECTURE_ID "MSP430"
-
-# elif defined(__TMS320C28XX__)
-#  define ARCHITECTURE_ID "TMS320C28x"
-
-# elif defined(__TMS320C6X__) || defined(_TMS320C6X)
-#  define ARCHITECTURE_ID "TMS320C6x"
-
-# else /* unknown architecture */
-#  define ARCHITECTURE_ID ""
-# endif
-
-# elif defined(__ADSPSHARC__)
-#  define ARCHITECTURE_ID "SHARC"
-
-# elif defined(__ADSPBLACKFIN__)
-#  define ARCHITECTURE_ID "Blackfin"
-
-#elif defined(__TASKING__)
-
-# if defined(__CTC__) || defined(__CPTC__)
-#  define ARCHITECTURE_ID "TriCore"
-
-# elif defined(__CMCS__)
-#  define ARCHITECTURE_ID "MCS"
-
-# elif defined(__CARM__)
-#  define ARCHITECTURE_ID "ARM"
-
-# elif defined(__CARC__)
-#  define ARCHITECTURE_ID "ARC"
-
-# elif defined(__C51__)
-#  define ARCHITECTURE_ID "8051"
-
-# elif defined(__CPCP__)
-#  define ARCHITECTURE_ID "PCP"
-
-# else
-#  define ARCHITECTURE_ID ""
-# endif
-
-#else
-#  define ARCHITECTURE_ID
-#endif
-
-/* Convert integer to decimal digit literals.  */
-#define DEC(n)                   \
-  ('0' + (((n) / 10000000)%10)), \
-  ('0' + (((n) / 1000000)%10)),  \
-  ('0' + (((n) / 100000)%10)),   \
-  ('0' + (((n) / 10000)%10)),    \
-  ('0' + (((n) / 1000)%10)),     \
-  ('0' + (((n) / 100)%10)),      \
-  ('0' + (((n) / 10)%10)),       \
-  ('0' +  ((n) % 10))
-
-/* Convert integer to hex digit literals.  */
-#define HEX(n)             \
-  ('0' + ((n)>>28 & 0xF)), \
-  ('0' + ((n)>>24 & 0xF)), \
-  ('0' + ((n)>>20 & 0xF)), \
-  ('0' + ((n)>>16 & 0xF)), \
-  ('0' + ((n)>>12 & 0xF)), \
-  ('0' + ((n)>>8  & 0xF)), \
-  ('0' + ((n)>>4  & 0xF)), \
-  ('0' + ((n)     & 0xF))
-
-/* Construct a string literal encoding the version number. */
-#ifdef COMPILER_VERSION
-char const* info_version = "INFO" ":" "compiler_version[" COMPILER_VERSION "]";
-
-/* Construct a string literal encoding the version number components. */
-#elif defined(COMPILER_VERSION_MAJOR)
-char const info_version[] = {
-  'I', 'N', 'F', 'O', ':',
-  'c','o','m','p','i','l','e','r','_','v','e','r','s','i','o','n','[',
-  COMPILER_VERSION_MAJOR,
-# ifdef COMPILER_VERSION_MINOR
-  '.', COMPILER_VERSION_MINOR,
-#  ifdef COMPILER_VERSION_PATCH
-   '.', COMPILER_VERSION_PATCH,
-#   ifdef COMPILER_VERSION_TWEAK
-    '.', COMPILER_VERSION_TWEAK,
-#   endif
-#  endif
-# endif
-  ']','\0'};
-#endif
-
-/* Construct a string literal encoding the internal version number. */
-#ifdef COMPILER_VERSION_INTERNAL
-char const info_version_internal[] = {
-  'I', 'N', 'F', 'O', ':',
-  'c','o','m','p','i','l','e','r','_','v','e','r','s','i','o','n','_',
-  'i','n','t','e','r','n','a','l','[',
-  COMPILER_VERSION_INTERNAL,']','\0'};
-#elif defined(COMPILER_VERSION_INTERNAL_STR)
-char const* info_version_internal = "INFO" ":" "compiler_version_internal[" COMPILER_VERSION_INTERNAL_STR "]";
-#endif
-
-/* Construct a string literal encoding the version number components. */
-#ifdef SIMULATE_VERSION_MAJOR
-char const info_simulate_version[] = {
-  'I', 'N', 'F', 'O', ':',
-  's','i','m','u','l','a','t','e','_','v','e','r','s','i','o','n','[',
-  SIMULATE_VERSION_MAJOR,
-# ifdef SIMULATE_VERSION_MINOR
-  '.', SIMULATE_VERSION_MINOR,
-#  ifdef SIMULATE_VERSION_PATCH
-   '.', SIMULATE_VERSION_PATCH,
-#   ifdef SIMULATE_VERSION_TWEAK
-    '.', SIMULATE_VERSION_TWEAK,
-#   endif
-#  endif
-# endif
-  ']','\0'};
-#endif
-
-/* Construct the string literal in pieces to prevent the source from
-   getting matched.  Store it in a pointer rather than an array
-   because some compilers will just produce instructions to fill the
-   array rather than assigning a pointer to a static array.  */
-char const* info_platform = "INFO" ":" "platform[" PLATFORM_ID "]";
-char const* info_arch = "INFO" ":" "arch[" ARCHITECTURE_ID "]";
-
-
-
-#if !defined(__STDC__) && !defined(__clang__)
-# if defined(_MSC_VER) || defined(__ibmxl__) || defined(__IBMC__)
-#  define C_VERSION "90"
-# else
-#  define C_VERSION
-# endif
-#elif __STDC_VERSION__ > 201710L
-# define C_VERSION "23"
-#elif __STDC_VERSION__ >= 201710L
-# define C_VERSION "17"
-#elif __STDC_VERSION__ >= 201000L
-# define C_VERSION "11"
-#elif __STDC_VERSION__ >= 199901L
-# define C_VERSION "99"
-#else
-# define C_VERSION "90"
-#endif
-const char* info_language_standard_default =
-  "INFO" ":" "standard_default[" C_VERSION "]";
-
-const char* info_language_extensions_default = "INFO" ":" "extensions_default["
-#if (defined(__clang__) || defined(__GNUC__) || defined(__xlC__) ||           \
-     defined(__TI_COMPILER_VERSION__)) &&                                     \
-  !defined(__STRICT_ANSI__)
-  "ON"
-#else
-  "OFF"
-#endif
-"]";
-
-/*--------------------------------------------------------------------------*/
-
-#ifdef ID_VOID_MAIN
-void main() {}
-#else
-# if defined(__CLASSIC_C__)
-int main(argc, argv) int argc; char *argv[];
-# else
-int main(int argc, char* argv[])
-# endif
-{
-  int require = 0;
-  require += info_compiler[argc];
-  require += info_platform[argc];
-  require += info_arch[argc];
-#ifdef COMPILER_VERSION_MAJOR
-  require += info_version[argc];
-#endif
-#ifdef COMPILER_VERSION_INTERNAL
-  require += info_version_internal[argc];
-#endif
-#ifdef SIMULATE_ID
-  require += info_simulate[argc];
-#endif
-#ifdef SIMULATE_VERSION_MAJOR
-  require += info_simulate_version[argc];
-#endif
-#if defined(__CRAYXT_COMPUTE_LINUX_TARGET)
-  require += info_cray[argc];
-#endif
-  require += info_language_standard_default[argc];
-  require += info_language_extensions_default[argc];
-  (void)argv;
-  return require;
-}
-#endif

build_final2/CMakeFiles/3.29.2/CompilerIdCXX/CMakeCXXCompilerId.cpp

@@ -1,878 +0,0 @@
-/* This source file must have a .cpp extension so that all C++ compilers
-   recognize the extension without flags.  Borland does not know .cxx for
-   example.  */
-#ifndef __cplusplus
-# error "A C compiler has been selected for C++."
-#endif
-
-#if !defined(__has_include)
-/* If the compiler does not have __has_include, pretend the answer is
-   always no.  */
-#  define __has_include(x) 0
-#endif
-
-
-/* Version number components: V=Version, R=Revision, P=Patch
-   Version date components:   YYYY=Year, MM=Month,   DD=Day  */
-
-#if defined(__INTEL_COMPILER) || defined(__ICC)
-# define COMPILER_ID "Intel"
-# if defined(_MSC_VER)
-#  define SIMULATE_ID "MSVC"
-# endif
-# if defined(__GNUC__)
-#  define SIMULATE_ID "GNU"
-# endif
-  /* __INTEL_COMPILER = VRP prior to 2021, and then VVVV for 2021 and later,
-     except that a few beta releases use the old format with V=2021.  */
-# if __INTEL_COMPILER < 2021 || __INTEL_COMPILER == 202110 || __INTEL_COMPILER == 202111
-#  define COMPILER_VERSION_MAJOR DEC(__INTEL_COMPILER/100)
-#  define COMPILER_VERSION_MINOR DEC(__INTEL_COMPILER/10 % 10)
-#  if defined(__INTEL_COMPILER_UPDATE)
-#   define COMPILER_VERSION_PATCH DEC(__INTEL_COMPILER_UPDATE)
-#  else
-#   define COMPILER_VERSION_PATCH DEC(__INTEL_COMPILER   % 10)
-#  endif
-# else
-#  define COMPILER_VERSION_MAJOR DEC(__INTEL_COMPILER)
-#  define COMPILER_VERSION_MINOR DEC(__INTEL_COMPILER_UPDATE)
-   /* The third version component from --version is an update index,
-      but no macro is provided for it.  */
-#  define COMPILER_VERSION_PATCH DEC(0)
-# endif
-# if defined(__INTEL_COMPILER_BUILD_DATE)
-   /* __INTEL_COMPILER_BUILD_DATE = YYYYMMDD */
-#  define COMPILER_VERSION_TWEAK DEC(__INTEL_COMPILER_BUILD_DATE)
-# endif
-# if defined(_MSC_VER)
-   /* _MSC_VER = VVRR */
-#  define SIMULATE_VERSION_MAJOR DEC(_MSC_VER / 100)
-#  define SIMULATE_VERSION_MINOR DEC(_MSC_VER % 100)
-# endif
-# if defined(__GNUC__)
-#  define SIMULATE_VERSION_MAJOR DEC(__GNUC__)
-# elif defined(__GNUG__)
-#  define SIMULATE_VERSION_MAJOR DEC(__GNUG__)
-# endif
-# if defined(__GNUC_MINOR__)
-#  define SIMULATE_VERSION_MINOR DEC(__GNUC_MINOR__)
-# endif
-# if defined(__GNUC_PATCHLEVEL__)
-#  define SIMULATE_VERSION_PATCH DEC(__GNUC_PATCHLEVEL__)
-# endif
-
-#elif (defined(__clang__) && defined(__INTEL_CLANG_COMPILER)) || defined(__INTEL_LLVM_COMPILER)
-# define COMPILER_ID "IntelLLVM"
-#if defined(_MSC_VER)
-# define SIMULATE_ID "MSVC"
-#endif
-#if defined(__GNUC__)
-# define SIMULATE_ID "GNU"
-#endif
-/* __INTEL_LLVM_COMPILER = VVVVRP prior to 2021.2.0, VVVVRRPP for 2021.2.0 and
- * later.  Look for 6 digit vs. 8 digit version number to decide encoding.
- * VVVV is no smaller than the current year when a version is released.
- */
-#if __INTEL_LLVM_COMPILER < 1000000L
-# define COMPILER_VERSION_MAJOR DEC(__INTEL_LLVM_COMPILER/100)
-# define COMPILER_VERSION_MINOR DEC(__INTEL_LLVM_COMPILER/10 % 10)
-# define COMPILER_VERSION_PATCH DEC(__INTEL_LLVM_COMPILER    % 10)
-#else
-# define COMPILER_VERSION_MAJOR DEC(__INTEL_LLVM_COMPILER/10000)
-# define COMPILER_VERSION_MINOR DEC(__INTEL_LLVM_COMPILER/100 % 100)
-# define COMPILER_VERSION_PATCH DEC(__INTEL_LLVM_COMPILER     % 100)
-#endif
-#if defined(_MSC_VER)
-  /* _MSC_VER = VVRR */
-# define SIMULATE_VERSION_MAJOR DEC(_MSC_VER / 100)
-# define SIMULATE_VERSION_MINOR DEC(_MSC_VER % 100)
-#endif
-#if defined(__GNUC__)
-# define SIMULATE_VERSION_MAJOR DEC(__GNUC__)
-#elif defined(__GNUG__)
-# define SIMULATE_VERSION_MAJOR DEC(__GNUG__)
-#endif
-#if defined(__GNUC_MINOR__)
-# define SIMULATE_VERSION_MINOR DEC(__GNUC_MINOR__)
-#endif
-#if defined(__GNUC_PATCHLEVEL__)
-# define SIMULATE_VERSION_PATCH DEC(__GNUC_PATCHLEVEL__)
-#endif
-
-#elif defined(__PATHCC__)
-# define COMPILER_ID "PathScale"
-# define COMPILER_VERSION_MAJOR DEC(__PATHCC__)
-# define COMPILER_VERSION_MINOR DEC(__PATHCC_MINOR__)
-# if defined(__PATHCC_PATCHLEVEL__)
-#  define COMPILER_VERSION_PATCH DEC(__PATHCC_PATCHLEVEL__)
-# endif
-
-#elif defined(__BORLANDC__) && defined(__CODEGEARC_VERSION__)
-# define COMPILER_ID "Embarcadero"
-# define COMPILER_VERSION_MAJOR HEX(__CODEGEARC_VERSION__>>24 & 0x00FF)
-# define COMPILER_VERSION_MINOR HEX(__CODEGEARC_VERSION__>>16 & 0x00FF)
-# define COMPILER_VERSION_PATCH DEC(__CODEGEARC_VERSION__     & 0xFFFF)
-
-#elif defined(__BORLANDC__)
-# define COMPILER_ID "Borland"
-  /* __BORLANDC__ = 0xVRR */
-# define COMPILER_VERSION_MAJOR HEX(__BORLANDC__>>8)
-# define COMPILER_VERSION_MINOR HEX(__BORLANDC__ & 0xFF)
-
-#elif defined(__WATCOMC__) && __WATCOMC__ < 1200
-# define COMPILER_ID "Watcom"
-   /* __WATCOMC__ = VVRR */
-# define COMPILER_VERSION_MAJOR DEC(__WATCOMC__ / 100)
-# define COMPILER_VERSION_MINOR DEC((__WATCOMC__ / 10) % 10)
-# if (__WATCOMC__ % 10) > 0
-#  define COMPILER_VERSION_PATCH DEC(__WATCOMC__ % 10)
-# endif
-
-#elif defined(__WATCOMC__)
-# define COMPILER_ID "OpenWatcom"
-   /* __WATCOMC__ = VVRP + 1100 */
-# define COMPILER_VERSION_MAJOR DEC((__WATCOMC__ - 1100) / 100)
-# define COMPILER_VERSION_MINOR DEC((__WATCOMC__ / 10) % 10)
-# if (__WATCOMC__ % 10) > 0
-#  define COMPILER_VERSION_PATCH DEC(__WATCOMC__ % 10)
-# endif
-
-#elif defined(__SUNPRO_CC)
-# define COMPILER_ID "SunPro"
-# if __SUNPRO_CC >= 0x5100
-   /* __SUNPRO_CC = 0xVRRP */
-#  define COMPILER_VERSION_MAJOR HEX(__SUNPRO_CC>>12)
-#  define COMPILER_VERSION_MINOR HEX(__SUNPRO_CC>>4 & 0xFF)
-#  define COMPILER_VERSION_PATCH HEX(__SUNPRO_CC    & 0xF)
-# else
-   /* __SUNPRO_CC = 0xVRP */
-#  define COMPILER_VERSION_MAJOR HEX(__SUNPRO_CC>>8)
-#  define COMPILER_VERSION_MINOR HEX(__SUNPRO_CC>>4 & 0xF)
-#  define COMPILER_VERSION_PATCH HEX(__SUNPRO_CC    & 0xF)
-# endif
-
-#elif defined(__HP_aCC)
-# define COMPILER_ID "HP"
-  /* __HP_aCC = VVRRPP */
-# define COMPILER_VERSION_MAJOR DEC(__HP_aCC/10000)
-# define COMPILER_VERSION_MINOR DEC(__HP_aCC/100 % 100)
-# define COMPILER_VERSION_PATCH DEC(__HP_aCC     % 100)
-
-#elif defined(__DECCXX)
-# define COMPILER_ID "Compaq"
-  /* __DECCXX_VER = VVRRTPPPP */
-# define COMPILER_VERSION_MAJOR DEC(__DECCXX_VER/10000000)
-# define COMPILER_VERSION_MINOR DEC(__DECCXX_VER/100000  % 100)
-# define COMPILER_VERSION_PATCH DEC(__DECCXX_VER         % 10000)
-
-#elif defined(__IBMCPP__) && defined(__COMPILER_VER__)
-# define COMPILER_ID "zOS"
-  /* __IBMCPP__ = VRP */
-# define COMPILER_VERSION_MAJOR DEC(__IBMCPP__/100)
-# define COMPILER_VERSION_MINOR DEC(__IBMCPP__/10 % 10)
-# define COMPILER_VERSION_PATCH DEC(__IBMCPP__    % 10)
-
-#elif defined(__open_xl__) && defined(__clang__)
-# define COMPILER_ID "IBMClang"
-# define COMPILER_VERSION_MAJOR DEC(__open_xl_version__)
-# define COMPILER_VERSION_MINOR DEC(__open_xl_release__)
-# define COMPILER_VERSION_PATCH DEC(__open_xl_modification__)
-# define COMPILER_VERSION_TWEAK DEC(__open_xl_ptf_fix_level__)
-
-
-#elif defined(__ibmxl__) && defined(__clang__)
-# define COMPILER_ID "XLClang"
-# define COMPILER_VERSION_MAJOR DEC(__ibmxl_version__)
-# define COMPILER_VERSION_MINOR DEC(__ibmxl_release__)
-# define COMPILER_VERSION_PATCH DEC(__ibmxl_modification__)
-# define COMPILER_VERSION_TWEAK DEC(__ibmxl_ptf_fix_level__)
-
-
-#elif defined(__IBMCPP__) && !defined(__COMPILER_VER__) && __IBMCPP__ >= 800
-# define COMPILER_ID "XL"
-  /* __IBMCPP__ = VRP */
-# define COMPILER_VERSION_MAJOR DEC(__IBMCPP__/100)
-# define COMPILER_VERSION_MINOR DEC(__IBMCPP__/10 % 10)
-# define COMPILER_VERSION_PATCH DEC(__IBMCPP__    % 10)
-
-#elif defined(__IBMCPP__) && !defined(__COMPILER_VER__) && __IBMCPP__ < 800
-# define COMPILER_ID "VisualAge"
-  /* __IBMCPP__ = VRP */
-# define COMPILER_VERSION_MAJOR DEC(__IBMCPP__/100)
-# define COMPILER_VERSION_MINOR DEC(__IBMCPP__/10 % 10)
-# define COMPILER_VERSION_PATCH DEC(__IBMCPP__    % 10)
-
-#elif defined(__NVCOMPILER)
-# define COMPILER_ID "NVHPC"
-# define COMPILER_VERSION_MAJOR DEC(__NVCOMPILER_MAJOR__)
-# define COMPILER_VERSION_MINOR DEC(__NVCOMPILER_MINOR__)
-# if defined(__NVCOMPILER_PATCHLEVEL__)
-#  define COMPILER_VERSION_PATCH DEC(__NVCOMPILER_PATCHLEVEL__)
-# endif
-
-#elif defined(__PGI)
-# define COMPILER_ID "PGI"
-# define COMPILER_VERSION_MAJOR DEC(__PGIC__)
-# define COMPILER_VERSION_MINOR DEC(__PGIC_MINOR__)
-# if defined(__PGIC_PATCHLEVEL__)
-#  define COMPILER_VERSION_PATCH DEC(__PGIC_PATCHLEVEL__)
-# endif
-
-#elif defined(__clang__) && defined(__cray__)
-# define COMPILER_ID "CrayClang"
-# define COMPILER_VERSION_MAJOR DEC(__cray_major__)
-# define COMPILER_VERSION_MINOR DEC(__cray_minor__)
-# define COMPILER_VERSION_PATCH DEC(__cray_patchlevel__)
-# define COMPILER_VERSION_INTERNAL_STR __clang_version__
-
-
-#elif defined(_CRAYC)
-# define COMPILER_ID "Cray"
-# define COMPILER_VERSION_MAJOR DEC(_RELEASE_MAJOR)
-# define COMPILER_VERSION_MINOR DEC(_RELEASE_MINOR)
-
-#elif defined(__TI_COMPILER_VERSION__)
-# define COMPILER_ID "TI"
-  /* __TI_COMPILER_VERSION__ = VVVRRRPPP */
-# define COMPILER_VERSION_MAJOR DEC(__TI_COMPILER_VERSION__/1000000)
-# define COMPILER_VERSION_MINOR DEC(__TI_COMPILER_VERSION__/1000   % 1000)
-# define COMPILER_VERSION_PATCH DEC(__TI_COMPILER_VERSION__        % 1000)
-
-#elif defined(__CLANG_FUJITSU)
-# define COMPILER_ID "FujitsuClang"
-# define COMPILER_VERSION_MAJOR DEC(__FCC_major__)
-# define COMPILER_VERSION_MINOR DEC(__FCC_minor__)
-# define COMPILER_VERSION_PATCH DEC(__FCC_patchlevel__)
-# define COMPILER_VERSION_INTERNAL_STR __clang_version__
-
-
-#elif defined(__FUJITSU)
-# define COMPILER_ID "Fujitsu"
-# if defined(__FCC_version__)
-#   define COMPILER_VERSION __FCC_version__
-# elif defined(__FCC_major__)
-#   define COMPILER_VERSION_MAJOR DEC(__FCC_major__)
-#   define COMPILER_VERSION_MINOR DEC(__FCC_minor__)
-#   define COMPILER_VERSION_PATCH DEC(__FCC_patchlevel__)
-# endif
-# if defined(__fcc_version)
-#   define COMPILER_VERSION_INTERNAL DEC(__fcc_version)
-# elif defined(__FCC_VERSION)
-#   define COMPILER_VERSION_INTERNAL DEC(__FCC_VERSION)
-# endif
-
-
-#elif defined(__ghs__)
-# define COMPILER_ID "GHS"
-/* __GHS_VERSION_NUMBER = VVVVRP */
-# ifdef __GHS_VERSION_NUMBER
-# define COMPILER_VERSION_MAJOR DEC(__GHS_VERSION_NUMBER / 100)
-# define COMPILER_VERSION_MINOR DEC(__GHS_VERSION_NUMBER / 10 % 10)
-# define COMPILER_VERSION_PATCH DEC(__GHS_VERSION_NUMBER      % 10)
-# endif
-
-#elif defined(__TASKING__)
-# define COMPILER_ID "Tasking"
-  # define COMPILER_VERSION_MAJOR DEC(__VERSION__/1000)
-  # define COMPILER_VERSION_MINOR DEC(__VERSION__ % 100)
-# define COMPILER_VERSION_INTERNAL DEC(__VERSION__)
-
-#elif defined(__ORANGEC__)
-# define COMPILER_ID "OrangeC"
-# define COMPILER_VERSION_MAJOR DEC(__ORANGEC_MAJOR__)
-# define COMPILER_VERSION_MINOR DEC(__ORANGEC_MINOR__)
-# define COMPILER_VERSION_PATCH DEC(__ORANGEC_PATCHLEVEL__)
-
-#elif defined(__SCO_VERSION__)
-# define COMPILER_ID "SCO"
-
-#elif defined(__ARMCC_VERSION) && !defined(__clang__)
-# define COMPILER_ID "ARMCC"
-#if __ARMCC_VERSION >= 1000000
-  /* __ARMCC_VERSION = VRRPPPP */
-  # define COMPILER_VERSION_MAJOR DEC(__ARMCC_VERSION/1000000)
-  # define COMPILER_VERSION_MINOR DEC(__ARMCC_VERSION/10000 % 100)
-  # define COMPILER_VERSION_PATCH DEC(__ARMCC_VERSION     % 10000)
-#else
-  /* __ARMCC_VERSION = VRPPPP */
-  # define COMPILER_VERSION_MAJOR DEC(__ARMCC_VERSION/100000)
-  # define COMPILER_VERSION_MINOR DEC(__ARMCC_VERSION/10000 % 10)
-  # define COMPILER_VERSION_PATCH DEC(__ARMCC_VERSION    % 10000)
-#endif
-
-
-#elif defined(__clang__) && defined(__apple_build_version__)
-# define COMPILER_ID "AppleClang"
-# if defined(_MSC_VER)
-#  define SIMULATE_ID "MSVC"
-# endif
-# define COMPILER_VERSION_MAJOR DEC(__clang_major__)
-# define COMPILER_VERSION_MINOR DEC(__clang_minor__)
-# define COMPILER_VERSION_PATCH DEC(__clang_patchlevel__)
-# if defined(_MSC_VER)
-   /* _MSC_VER = VVRR */
-#  define SIMULATE_VERSION_MAJOR DEC(_MSC_VER / 100)
-#  define SIMULATE_VERSION_MINOR DEC(_MSC_VER % 100)
-# endif
-# define COMPILER_VERSION_TWEAK DEC(__apple_build_version__)
-
-#elif defined(__clang__) && defined(__ARMCOMPILER_VERSION)
-# define COMPILER_ID "ARMClang"
-  # define COMPILER_VERSION_MAJOR DEC(__ARMCOMPILER_VERSION/1000000)
-  # define COMPILER_VERSION_MINOR DEC(__ARMCOMPILER_VERSION/10000 % 100)
-  # define COMPILER_VERSION_PATCH DEC(__ARMCOMPILER_VERSION/100   % 100)
-# define COMPILER_VERSION_INTERNAL DEC(__ARMCOMPILER_VERSION)
-
-#elif defined(__clang__) && defined(__ti__)
-# define COMPILER_ID "TIClang"
-  # define COMPILER_VERSION_MAJOR DEC(__ti_major__)
-  # define COMPILER_VERSION_MINOR DEC(__ti_minor__)
-  # define COMPILER_VERSION_PATCH DEC(__ti_patchlevel__)
-# define COMPILER_VERSION_INTERNAL DEC(__ti_version__)
-
-#elif defined(__clang__)
-# define COMPILER_ID "Clang"
-# if defined(_MSC_VER)
-#  define SIMULATE_ID "MSVC"
-# endif
-# define COMPILER_VERSION_MAJOR DEC(__clang_major__)
-# define COMPILER_VERSION_MINOR DEC(__clang_minor__)
-# define COMPILER_VERSION_PATCH DEC(__clang_patchlevel__)
-# if defined(_MSC_VER)
-   /* _MSC_VER = VVRR */
-#  define SIMULATE_VERSION_MAJOR DEC(_MSC_VER / 100)
-#  define SIMULATE_VERSION_MINOR DEC(_MSC_VER % 100)
-# endif
-
-#elif defined(__LCC__) && (defined(__GNUC__) || defined(__GNUG__) || defined(__MCST__))
-# define COMPILER_ID "LCC"
-# define COMPILER_VERSION_MAJOR DEC(__LCC__ / 100)
-# define COMPILER_VERSION_MINOR DEC(__LCC__ % 100)
-# if defined(__LCC_MINOR__)
-#  define COMPILER_VERSION_PATCH DEC(__LCC_MINOR__)
-# endif
-# if defined(__GNUC__) && defined(__GNUC_MINOR__)
-#  define SIMULATE_ID "GNU"
-#  define SIMULATE_VERSION_MAJOR DEC(__GNUC__)
-#  define SIMULATE_VERSION_MINOR DEC(__GNUC_MINOR__)
-#  if defined(__GNUC_PATCHLEVEL__)
-#   define SIMULATE_VERSION_PATCH DEC(__GNUC_PATCHLEVEL__)
-#  endif
-# endif
-
-#elif defined(__GNUC__) || defined(__GNUG__)
-# define COMPILER_ID "GNU"
-# if defined(__GNUC__)
-#  define COMPILER_VERSION_MAJOR DEC(__GNUC__)
-# else
-#  define COMPILER_VERSION_MAJOR DEC(__GNUG__)
-# endif
-# if defined(__GNUC_MINOR__)
-#  define COMPILER_VERSION_MINOR DEC(__GNUC_MINOR__)
-# endif
-# if defined(__GNUC_PATCHLEVEL__)
-#  define COMPILER_VERSION_PATCH DEC(__GNUC_PATCHLEVEL__)
-# endif
-
-#elif defined(_MSC_VER)
-# define COMPILER_ID "MSVC"
-  /* _MSC_VER = VVRR */
-# define COMPILER_VERSION_MAJOR DEC(_MSC_VER / 100)
-# define COMPILER_VERSION_MINOR DEC(_MSC_VER % 100)
-# if defined(_MSC_FULL_VER)
-#  if _MSC_VER >= 1400
-    /* _MSC_FULL_VER = VVRRPPPPP */
-#   define COMPILER_VERSION_PATCH DEC(_MSC_FULL_VER % 100000)
-#  else
-    /* _MSC_FULL_VER = VVRRPPPP */
-#   define COMPILER_VERSION_PATCH DEC(_MSC_FULL_VER % 10000)
-#  endif
-# endif
-# if defined(_MSC_BUILD)
-#  define COMPILER_VERSION_TWEAK DEC(_MSC_BUILD)
-# endif
-
-#elif defined(_ADI_COMPILER)
-# define COMPILER_ID "ADSP"
-#if defined(__VERSIONNUM__)
-  /* __VERSIONNUM__ = 0xVVRRPPTT */
-#  define COMPILER_VERSION_MAJOR DEC(__VERSIONNUM__ >> 24 & 0xFF)
-#  define COMPILER_VERSION_MINOR DEC(__VERSIONNUM__ >> 16 & 0xFF)
-#  define COMPILER_VERSION_PATCH DEC(__VERSIONNUM__ >> 8 & 0xFF)
-#  define COMPILER_VERSION_TWEAK DEC(__VERSIONNUM__ & 0xFF)
-#endif
-
-#elif defined(__IAR_SYSTEMS_ICC__) || defined(__IAR_SYSTEMS_ICC)
-# define COMPILER_ID "IAR"
-# if defined(__VER__) && defined(__ICCARM__)
-#  define COMPILER_VERSION_MAJOR DEC((__VER__) / 1000000)
-#  define COMPILER_VERSION_MINOR DEC(((__VER__) / 1000) % 1000)
-#  define COMPILER_VERSION_PATCH DEC((__VER__) % 1000)
-#  define COMPILER_VERSION_INTERNAL DEC(__IAR_SYSTEMS_ICC__)
-# elif defined(__VER__) && (defined(__ICCAVR__) || defined(__ICCRX__) || defined(__ICCRH850__) || defined(__ICCRL78__) || defined(__ICC430__) || defined(__ICCRISCV__) || defined(__ICCV850__) || defined(__ICC8051__) || defined(__ICCSTM8__))
-#  define COMPILER_VERSION_MAJOR DEC((__VER__) / 100)
-#  define COMPILER_VERSION_MINOR DEC((__VER__) - (((__VER__) / 100)*100))
-#  define COMPILER_VERSION_PATCH DEC(__SUBVERSION__)
-#  define COMPILER_VERSION_INTERNAL DEC(__IAR_SYSTEMS_ICC__)
-# endif
-
-
-/* These compilers are either not known or too old to define an
-  identification macro.  Try to identify the platform and guess that
-  it is the native compiler.  */
-#elif defined(__hpux) || defined(__hpua)
-# define COMPILER_ID "HP"
-
-#else /* unknown compiler */
-# define COMPILER_ID ""
-#endif
-
-/* Construct the string literal in pieces to prevent the source from
-   getting matched.  Store it in a pointer rather than an array
-   because some compilers will just produce instructions to fill the
-   array rather than assigning a pointer to a static array.  */
-char const* info_compiler = "INFO" ":" "compiler[" COMPILER_ID "]";
-#ifdef SIMULATE_ID
-char const* info_simulate = "INFO" ":" "simulate[" SIMULATE_ID "]";
-#endif
-
-#ifdef __QNXNTO__
-char const* qnxnto = "INFO" ":" "qnxnto[]";
-#endif
-
-#if defined(__CRAYXT_COMPUTE_LINUX_TARGET)
-char const *info_cray = "INFO" ":" "compiler_wrapper[CrayPrgEnv]";
-#endif
-
-#define STRINGIFY_HELPER(X) #X
-#define STRINGIFY(X) STRINGIFY_HELPER(X)
-
-/* Identify known platforms by name.  */
-#if defined(__linux) || defined(__linux__) || defined(linux)
-# define PLATFORM_ID "Linux"
-
-#elif defined(__MSYS__)
-# define PLATFORM_ID "MSYS"
-
-#elif defined(__CYGWIN__)
-# define PLATFORM_ID "Cygwin"
-
-#elif defined(__MINGW32__)
-# define PLATFORM_ID "MinGW"
-
-#elif defined(__APPLE__)
-# define PLATFORM_ID "Darwin"
-
-#elif defined(_WIN32) || defined(__WIN32__) || defined(WIN32)
-# define PLATFORM_ID "Windows"
-
-#elif defined(__FreeBSD__) || defined(__FreeBSD)
-# define PLATFORM_ID "FreeBSD"
-
-#elif defined(__NetBSD__) || defined(__NetBSD)
-# define PLATFORM_ID "NetBSD"
-
-#elif defined(__OpenBSD__) || defined(__OPENBSD)
-# define PLATFORM_ID "OpenBSD"
-
-#elif defined(__sun) || defined(sun)
-# define PLATFORM_ID "SunOS"
-
-#elif defined(_AIX) || defined(__AIX) || defined(__AIX__) || defined(__aix) || defined(__aix__)
-# define PLATFORM_ID "AIX"
-
-#elif defined(__hpux) || defined(__hpux__)
-# define PLATFORM_ID "HP-UX"
-
-#elif defined(__HAIKU__)
-# define PLATFORM_ID "Haiku"
-
-#elif defined(__BeOS) || defined(__BEOS__) || defined(_BEOS)
-# define PLATFORM_ID "BeOS"
-
-#elif defined(__QNX__) || defined(__QNXNTO__)
-# define PLATFORM_ID "QNX"
-
-#elif defined(__tru64) || defined(_tru64) || defined(__TRU64__)
-# define PLATFORM_ID "Tru64"
-
-#elif defined(__riscos) || defined(__riscos__)
-# define PLATFORM_ID "RISCos"
-
-#elif defined(__sinix) || defined(__sinix__) || defined(__SINIX__)
-# define PLATFORM_ID "SINIX"
-
-#elif defined(__UNIX_SV__)
-# define PLATFORM_ID "UNIX_SV"
-
-#elif defined(__bsdos__)
-# define PLATFORM_ID "BSDOS"
-
-#elif defined(_MPRAS) || defined(MPRAS)
-# define PLATFORM_ID "MP-RAS"
-
-#elif defined(__osf) || defined(__osf__)
-# define PLATFORM_ID "OSF1"
-
-#elif defined(_SCO_SV) || defined(SCO_SV) || defined(sco_sv)
-# define PLATFORM_ID "SCO_SV"
-
-#elif defined(__ultrix) || defined(__ultrix__) || defined(_ULTRIX)
-# define PLATFORM_ID "ULTRIX"
-
-#elif defined(__XENIX__) || defined(_XENIX) || defined(XENIX)
-# define PLATFORM_ID "Xenix"
-
-#elif defined(__WATCOMC__)
-# if defined(__LINUX__)
-#  define PLATFORM_ID "Linux"
-
-# elif defined(__DOS__)
-#  define PLATFORM_ID "DOS"
-
-# elif defined(__OS2__)
-#  define PLATFORM_ID "OS2"
-
-# elif defined(__WINDOWS__)
-#  define PLATFORM_ID "Windows3x"
-
-# elif defined(__VXWORKS__)
-#  define PLATFORM_ID "VxWorks"
-
-# else /* unknown platform */
-#  define PLATFORM_ID
-# endif
-
-#elif defined(__INTEGRITY)
-# if defined(INT_178B)
-#  define PLATFORM_ID "Integrity178"
-
-# else /* regular Integrity */
-#  define PLATFORM_ID "Integrity"
-# endif
-
-# elif defined(_ADI_COMPILER)
-#  define PLATFORM_ID "ADSP"
-
-#else /* unknown platform */
-# define PLATFORM_ID
-
-#endif
-
-/* For windows compilers MSVC and Intel we can determine
-   the architecture of the compiler being used.  This is because
-   the compilers do not have flags that can change the architecture,
-   but rather depend on which compiler is being used
-*/
-#if defined(_WIN32) && defined(_MSC_VER)
-# if defined(_M_IA64)
-#  define ARCHITECTURE_ID "IA64"
-
-# elif defined(_M_ARM64EC)
-#  define ARCHITECTURE_ID "ARM64EC"
-
-# elif defined(_M_X64) || defined(_M_AMD64)
-#  define ARCHITECTURE_ID "x64"
-
-# elif defined(_M_IX86)
-#  define ARCHITECTURE_ID "X86"
-
-# elif defined(_M_ARM64)
-#  define ARCHITECTURE_ID "ARM64"
-
-# elif defined(_M_ARM)
-#  if _M_ARM == 4
-#   define ARCHITECTURE_ID "ARMV4I"
-#  elif _M_ARM == 5
-#   define ARCHITECTURE_ID "ARMV5I"
-#  else
-#   define ARCHITECTURE_ID "ARMV" STRINGIFY(_M_ARM)
-#  endif
-
-# elif defined(_M_MIPS)
-#  define ARCHITECTURE_ID "MIPS"
-
-# elif defined(_M_SH)
-#  define ARCHITECTURE_ID "SHx"
-
-# else /* unknown architecture */
-#  define ARCHITECTURE_ID ""
-# endif
-
-#elif defined(__WATCOMC__)
-# if defined(_M_I86)
-#  define ARCHITECTURE_ID "I86"
-
-# elif defined(_M_IX86)
-#  define ARCHITECTURE_ID "X86"
-
-# else /* unknown architecture */
-#  define ARCHITECTURE_ID ""
-# endif
-
-#elif defined(__IAR_SYSTEMS_ICC__) || defined(__IAR_SYSTEMS_ICC)
-# if defined(__ICCARM__)
-#  define ARCHITECTURE_ID "ARM"
-
-# elif defined(__ICCRX__)
-#  define ARCHITECTURE_ID "RX"
-
-# elif defined(__ICCRH850__)
-#  define ARCHITECTURE_ID "RH850"
-
-# elif defined(__ICCRL78__)
-#  define ARCHITECTURE_ID "RL78"
-
-# elif defined(__ICCRISCV__)
-#  define ARCHITECTURE_ID "RISCV"
-
-# elif defined(__ICCAVR__)
-#  define ARCHITECTURE_ID "AVR"
-
-# elif defined(__ICC430__)
-#  define ARCHITECTURE_ID "MSP430"
-
-# elif defined(__ICCV850__)
-#  define ARCHITECTURE_ID "V850"
-
-# elif defined(__ICC8051__)
-#  define ARCHITECTURE_ID "8051"
-
-# elif defined(__ICCSTM8__)
-#  define ARCHITECTURE_ID "STM8"
-
-# else /* unknown architecture */
-#  define ARCHITECTURE_ID ""
-# endif
-
-#elif defined(__ghs__)
-# if defined(__PPC64__)
-#  define ARCHITECTURE_ID "PPC64"
-
-# elif defined(__ppc__)
-#  define ARCHITECTURE_ID "PPC"
-
-# elif defined(__ARM__)
-#  define ARCHITECTURE_ID "ARM"
-
-# elif defined(__x86_64__)
-#  define ARCHITECTURE_ID "x64"
-
-# elif defined(__i386__)
-#  define ARCHITECTURE_ID "X86"
-
-# else /* unknown architecture */
-#  define ARCHITECTURE_ID ""
-# endif
-
-#elif defined(__clang__) && defined(__ti__)
-# if defined(__ARM_ARCH)
-#  define ARCHITECTURE_ID "Arm"
-
-# else /* unknown architecture */
-#  define ARCHITECTURE_ID ""
-# endif
-
-#elif defined(__TI_COMPILER_VERSION__)
-# if defined(__TI_ARM__)
-#  define ARCHITECTURE_ID "ARM"
-
-# elif defined(__MSP430__)
-#  define ARCHITECTURE_ID "MSP430"
-
-# elif defined(__TMS320C28XX__)
-#  define ARCHITECTURE_ID "TMS320C28x"
-
-# elif defined(__TMS320C6X__) || defined(_TMS320C6X)
-#  define ARCHITECTURE_ID "TMS320C6x"
-
-# else /* unknown architecture */
-#  define ARCHITECTURE_ID ""
-# endif
-
-# elif defined(__ADSPSHARC__)
-#  define ARCHITECTURE_ID "SHARC"
-
-# elif defined(__ADSPBLACKFIN__)
-#  define ARCHITECTURE_ID "Blackfin"
-
-#elif defined(__TASKING__)
-
-# if defined(__CTC__) || defined(__CPTC__)
-#  define ARCHITECTURE_ID "TriCore"
-
-# elif defined(__CMCS__)
-#  define ARCHITECTURE_ID "MCS"
-
-# elif defined(__CARM__)
-#  define ARCHITECTURE_ID "ARM"
-
-# elif defined(__CARC__)
-#  define ARCHITECTURE_ID "ARC"
-
-# elif defined(__C51__)
-#  define ARCHITECTURE_ID "8051"
-
-# elif defined(__CPCP__)
-#  define ARCHITECTURE_ID "PCP"
-
-# else
-#  define ARCHITECTURE_ID ""
-# endif
-
-#else
-#  define ARCHITECTURE_ID
-#endif
-
-/* Convert integer to decimal digit literals.  */
-#define DEC(n)                   \
-  ('0' + (((n) / 10000000)%10)), \
-  ('0' + (((n) / 1000000)%10)),  \
-  ('0' + (((n) / 100000)%10)),   \
-  ('0' + (((n) / 10000)%10)),    \
-  ('0' + (((n) / 1000)%10)),     \
-  ('0' + (((n) / 100)%10)),      \
-  ('0' + (((n) / 10)%10)),       \
-  ('0' +  ((n) % 10))
-
-/* Convert integer to hex digit literals.  */
-#define HEX(n)             \
-  ('0' + ((n)>>28 & 0xF)), \
-  ('0' + ((n)>>24 & 0xF)), \
-  ('0' + ((n)>>20 & 0xF)), \
-  ('0' + ((n)>>16 & 0xF)), \
-  ('0' + ((n)>>12 & 0xF)), \
-  ('0' + ((n)>>8  & 0xF)), \
-  ('0' + ((n)>>4  & 0xF)), \
-  ('0' + ((n)     & 0xF))
-
-/* Construct a string literal encoding the version number. */
-#ifdef COMPILER_VERSION
-char const* info_version = "INFO" ":" "compiler_version[" COMPILER_VERSION "]";
-
-/* Construct a string literal encoding the version number components. */
-#elif defined(COMPILER_VERSION_MAJOR)
-char const info_version[] = {
-  'I', 'N', 'F', 'O', ':',
-  'c','o','m','p','i','l','e','r','_','v','e','r','s','i','o','n','[',
-  COMPILER_VERSION_MAJOR,
-# ifdef COMPILER_VERSION_MINOR
-  '.', COMPILER_VERSION_MINOR,
-#  ifdef COMPILER_VERSION_PATCH
-   '.', COMPILER_VERSION_PATCH,
-#   ifdef COMPILER_VERSION_TWEAK
-    '.', COMPILER_VERSION_TWEAK,
-#   endif
-#  endif
-# endif
-  ']','\0'};
-#endif
-
-/* Construct a string literal encoding the internal version number. */
-#ifdef COMPILER_VERSION_INTERNAL
-char const info_version_internal[] = {
-  'I', 'N', 'F', 'O', ':',
-  'c','o','m','p','i','l','e','r','_','v','e','r','s','i','o','n','_',
-  'i','n','t','e','r','n','a','l','[',
-  COMPILER_VERSION_INTERNAL,']','\0'};
-#elif defined(COMPILER_VERSION_INTERNAL_STR)
-char const* info_version_internal = "INFO" ":" "compiler_version_internal[" COMPILER_VERSION_INTERNAL_STR "]";
-#endif
-
-/* Construct a string literal encoding the version number components. */
-#ifdef SIMULATE_VERSION_MAJOR
-char const info_simulate_version[] = {
-  'I', 'N', 'F', 'O', ':',
-  's','i','m','u','l','a','t','e','_','v','e','r','s','i','o','n','[',
-  SIMULATE_VERSION_MAJOR,
-# ifdef SIMULATE_VERSION_MINOR
-  '.', SIMULATE_VERSION_MINOR,
-#  ifdef SIMULATE_VERSION_PATCH
-   '.', SIMULATE_VERSION_PATCH,
-#   ifdef SIMULATE_VERSION_TWEAK
-    '.', SIMULATE_VERSION_TWEAK,
-#   endif
-#  endif
-# endif
-  ']','\0'};
-#endif
-
-/* Construct the string literal in pieces to prevent the source from
-   getting matched.  Store it in a pointer rather than an array
-   because some compilers will just produce instructions to fill the
-   array rather than assigning a pointer to a static array.  */
-char const* info_platform = "INFO" ":" "platform[" PLATFORM_ID "]";
-char const* info_arch = "INFO" ":" "arch[" ARCHITECTURE_ID "]";
-
-
-
-#if defined(__INTEL_COMPILER) && defined(_MSVC_LANG) && _MSVC_LANG < 201403L
-#  if defined(__INTEL_CXX11_MODE__)
-#    if defined(__cpp_aggregate_nsdmi)
-#      define CXX_STD 201402L
-#    else
-#      define CXX_STD 201103L
-#    endif
-#  else
-#    define CXX_STD 199711L
-#  endif
-#elif defined(_MSC_VER) && defined(_MSVC_LANG)
-#  define CXX_STD _MSVC_LANG
-#else
-#  define CXX_STD __cplusplus
-#endif
-
-const char* info_language_standard_default = "INFO" ":" "standard_default["
-#if CXX_STD > 202002L
-  "23"
-#elif CXX_STD > 201703L
-  "20"
-#elif CXX_STD >= 201703L
-  "17"
-#elif CXX_STD >= 201402L
-  "14"
-#elif CXX_STD >= 201103L
-  "11"
-#else
-  "98"
-#endif
-"]";
-
-const char* info_language_extensions_default = "INFO" ":" "extensions_default["
-#if (defined(__clang__) || defined(__GNUC__) || defined(__xlC__) ||           \
-     defined(__TI_COMPILER_VERSION__)) &&                                     \
-  !defined(__STRICT_ANSI__)
-  "ON"
-#else
-  "OFF"
-#endif
-"]";
-
-/*--------------------------------------------------------------------------*/
-
-int main(int argc, char* argv[])
-{
-  int require = 0;
-  require += info_compiler[argc];
-  require += info_platform[argc];
-  require += info_arch[argc];
-#ifdef COMPILER_VERSION_MAJOR
-  require += info_version[argc];
-#endif
-#ifdef COMPILER_VERSION_INTERNAL
-  require += info_version_internal[argc];
-#endif
-#ifdef SIMULATE_ID
-  require += info_simulate[argc];
-#endif
-#ifdef SIMULATE_VERSION_MAJOR
-  require += info_simulate_version[argc];
-#endif
-#if defined(__CRAYXT_COMPUTE_LINUX_TARGET)
-  require += info_cray[argc];
-#endif
-  require += info_language_standard_default[argc];
-  require += info_language_extensions_default[argc];
-  (void)argv;
-  return require;
-}

build_final2/CMakeFiles/3.29.2/CompilerIdFortran/CMakeFortranCompilerId.F

@@ -1,1114 +0,0 @@
-      PROGRAM CMakeFortranCompilerId
-#if 0
-! Identify the compiler
-#endif
-#if defined(_MSC_VER)
-       PRINT *, 'INFO:simulate[MSVC]'
-# if _MSC_VER >= 1900
-       PRINT *, 'INFO:simulate_version[019.00]'
-# elif _MSC_VER >= 1800
-       PRINT *, 'INFO:simulate_version[018.00]'
-# elif _MSC_VER >= 1700
-       PRINT *, 'INFO:simulate_version[017.00]'
-# elif _MSC_VER >= 1600
-       PRINT *, 'INFO:simulate_version[016.00]'
-# elif _MSC_VER >= 1500
-       PRINT *, 'INFO:simulate_version[015.00]'
-# elif _MSC_VER >= 1400
-       PRINT *, 'INFO:simulate_version[014.00]'
-# elif _MSC_VER >= 1310
-       PRINT *, 'INFO:simulate_version[013.01]'
-# else
-       PRINT *, 'INFO:simulate_version[013.00]'
-# endif
-#endif
-#if defined(__INTEL_LLVM_COMPILER)
-        PRINT *, 'INFO:compiler[IntelLLVM]'
-! __INTEL_LLVM_COMPILER = VVVVRP prior to 2021.2.0, VVVVRRPP for 2021.2.0 and
-! later.  Look for 6 digit vs. 8 digit version number to decide encoding.
-! VVVV is no smaller than the current year when a version is released.
-# if __INTEL_LLVM_COMPILER < 1000000
-#  define COMPILER_VERSION_MAJOR DEC(__INTEL_LLVM_COMPILER/100)
-#  define COMPILER_VERSION_MINOR DEC(__INTEL_LLVM_COMPILER/10 % 10)
-#  define COMPILER_VERSION_PATCH DEC(__INTEL_LLVM_COMPILER    % 10)
-# else
-#  define COMPILER_VERSION_MAJOR DEC(__INTEL_LLVM_COMPILER/10000)
-#  define COMPILER_VERSION_MINOR DEC(__INTEL_LLVM_COMPILER/100 % 100)
-#  define COMPILER_VERSION_PATCH DEC(__INTEL_LLVM_COMPILER     % 100)
-# endif
-#elif defined(__INTEL_COMPILER) && __INTEL_COMPILER == 201900
-        PRINT *, 'INFO:compiler[IntelLLVM]'
-! ifx 2021.1 forgot to define __INTEL_LLVM_COMPILER.
-! Instead it defines __INTEL_COMPILER == 201900.
-# define COMPILER_VERSION_MAJOR DEC(2021)
-# define COMPILER_VERSION_MINOR DEC(1)
-# define COMPILER_VERSION_PATCH DEC(__INTEL_COMPILER_UPDATE)
-# define COMPILER_VERSION_TWEAK DEC(__INTEL_COMPILER_BUILD_DATE)
-#elif defined(__INTEL_COMPILER) || defined(__ICC)
-        PRINT *, 'INFO:compiler[Intel]'
-! __INTEL_COMPILER = VRP prior to 2021, and then VVVV for 2021 and later.
-# if __INTEL_COMPILER < 2021
-#  define COMPILER_VERSION_MAJOR DEC(__INTEL_COMPILER/100)
-#  define COMPILER_VERSION_MINOR DEC(__INTEL_COMPILER/10 % 10)
-#  if defined(__INTEL_COMPILER_UPDATE)
-#   define COMPILER_VERSION_PATCH DEC(__INTEL_COMPILER_UPDATE)
-#  else
-#   define COMPILER_VERSION_PATCH DEC(__INTEL_COMPILER   % 10)
-#  endif
-# else
-#  define COMPILER_VERSION_MAJOR DEC(__INTEL_COMPILER)
-#  define COMPILER_VERSION_MINOR DEC(__INTEL_COMPILER_UPDATE)
-!  The third version component from --version is an update index,
-!  but no macro is provided for it.
-#  define COMPILER_VERSION_PATCH DEC(0)
-# endif
-# if defined(__INTEL_COMPILER_BUILD_DATE)
-#  define COMPILER_VERSION_TWEAK DEC(__INTEL_COMPILER_BUILD_DATE)
-# endif
-#elif defined(__SUNPRO_F95)
-        PRINT *, 'INFO:compiler[SunPro]'
-# define COMPILER_VERSION_MAJOR HEX(__SUNPRO_F95>>8)
-# define COMPILER_VERSION_MINOR HEX(__SUNPRO_F95>>4 & 0xF)
-# define COMPILER_VERSION_PATCH HEX(__SUNPRO_F95    & 0xF)
-#elif defined(__SUNPRO_F90)
-        PRINT *, 'INFO:compiler[SunPro]'
-# define COMPILER_VERSION_MAJOR HEX(__SUNPRO_F90>>8)
-# define COMPILER_VERSION_MINOR HEX(__SUNPRO_F90>>4 & 0xF)
-# define COMPILER_VERSION_PATCH HEX(__SUNPRO_F90    & 0xF)
-#elif defined(_CRAYFTN)
-        PRINT *, 'INFO:compiler[Cray]'
-# define COMPILER_VERSION_MAJOR DEC(_RELEASE_MAJOR)
-# define COMPILER_VERSION_MINOR DEC(_RELEASE_MINOR)
-# if defined(_RELEASE_PATCHLEVEL)
-#  define COMPILER_VERSION_PATCH DEC(_RELEASE_PATCHLEVEL)
-# endif
-#elif defined(__G95__)
-        PRINT *, 'INFO:compiler[G95]'
-# define COMPILER_VERSION_MAJOR DEC(__G95__)
-# define COMPILER_VERSION_MINOR DEC(__G95_MINOR__)
-#elif defined(__PATHSCALE__)
-        PRINT *, 'INFO:compiler[PathScale]'
-# define COMPILER_VERSION_MAJOR DEC(__PATHCC__)
-# define COMPILER_VERSION_MINOR DEC(__PATHCC_MINOR__)
-# if defined(__PATHCC_PATCHLEVEL__)
-#  define COMPILER_VERSION_PATCH DEC(__PATHCC_PATCHLEVEL__)
-# endif
-#elif defined(__ABSOFT__)
-        PRINT *, 'INFO:compiler[Absoft]'
-#elif defined(__LCC__) && (defined(__GNUC__) || defined(__GNUG__) || defined(__MCST__))
-        PRINT *, 'INFO:compiler[LCC]'
-# define COMPILER_VERSION_MAJOR DEC(1)
-# define COMPILER_VERSION_MINOR DEC(__LCC__ - 100)
-# if defined(__LCC_MINOR__)
-#  define COMPILER_VERSION_PATCH DEC(__LCC_MINOR__)
-# endif
-#elif defined(__GNUC__)
-        PRINT *, 'INFO:compiler[GNU]'
-# define COMPILER_VERSION_MAJOR DEC(__GNUC__)
-# define COMPILER_VERSION_MINOR DEC(__GNUC_MINOR__)
-# if defined(__GNUC_PATCHLEVEL__)
-#  define COMPILER_VERSION_PATCH DEC(__GNUC_PATCHLEVEL__)
-# endif
-#elif defined(__IBMC__)
-# if defined(__COMPILER_VER__)
-        PRINT *, 'INFO:compiler[zOS]'
-# elif __IBMC__ >= 800
-        PRINT *, 'INFO:compiler[XL]'
-#  define COMPILER_VERSION_MAJOR DEC(__IBMC__/100)
-#  define COMPILER_VERSION_MINOR DEC(__IBMC__/10 % 10)
-#  define COMPILER_VERSION_PATCH DEC(__IBMC__    % 10)
-# else
-        PRINT *, 'INFO:compiler[VisualAge]'
-#  define COMPILER_VERSION_MAJOR DEC(__IBMC__/100)
-#  define COMPILER_VERSION_MINOR DEC(__IBMC__/10 % 10)
-#  define COMPILER_VERSION_PATCH DEC(__IBMC__    % 10)
-# endif
-#elif defined(__NVCOMPILER) || defined(__NVCOMPILER_LLVM__)
-        PRINT *, 'INFO:compiler[NVHPC]'
-# if defined(__NVCOMPILER_MAJOR__)
-#  define COMPILER_VERSION_MAJOR DEC(__NVCOMPILER_MAJOR__)
-# else
-#  define COMPILER_VERSION_MAJOR DEC(__PGIC__)
-# endif
-# if defined(__NVCOMPILER_MINOR__)
-#  define COMPILER_VERSION_MINOR DEC(__NVCOMPILER_MINOR__)
-# else
-#  define COMPILER_VERSION_MINOR DEC(__PGIC_MINOR__)
-# endif
-# if defined(__NVCOMPILER_PATCHLEVEL__)
-#  define COMPILER_VERSION_PATCH DEC(__NVCOMPILER_PATCHLEVEL__)
-# elif defined(__PGIC_PATCHLEVEL__)
-#  define COMPILER_VERSION_PATCH DEC(__PGIC_PATCHLEVEL__)
-# endif
-#elif defined(__PGI)
-        PRINT *, 'INFO:compiler[PGI]'
-# define COMPILER_VERSION_MAJOR DEC(__PGIC__)
-# define COMPILER_VERSION_MINOR DEC(__PGIC_MINOR__)
-# if defined(__PGIC_PATCHLEVEL__)
-#  define COMPILER_VERSION_PATCH DEC(__PGIC_PATCHLEVEL__)
-# endif
-#elif defined(__FLANG)
-        PRINT *, 'INFO:compiler[Flang]'
-# define COMPILER_VERSION_MAJOR DEC(__FLANG_MAJOR__)
-# define COMPILER_VERSION_MINOR DEC(__FLANG_MINOR__)
-# if defined(__FLANG_PATCHLEVEL__)
-#  define COMPILER_VERSION_PATCH DEC(__FLANG_PATCHLEVEL__)
-# endif
-#elif defined(__flang__)
-        PRINT *, 'INFO:compiler[LLVMFlang]'
-# define COMPILER_VERSION_MAJOR DEC(__flang_major__)
-# define COMPILER_VERSION_MINOR DEC(__flang_minor__)
-# if defined(__flang_patchlevel__)
-#  define COMPILER_VERSION_PATCH DEC(__flang_patchlevel__)
-# endif
-#elif defined(_AIX) || defined(__AIX) || defined(__AIX__) || defined(__aix) || defined(__aix__)
-        PRINT *, 'INFO:compiler[VisualAge]'
-#elif defined(__hpux) || defined(__hpux__)
-        PRINT *, 'INFO:compiler[HP]'
-#elif defined(NAGFOR)
-        PRINT *, 'INFO:compiler[NAG]'
-#define COMPILER_VERSION_MAJOR DEC(__NAG_COMPILER_RELEASE/10)
-#define COMPILER_VERSION_MINOR DEC(__NAG_COMPILER_RELEASE % 10)
-#define COMPILER_VERSION_PATCH DEC(__NAG_COMPILER_BUILD)
-#elif defined(__FUJITSU)
-        PRINT *, 'INFO:compiler[Fujitsu]'
-# if defined(__FRT_major__)
-#   define COMPILER_VERSION_MAJOR DEC(__FRT_major__)
-#   define COMPILER_VERSION_MINOR DEC(__FRT_minor__)
-#   define COMPILER_VERSION_PATCH DEC(__FRT_patchlevel__)
-# elif defined(__FRT_version__)
-        PRINT *, 'INFO:compiler_version['//__FRT_version__//']'
-# endif
-#else
-        PRINT *, 'INFO:compiler[]'
-#endif
-#if defined(__CRAYXT_COMPUTE_LINUX_TARGET)
-        PRINT *, 'INFO:compiler_wrapper[CrayPrgEnv]'
-#endif
-
-#if 0
-! Identify the platform
-#endif
-#if defined(__linux) || defined(__linux__) || defined(linux)
-        PRINT *, 'INFO:platform[Linux]'
-#elif defined(__CYGWIN__)
-        PRINT *, 'INFO:platform[Cygwin]'
-#elif defined(__MINGW32__)
-        PRINT *, 'INFO:platform[MinGW]'
-#elif defined(__APPLE__)
-        PRINT *, 'INFO:platform[Darwin]'
-#elif defined(_WIN32) || defined(__WIN32__) || defined(WIN32)
-        PRINT *, 'INFO:platform[Windows]'
-#elif defined(__FreeBSD__) || defined(__FreeBSD)
-        PRINT *, 'INFO:platform[FreeBSD]'
-#elif defined(__NetBSD__) || defined(__NetBSD)
-        PRINT *, 'INFO:platform[NetBSD]'
-#elif defined(__OpenBSD__) || defined(__OPENBSD)
-        PRINT *, 'INFO:platform[OpenBSD]'
-#elif defined(__sun) || defined(sun)
-        PRINT *, 'INFO:platform[SunOS]'
-#elif defined(_AIX) || defined(__AIX) || defined(__AIX__) || defined(__aix) || defined(__aix__)
-        PRINT *, 'INFO:platform[AIX]'
-#elif defined(__hpux) || defined(__hpux__)
-        PRINT *, 'INFO:platform[HP-UX]'
-#elif defined(__HAIKU__)
-        PRINT *, 'INFO:platform[Haiku]'
-#elif defined(__BeOS) || defined(__BEOS__) || defined(_BEOS)
-        PRINT *, 'INFO:platform[BeOS]'
-#elif defined(__QNX__) || defined(__QNXNTO__)
-        PRINT *, 'INFO:platform[QNX]'
-#elif defined(__tru64) || defined(_tru64) || defined(__TRU64__)
-        PRINT *, 'INFO:platform[Tru64]'
-#elif defined(__riscos) || defined(__riscos__)
-        PRINT *, 'INFO:platform[RISCos]'
-#elif defined(__sinix) || defined(__sinix__) || defined(__SINIX__)
-        PRINT *, 'INFO:platform[SINIX]'
-#elif defined(__UNIX_SV__)
-        PRINT *, 'INFO:platform[UNIX_SV]'
-#elif defined(__bsdos__)
-        PRINT *, 'INFO:platform[BSDOS]'
-#elif defined(_MPRAS) || defined(MPRAS)
-        PRINT *, 'INFO:platform[MP-RAS]'
-#elif defined(__osf) || defined(__osf__)
-        PRINT *, 'INFO:platform[OSF1]'
-#elif defined(_SCO_SV) || defined(SCO_SV) || defined(sco_sv)
-        PRINT *, 'INFO:platform[SCO_SV]'
-#elif defined(__ultrix) || defined(__ultrix__) || defined(_ULTRIX)
-        PRINT *, 'INFO:platform[ULTRIX]'
-#elif defined(__XENIX__) || defined(_XENIX) || defined(XENIX)
-        PRINT *, 'INFO:platform[Xenix]'
-#else
-        PRINT *, 'INFO:platform[]'
-#endif
-#if defined(_MSC_VER)
-# if defined(_M_IA64)
-        PRINT *, 'INFO:arch[IA64]'
-# elif defined(_M_X64) || defined(_M_AMD64)
-        PRINT *, 'INFO:arch[x64]'
-# elif defined(_M_IX86)
-        PRINT *, 'INFO:arch[X86]'
-# endif
-#endif
-
-#if 0
-! Encode compiler version digits
-#endif
-#define DEC_8(n) (((n) / 10000000) % 10)
-#define DEC_7(n) (((n) / 1000000)  % 10)
-#define DEC_6(n) (((n) / 100000)   % 10)
-#define DEC_5(n) (((n) / 10000)    % 10)
-#define DEC_4(n) (((n) / 1000)     % 10)
-#define DEC_3(n) (((n) / 100)      % 10)
-#define DEC_2(n) (((n) / 10)       % 10)
-#define DEC_1(n) (((n)    )        % 10)
-#define HEX_8(n) ((n)>>28 & 0xF)
-#define HEX_7(n) ((n)>>24 & 0xF)
-#define HEX_6(n) ((n)>>20 & 0xF)
-#define HEX_5(n) ((n)>>16 & 0xF)
-#define HEX_4(n) ((n)>>12 & 0xF)
-#define HEX_3(n) ((n)>>8  & 0xF)
-#define HEX_2(n) ((n)>>4  & 0xF)
-#define HEX_1(n) ((n)     & 0xF)
-
-#if defined(COMPILER_VERSION_MAJOR)
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_1(n)
-# define HEX(n) HEX_1(n)
-# if COMPILER_VERSION_MAJOR == 0
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_1[0]'
-# elif COMPILER_VERSION_MAJOR == 1
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_1[1]'
-# elif COMPILER_VERSION_MAJOR == 2
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_1[2]'
-# elif COMPILER_VERSION_MAJOR == 3
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_1[3]'
-# elif COMPILER_VERSION_MAJOR == 4
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_1[4]'
-# elif COMPILER_VERSION_MAJOR == 5
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_1[5]'
-# elif COMPILER_VERSION_MAJOR == 6
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_1[6]'
-# elif COMPILER_VERSION_MAJOR == 7
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_1[7]'
-# elif COMPILER_VERSION_MAJOR == 8
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_1[8]'
-# elif COMPILER_VERSION_MAJOR == 9
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_1[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_2(n)
-# define HEX(n) HEX_2(n)
-# if COMPILER_VERSION_MAJOR == 0
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_2[0]'
-# elif COMPILER_VERSION_MAJOR == 1
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_2[1]'
-# elif COMPILER_VERSION_MAJOR == 2
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_2[2]'
-# elif COMPILER_VERSION_MAJOR == 3
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_2[3]'
-# elif COMPILER_VERSION_MAJOR == 4
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_2[4]'
-# elif COMPILER_VERSION_MAJOR == 5
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_2[5]'
-# elif COMPILER_VERSION_MAJOR == 6
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_2[6]'
-# elif COMPILER_VERSION_MAJOR == 7
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_2[7]'
-# elif COMPILER_VERSION_MAJOR == 8
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_2[8]'
-# elif COMPILER_VERSION_MAJOR == 9
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_2[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_3(n)
-# define HEX(n) HEX_3(n)
-# if COMPILER_VERSION_MAJOR == 0
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_3[0]'
-# elif COMPILER_VERSION_MAJOR == 1
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_3[1]'
-# elif COMPILER_VERSION_MAJOR == 2
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_3[2]'
-# elif COMPILER_VERSION_MAJOR == 3
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_3[3]'
-# elif COMPILER_VERSION_MAJOR == 4
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_3[4]'
-# elif COMPILER_VERSION_MAJOR == 5
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_3[5]'
-# elif COMPILER_VERSION_MAJOR == 6
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_3[6]'
-# elif COMPILER_VERSION_MAJOR == 7
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_3[7]'
-# elif COMPILER_VERSION_MAJOR == 8
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_3[8]'
-# elif COMPILER_VERSION_MAJOR == 9
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_3[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_4(n)
-# define HEX(n) HEX_4(n)
-# if COMPILER_VERSION_MAJOR == 0
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_4[0]'
-# elif COMPILER_VERSION_MAJOR == 1
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_4[1]'
-# elif COMPILER_VERSION_MAJOR == 2
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_4[2]'
-# elif COMPILER_VERSION_MAJOR == 3
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_4[3]'
-# elif COMPILER_VERSION_MAJOR == 4
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_4[4]'
-# elif COMPILER_VERSION_MAJOR == 5
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_4[5]'
-# elif COMPILER_VERSION_MAJOR == 6
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_4[6]'
-# elif COMPILER_VERSION_MAJOR == 7
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_4[7]'
-# elif COMPILER_VERSION_MAJOR == 8
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_4[8]'
-# elif COMPILER_VERSION_MAJOR == 9
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_4[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_5(n)
-# define HEX(n) HEX_5(n)
-# if COMPILER_VERSION_MAJOR == 0
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_5[0]'
-# elif COMPILER_VERSION_MAJOR == 1
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_5[1]'
-# elif COMPILER_VERSION_MAJOR == 2
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_5[2]'
-# elif COMPILER_VERSION_MAJOR == 3
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_5[3]'
-# elif COMPILER_VERSION_MAJOR == 4
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_5[4]'
-# elif COMPILER_VERSION_MAJOR == 5
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_5[5]'
-# elif COMPILER_VERSION_MAJOR == 6
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_5[6]'
-# elif COMPILER_VERSION_MAJOR == 7
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_5[7]'
-# elif COMPILER_VERSION_MAJOR == 8
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_5[8]'
-# elif COMPILER_VERSION_MAJOR == 9
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_5[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_6(n)
-# define HEX(n) HEX_6(n)
-# if COMPILER_VERSION_MAJOR == 0
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_6[0]'
-# elif COMPILER_VERSION_MAJOR == 1
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_6[1]'
-# elif COMPILER_VERSION_MAJOR == 2
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_6[2]'
-# elif COMPILER_VERSION_MAJOR == 3
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_6[3]'
-# elif COMPILER_VERSION_MAJOR == 4
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_6[4]'
-# elif COMPILER_VERSION_MAJOR == 5
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_6[5]'
-# elif COMPILER_VERSION_MAJOR == 6
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_6[6]'
-# elif COMPILER_VERSION_MAJOR == 7
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_6[7]'
-# elif COMPILER_VERSION_MAJOR == 8
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_6[8]'
-# elif COMPILER_VERSION_MAJOR == 9
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_6[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_7(n)
-# define HEX(n) HEX_7(n)
-# if COMPILER_VERSION_MAJOR == 0
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_7[0]'
-# elif COMPILER_VERSION_MAJOR == 1
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_7[1]'
-# elif COMPILER_VERSION_MAJOR == 2
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_7[2]'
-# elif COMPILER_VERSION_MAJOR == 3
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_7[3]'
-# elif COMPILER_VERSION_MAJOR == 4
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_7[4]'
-# elif COMPILER_VERSION_MAJOR == 5
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_7[5]'
-# elif COMPILER_VERSION_MAJOR == 6
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_7[6]'
-# elif COMPILER_VERSION_MAJOR == 7
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_7[7]'
-# elif COMPILER_VERSION_MAJOR == 8
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_7[8]'
-# elif COMPILER_VERSION_MAJOR == 9
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_7[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_8(n)
-# define HEX(n) HEX_8(n)
-# if COMPILER_VERSION_MAJOR == 0
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_8[0]'
-# elif COMPILER_VERSION_MAJOR == 1
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_8[1]'
-# elif COMPILER_VERSION_MAJOR == 2
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_8[2]'
-# elif COMPILER_VERSION_MAJOR == 3
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_8[3]'
-# elif COMPILER_VERSION_MAJOR == 4
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_8[4]'
-# elif COMPILER_VERSION_MAJOR == 5
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_8[5]'
-# elif COMPILER_VERSION_MAJOR == 6
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_8[6]'
-# elif COMPILER_VERSION_MAJOR == 7
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_8[7]'
-# elif COMPILER_VERSION_MAJOR == 8
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_8[8]'
-# elif COMPILER_VERSION_MAJOR == 9
-        PRINT *, 'INFO:compiler_version_MAJOR_digit_8[9]'
-# endif
-
-#endif
-#if defined(COMPILER_VERSION_MINOR)
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_1(n)
-# define HEX(n) HEX_1(n)
-# if COMPILER_VERSION_MINOR == 0
-        PRINT *, 'INFO:compiler_version_MINOR_digit_1[0]'
-# elif COMPILER_VERSION_MINOR == 1
-        PRINT *, 'INFO:compiler_version_MINOR_digit_1[1]'
-# elif COMPILER_VERSION_MINOR == 2
-        PRINT *, 'INFO:compiler_version_MINOR_digit_1[2]'
-# elif COMPILER_VERSION_MINOR == 3
-        PRINT *, 'INFO:compiler_version_MINOR_digit_1[3]'
-# elif COMPILER_VERSION_MINOR == 4
-        PRINT *, 'INFO:compiler_version_MINOR_digit_1[4]'
-# elif COMPILER_VERSION_MINOR == 5
-        PRINT *, 'INFO:compiler_version_MINOR_digit_1[5]'
-# elif COMPILER_VERSION_MINOR == 6
-        PRINT *, 'INFO:compiler_version_MINOR_digit_1[6]'
-# elif COMPILER_VERSION_MINOR == 7
-        PRINT *, 'INFO:compiler_version_MINOR_digit_1[7]'
-# elif COMPILER_VERSION_MINOR == 8
-        PRINT *, 'INFO:compiler_version_MINOR_digit_1[8]'
-# elif COMPILER_VERSION_MINOR == 9
-        PRINT *, 'INFO:compiler_version_MINOR_digit_1[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_2(n)
-# define HEX(n) HEX_2(n)
-# if COMPILER_VERSION_MINOR == 0
-        PRINT *, 'INFO:compiler_version_MINOR_digit_2[0]'
-# elif COMPILER_VERSION_MINOR == 1
-        PRINT *, 'INFO:compiler_version_MINOR_digit_2[1]'
-# elif COMPILER_VERSION_MINOR == 2
-        PRINT *, 'INFO:compiler_version_MINOR_digit_2[2]'
-# elif COMPILER_VERSION_MINOR == 3
-        PRINT *, 'INFO:compiler_version_MINOR_digit_2[3]'
-# elif COMPILER_VERSION_MINOR == 4
-        PRINT *, 'INFO:compiler_version_MINOR_digit_2[4]'
-# elif COMPILER_VERSION_MINOR == 5
-        PRINT *, 'INFO:compiler_version_MINOR_digit_2[5]'
-# elif COMPILER_VERSION_MINOR == 6
-        PRINT *, 'INFO:compiler_version_MINOR_digit_2[6]'
-# elif COMPILER_VERSION_MINOR == 7
-        PRINT *, 'INFO:compiler_version_MINOR_digit_2[7]'
-# elif COMPILER_VERSION_MINOR == 8
-        PRINT *, 'INFO:compiler_version_MINOR_digit_2[8]'
-# elif COMPILER_VERSION_MINOR == 9
-        PRINT *, 'INFO:compiler_version_MINOR_digit_2[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_3(n)
-# define HEX(n) HEX_3(n)
-# if COMPILER_VERSION_MINOR == 0
-        PRINT *, 'INFO:compiler_version_MINOR_digit_3[0]'
-# elif COMPILER_VERSION_MINOR == 1
-        PRINT *, 'INFO:compiler_version_MINOR_digit_3[1]'
-# elif COMPILER_VERSION_MINOR == 2
-        PRINT *, 'INFO:compiler_version_MINOR_digit_3[2]'
-# elif COMPILER_VERSION_MINOR == 3
-        PRINT *, 'INFO:compiler_version_MINOR_digit_3[3]'
-# elif COMPILER_VERSION_MINOR == 4
-        PRINT *, 'INFO:compiler_version_MINOR_digit_3[4]'
-# elif COMPILER_VERSION_MINOR == 5
-        PRINT *, 'INFO:compiler_version_MINOR_digit_3[5]'
-# elif COMPILER_VERSION_MINOR == 6
-        PRINT *, 'INFO:compiler_version_MINOR_digit_3[6]'
-# elif COMPILER_VERSION_MINOR == 7
-        PRINT *, 'INFO:compiler_version_MINOR_digit_3[7]'
-# elif COMPILER_VERSION_MINOR == 8
-        PRINT *, 'INFO:compiler_version_MINOR_digit_3[8]'
-# elif COMPILER_VERSION_MINOR == 9
-        PRINT *, 'INFO:compiler_version_MINOR_digit_3[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_4(n)
-# define HEX(n) HEX_4(n)
-# if COMPILER_VERSION_MINOR == 0
-        PRINT *, 'INFO:compiler_version_MINOR_digit_4[0]'
-# elif COMPILER_VERSION_MINOR == 1
-        PRINT *, 'INFO:compiler_version_MINOR_digit_4[1]'
-# elif COMPILER_VERSION_MINOR == 2
-        PRINT *, 'INFO:compiler_version_MINOR_digit_4[2]'
-# elif COMPILER_VERSION_MINOR == 3
-        PRINT *, 'INFO:compiler_version_MINOR_digit_4[3]'
-# elif COMPILER_VERSION_MINOR == 4
-        PRINT *, 'INFO:compiler_version_MINOR_digit_4[4]'
-# elif COMPILER_VERSION_MINOR == 5
-        PRINT *, 'INFO:compiler_version_MINOR_digit_4[5]'
-# elif COMPILER_VERSION_MINOR == 6
-        PRINT *, 'INFO:compiler_version_MINOR_digit_4[6]'
-# elif COMPILER_VERSION_MINOR == 7
-        PRINT *, 'INFO:compiler_version_MINOR_digit_4[7]'
-# elif COMPILER_VERSION_MINOR == 8
-        PRINT *, 'INFO:compiler_version_MINOR_digit_4[8]'
-# elif COMPILER_VERSION_MINOR == 9
-        PRINT *, 'INFO:compiler_version_MINOR_digit_4[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_5(n)
-# define HEX(n) HEX_5(n)
-# if COMPILER_VERSION_MINOR == 0
-        PRINT *, 'INFO:compiler_version_MINOR_digit_5[0]'
-# elif COMPILER_VERSION_MINOR == 1
-        PRINT *, 'INFO:compiler_version_MINOR_digit_5[1]'
-# elif COMPILER_VERSION_MINOR == 2
-        PRINT *, 'INFO:compiler_version_MINOR_digit_5[2]'
-# elif COMPILER_VERSION_MINOR == 3
-        PRINT *, 'INFO:compiler_version_MINOR_digit_5[3]'
-# elif COMPILER_VERSION_MINOR == 4
-        PRINT *, 'INFO:compiler_version_MINOR_digit_5[4]'
-# elif COMPILER_VERSION_MINOR == 5
-        PRINT *, 'INFO:compiler_version_MINOR_digit_5[5]'
-# elif COMPILER_VERSION_MINOR == 6
-        PRINT *, 'INFO:compiler_version_MINOR_digit_5[6]'
-# elif COMPILER_VERSION_MINOR == 7
-        PRINT *, 'INFO:compiler_version_MINOR_digit_5[7]'
-# elif COMPILER_VERSION_MINOR == 8
-        PRINT *, 'INFO:compiler_version_MINOR_digit_5[8]'
-# elif COMPILER_VERSION_MINOR == 9
-        PRINT *, 'INFO:compiler_version_MINOR_digit_5[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_6(n)
-# define HEX(n) HEX_6(n)
-# if COMPILER_VERSION_MINOR == 0
-        PRINT *, 'INFO:compiler_version_MINOR_digit_6[0]'
-# elif COMPILER_VERSION_MINOR == 1
-        PRINT *, 'INFO:compiler_version_MINOR_digit_6[1]'
-# elif COMPILER_VERSION_MINOR == 2
-        PRINT *, 'INFO:compiler_version_MINOR_digit_6[2]'
-# elif COMPILER_VERSION_MINOR == 3
-        PRINT *, 'INFO:compiler_version_MINOR_digit_6[3]'
-# elif COMPILER_VERSION_MINOR == 4
-        PRINT *, 'INFO:compiler_version_MINOR_digit_6[4]'
-# elif COMPILER_VERSION_MINOR == 5
-        PRINT *, 'INFO:compiler_version_MINOR_digit_6[5]'
-# elif COMPILER_VERSION_MINOR == 6
-        PRINT *, 'INFO:compiler_version_MINOR_digit_6[6]'
-# elif COMPILER_VERSION_MINOR == 7
-        PRINT *, 'INFO:compiler_version_MINOR_digit_6[7]'
-# elif COMPILER_VERSION_MINOR == 8
-        PRINT *, 'INFO:compiler_version_MINOR_digit_6[8]'
-# elif COMPILER_VERSION_MINOR == 9
-        PRINT *, 'INFO:compiler_version_MINOR_digit_6[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_7(n)
-# define HEX(n) HEX_7(n)
-# if COMPILER_VERSION_MINOR == 0
-        PRINT *, 'INFO:compiler_version_MINOR_digit_7[0]'
-# elif COMPILER_VERSION_MINOR == 1
-        PRINT *, 'INFO:compiler_version_MINOR_digit_7[1]'
-# elif COMPILER_VERSION_MINOR == 2
-        PRINT *, 'INFO:compiler_version_MINOR_digit_7[2]'
-# elif COMPILER_VERSION_MINOR == 3
-        PRINT *, 'INFO:compiler_version_MINOR_digit_7[3]'
-# elif COMPILER_VERSION_MINOR == 4
-        PRINT *, 'INFO:compiler_version_MINOR_digit_7[4]'
-# elif COMPILER_VERSION_MINOR == 5
-        PRINT *, 'INFO:compiler_version_MINOR_digit_7[5]'
-# elif COMPILER_VERSION_MINOR == 6
-        PRINT *, 'INFO:compiler_version_MINOR_digit_7[6]'
-# elif COMPILER_VERSION_MINOR == 7
-        PRINT *, 'INFO:compiler_version_MINOR_digit_7[7]'
-# elif COMPILER_VERSION_MINOR == 8
-        PRINT *, 'INFO:compiler_version_MINOR_digit_7[8]'
-# elif COMPILER_VERSION_MINOR == 9
-        PRINT *, 'INFO:compiler_version_MINOR_digit_7[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_8(n)
-# define HEX(n) HEX_8(n)
-# if COMPILER_VERSION_MINOR == 0
-        PRINT *, 'INFO:compiler_version_MINOR_digit_8[0]'
-# elif COMPILER_VERSION_MINOR == 1
-        PRINT *, 'INFO:compiler_version_MINOR_digit_8[1]'
-# elif COMPILER_VERSION_MINOR == 2
-        PRINT *, 'INFO:compiler_version_MINOR_digit_8[2]'
-# elif COMPILER_VERSION_MINOR == 3
-        PRINT *, 'INFO:compiler_version_MINOR_digit_8[3]'
-# elif COMPILER_VERSION_MINOR == 4
-        PRINT *, 'INFO:compiler_version_MINOR_digit_8[4]'
-# elif COMPILER_VERSION_MINOR == 5
-        PRINT *, 'INFO:compiler_version_MINOR_digit_8[5]'
-# elif COMPILER_VERSION_MINOR == 6
-        PRINT *, 'INFO:compiler_version_MINOR_digit_8[6]'
-# elif COMPILER_VERSION_MINOR == 7
-        PRINT *, 'INFO:compiler_version_MINOR_digit_8[7]'
-# elif COMPILER_VERSION_MINOR == 8
-        PRINT *, 'INFO:compiler_version_MINOR_digit_8[8]'
-# elif COMPILER_VERSION_MINOR == 9
-        PRINT *, 'INFO:compiler_version_MINOR_digit_8[9]'
-# endif
-
-#endif
-#if defined(COMPILER_VERSION_PATCH)
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_1(n)
-# define HEX(n) HEX_1(n)
-# if COMPILER_VERSION_PATCH == 0
-        PRINT *, 'INFO:compiler_version_PATCH_digit_1[0]'
-# elif COMPILER_VERSION_PATCH == 1
-        PRINT *, 'INFO:compiler_version_PATCH_digit_1[1]'
-# elif COMPILER_VERSION_PATCH == 2
-        PRINT *, 'INFO:compiler_version_PATCH_digit_1[2]'
-# elif COMPILER_VERSION_PATCH == 3
-        PRINT *, 'INFO:compiler_version_PATCH_digit_1[3]'
-# elif COMPILER_VERSION_PATCH == 4
-        PRINT *, 'INFO:compiler_version_PATCH_digit_1[4]'
-# elif COMPILER_VERSION_PATCH == 5
-        PRINT *, 'INFO:compiler_version_PATCH_digit_1[5]'
-# elif COMPILER_VERSION_PATCH == 6
-        PRINT *, 'INFO:compiler_version_PATCH_digit_1[6]'
-# elif COMPILER_VERSION_PATCH == 7
-        PRINT *, 'INFO:compiler_version_PATCH_digit_1[7]'
-# elif COMPILER_VERSION_PATCH == 8
-        PRINT *, 'INFO:compiler_version_PATCH_digit_1[8]'
-# elif COMPILER_VERSION_PATCH == 9
-        PRINT *, 'INFO:compiler_version_PATCH_digit_1[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_2(n)
-# define HEX(n) HEX_2(n)
-# if COMPILER_VERSION_PATCH == 0
-        PRINT *, 'INFO:compiler_version_PATCH_digit_2[0]'
-# elif COMPILER_VERSION_PATCH == 1
-        PRINT *, 'INFO:compiler_version_PATCH_digit_2[1]'
-# elif COMPILER_VERSION_PATCH == 2
-        PRINT *, 'INFO:compiler_version_PATCH_digit_2[2]'
-# elif COMPILER_VERSION_PATCH == 3
-        PRINT *, 'INFO:compiler_version_PATCH_digit_2[3]'
-# elif COMPILER_VERSION_PATCH == 4
-        PRINT *, 'INFO:compiler_version_PATCH_digit_2[4]'
-# elif COMPILER_VERSION_PATCH == 5
-        PRINT *, 'INFO:compiler_version_PATCH_digit_2[5]'
-# elif COMPILER_VERSION_PATCH == 6
-        PRINT *, 'INFO:compiler_version_PATCH_digit_2[6]'
-# elif COMPILER_VERSION_PATCH == 7
-        PRINT *, 'INFO:compiler_version_PATCH_digit_2[7]'
-# elif COMPILER_VERSION_PATCH == 8
-        PRINT *, 'INFO:compiler_version_PATCH_digit_2[8]'
-# elif COMPILER_VERSION_PATCH == 9
-        PRINT *, 'INFO:compiler_version_PATCH_digit_2[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_3(n)
-# define HEX(n) HEX_3(n)
-# if COMPILER_VERSION_PATCH == 0
-        PRINT *, 'INFO:compiler_version_PATCH_digit_3[0]'
-# elif COMPILER_VERSION_PATCH == 1
-        PRINT *, 'INFO:compiler_version_PATCH_digit_3[1]'
-# elif COMPILER_VERSION_PATCH == 2
-        PRINT *, 'INFO:compiler_version_PATCH_digit_3[2]'
-# elif COMPILER_VERSION_PATCH == 3
-        PRINT *, 'INFO:compiler_version_PATCH_digit_3[3]'
-# elif COMPILER_VERSION_PATCH == 4
-        PRINT *, 'INFO:compiler_version_PATCH_digit_3[4]'
-# elif COMPILER_VERSION_PATCH == 5
-        PRINT *, 'INFO:compiler_version_PATCH_digit_3[5]'
-# elif COMPILER_VERSION_PATCH == 6
-        PRINT *, 'INFO:compiler_version_PATCH_digit_3[6]'
-# elif COMPILER_VERSION_PATCH == 7
-        PRINT *, 'INFO:compiler_version_PATCH_digit_3[7]'
-# elif COMPILER_VERSION_PATCH == 8
-        PRINT *, 'INFO:compiler_version_PATCH_digit_3[8]'
-# elif COMPILER_VERSION_PATCH == 9
-        PRINT *, 'INFO:compiler_version_PATCH_digit_3[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_4(n)
-# define HEX(n) HEX_4(n)
-# if COMPILER_VERSION_PATCH == 0
-        PRINT *, 'INFO:compiler_version_PATCH_digit_4[0]'
-# elif COMPILER_VERSION_PATCH == 1
-        PRINT *, 'INFO:compiler_version_PATCH_digit_4[1]'
-# elif COMPILER_VERSION_PATCH == 2
-        PRINT *, 'INFO:compiler_version_PATCH_digit_4[2]'
-# elif COMPILER_VERSION_PATCH == 3
-        PRINT *, 'INFO:compiler_version_PATCH_digit_4[3]'
-# elif COMPILER_VERSION_PATCH == 4
-        PRINT *, 'INFO:compiler_version_PATCH_digit_4[4]'
-# elif COMPILER_VERSION_PATCH == 5
-        PRINT *, 'INFO:compiler_version_PATCH_digit_4[5]'
-# elif COMPILER_VERSION_PATCH == 6
-        PRINT *, 'INFO:compiler_version_PATCH_digit_4[6]'
-# elif COMPILER_VERSION_PATCH == 7
-        PRINT *, 'INFO:compiler_version_PATCH_digit_4[7]'
-# elif COMPILER_VERSION_PATCH == 8
-        PRINT *, 'INFO:compiler_version_PATCH_digit_4[8]'
-# elif COMPILER_VERSION_PATCH == 9
-        PRINT *, 'INFO:compiler_version_PATCH_digit_4[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_5(n)
-# define HEX(n) HEX_5(n)
-# if COMPILER_VERSION_PATCH == 0
-        PRINT *, 'INFO:compiler_version_PATCH_digit_5[0]'
-# elif COMPILER_VERSION_PATCH == 1
-        PRINT *, 'INFO:compiler_version_PATCH_digit_5[1]'
-# elif COMPILER_VERSION_PATCH == 2
-        PRINT *, 'INFO:compiler_version_PATCH_digit_5[2]'
-# elif COMPILER_VERSION_PATCH == 3
-        PRINT *, 'INFO:compiler_version_PATCH_digit_5[3]'
-# elif COMPILER_VERSION_PATCH == 4
-        PRINT *, 'INFO:compiler_version_PATCH_digit_5[4]'
-# elif COMPILER_VERSION_PATCH == 5
-        PRINT *, 'INFO:compiler_version_PATCH_digit_5[5]'
-# elif COMPILER_VERSION_PATCH == 6
-        PRINT *, 'INFO:compiler_version_PATCH_digit_5[6]'
-# elif COMPILER_VERSION_PATCH == 7
-        PRINT *, 'INFO:compiler_version_PATCH_digit_5[7]'
-# elif COMPILER_VERSION_PATCH == 8
-        PRINT *, 'INFO:compiler_version_PATCH_digit_5[8]'
-# elif COMPILER_VERSION_PATCH == 9
-        PRINT *, 'INFO:compiler_version_PATCH_digit_5[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_6(n)
-# define HEX(n) HEX_6(n)
-# if COMPILER_VERSION_PATCH == 0
-        PRINT *, 'INFO:compiler_version_PATCH_digit_6[0]'
-# elif COMPILER_VERSION_PATCH == 1
-        PRINT *, 'INFO:compiler_version_PATCH_digit_6[1]'
-# elif COMPILER_VERSION_PATCH == 2
-        PRINT *, 'INFO:compiler_version_PATCH_digit_6[2]'
-# elif COMPILER_VERSION_PATCH == 3
-        PRINT *, 'INFO:compiler_version_PATCH_digit_6[3]'
-# elif COMPILER_VERSION_PATCH == 4
-        PRINT *, 'INFO:compiler_version_PATCH_digit_6[4]'
-# elif COMPILER_VERSION_PATCH == 5
-        PRINT *, 'INFO:compiler_version_PATCH_digit_6[5]'
-# elif COMPILER_VERSION_PATCH == 6
-        PRINT *, 'INFO:compiler_version_PATCH_digit_6[6]'
-# elif COMPILER_VERSION_PATCH == 7
-        PRINT *, 'INFO:compiler_version_PATCH_digit_6[7]'
-# elif COMPILER_VERSION_PATCH == 8
-        PRINT *, 'INFO:compiler_version_PATCH_digit_6[8]'
-# elif COMPILER_VERSION_PATCH == 9
-        PRINT *, 'INFO:compiler_version_PATCH_digit_6[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_7(n)
-# define HEX(n) HEX_7(n)
-# if COMPILER_VERSION_PATCH == 0
-        PRINT *, 'INFO:compiler_version_PATCH_digit_7[0]'
-# elif COMPILER_VERSION_PATCH == 1
-        PRINT *, 'INFO:compiler_version_PATCH_digit_7[1]'
-# elif COMPILER_VERSION_PATCH == 2
-        PRINT *, 'INFO:compiler_version_PATCH_digit_7[2]'
-# elif COMPILER_VERSION_PATCH == 3
-        PRINT *, 'INFO:compiler_version_PATCH_digit_7[3]'
-# elif COMPILER_VERSION_PATCH == 4
-        PRINT *, 'INFO:compiler_version_PATCH_digit_7[4]'
-# elif COMPILER_VERSION_PATCH == 5
-        PRINT *, 'INFO:compiler_version_PATCH_digit_7[5]'
-# elif COMPILER_VERSION_PATCH == 6
-        PRINT *, 'INFO:compiler_version_PATCH_digit_7[6]'
-# elif COMPILER_VERSION_PATCH == 7
-        PRINT *, 'INFO:compiler_version_PATCH_digit_7[7]'
-# elif COMPILER_VERSION_PATCH == 8
-        PRINT *, 'INFO:compiler_version_PATCH_digit_7[8]'
-# elif COMPILER_VERSION_PATCH == 9
-        PRINT *, 'INFO:compiler_version_PATCH_digit_7[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_8(n)
-# define HEX(n) HEX_8(n)
-# if COMPILER_VERSION_PATCH == 0
-        PRINT *, 'INFO:compiler_version_PATCH_digit_8[0]'
-# elif COMPILER_VERSION_PATCH == 1
-        PRINT *, 'INFO:compiler_version_PATCH_digit_8[1]'
-# elif COMPILER_VERSION_PATCH == 2
-        PRINT *, 'INFO:compiler_version_PATCH_digit_8[2]'
-# elif COMPILER_VERSION_PATCH == 3
-        PRINT *, 'INFO:compiler_version_PATCH_digit_8[3]'
-# elif COMPILER_VERSION_PATCH == 4
-        PRINT *, 'INFO:compiler_version_PATCH_digit_8[4]'
-# elif COMPILER_VERSION_PATCH == 5
-        PRINT *, 'INFO:compiler_version_PATCH_digit_8[5]'
-# elif COMPILER_VERSION_PATCH == 6
-        PRINT *, 'INFO:compiler_version_PATCH_digit_8[6]'
-# elif COMPILER_VERSION_PATCH == 7
-        PRINT *, 'INFO:compiler_version_PATCH_digit_8[7]'
-# elif COMPILER_VERSION_PATCH == 8
-        PRINT *, 'INFO:compiler_version_PATCH_digit_8[8]'
-# elif COMPILER_VERSION_PATCH == 9
-        PRINT *, 'INFO:compiler_version_PATCH_digit_8[9]'
-# endif
-
-#endif
-#if defined(COMPILER_VERSION_TWEAK)
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_1(n)
-# define HEX(n) HEX_1(n)
-# if COMPILER_VERSION_TWEAK == 0
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_1[0]'
-# elif COMPILER_VERSION_TWEAK == 1
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_1[1]'
-# elif COMPILER_VERSION_TWEAK == 2
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_1[2]'
-# elif COMPILER_VERSION_TWEAK == 3
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_1[3]'
-# elif COMPILER_VERSION_TWEAK == 4
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_1[4]'
-# elif COMPILER_VERSION_TWEAK == 5
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_1[5]'
-# elif COMPILER_VERSION_TWEAK == 6
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_1[6]'
-# elif COMPILER_VERSION_TWEAK == 7
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_1[7]'
-# elif COMPILER_VERSION_TWEAK == 8
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_1[8]'
-# elif COMPILER_VERSION_TWEAK == 9
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_1[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_2(n)
-# define HEX(n) HEX_2(n)
-# if COMPILER_VERSION_TWEAK == 0
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_2[0]'
-# elif COMPILER_VERSION_TWEAK == 1
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_2[1]'
-# elif COMPILER_VERSION_TWEAK == 2
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_2[2]'
-# elif COMPILER_VERSION_TWEAK == 3
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_2[3]'
-# elif COMPILER_VERSION_TWEAK == 4
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_2[4]'
-# elif COMPILER_VERSION_TWEAK == 5
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_2[5]'
-# elif COMPILER_VERSION_TWEAK == 6
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_2[6]'
-# elif COMPILER_VERSION_TWEAK == 7
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_2[7]'
-# elif COMPILER_VERSION_TWEAK == 8
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_2[8]'
-# elif COMPILER_VERSION_TWEAK == 9
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_2[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_3(n)
-# define HEX(n) HEX_3(n)
-# if COMPILER_VERSION_TWEAK == 0
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_3[0]'
-# elif COMPILER_VERSION_TWEAK == 1
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_3[1]'
-# elif COMPILER_VERSION_TWEAK == 2
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_3[2]'
-# elif COMPILER_VERSION_TWEAK == 3
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_3[3]'
-# elif COMPILER_VERSION_TWEAK == 4
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_3[4]'
-# elif COMPILER_VERSION_TWEAK == 5
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_3[5]'
-# elif COMPILER_VERSION_TWEAK == 6
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_3[6]'
-# elif COMPILER_VERSION_TWEAK == 7
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_3[7]'
-# elif COMPILER_VERSION_TWEAK == 8
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_3[8]'
-# elif COMPILER_VERSION_TWEAK == 9
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_3[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_4(n)
-# define HEX(n) HEX_4(n)
-# if COMPILER_VERSION_TWEAK == 0
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_4[0]'
-# elif COMPILER_VERSION_TWEAK == 1
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_4[1]'
-# elif COMPILER_VERSION_TWEAK == 2
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_4[2]'
-# elif COMPILER_VERSION_TWEAK == 3
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_4[3]'
-# elif COMPILER_VERSION_TWEAK == 4
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_4[4]'
-# elif COMPILER_VERSION_TWEAK == 5
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_4[5]'
-# elif COMPILER_VERSION_TWEAK == 6
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_4[6]'
-# elif COMPILER_VERSION_TWEAK == 7
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_4[7]'
-# elif COMPILER_VERSION_TWEAK == 8
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_4[8]'
-# elif COMPILER_VERSION_TWEAK == 9
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_4[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_5(n)
-# define HEX(n) HEX_5(n)
-# if COMPILER_VERSION_TWEAK == 0
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_5[0]'
-# elif COMPILER_VERSION_TWEAK == 1
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_5[1]'
-# elif COMPILER_VERSION_TWEAK == 2
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_5[2]'
-# elif COMPILER_VERSION_TWEAK == 3
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_5[3]'
-# elif COMPILER_VERSION_TWEAK == 4
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_5[4]'
-# elif COMPILER_VERSION_TWEAK == 5
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_5[5]'
-# elif COMPILER_VERSION_TWEAK == 6
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_5[6]'
-# elif COMPILER_VERSION_TWEAK == 7
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_5[7]'
-# elif COMPILER_VERSION_TWEAK == 8
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_5[8]'
-# elif COMPILER_VERSION_TWEAK == 9
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_5[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_6(n)
-# define HEX(n) HEX_6(n)
-# if COMPILER_VERSION_TWEAK == 0
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_6[0]'
-# elif COMPILER_VERSION_TWEAK == 1
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_6[1]'
-# elif COMPILER_VERSION_TWEAK == 2
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_6[2]'
-# elif COMPILER_VERSION_TWEAK == 3
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_6[3]'
-# elif COMPILER_VERSION_TWEAK == 4
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_6[4]'
-# elif COMPILER_VERSION_TWEAK == 5
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_6[5]'
-# elif COMPILER_VERSION_TWEAK == 6
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_6[6]'
-# elif COMPILER_VERSION_TWEAK == 7
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_6[7]'
-# elif COMPILER_VERSION_TWEAK == 8
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_6[8]'
-# elif COMPILER_VERSION_TWEAK == 9
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_6[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_7(n)
-# define HEX(n) HEX_7(n)
-# if COMPILER_VERSION_TWEAK == 0
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_7[0]'
-# elif COMPILER_VERSION_TWEAK == 1
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_7[1]'
-# elif COMPILER_VERSION_TWEAK == 2
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_7[2]'
-# elif COMPILER_VERSION_TWEAK == 3
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_7[3]'
-# elif COMPILER_VERSION_TWEAK == 4
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_7[4]'
-# elif COMPILER_VERSION_TWEAK == 5
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_7[5]'
-# elif COMPILER_VERSION_TWEAK == 6
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_7[6]'
-# elif COMPILER_VERSION_TWEAK == 7
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_7[7]'
-# elif COMPILER_VERSION_TWEAK == 8
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_7[8]'
-# elif COMPILER_VERSION_TWEAK == 9
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_7[9]'
-# endif
-
-# undef DEC
-# undef HEX
-# define DEC(n) DEC_8(n)
-# define HEX(n) HEX_8(n)
-# if COMPILER_VERSION_TWEAK == 0
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_8[0]'
-# elif COMPILER_VERSION_TWEAK == 1
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_8[1]'
-# elif COMPILER_VERSION_TWEAK == 2
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_8[2]'
-# elif COMPILER_VERSION_TWEAK == 3
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_8[3]'
-# elif COMPILER_VERSION_TWEAK == 4
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_8[4]'
-# elif COMPILER_VERSION_TWEAK == 5
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_8[5]'
-# elif COMPILER_VERSION_TWEAK == 6
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_8[6]'
-# elif COMPILER_VERSION_TWEAK == 7
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_8[7]'
-# elif COMPILER_VERSION_TWEAK == 8
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_8[8]'
-# elif COMPILER_VERSION_TWEAK == 9
-        PRINT *, 'INFO:compiler_version_TWEAK_digit_8[9]'
-# endif
-
-#endif
-
-      END

build_final2/CMakeFiles/FindOpenMP/ompver_C.bin

@@ -1,3 +0,0 @@
-version https://git-lfs.github.com/spec/v1
-oid sha256:ef651e99962c60a4118f2ff52dc2c136c1859595974b91e09ff958c1fdef942d
-size 63760

build_final2/CMakeFiles/FindOpenMP/ompver_CXX.bin

@@ -1,3 +0,0 @@
-version https://git-lfs.github.com/spec/v1
-oid sha256:c50ffd51460a1adcb0b889843df8857b2a1c6f62549d4f8d3d311828fdbb1655
-size 63767

build_final2/CMakeFiles/FindOpenMP/ompver_Fortran.bin

@@ -1,3 +0,0 @@
-version https://git-lfs.github.com/spec/v1
-oid sha256:9f887390f2be8df584170e7f5f3e7eafbf087e21a5d9cf2f9b977efaf1bd87e4
-size 64721

build_final2/CMakeFiles/TargetDirectories.txt

@@ -1,71 +0,0 @@
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/CMakeFiles/bob_quantum.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/CMakeFiles/test.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/CMakeFiles/edit_cache.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/CMakeFiles/rebuild_cache.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/CMakeFiles/list_install_components.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/CMakeFiles/install.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/CMakeFiles/install/local.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/CMakeFiles/install/strip.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/racket/CMakeFiles/racket_bindings.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/racket/CMakeFiles/test.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/racket/CMakeFiles/edit_cache.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/racket/CMakeFiles/rebuild_cache.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/racket/CMakeFiles/list_install_components.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/racket/CMakeFiles/install.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/racket/CMakeFiles/install/local.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/racket/CMakeFiles/install/strip.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/janet/CMakeFiles/janet_bindings.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/janet/CMakeFiles/test.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/janet/CMakeFiles/edit_cache.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/janet/CMakeFiles/rebuild_cache.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/janet/CMakeFiles/list_install_components.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/janet/CMakeFiles/install.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/janet/CMakeFiles/install/local.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/janet/CMakeFiles/install/strip.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/zig/CMakeFiles/zig_bindings.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/zig/CMakeFiles/test.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/zig/CMakeFiles/edit_cache.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/zig/CMakeFiles/rebuild_cache.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/zig/CMakeFiles/list_install_components.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/zig/CMakeFiles/install.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/zig/CMakeFiles/install/local.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/zig/CMakeFiles/install/strip.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/odin/CMakeFiles/odin_bindings.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/odin/CMakeFiles/test.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/odin/CMakeFiles/edit_cache.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/odin/CMakeFiles/rebuild_cache.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/odin/CMakeFiles/list_install_components.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/odin/CMakeFiles/install.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/odin/CMakeFiles/install/local.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/odin/CMakeFiles/install/strip.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/julia/CMakeFiles/julia_bindings.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/julia/CMakeFiles/test.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/julia/CMakeFiles/edit_cache.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/julia/CMakeFiles/rebuild_cache.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/julia/CMakeFiles/list_install_components.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/julia/CMakeFiles/install.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/julia/CMakeFiles/install/local.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/julia/CMakeFiles/install/strip.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/r/CMakeFiles/r_bindings.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/r/CMakeFiles/test.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/r/CMakeFiles/edit_cache.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/r/CMakeFiles/rebuild_cache.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/r/CMakeFiles/list_install_components.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/r/CMakeFiles/install.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/r/CMakeFiles/install/local.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/r/CMakeFiles/install/strip.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/tests/CMakeFiles/test.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/tests/CMakeFiles/edit_cache.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/tests/CMakeFiles/rebuild_cache.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/tests/CMakeFiles/list_install_components.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/tests/CMakeFiles/install.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/tests/CMakeFiles/install/local.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/tests/CMakeFiles/install/strip.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/benchmarks/CMakeFiles/bob_benchmarks.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/benchmarks/CMakeFiles/test.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/benchmarks/CMakeFiles/edit_cache.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/benchmarks/CMakeFiles/rebuild_cache.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/benchmarks/CMakeFiles/list_install_components.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/benchmarks/CMakeFiles/install.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/benchmarks/CMakeFiles/install/local.dir
-C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2/benchmarks/CMakeFiles/install/strip.dir

build_final2/CMakeFiles/bob_quantum.dir/FortranDependInfo.json

@@ -1,23 +0,0 @@
-{
-	"bmi-installation" : null,
-	"compiler-frontend-variant" : "GNU",
-	"compiler-id" : "GNU",
-	"compiler-simulate-id" : "",
-	"config" : "Release",
-	"cxx-modules" : {},
-	"dir-cur-bld" : "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2",
-	"dir-cur-src" : "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster",
-	"dir-top-bld" : "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2",
-	"dir-top-src" : "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster",
-	"exports" : [],
-	"forward-modules-from-target-dirs" : [],
-	"include-dirs" : 
-	[
-		"C:\\Users\\jessi\\Desktop\\bobs control repo\\sov-kernel-monster\\include"
-	],
-	"language" : "Fortran",
-	"linked-target-dirs" : [],
-	"module-dir" : "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/build_final2",
-	"submodule-ext" : ".smod",
-	"submodule-sep" : "@"
-}

build_final2/CMakeFiles/bob_quantum.dir/src/bob_abi.f90-pp.f90

@@ -1,491 +0,0 @@
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_abi.f90"
-# 1 "<built-in>"
-# 1 "<command-line>"
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_abi.f90"
-! BOB Quantum Civilization Engine - C ABI Wrapper
-! Module: bob_abi
-! Purpose: Complete C-compatible interface for all BOB functionality
-! Standard: Fortran 2018
-
-module bob_abi
-    use, intrinsic :: iso_c_binding
-    use bob_kinds
-    use bob_errors
-    use bob_state
-    use bob_gates
-    use bob_rng
-    use bob_lattice
-    use bob_measurement
-    use bob_metrics
-    use bob_hamiltonian
-    use bob_integrator
-    implicit none
-    private
-    
-    ! Export all C functions
-    public :: bob_engine_version
-    public :: bob_engine_info
-    public :: bob_last_error_message
-    
-contains
-
-    !> Get engine version string
-    subroutine bob_engine_version(version_str, max_len) bind(C, name="bob_engine_version")
-        character(kind=c_char), dimension(*), intent(out) :: version_str
-        integer(c_int), value :: max_len
-        
-        character(len=64) :: version
-        integer :: i, len_version
-        
-        version = "BOB Quantum Engine v1.0.0"
-        len_version = min(len_trim(version), max_len - 1)
-        
-        do i = 1, len_version
-            version_str(i) = version(i:i)
-        end do
-        version_str(len_version + 1) = c_null_char
-    end subroutine bob_engine_version
-    
-    !> Get engine information
-    subroutine bob_engine_info(info_str, max_len) bind(C, name="bob_engine_info")
-        character(kind=c_char), dimension(*), intent(out) :: info_str
-        integer(c_int), value :: max_len
-        
-        character(len=512) :: info
-        integer :: i, len_info
-        
-        info = "BOB Quantum Civilization Engine" // c_new_line // &
-               "Fortran 2018 Implementation" // c_new_line // &
-               "Features: State vectors, Gates, Lattices, Measurement, " // &
-               "Hamiltonians, Time evolution" // c_new_line // &
-               "License: MIT (Sovereign Source)"
-        
-        len_info = min(len_trim(info), max_len - 1)
-        
-        do i = 1, len_info
-            info_str(i) = info(i:i)
-        end do
-        info_str(len_info + 1) = c_null_char
-    end subroutine bob_engine_info
-    
-    !> Get last error message
-    subroutine bob_last_error_message(msg_str, max_len) bind(C, name="bob_last_error_message")
-        character(kind=c_char), dimension(*), intent(out) :: msg_str
-        integer(c_int), value :: max_len
-        
-        character(len=256) :: message
-        integer :: i, len_msg
-        integer(i4) :: error_code
-        
-        error_code = bob_get_last_error()
-        message = bob_error_message(error_code)
-        
-        if (len_trim(g_error_state%message) > 0) then
-            message = trim(message) // ": " // trim(g_error_state%message)
-        end if
-        
-        if (len_trim(g_error_state%location) > 0) then
-            message = trim(message) // " [" // trim(g_error_state%location) // "]"
-        end if
-        
-        len_msg = min(len_trim(message), max_len - 1)
-        
-        do i = 1, len_msg
-            msg_str(i) = message(i:i)
-        end do
-        msg_str(len_msg + 1) = c_null_char
-    end subroutine bob_last_error_message
-    
-    !> Create complete quantum simulation
-    function bob_simulation_create(num_qubits, seed) result(sim_ptr) &
-        bind(C, name="bob_simulation_create")
-        integer(c_int64_t), value :: num_qubits
-        integer(c_int64_t), value :: seed
-        type(c_ptr) :: sim_ptr
-        
-        type :: bob_simulation
-            type(bob_quantum_state) :: state
-            type(bob_hamiltonian_operator) :: hamiltonian
-            type(bob_time_integrator) :: integrator
-            type(bob_rng_state) :: rng
-            type(bob_quantum_metrics) :: metrics
-        end type bob_simulation
-        
-        type(bob_simulation), pointer :: sim
-        integer(i8) :: dim
-        
-        allocate(sim)
-        
-        ! Initialize RNG
-        call sim%rng%init(seed)
-        
-        ! Create state
-        dim = ishft(1_i8, int(num_qubits))
-        call sim%state%allocate(dim, "simulation_state")
-        
-        ! Initialize to |0...0⟩
-        sim%state%amplitudes = CZERO
-        sim%state%amplitudes(1) = CONE
-        sim%state%is_normalized = .true.
-        
-        ! Create Hamiltonian
-        call sim%hamiltonian%init(dim, "simulation_hamiltonian")
-        
-        ! Create integrator (RK4 by default)
-        call sim%integrator%init(INTEGRATOR_RK4, 0.01_wp, "simulation_integrator")
-        
-        ! Initialize metrics
-        call sim%metrics%init()
-        
-        sim_ptr = c_loc(sim)
-    end function bob_simulation_create
-    
-    !> Destroy simulation
-    subroutine bob_simulation_destroy(sim_ptr) bind(C, name="bob_simulation_destroy")
-        type(c_ptr), value :: sim_ptr
-        
-        type :: bob_simulation
-            type(bob_quantum_state) :: state
-            type(bob_hamiltonian_operator) :: hamiltonian
-            type(bob_time_integrator) :: integrator
-            type(bob_rng_state) :: rng
-            type(bob_quantum_metrics) :: metrics
-        end type bob_simulation
-        
-        type(bob_simulation), pointer :: sim
-        
-        if (.not. c_associated(sim_ptr)) return
-        
-        call c_f_pointer(sim_ptr, sim)
-        
-        call sim%state%deallocate()
-        call sim%hamiltonian%destroy()
-        
-        deallocate(sim)
-    end subroutine bob_simulation_destroy
-    
-    !> Run simulation step
-    function bob_simulation_step(sim_ptr) result(status) &
-        bind(C, name="bob_simulation_step")
-        type(c_ptr), value :: sim_ptr
-        integer(c_int) :: status
-        
-        type :: bob_simulation
-            type(bob_quantum_state) :: state
-            type(bob_hamiltonian_operator) :: hamiltonian
-            type(bob_time_integrator) :: integrator
-            type(bob_rng_state) :: rng
-            type(bob_quantum_metrics) :: metrics
-        end type bob_simulation
-        
-        type(bob_simulation), pointer :: sim
-        
-        if (.not. c_associated(sim_ptr)) then
-            status = BOB_ERROR_INVALID_ARGUMENT
-            return
-        end if
-        
-        call c_f_pointer(sim_ptr, sim)
-        
-        ! Take integration step
-        call sim%integrator%step(sim%state, sim%hamiltonian)
-        
-        status = bob_get_last_error()
-    end function bob_simulation_step
-    
-    !> Get simulation metrics
-    function bob_simulation_get_metrics(sim_ptr, energy, entropy, coherence) result(status) &
-        bind(C, name="bob_simulation_get_metrics")
-        type(c_ptr), value :: sim_ptr
-        real(c_double), intent(out) :: energy, entropy, coherence
-        integer(c_int) :: status
-        
-        type :: bob_simulation
-            type(bob_quantum_state) :: state
-            type(bob_hamiltonian_operator) :: hamiltonian
-            type(bob_time_integrator) :: integrator
-            type(bob_rng_state) :: rng
-            type(bob_quantum_metrics) :: metrics
-        end type bob_simulation
-        
-        type(bob_simulation), pointer :: sim
-        
-        if (.not. c_associated(sim_ptr)) then
-            status = BOB_ERROR_INVALID_ARGUMENT
-            energy = ZERO
-            entropy = ZERO
-            coherence = ZERO
-            return
-        end if
-        
-        call c_f_pointer(sim_ptr, sim)
-        
-        ! Compute metrics
-        call sim%metrics%compute_all(sim%state, sim%hamiltonian%matrix)
-        
-        energy = sim%metrics%energy
-        entropy = sim%metrics%von_neumann_entropy
-        coherence = sim%metrics%coherence
-        
-        status = bob_get_last_error()
-    end function bob_simulation_get_metrics
-    
-    !> Batch operations: Create multiple states
-    function bob_batch_create_states(num_states, dim) result(batch_ptr) &
-        bind(C, name="bob_batch_create_states")
-        integer(c_int64_t), value :: num_states, dim
-        type(c_ptr) :: batch_ptr
-        
-        type :: bob_state_batch
-            integer(i8) :: num_states
-            type(bob_quantum_state), allocatable :: states(:)
-        end type bob_state_batch
-        
-        type(bob_state_batch), pointer :: batch
-        integer(i8) :: i
-        integer :: stat
-        
-        allocate(batch, stat=stat)
-        if (stat /= 0) then
-            batch_ptr = c_null_ptr
-            return
-        end if
-        
-        batch%num_states = num_states
-        allocate(batch%states(num_states), stat=stat)
-        if (stat /= 0) then
-            deallocate(batch)
-            batch_ptr = c_null_ptr
-            return
-        end if
-        
-        do i = 1, num_states
-            call batch%states(i)%allocate(dim, "batch_state")
-        end do
-        
-        batch_ptr = c_loc(batch)
-    end function bob_batch_create_states
-    
-    !> Destroy batch of states
-    subroutine bob_batch_destroy_states(batch_ptr) bind(C, name="bob_batch_destroy_states")
-        type(c_ptr), value :: batch_ptr
-        
-        type :: bob_state_batch
-            integer(i8) :: num_states
-            type(bob_quantum_state), allocatable :: states(:)
-        end type bob_state_batch
-        
-        type(bob_state_batch), pointer :: batch
-        integer(i8) :: i
-        
-        if (.not. c_associated(batch_ptr)) return
-        
-        call c_f_pointer(batch_ptr, batch)
-        
-        do i = 1, batch%num_states
-            call batch%states(i)%deallocate()
-        end do
-        
-        deallocate(batch%states)
-        deallocate(batch)
-    end subroutine bob_batch_destroy_states
-    
-    !> Parallel gate application
-    function bob_batch_apply_gate(batch_ptr, gate_type, qubit_index) result(status) &
-        bind(C, name="bob_batch_apply_gate")
-        type(c_ptr), value :: batch_ptr
-        integer(c_int), value :: gate_type
-        integer(c_int64_t), value :: qubit_index
-        integer(c_int) :: status
-        
-        type :: bob_state_batch
-            integer(i8) :: num_states
-            type(bob_quantum_state), allocatable :: states(:)
-        end type bob_state_batch
-        
-        type(bob_state_batch), pointer :: batch
-        integer(i8) :: i
-        
-        if (.not. c_associated(batch_ptr)) then
-            status = BOB_ERROR_INVALID_ARGUMENT
-            return
-        end if
-        
-        call c_f_pointer(batch_ptr, batch)
-        
-        ! Apply gate to all states
-        !$omp parallel do if(batch%num_states > 10)
-        do i = 1, batch%num_states
-            call apply_single_qubit_gate(batch%states(i), gate_type, qubit_index)
-        end do
-        !$omp end parallel do
-        
-        status = BOB_SUCCESS
-    end function bob_batch_apply_gate
-    
-    !> Snapshot operations: Save state to file
-    function bob_snapshot_save(state_ptr, filename, filename_len) result(status) &
-        bind(C, name="bob_snapshot_save")
-        type(c_ptr), value :: state_ptr
-        character(kind=c_char), dimension(*) :: filename
-        integer(c_int), value :: filename_len
-        integer(c_int) :: status
-        
-        type(bob_quantum_state), pointer :: state
-        character(len=:), allocatable :: fname
-        integer :: unit, i, iostat
-        
-        if (.not. c_associated(state_ptr)) then
-            status = BOB_ERROR_INVALID_ARGUMENT
-            return
-        end if
-        
-        call c_f_pointer(state_ptr, state)
-        
-        ! Convert C string to Fortran string
-        allocate(character(len=filename_len) :: fname)
-        do i = 1, filename_len
-            fname(i:i) = filename(i)
-        end do
-        
-        ! Open file
-        open(newunit=unit, file=fname, form='unformatted', &
-             access='stream', status='replace', iostat=iostat)
-        
-        if (iostat /= 0) then
-            status = BOB_ERROR_IO
-            return
-        end if
-        
-        ! Write state
-        write(unit, iostat=iostat) state%dim
-        write(unit, iostat=iostat) state%amplitudes
-        write(unit, iostat=iostat) state%is_normalized
-        
-        close(unit)
-        
-        if (iostat /= 0) then
-            status = BOB_ERROR_IO
-        else
-            status = BOB_SUCCESS
-        end if
-    end function bob_snapshot_save
-    
-    !> Load state from file
-    function bob_snapshot_load(filename, filename_len) result(state_ptr) &
-        bind(C, name="bob_snapshot_load")
-        character(kind=c_char), dimension(*) :: filename
-        integer(c_int), value :: filename_len
-        type(c_ptr) :: state_ptr
-        
-        type(bob_quantum_state), pointer :: state
-        character(len=:), allocatable :: fname
-        integer :: unit, i, iostat
-        integer(i8) :: dim
-        logical(lk) :: is_normalized
-        
-        ! Convert C string
-        allocate(character(len=filename_len) :: fname)
-        do i = 1, filename_len
-            fname(i:i) = filename(i)
-        end do
-        
-        ! Open file
-        open(newunit=unit, file=fname, form='unformatted', &
-             access='stream', status='old', iostat=iostat)
-        
-        if (iostat /= 0) then
-            state_ptr = c_null_ptr
-            return
-        end if
-        
-        ! Read dimension
-        read(unit, iostat=iostat) dim
-        if (iostat /= 0) then
-            close(unit)
-            state_ptr = c_null_ptr
-            return
-        end if
-        
-        ! Allocate state
-        allocate(state)
-        call state%allocate(dim, "loaded_state")
-        
-        ! Read amplitudes
-        read(unit, iostat=iostat) state%amplitudes
-        read(unit, iostat=iostat) is_normalized
-        
-        close(unit)
-        
-        if (iostat /= 0) then
-            call state%deallocate()
-            deallocate(state)
-            state_ptr = c_null_ptr
-            return
-        end if
-        
-        state%is_normalized = is_normalized
-        state_ptr = c_loc(state)
-    end function bob_snapshot_load
-    
-    !> Utility: Get state amplitude
-    function bob_state_get_amplitude(state_ptr, index, real_part, imag_part) result(status) &
-        bind(C, name="bob_state_get_amplitude")
-        type(c_ptr), value :: state_ptr
-        integer(c_int64_t), value :: index
-        real(c_double), intent(out) :: real_part, imag_part
-        integer(c_int) :: status
-        
-        type(bob_quantum_state), pointer :: state
-        
-        if (.not. c_associated(state_ptr)) then
-            status = BOB_ERROR_INVALID_ARGUMENT
-            real_part = ZERO
-            imag_part = ZERO
-            return
-        end if
-        
-        call c_f_pointer(state_ptr, state)
-        
-        if (index < 0 .or. index >= state%dim) then
-            status = BOB_ERROR_INVALID_ARGUMENT
-            real_part = ZERO
-            imag_part = ZERO
-            return
-        end if
-        
-        real_part = real(state%amplitudes(index + 1))
-        imag_part = aimag(state%amplitudes(index + 1))
-        status = BOB_SUCCESS
-    end function bob_state_get_amplitude
-    
-    !> Utility: Set state amplitude
-    function bob_state_set_amplitude(state_ptr, index, real_part, imag_part) result(status) &
-        bind(C, name="bob_state_set_amplitude")
-        type(c_ptr), value :: state_ptr
-        integer(c_int64_t), value :: index
-        real(c_double), value :: real_part, imag_part
-        integer(c_int) :: status
-        
-        type(bob_quantum_state), pointer :: state
-        
-        if (.not. c_associated(state_ptr)) then
-            status = BOB_ERROR_INVALID_ARGUMENT
-            return
-        end if
-        
-        call c_f_pointer(state_ptr, state)
-        
-        if (index < 0 .or. index >= state%dim) then
-            status = BOB_ERROR_INVALID_ARGUMENT
-            return
-        end if
-        
-        state%amplitudes(index + 1) = cmplx(real_part, imag_part, cwp)
-        state%is_normalized = .false.
-        status = BOB_SUCCESS
-    end function bob_state_set_amplitude
-
-end module bob_abi
-
-! Made with Bob

build_final2/CMakeFiles/bob_quantum.dir/src/bob_abi.f90-pp.f90.d

@@ -1,2 +0,0 @@
-CMakeFiles/bob_quantum.dir/src/bob_abi.f90-pp.f90: \
- C:/Users/jessi/Desktop/bobs\ control\ repo/sov-kernel-monster/src/bob_abi.f90

build_final2/CMakeFiles/bob_quantum.dir/src/bob_abi.f90.obj.ddi

@@ -1,52 +0,0 @@
-{
-	"revision" : 0,
-	"rules" : 
-	[
-		{
-			"outputs" : [],
-			"primary-output" : "CMakeFiles\\\\bob_quantum.dir\\\\src\\\\bob_abi.f90.obj",
-			"provides" : 
-			[
-				{
-					"compiled-module-path" : "bob_abi.mod",
-					"is-interface" : true,
-					"logical-name" : "bob_abi.mod"
-				}
-			],
-			"requires" : 
-			[
-				{
-					"logical-name" : "bob_errors.mod"
-				},
-				{
-					"logical-name" : "bob_gates.mod"
-				},
-				{
-					"logical-name" : "bob_hamiltonian.mod"
-				},
-				{
-					"logical-name" : "bob_integrator.mod"
-				},
-				{
-					"logical-name" : "bob_kinds.mod"
-				},
-				{
-					"logical-name" : "bob_lattice.mod"
-				},
-				{
-					"logical-name" : "bob_measurement.mod"
-				},
-				{
-					"logical-name" : "bob_metrics.mod"
-				},
-				{
-					"logical-name" : "bob_rng.mod"
-				},
-				{
-					"logical-name" : "bob_state.mod"
-				}
-			]
-		}
-	],
-	"version" : 0
-}

build_final2/CMakeFiles/bob_quantum.dir/src/bob_circuit.f90-pp.f90

@@ -1,380 +0,0 @@
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_circuit.f90"
-# 1 "<built-in>"
-# 1 "<command-line>"
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_circuit.f90"
-!=====================================================================
-! bob_circuit.f90
-! Quantum circuit IR: Gate, Qubit, Circuit, Measurement
-! QFT, Grover, Shor, QPE algorithms compiled to flat circuit IR.
-! Matches utqc-core/src/lib.rs + utqc-quantum/src/lib.rs exactly.
-! Standard: Fortran 2018
-!=====================================================================
-module bob_circuit
-  use, intrinsic :: iso_c_binding, only: c_int32_t, c_int64_t, c_double, &
-       c_ptr, c_f_pointer, c_loc, c_size_t
-  use, intrinsic :: iso_fortran_env, only: int64, real64, int32
-  use bob_kinds
-  use bob_errors
-  implicit none
-  private
-
-  !──────────────────────────────────────────────────────────────────
-  ! Gate type codes (matches utqc-core SingleGate + DoubleGate enums)
-  !──────────────────────────────────────────────────────────────────
-  integer(i4), parameter, public :: GATE_PAULI_X  = 0
-  integer(i4), parameter, public :: GATE_PAULI_Y  = 1
-  integer(i4), parameter, public :: GATE_PAULI_Z  = 2
-  integer(i4), parameter, public :: GATE_HADAMARD = 3
-  integer(i4), parameter, public :: GATE_T        = 4
-  integer(i4), parameter, public :: GATE_S        = 5
-  integer(i4), parameter, public :: GATE_CNOT     = 100
-  integer(i4), parameter, public :: GATE_CZ       = 101
-  integer(i4), parameter, public :: GATE_SWAP     = 102
-  integer(i4), parameter, public :: GATE_ROTATION = 200  ! parameterized
-  integer(i4), parameter, public :: GATE_MEASURE  = 300
-
-  !> Maximum gates in one circuit
-  integer(i4), parameter, public :: MAX_CIRCUIT_GATES = 65536
-  !> Maximum qubits
-  integer(i4), parameter, public :: MAX_QUBITS = 64
-
-  !> A single gate operation
-  type, public :: bob_gate_t
-    integer(i4) :: gate_type   = 0     ! GATE_* constant
-    integer(i4) :: target      = -1    ! target qubit (0-indexed)
-    integer(i4) :: control     = -1    ! control qubit (-1 = none)
-    real(wp)    :: angle       = ZERO  ! rotation angle (radians)
-    integer(i4) :: classical   = -1    ! classical bit for measurement
-  end type bob_gate_t
-
-  !> Flat quantum circuit IR (non-recursive — matches utqc-core Circuit)
-  type, public :: bob_circuit_t
-    integer(i4) :: num_qubits      = 0
-    integer(i4) :: num_classical   = 0
-    integer(i4) :: num_gates       = 0
-    integer(i4) :: num_measurements= 0
-    type(bob_gate_t) :: gates(MAX_CIRCUIT_GATES)
-    logical(lk) :: is_valid        = .false.
-  contains
-    procedure :: add_gate    => circuit_add_gate
-    procedure :: add_measure => circuit_add_measure
-    procedure :: depth       => circuit_depth
-    procedure :: validate    => circuit_validate
-    procedure :: reset       => circuit_reset
-  end type bob_circuit_t
-
-  public :: circuit_new
-  public :: circuit_qft
-  public :: circuit_grover
-  public :: circuit_qpe
-  public :: circuit_shor
-  public :: circuit_bell_pair
-  public :: circuit_teleportation
-  public :: grover_optimal_iterations
-
-  ! C ABI
-  public :: bob_circuit_new
-  public :: bob_circuit_qft
-  public :: bob_circuit_grover
-  public :: bob_circuit_depth
-  public :: bob_circuit_free
-
-contains
-
-  !──────────────────────────────────────────────────────────────────
-  ! Constructor
-  !──────────────────────────────────────────────────────────────────
-  pure function circuit_new(num_qubits, num_classical) result(c)
-    integer(i4), intent(in) :: num_qubits, num_classical
-    type(bob_circuit_t) :: c
-    c%num_qubits    = num_qubits
-    c%num_classical = num_classical
-    c%num_gates     = 0
-    c%is_valid      = .true.
-  end function circuit_new
-
-  subroutine circuit_reset(this)
-    class(bob_circuit_t), intent(inout) :: this
-    this%num_gates       = 0
-    this%num_measurements= 0
-    this%is_valid        = .true.
-  end subroutine circuit_reset
-
-  !──────────────────────────────────────────────────────────────────
-  ! Add a gate
-  !──────────────────────────────────────────────────────────────────
-  subroutine circuit_add_gate(this, gate_type, target, control, angle, status)
-    class(bob_circuit_t), intent(inout) :: this
-    integer(i4), intent(in) :: gate_type, target
-    integer(i4), intent(in), optional :: control
-    real(wp),    intent(in), optional :: angle
-    integer(i4), intent(out), optional :: status
-    integer(i4) :: st
-    st = BOB_SUCCESS
-    if (.not. this%is_valid) then; st = BOB_ERROR_INVALID_STATE; goto 99; end if
-    if (this%num_gates >= MAX_CIRCUIT_GATES) then
-      call bob_set_error(BOB_ERROR_ALLOCATION, "circuit full", "circuit_add_gate")
-      st = BOB_ERROR_ALLOCATION; goto 99
-    end if
-    if (target < 0 .or. target >= this%num_qubits) then
-      st = BOB_ERROR_INVALID_ARGUMENT; goto 99
-    end if
-    this%num_gates = this%num_gates + 1
-    this%gates(this%num_gates)%gate_type = gate_type
-    this%gates(this%num_gates)%target    = target
-    this%gates(this%num_gates)%control   = -1
-    this%gates(this%num_gates)%angle     = ZERO
-    this%gates(this%num_gates)%classical = -1
-    if (present(control)) this%gates(this%num_gates)%control = control
-    if (present(angle))   this%gates(this%num_gates)%angle   = angle
-    99 if (present(status)) status = st
-  end subroutine circuit_add_gate
-
-  subroutine circuit_add_measure(this, qubit, classical_bit, status)
-    class(bob_circuit_t), intent(inout) :: this
-    integer(i4), intent(in) :: qubit, classical_bit
-    integer(i4), intent(out), optional :: status
-    integer(i4) :: st
-    st = BOB_SUCCESS
-    if (qubit < 0 .or. qubit >= this%num_qubits) then
-      st = BOB_ERROR_INVALID_ARGUMENT; goto 99
-    end if
-    this%num_gates = this%num_gates + 1
-    this%gates(this%num_gates)%gate_type = GATE_MEASURE
-    this%gates(this%num_gates)%target    = qubit
-    this%gates(this%num_gates)%classical = classical_bit
-    this%num_measurements = this%num_measurements + 1
-    99 if (present(status)) status = st
-  end subroutine circuit_add_measure
-
-  pure function circuit_depth(this) result(d)
-    class(bob_circuit_t), intent(in) :: this
-    integer(i4) :: d
-    d = this%num_gates
-  end function circuit_depth
-
-  pure function circuit_validate(this) result(ok)
-    class(bob_circuit_t), intent(in) :: this
-    logical :: ok
-    ok = this%is_valid .and. this%num_gates > 0 .and. this%num_qubits > 0
-  end function circuit_validate
-
-  !══════════════════════════════════════════════════════════════════
-  ! QUANTUM FOURIER TRANSFORM
-  ! QFT on num_qubits starting at qubit 'start'
-  ! Matches utqc-quantum Qft::circuit exactly
-  !══════════════════════════════════════════════════════════════════
-  function circuit_qft(num_qubits, start) result(c)
-    integer(i4), intent(in) :: num_qubits, start
-    type(bob_circuit_t) :: c
-    integer(i4) :: i, j, st
-    real(wp)    :: angle
-    c = circuit_new(num_qubits, num_qubits)
-    do i = 0, num_qubits - 1
-      ! Hadamard on qubit i
-      call c%add_gate(GATE_HADAMARD, start + i, status=st)
-      ! Controlled phase rotations
-      do j = i + 1, num_qubits - 1
-        angle = PI / real(ishft(1_i4, j - i), wp)
-        call c%add_gate(GATE_CNOT,     start + j, control=start + i, status=st)
-        call c%add_gate(GATE_ROTATION, start + i, angle=angle, status=st)
-      end do
-    end do
-    ! Swap qubits for standard bit ordering
-    do i = 0, num_qubits / 2 - 1
-      call c%add_gate(GATE_SWAP, start + i, &
-           control=start + num_qubits - 1 - i, status=st)
-    end do
-    ! Measure all
-    do i = 0, num_qubits - 1
-      call c%add_measure(start + i, i, status=st)
-    end do
-  end function circuit_qft
-
-  !══════════════════════════════════════════════════════════════════
-  ! GROVER'S SEARCH ALGORITHM
-  ! Matches utqc-quantum Grover::circuit exactly
-  !══════════════════════════════════════════════════════════════════
-
-  !> Optimal number of Grover iterations: floor(pi/4 * sqrt(N/M))
-  pure function grover_optimal_iterations(num_qubits, num_solutions) result(k)
-    integer(i4), intent(in) :: num_qubits, num_solutions
-    integer(i4) :: k
-    real(wp) :: n_states, theta
-    n_states = real(ishft(1_i4, num_qubits), wp)
-    theta = asin(sqrt(real(num_solutions, wp) / n_states))
-    k = max(1, int(PI * QUART / theta, i4))
-  end function grover_optimal_iterations
-
-  function circuit_grover(num_qubits, num_solutions) result(c)
-    integer(i4), intent(in) :: num_qubits, num_solutions
-    type(bob_circuit_t) :: c
-    integer(i4) :: i, iter, iters, st
-    c = circuit_new(num_qubits, num_qubits)
-    ! Initialize: H on all
-    do i = 0, num_qubits - 1
-      call c%add_gate(GATE_HADAMARD, i, status=st)
-    end do
-    iters = grover_optimal_iterations(num_qubits, num_solutions)
-    do iter = 1, iters
-      ! Oracle: CZ on qubit 0 and last qubit (placeholder)
-      if (num_qubits >= 2) then
-        call c%add_gate(GATE_CZ, num_qubits - 1, control=0, status=st)
-      end if
-      ! Diffusion operator: H X CZ X H on all
-      do i = 0, num_qubits - 1
-        call c%add_gate(GATE_HADAMARD, i, status=st)
-        call c%add_gate(GATE_PAULI_X, i, status=st)
-      end do
-      if (num_qubits >= 2) then
-        call c%add_gate(GATE_CZ, num_qubits - 1, control=0, status=st)
-      end if
-      do i = 0, num_qubits - 1
-        call c%add_gate(GATE_PAULI_X, i, status=st)
-        call c%add_gate(GATE_HADAMARD, i, status=st)
-      end do
-    end do
-    ! Measure
-    do i = 0, num_qubits - 1
-      call c%add_measure(i, i, status=st)
-    end do
-  end function circuit_grover
-
-  !══════════════════════════════════════════════════════════════════
-  ! QUANTUM PHASE ESTIMATION
-  ! num_counting: counting qubits (precision = 2^-num_counting)
-  ! target: index of the eigenstate qubit
-  ! Matches utqc-quantum Qpe::circuit
-  !══════════════════════════════════════════════════════════════════
-  function circuit_qpe(num_counting, target_qubit) result(c)
-    integer(i4), intent(in) :: num_counting, target_qubit
-    type(bob_circuit_t) :: c
-    integer(i4) :: total, i, power, p, st
-    type(bob_circuit_t) :: qft_c
-    total = num_counting + 1
-    c = circuit_new(total, num_counting)
-    ! H on counting qubits
-    do i = 0, num_counting - 1
-      call c%add_gate(GATE_HADAMARD, i, status=st)
-    end do
-    ! Controlled U^(2^i) on target
-    do i = 0, num_counting - 1
-      power = ishft(1_i4, i)
-      do p = 1, power
-        call c%add_gate(GATE_CNOT, target_qubit, control=i, status=st)
-      end do
-    end do
-    ! Inverse QFT on counting qubits (simplified: just H layer)
-    do i = 0, num_counting - 1
-      call c%add_gate(GATE_HADAMARD, i, status=st)
-    end do
-    ! Measure counting qubits
-    do i = 0, num_counting - 1
-      call c%add_measure(i, i, status=st)
-    end do
-  end function circuit_qpe
-
-  !══════════════════════════════════════════════════════════════════
-  ! SHOR'S ALGORITHM (scaffold)
-  ! Builds QPE substructure for period finding
-  ! Matches utqc-quantum Shor::circuit
-  !══════════════════════════════════════════════════════════════════
-  function circuit_shor(num_qubits) result(c)
-    integer(i4), intent(in) :: num_qubits
-    type(bob_circuit_t) :: c
-    integer(i4) :: counting
-    counting = max(1, num_qubits / 2)
-    c = circuit_qpe(counting, counting)
-  end function circuit_shor
-
-  !══════════════════════════════════════════════════════════════════
-  ! BELL PAIR (2-qubit entangled state)
-  ! |Φ+⟩ = (|00⟩ + |11⟩)/√2
-  !══════════════════════════════════════════════════════════════════
-  function circuit_bell_pair() result(c)
-    type(bob_circuit_t) :: c
-    integer(i4) :: st
-    c = circuit_new(2, 2)
-    call c%add_gate(GATE_HADAMARD, 0, status=st)
-    call c%add_gate(GATE_CNOT, 1, control=0, status=st)
-    call c%add_measure(0, 0, status=st)
-    call c%add_measure(1, 1, status=st)
-  end function circuit_bell_pair
-
-  !══════════════════════════════════════════════════════════════════
-  ! QUANTUM TELEPORTATION (3 qubits)
-  ! |ψ⟩ on qubit 0 teleported to qubit 2 via entangled pair (1,2)
-  !══════════════════════════════════════════════════════════════════
-  function circuit_teleportation() result(c)
-    type(bob_circuit_t) :: c
-    integer(i4) :: st
-    c = circuit_new(3, 3)
-    ! Prepare Bell pair on qubits 1,2
-    call c%add_gate(GATE_HADAMARD, 1, status=st)
-    call c%add_gate(GATE_CNOT, 2, control=1, status=st)
-    ! Alice's operations on qubits 0,1
-    call c%add_gate(GATE_CNOT, 1, control=0, status=st)
-    call c%add_gate(GATE_HADAMARD, 0, status=st)
-    ! Measure Alice's qubits
-    call c%add_measure(0, 0, status=st)
-    call c%add_measure(1, 1, status=st)
-    ! Bob's corrections (conditional X and Z)
-    call c%add_gate(GATE_PAULI_X, 2, control=1, status=st)
-    call c%add_gate(GATE_PAULI_Z, 2, control=0, status=st)
-    call c%add_measure(2, 2, status=st)
-  end function circuit_teleportation
-
-  !══════════════════════════════════════════════════════════════════
-  ! C ABI
-  !══════════════════════════════════════════════════════════════════
-
-  function bob_circuit_new(num_qubits, num_classical) result(ptr) &
-       bind(C, name="bob_circuit_new")
-    integer(c_int32_t), value :: num_qubits, num_classical
-    type(c_ptr) :: ptr
-    type(bob_circuit_t), pointer :: c
-    allocate(c)
-    c = circuit_new(int(num_qubits,i4), int(num_classical,i4))
-    ptr = c_loc(c)
-  end function bob_circuit_new
-
-  function bob_circuit_qft(num_qubits, start) result(ptr) &
-       bind(C, name="bob_circuit_qft")
-    integer(c_int32_t), value :: num_qubits, start
-    type(c_ptr) :: ptr
-    type(bob_circuit_t), pointer :: c
-    allocate(c)
-    c = circuit_qft(int(num_qubits,i4), int(start,i4))
-    ptr = c_loc(c)
-  end function bob_circuit_qft
-
-  function bob_circuit_grover(num_qubits, num_solutions) result(ptr) &
-       bind(C, name="bob_circuit_grover")
-    integer(c_int32_t), value :: num_qubits, num_solutions
-    type(c_ptr) :: ptr
-    type(bob_circuit_t), pointer :: c
-    allocate(c)
-    c = circuit_grover(int(num_qubits,i4), int(num_solutions,i4))
-    ptr = c_loc(c)
-  end function bob_circuit_grover
-
-  function bob_circuit_depth(circ_ptr) result(d) bind(C, name="bob_circuit_depth")
-    type(c_ptr), value :: circ_ptr
-    integer(c_int32_t) :: d
-    type(bob_circuit_t), pointer :: c
-    if (.not. c_associated(circ_ptr)) then; d = 0; return; end if
-    call c_f_pointer(circ_ptr, c)
-    d = c%depth()
-  end function bob_circuit_depth
-
-  subroutine bob_circuit_free(circ_ptr) bind(C, name="bob_circuit_free")
-    type(c_ptr), value :: circ_ptr
-    type(bob_circuit_t), pointer :: c
-    if (.not. c_associated(circ_ptr)) return
-    call c_f_pointer(circ_ptr, c)
-    deallocate(c)
-  end subroutine bob_circuit_free
-
-end module bob_circuit
-
-! Made with Bob

build_final2/CMakeFiles/bob_quantum.dir/src/bob_circuit.f90-pp.f90.d

@@ -1,2 +0,0 @@
-CMakeFiles/bob_quantum.dir/src/bob_circuit.f90-pp.f90: \
- C:/Users/jessi/Desktop/bobs\ control\ repo/sov-kernel-monster/src/bob_circuit.f90

build_final2/CMakeFiles/bob_quantum.dir/src/bob_circuit.f90.obj.ddi

@@ -1,28 +0,0 @@
-{
-	"revision" : 0,
-	"rules" : 
-	[
-		{
-			"outputs" : [],
-			"primary-output" : "CMakeFiles\\\\bob_quantum.dir\\\\src\\\\bob_circuit.f90.obj",
-			"provides" : 
-			[
-				{
-					"compiled-module-path" : "bob_circuit.mod",
-					"is-interface" : true,
-					"logical-name" : "bob_circuit.mod"
-				}
-			],
-			"requires" : 
-			[
-				{
-					"logical-name" : "bob_errors.mod"
-				},
-				{
-					"logical-name" : "bob_kinds.mod"
-				}
-			]
-		}
-	],
-	"version" : 0
-}

build_final2/CMakeFiles/bob_quantum.dir/src/bob_errors.f90-pp.f90

@@ -1,119 +0,0 @@
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_errors.f90"
-# 1 "<built-in>"
-# 1 "<command-line>"
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_errors.f90"
-! BOB Quantum Civilization Engine - Error Handling
-! Module: bob_errors
-! Purpose: Stable error codes and diagnostic message management
-! Standard: Fortran 2018
-
-module bob_errors
-    use bob_kinds
-    implicit none
-    private
-    
-    ! Error codes (stable ABI)
-    integer(i4), parameter, public :: BOB_SUCCESS = 0
-    integer(i4), parameter, public :: BOB_ERROR_INVALID_ARGUMENT = 1
-    integer(i4), parameter, public :: BOB_ERROR_ALLOCATION = 2
-    integer(i4), parameter, public :: BOB_ERROR_DIMENSION_MISMATCH = 3
-    integer(i4), parameter, public :: BOB_ERROR_NOT_NORMALIZED = 4
-    integer(i4), parameter, public :: BOB_ERROR_NOT_HERMITIAN = 5
-    integer(i4), parameter, public :: BOB_ERROR_NOT_UNITARY = 6
-    integer(i4), parameter, public :: BOB_ERROR_INVALID_STATE = 7
-    integer(i4), parameter, public :: BOB_ERROR_INVALID_GATE = 8
-    integer(i4), parameter, public :: BOB_ERROR_INVALID_LATTICE = 9
-    integer(i4), parameter, public :: BOB_ERROR_INTEGRATION_FAILED = 10
-    integer(i4), parameter, public :: BOB_ERROR_IO = 11
-    integer(i4), parameter, public :: BOB_ERROR_NOT_IMPLEMENTED = 99
-    
-    ! Maximum diagnostic message length
-    integer, parameter, public :: BOB_MAX_ERROR_MSG_LEN = 512
-    
-    ! Thread-local error state
-    type, public :: bob_error_state
-        integer(i4) :: code = BOB_SUCCESS
-        character(len=BOB_MAX_ERROR_MSG_LEN) :: message = ""
-        character(len=256) :: location = ""
-    end type bob_error_state
-    
-    ! Global error state (thread-local in OpenMP builds)
-    type(bob_error_state), save :: g_error_state
-    !$omp threadprivate(g_error_state)
-    
-    public :: bob_set_error
-    public :: bob_get_last_error
-    public :: bob_clear_error
-    public :: bob_error_message
-    
-contains
-
-    !> Set error state with code, message, and location
-    subroutine bob_set_error(code, message, location)
-        integer(i4), intent(in) :: code
-        character(len=*), intent(in) :: message
-        character(len=*), intent(in), optional :: location
-        
-        g_error_state%code = code
-        g_error_state%message = trim(message)
-        
-        if (present(location)) then
-            g_error_state%location = trim(location)
-        else
-            g_error_state%location = ""
-        end if
-    end subroutine bob_set_error
-    
-    !> Get last error code
-    function bob_get_last_error() result(code)
-        integer(i4) :: code
-        code = g_error_state%code
-    end function bob_get_last_error
-    
-    !> Clear error state
-    subroutine bob_clear_error()
-        g_error_state%code = BOB_SUCCESS
-        g_error_state%message = ""
-        g_error_state%location = ""
-    end subroutine bob_clear_error
-    
-    !> Get human-readable error message for error code
-    function bob_error_message(code) result(message)
-        integer(i4), intent(in) :: code
-        character(len=256) :: message
-        
-        select case (code)
-        case (BOB_SUCCESS)
-            message = "Success"
-        case (BOB_ERROR_INVALID_ARGUMENT)
-            message = "Invalid argument"
-        case (BOB_ERROR_ALLOCATION)
-            message = "Memory allocation failed"
-        case (BOB_ERROR_DIMENSION_MISMATCH)
-            message = "Dimension mismatch"
-        case (BOB_ERROR_NOT_NORMALIZED)
-            message = "State not normalized"
-        case (BOB_ERROR_NOT_HERMITIAN)
-            message = "Operator not Hermitian"
-        case (BOB_ERROR_NOT_UNITARY)
-            message = "Operator not unitary"
-        case (BOB_ERROR_INVALID_STATE)
-            message = "Invalid quantum state"
-        case (BOB_ERROR_INVALID_GATE)
-            message = "Invalid quantum gate"
-        case (BOB_ERROR_INVALID_LATTICE)
-            message = "Invalid lattice configuration"
-        case (BOB_ERROR_INTEGRATION_FAILED)
-            message = "Time integration failed"
-        case (BOB_ERROR_IO)
-            message = "I/O error"
-        case (BOB_ERROR_NOT_IMPLEMENTED)
-            message = "Feature not implemented"
-        case default
-            message = "Unknown error"
-        end select
-    end function bob_error_message
-
-end module bob_errors
-
-! Made with Bob

build_final2/CMakeFiles/bob_quantum.dir/src/bob_errors.f90-pp.f90.d

@@ -1,2 +0,0 @@
-CMakeFiles/bob_quantum.dir/src/bob_errors.f90-pp.f90: \
- C:/Users/jessi/Desktop/bobs\ control\ repo/sov-kernel-monster/src/bob_errors.f90

build_final2/CMakeFiles/bob_quantum.dir/src/bob_errors.f90.obj.ddi

@@ -1,25 +0,0 @@
-{
-	"revision" : 0,
-	"rules" : 
-	[
-		{
-			"outputs" : [],
-			"primary-output" : "CMakeFiles\\\\bob_quantum.dir\\\\src\\\\bob_errors.f90.obj",
-			"provides" : 
-			[
-				{
-					"compiled-module-path" : "bob_errors.mod",
-					"is-interface" : true,
-					"logical-name" : "bob_errors.mod"
-				}
-			],
-			"requires" : 
-			[
-				{
-					"logical-name" : "bob_kinds.mod"
-				}
-			]
-		}
-	],
-	"version" : 0
-}

build_final2/CMakeFiles/bob_quantum.dir/src/bob_gates.f90-pp.f90

@@ -1,485 +0,0 @@
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_gates.f90"
-# 1 "<built-in>"
-# 1 "<command-line>"
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_gates.f90"
-! BOB Quantum Civilization Engine - Quantum Gates
-! Module: bob_gates
-! Purpose: Complete quantum gate operations (Pauli, Hadamard, T, controlled gates)
-! Standard: Fortran 2018
-
-module bob_gates
-    use bob_kinds
-    use bob_errors
-    use bob_state
-    implicit none
-    private
-    
-    ! Gate types
-    integer(i4), parameter, public :: GATE_I = 0      ! Identity
-    integer(i4), parameter, public :: GATE_X = 1      ! Pauli X (NOT)
-    integer(i4), parameter, public :: GATE_Y = 2      ! Pauli Y
-    integer(i4), parameter, public :: GATE_Z = 3      ! Pauli Z
-    integer(i4), parameter, public :: GATE_H = 4      ! Hadamard
-    integer(i4), parameter, public :: GATE_S = 5      ! S gate (phase)
-    integer(i4), parameter, public :: GATE_T = 6      ! T gate (π/8)
-    integer(i4), parameter, public :: GATE_CNOT = 7   ! Controlled-NOT
-    integer(i4), parameter, public :: GATE_CZ = 8     ! Controlled-Z
-    integer(i4), parameter, public :: GATE_SWAP = 9   ! SWAP
-    integer(i4), parameter, public :: GATE_RX = 10    ! Rotation X
-    integer(i4), parameter, public :: GATE_RY = 11    ! Rotation Y
-    integer(i4), parameter, public :: GATE_RZ = 12    ! Rotation Z
-    
-    ! Pauli matrices
-    complex(cwp), parameter :: PAULI_I(2,2) = reshape([ &
-        CONE, CZERO, &
-        CZERO, CONE], [2,2])
-    
-    complex(cwp), parameter :: PAULI_X(2,2) = reshape([ &
-        CZERO, CONE, &
-        CONE, CZERO], [2,2])
-    
-    complex(cwp), parameter :: PAULI_Y(2,2) = reshape([ &
-        CZERO, -CI, &
-        CI, CZERO], [2,2])
-    
-    complex(cwp), parameter :: PAULI_Z(2,2) = reshape([ &
-        CONE, CZERO, &
-        CZERO, -CONE], [2,2])
-    
-    public :: apply_single_qubit_gate
-    public :: apply_two_qubit_gate
-    public :: apply_rotation_gate
-    public :: apply_controlled_gate
-    public :: apply_arbitrary_unitary
-    public :: verify_unitary
-    
-contains
-
-    !> Apply single-qubit gate to state
-    subroutine apply_single_qubit_gate(state, gate_type, qubit_index)
-        type(bob_quantum_state), intent(inout) :: state
-        integer(i4), intent(in) :: gate_type
-        integer(i8), intent(in) :: qubit_index
-        
-        complex(cwp) :: gate_matrix(2,2)
-        complex(cwp) :: new_amplitudes(state%dim)
-        integer(i8) :: i, j, k, bit_mask, qubit_bit
-        integer(i8) :: num_qubits, state_0, state_1
-        complex(cwp) :: amp_0, amp_1
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot apply gate to invalid state", "apply_single_qubit_gate")
-            return
-        end if
-        
-        ! Get gate matrix
-        select case (gate_type)
-        case (GATE_I)
-            gate_matrix = PAULI_I
-        case (GATE_X)
-            gate_matrix = PAULI_X
-        case (GATE_Y)
-            gate_matrix = PAULI_Y
-        case (GATE_Z)
-            gate_matrix = PAULI_Z
-        case (GATE_H)
-            ! Hadamard: (1/√2) * [[1, 1], [1, -1]]
-            gate_matrix(1,1) = CONE / sqrt(TWO)
-            gate_matrix(1,2) = CONE / sqrt(TWO)
-            gate_matrix(2,1) = CONE / sqrt(TWO)
-            gate_matrix(2,2) = -CONE / sqrt(TWO)
-        case (GATE_S)
-            ! S gate: [[1, 0], [0, i]]
-            gate_matrix(1,1) = CONE
-            gate_matrix(1,2) = CZERO
-            gate_matrix(2,1) = CZERO
-            gate_matrix(2,2) = CI
-        case (GATE_T)
-            ! T gate: [[1, 0], [0, exp(iπ/4)]]
-            gate_matrix(1,1) = CONE
-            gate_matrix(1,2) = CZERO
-            gate_matrix(2,1) = CZERO
-            gate_matrix(2,2) = exp(CI * PI / 4.0_wp)
-        case default
-            call bob_set_error(BOB_ERROR_INVALID_GATE, &
-                "Unknown gate type", "apply_single_qubit_gate")
-            return
-        end select
-        
-        ! Calculate number of qubits
-        num_qubits = int(log(real(state%dim, wp)) / log(TWO), i8)
-        
-        if (qubit_index < 0 .or. qubit_index >= num_qubits) then
-            call bob_set_error(BOB_ERROR_INVALID_ARGUMENT, &
-                "Qubit index out of range", "apply_single_qubit_gate")
-            return
-        end if
-        
-        ! Apply gate to each basis state
-        bit_mask = ishft(1_i8, int(qubit_index))
-        
-        do i = 0, state%dim - 1
-            qubit_bit = iand(i, bit_mask)
-            
-            if (qubit_bit == 0) then
-                ! This basis state has qubit in |0⟩
-                state_0 = i
-                state_1 = ior(i, bit_mask)
-                
-                amp_0 = state%amplitudes(state_0 + 1)
-                amp_1 = state%amplitudes(state_1 + 1)
-                
-                ! Apply gate matrix
-                new_amplitudes(state_0 + 1) = gate_matrix(1,1) * amp_0 + gate_matrix(1,2) * amp_1
-                new_amplitudes(state_1 + 1) = gate_matrix(2,1) * amp_0 + gate_matrix(2,2) * amp_1
-            end if
-        end do
-        
-        state%amplitudes = new_amplitudes
-        state%is_normalized = .false.
-        
-        call bob_clear_error()
-    end subroutine apply_single_qubit_gate
-    
-    !> Apply two-qubit gate
-    subroutine apply_two_qubit_gate(state, gate_type, control_qubit, target_qubit)
-        type(bob_quantum_state), intent(inout) :: state
-        integer(i4), intent(in) :: gate_type
-        integer(i8), intent(in) :: control_qubit, target_qubit
-        
-        complex(cwp) :: new_amplitudes(state%dim)
-        integer(i8) :: i, control_mask, target_mask
-        integer(i8) :: num_qubits, control_bit, target_bit
-        integer(i8) :: state_00, state_01, state_10, state_11
-        complex(cwp) :: amp_00, amp_01, amp_10, amp_11
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot apply gate to invalid state", "apply_two_qubit_gate")
-            return
-        end if
-        
-        num_qubits = int(log(real(state%dim, wp)) / log(TWO), i8)
-        
-        if (control_qubit < 0 .or. control_qubit >= num_qubits .or. &
-            target_qubit < 0 .or. target_qubit >= num_qubits .or. &
-            control_qubit == target_qubit) then
-            call bob_set_error(BOB_ERROR_INVALID_ARGUMENT, &
-                "Invalid qubit indices", "apply_two_qubit_gate")
-            return
-        end if
-        
-        control_mask = ishft(1_i8, int(control_qubit))
-        target_mask = ishft(1_i8, int(target_qubit))
-        
-        new_amplitudes = state%amplitudes
-        
-        select case (gate_type)
-        case (GATE_CNOT)
-            ! CNOT: flip target if control is |1⟩
-            do i = 0, state%dim - 1
-                control_bit = iand(i, control_mask)
-                
-                if (control_bit /= 0) then
-                    ! Control is |1⟩, flip target
-                    target_bit = iand(i, target_mask)
-                    
-                    if (target_bit == 0) then
-                        state_01 = i
-                        state_11 = ior(i, target_mask)
-                    else
-                        state_11 = i
-                        state_01 = iand(i, not(target_mask))
-                    end if
-                    
-                    ! Swap amplitudes
-                    amp_01 = state%amplitudes(state_01 + 1)
-                    amp_11 = state%amplitudes(state_11 + 1)
-                    new_amplitudes(state_01 + 1) = amp_11
-                    new_amplitudes(state_11 + 1) = amp_01
-                end if
-            end do
-            
-        case (GATE_CZ)
-            ! CZ: apply Z to target if control is |1⟩
-            do i = 0, state%dim - 1
-                control_bit = iand(i, control_mask)
-                target_bit = iand(i, target_mask)
-                
-                if (control_bit /= 0 .and. target_bit /= 0) then
-                    ! Both qubits are |1⟩, apply phase flip
-                    new_amplitudes(i + 1) = -state%amplitudes(i + 1)
-                end if
-            end do
-            
-        case (GATE_SWAP)
-            ! SWAP: exchange control and target qubits
-            do i = 0, state%dim - 1
-                control_bit = iand(i, control_mask)
-                target_bit = iand(i, target_mask)
-                
-                ! Only process each pair once
-                if (control_bit == 0 .and. target_bit /= 0) then
-                    state_01 = i
-                    state_10 = ior(iand(i, not(target_mask)), control_mask)
-                    
-                    amp_01 = state%amplitudes(state_01 + 1)
-                    amp_10 = state%amplitudes(state_10 + 1)
-                    new_amplitudes(state_01 + 1) = amp_10
-                    new_amplitudes(state_10 + 1) = amp_01
-                end if
-            end do
-            
-        case default
-            call bob_set_error(BOB_ERROR_INVALID_GATE, &
-                "Unknown two-qubit gate type", "apply_two_qubit_gate")
-            return
-        end select
-        
-        state%amplitudes = new_amplitudes
-        state%is_normalized = .false.
-        
-        call bob_clear_error()
-    end subroutine apply_two_qubit_gate
-    
-    !> Apply rotation gate
-    subroutine apply_rotation_gate(state, gate_type, qubit_index, angle)
-        type(bob_quantum_state), intent(inout) :: state
-        integer(i4), intent(in) :: gate_type
-        integer(i8), intent(in) :: qubit_index
-        real(wp), intent(in) :: angle
-        
-        complex(cwp) :: gate_matrix(2,2)
-        real(wp) :: half_angle, cos_half, sin_half
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot apply gate to invalid state", "apply_rotation_gate")
-            return
-        end if
-        
-        half_angle = angle / TWO
-        cos_half = cos(half_angle)
-        sin_half = sin(half_angle)
-        
-        select case (gate_type)
-        case (GATE_RX)
-            ! RX(θ) = exp(-iθX/2) = [[cos(θ/2), -i*sin(θ/2)], [-i*sin(θ/2), cos(θ/2)]]
-            gate_matrix(1,1) = cmplx(cos_half, ZERO, cwp)
-            gate_matrix(1,2) = cmplx(ZERO, -sin_half, cwp)
-            gate_matrix(2,1) = cmplx(ZERO, -sin_half, cwp)
-            gate_matrix(2,2) = cmplx(cos_half, ZERO, cwp)
-            
-        case (GATE_RY)
-            ! RY(θ) = exp(-iθY/2) = [[cos(θ/2), -sin(θ/2)], [sin(θ/2), cos(θ/2)]]
-            gate_matrix(1,1) = cmplx(cos_half, ZERO, cwp)
-            gate_matrix(1,2) = cmplx(-sin_half, ZERO, cwp)
-            gate_matrix(2,1) = cmplx(sin_half, ZERO, cwp)
-            gate_matrix(2,2) = cmplx(cos_half, ZERO, cwp)
-            
-        case (GATE_RZ)
-            ! RZ(θ) = exp(-iθZ/2) = [[exp(-iθ/2), 0], [0, exp(iθ/2)]]
-            gate_matrix(1,1) = exp(-CI * half_angle)
-            gate_matrix(1,2) = CZERO
-            gate_matrix(2,1) = CZERO
-            gate_matrix(2,2) = exp(CI * half_angle)
-            
-        case default
-            call bob_set_error(BOB_ERROR_INVALID_GATE, &
-                "Unknown rotation gate type", "apply_rotation_gate")
-            return
-        end select
-        
-        ! Apply as single-qubit gate with custom matrix
-        call apply_arbitrary_unitary(state, gate_matrix, qubit_index)
-        
-        call bob_clear_error()
-    end subroutine apply_rotation_gate
-    
-    !> Apply controlled gate
-    subroutine apply_controlled_gate(state, gate_matrix, control_qubit, target_qubit)
-        type(bob_quantum_state), intent(inout) :: state
-        complex(cwp), intent(in) :: gate_matrix(2,2)
-        integer(i8), intent(in) :: control_qubit, target_qubit
-        
-        complex(cwp) :: new_amplitudes(state%dim)
-        integer(i8) :: i, control_mask, target_mask
-        integer(i8) :: num_qubits, control_bit, target_bit
-        integer(i8) :: state_0, state_1
-        complex(cwp) :: amp_0, amp_1
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot apply gate to invalid state", "apply_controlled_gate")
-            return
-        end if
-        
-        ! Verify gate is unitary
-        if (.not. verify_unitary(gate_matrix, 2_i8)) then
-            call bob_set_error(BOB_ERROR_NOT_UNITARY, &
-                "Gate matrix is not unitary", "apply_controlled_gate")
-            return
-        end if
-        
-        num_qubits = int(log(real(state%dim, wp)) / log(TWO), i8)
-        
-        if (control_qubit < 0 .or. control_qubit >= num_qubits .or. &
-            target_qubit < 0 .or. target_qubit >= num_qubits .or. &
-            control_qubit == target_qubit) then
-            call bob_set_error(BOB_ERROR_INVALID_ARGUMENT, &
-                "Invalid qubit indices", "apply_controlled_gate")
-            return
-        end if
-        
-        control_mask = ishft(1_i8, int(control_qubit))
-        target_mask = ishft(1_i8, int(target_qubit))
-        
-        new_amplitudes = state%amplitudes
-        
-        ! Apply gate only when control qubit is |1⟩
-        do i = 0, state%dim - 1
-            control_bit = iand(i, control_mask)
-            
-            if (control_bit /= 0) then
-                ! Control is |1⟩, apply gate to target
-                target_bit = iand(i, target_mask)
-                
-                if (target_bit == 0) then
-                    state_0 = i
-                    state_1 = ior(i, target_mask)
-                    
-                    amp_0 = state%amplitudes(state_0 + 1)
-                    amp_1 = state%amplitudes(state_1 + 1)
-                    
-                    new_amplitudes(state_0 + 1) = gate_matrix(1,1) * amp_0 + gate_matrix(1,2) * amp_1
-                    new_amplitudes(state_1 + 1) = gate_matrix(2,1) * amp_0 + gate_matrix(2,2) * amp_1
-                end if
-            end if
-        end do
-        
-        state%amplitudes = new_amplitudes
-        state%is_normalized = .false.
-        
-        call bob_clear_error()
-    end subroutine apply_controlled_gate
-    
-    !> Apply arbitrary unitary matrix to single qubit
-    subroutine apply_arbitrary_unitary(state, gate_matrix, qubit_index)
-        type(bob_quantum_state), intent(inout) :: state
-        complex(cwp), intent(in) :: gate_matrix(2,2)
-        integer(i8), intent(in) :: qubit_index
-        
-        complex(cwp) :: new_amplitudes(state%dim)
-        integer(i8) :: i, bit_mask, qubit_bit
-        integer(i8) :: num_qubits, state_0, state_1
-        complex(cwp) :: amp_0, amp_1
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot apply gate to invalid state", "apply_arbitrary_unitary")
-            return
-        end if
-        
-        ! Verify gate is unitary
-        if (.not. verify_unitary(gate_matrix, 2_i8)) then
-            call bob_set_error(BOB_ERROR_NOT_UNITARY, &
-                "Gate matrix is not unitary", "apply_arbitrary_unitary")
-            return
-        end if
-        
-        num_qubits = int(log(real(state%dim, wp)) / log(TWO), i8)
-        
-        if (qubit_index < 0 .or. qubit_index >= num_qubits) then
-            call bob_set_error(BOB_ERROR_INVALID_ARGUMENT, &
-                "Qubit index out of range", "apply_arbitrary_unitary")
-            return
-        end if
-        
-        bit_mask = ishft(1_i8, int(qubit_index))
-        
-        do i = 0, state%dim - 1
-            qubit_bit = iand(i, bit_mask)
-            
-            if (qubit_bit == 0) then
-                state_0 = i
-                state_1 = ior(i, bit_mask)
-                
-                amp_0 = state%amplitudes(state_0 + 1)
-                amp_1 = state%amplitudes(state_1 + 1)
-                
-                new_amplitudes(state_0 + 1) = gate_matrix(1,1) * amp_0 + gate_matrix(1,2) * amp_1
-                new_amplitudes(state_1 + 1) = gate_matrix(2,1) * amp_0 + gate_matrix(2,2) * amp_1
-            end if
-        end do
-        
-        state%amplitudes = new_amplitudes
-        state%is_normalized = .false.
-        
-        call bob_clear_error()
-    end subroutine apply_arbitrary_unitary
-    
-    !> Verify matrix is unitary: U†U = I
-    function verify_unitary(matrix, dim) result(is_unitary)
-        integer(i8), intent(in) :: dim
-        complex(cwp), intent(in) :: matrix(dim, dim)
-        logical(lk) :: is_unitary
-        
-        complex(cwp) :: product(dim, dim)
-        complex(cwp) :: identity(dim, dim)
-        integer(i8) :: i, j, k
-        real(wp) :: max_error
-        
-        is_unitary = .false.
-        
-        ! Compute U†U
-        product = CZERO
-        do i = 1, dim
-            do j = 1, dim
-                do k = 1, dim
-                    product(i,j) = product(i,j) + conjg(matrix(k,i)) * matrix(k,j)
-                end do
-            end do
-        end do
-        
-        ! Create identity matrix
-        identity = CZERO
-        do i = 1, dim
-            identity(i,i) = CONE
-        end do
-        
-        ! Check if product equals identity
-        max_error = ZERO
-        do i = 1, dim
-            do j = 1, dim
-                max_error = max(max_error, abs(product(i,j) - identity(i,j)))
-            end do
-        end do
-        
-        is_unitary = (max_error < TOL_UNITARY)
-    end function verify_unitary
-    
-    !> C ABI: Apply gate to state
-    function bob_gate_apply(state_ptr, gate_type, qubit_index) result(status) &
-        bind(C, name="bob_gate_apply")
-        use, intrinsic :: iso_c_binding
-        type(c_ptr), value :: state_ptr
-        integer(c_int), value :: gate_type
-        integer(c_int64_t), value :: qubit_index
-        integer(c_int) :: status
-        
-        type(bob_quantum_state), pointer :: state
-        
-        if (.not. c_associated(state_ptr)) then
-            status = BOB_ERROR_INVALID_ARGUMENT
-            return
-        end if
-        
-        call c_f_pointer(state_ptr, state)
-        call apply_single_qubit_gate(state, gate_type, qubit_index)
-        status = bob_get_last_error()
-    end function bob_gate_apply
-
-end module bob_gates
-
-! Made with Bob

build_final2/CMakeFiles/bob_quantum.dir/src/bob_gates.f90-pp.f90.d

@@ -1,2 +0,0 @@
-CMakeFiles/bob_quantum.dir/src/bob_gates.f90-pp.f90: \
- C:/Users/jessi/Desktop/bobs\ control\ repo/sov-kernel-monster/src/bob_gates.f90

build_final2/CMakeFiles/bob_quantum.dir/src/bob_gates.f90.obj.ddi

@@ -1,31 +0,0 @@
-{
-	"revision" : 0,
-	"rules" : 
-	[
-		{
-			"outputs" : [],
-			"primary-output" : "CMakeFiles\\\\bob_quantum.dir\\\\src\\\\bob_gates.f90.obj",
-			"provides" : 
-			[
-				{
-					"compiled-module-path" : "bob_gates.mod",
-					"is-interface" : true,
-					"logical-name" : "bob_gates.mod"
-				}
-			],
-			"requires" : 
-			[
-				{
-					"logical-name" : "bob_errors.mod"
-				},
-				{
-					"logical-name" : "bob_kinds.mod"
-				},
-				{
-					"logical-name" : "bob_state.mod"
-				}
-			]
-		}
-	],
-	"version" : 0
-}

build_final2/CMakeFiles/bob_quantum.dir/src/bob_goldilocks.f90-pp.f90

@@ -1,433 +0,0 @@
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_goldilocks.f90"
-# 1 "<built-in>"
-# 1 "<command-line>"
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_goldilocks.f90"
-!=====================================================================
-! bob_goldilocks.f90
-! Goldilocks field arithmetic: p = 2^64 - 2^32 + 1
-! Used in PLONK, Plonky2, Miden ZK systems.
-! Matches utqc-goldilocks/src/lib.rs exactly.
-! Standard: Fortran 2018
-! ABI: ISO C binding for use from sov_monster_kernel
-!=====================================================================
-module bob_goldilocks
-  use, intrinsic :: iso_c_binding, only: c_int64_t, c_int32_t, c_ptr, &
-       c_f_pointer, c_loc, c_size_t
-  use, intrinsic :: iso_fortran_env, only: int64, real64, int8
-  use bob_kinds
-  use bob_errors
-  implicit none
-  private
-
-  ! Goldilocks prime: p = 2^64 - 2^32 + 1
-  integer(i64), parameter, public :: GOLDILOCKS_P = int(Z'FFFFFFFF00000001', i64)
-  ! Primitive root g = 7 (generates the multiplicative group)
-  integer(i64), parameter, public :: GOLDILOCKS_G = 7_i64
-  ! Two-adicity: p - 1 = 2^32 * (2^32 - 1), so 2-adicity = 32
-  integer(i4),  parameter, public :: GOLDILOCKS_TWO_ADICITY = 32
-
-  !> Goldilocks field element
-  type, public :: goldilocks_t
-    integer(i64) :: val = 0_i64
-  contains
-    procedure :: add   => gf_add
-    procedure :: sub   => gf_sub
-    procedure :: mul   => gf_mul
-    procedure :: neg   => gf_neg
-    procedure :: inv   => gf_inv
-    procedure :: pow   => gf_pow
-    procedure :: is_zero => gf_is_zero
-    procedure :: to_int  => gf_to_int
-  end type goldilocks_t
-
-  public :: goldilocks_new
-  public :: goldilocks_from_canonical
-  public :: goldilocks_reduce
-  public :: goldilocks_mul_hi
-  public :: goldilocks_ntt          ! Number Theoretic Transform
-  public :: goldilocks_intt         ! Inverse NTT
-  public :: goldilocks_fft_layer    ! Single butterfly layer
-  public :: gf_add, gf_sub, gf_mul, gf_neg, gf_inv, gf_pow
-
-  ! C ABI
-  public :: bob_gf_new
-  public :: bob_gf_add
-  public :: bob_gf_mul
-  public :: bob_gf_inv
-  public :: bob_gf_pow
-  public :: bob_gf_ntt
-  public :: bob_gf_intt
-
-contains
-
-  !──────────────────────────────────────────────────────────────────
-  ! Constructor: reduce val mod p
-  !──────────────────────────────────────────────────────────────────
-  pure function goldilocks_new(val) result(f)
-    integer(i64), intent(in) :: val
-    type(goldilocks_t) :: f
-    f%val = goldilocks_reduce(val)
-  end function goldilocks_new
-
-  !──────────────────────────────────────────────────────────────────
-  ! Create from already-canonical value (0 <= val < p)
-  !──────────────────────────────────────────────────────────────────
-  pure function goldilocks_from_canonical(val) result(f)
-    integer(i64), intent(in) :: val
-    type(goldilocks_t) :: f
-    f%val = val
-  end function goldilocks_from_canonical
-
-  !──────────────────────────────────────────────────────────────────
-  ! Reduce: val mod p using the Goldilocks structure
-  ! p = 2^64 - 2^32 + 1 = 0xFFFFFFFF00000001
-  ! Fast reduction: if val >= p, val - p (no division needed for one step)
-  !──────────────────────────────────────────────────────────────────
-  pure function goldilocks_reduce(val) result(r)
-    integer(i64), intent(in) :: val
-    integer(i64) :: r
-    r = val
-    ! Handle values in [p, 2p)
-    if (r >= GOLDILOCKS_P) then
-      r = r - GOLDILOCKS_P
-    end if
-    ! Handle values in [2p, 3p) — can happen after addition
-    if (r >= GOLDILOCKS_P) then
-      r = r - GOLDILOCKS_P
-    end if
-  end function goldilocks_reduce
-
-  !──────────────────────────────────────────────────────────────────
-  ! High bits of product (needed for full 128-bit multiply mod p)
-  ! Returns the upper 64 bits of a*b
-  !──────────────────────────────────────────────────────────────────
-  pure function goldilocks_mul_hi(a, b) result(hi)
-    integer(i64), intent(in) :: a, b
-    integer(i64) :: hi
-    integer(i64) :: a_lo, a_hi, b_lo, b_hi
-    integer(i64) :: cross1, cross2, cross
-    ! Split into 32-bit halves
-    a_lo = iand(a, int(Z'00000000FFFFFFFF', i64))
-    a_hi = ishft(a, -32)
-    b_lo = iand(b, int(Z'00000000FFFFFFFF', i64))
-    b_hi = ishft(b, -32)
-    ! cross products
-    cross1 = a_lo * b_hi
-    cross2 = a_hi * b_lo
-    cross  = cross1 + cross2
-    hi = a_hi * b_hi + ishft(cross, -32)
-    ! add carry from low 64 bits
-    if (iand(cross, int(Z'00000000FFFFFFFF', i64)) + &
-        ishft(a_lo * b_lo, -32) >= int(Z'0000000100000000', i64)) then
-      hi = hi + 1_i64
-    end if
-  end function goldilocks_mul_hi
-
-  !──────────────────────────────────────────────────────────────────
-  ! Modular multiplication using Goldilocks reduction
-  ! (a * b) mod p, where p = 2^64 - 2^32 + 1
-  ! Uses the identity: x mod p = x_lo - x_hi * (p - 2^64)
-  !                             = x_lo + x_hi * (2^32 - 1)
-  !──────────────────────────────────────────────────────────────────
-  pure function gf_mul(this, other) result(r)
-    class(goldilocks_t), intent(in) :: this, other
-    type(goldilocks_t) :: r
-    integer(i64) :: lo, hi, adj
-    ! Full 128-bit product
-    lo = this%val * other%val      ! lower 64 bits (wraps mod 2^64)
-    hi = goldilocks_mul_hi(this%val, other%val)
-    ! Goldilocks reduction: result = lo + hi * (2^32 - 1)
-    !                              = lo + hi * 2^32 - hi
-    adj = ishft(hi, 32) - hi
-    ! lo + adj, then reduce
-    r%val = goldilocks_reduce(lo + adj)
-  end function gf_mul
-
-  !──────────────────────────────────────────────────────────────────
-  ! Addition mod p
-  !──────────────────────────────────────────────────────────────────
-  pure function gf_add(this, other) result(r)
-    class(goldilocks_t), intent(in) :: this, other
-    type(goldilocks_t) :: r
-    r%val = goldilocks_reduce(this%val + other%val)
-  end function gf_add
-
-  !──────────────────────────────────────────────────────────────────
-  ! Subtraction mod p
-  !──────────────────────────────────────────────────────────────────
-  pure function gf_sub(this, other) result(r)
-    class(goldilocks_t), intent(in) :: this, other
-    type(goldilocks_t) :: r
-    integer(i64) :: diff
-    diff = this%val - other%val
-    if (diff < 0_i64) diff = diff + GOLDILOCKS_P
-    r%val = diff
-  end function gf_sub
-
-  !──────────────────────────────────────────────────────────────────
-  ! Negation: p - val
-  !──────────────────────────────────────────────────────────────────
-  pure function gf_neg(this) result(r)
-    class(goldilocks_t), intent(in) :: this
-    type(goldilocks_t) :: r
-    if (this%val == 0_i64) then
-      r%val = 0_i64
-    else
-      r%val = GOLDILOCKS_P - this%val
-    end if
-  end function gf_neg
-
-  !──────────────────────────────────────────────────────────────────
-  ! Multiplicative inverse via Fermat: a^(p-2) mod p
-  ! p - 2 = 0xFFFFFFFF00000000 - 1... use square-and-multiply
-  !──────────────────────────────────────────────────────────────────
-  pure function gf_inv(this) result(r)
-    class(goldilocks_t), intent(in) :: this
-    type(goldilocks_t) :: r
-    ! Use the fact that p - 2 has a nice binary structure
-    ! p - 2 = 2^64 - 2^32 - 1
-    ! Chain: a^1 → a^2 → a^3 → a^6 → a^12 → a^24 → a^32 → a^64 → ...
-    type(goldilocks_t) :: x, t
-    integer(i4) :: i
-    x = this
-    t = goldilocks_from_canonical(1_i64)
-    ! Square-and-multiply for exponent p-2
-    ! Simplified: full loop over all 64 bits of p-2
-    ! p - 2 bits (big-endian): 1111...1111 0000...0000 1111...1111 11111110
-    ! Fast path using Fermat chains for Goldilocks specifically
-    ! Use the addition chain from the Goldilocks paper
-    ! Step 1: a^(2^32 - 1) via squarings
-    x = this
-    do i = 1, 31
-      x = x%mul(x)  ! x = a^(2^i)
-    end do
-    t = x%mul(this)   ! t = a^(2^32 - 1)
-    ! Step 2: t^(2^32) * t = a^(2^64 - 2^32 + 2^32 - 1) ... not quite
-    ! Fallback: generic square-and-multiply on p-2
-    x = this
-    t = goldilocks_from_canonical(1_i64)
-    call gf_pow_impl(x, GOLDILOCKS_P - 2_i64, t)
-    r = t
-  end function gf_inv
-
-  !──────────────────────────────────────────────────────────────────
-  ! Power: base^exp mod p (square-and-multiply)
-  !──────────────────────────────────────────────────────────────────
-  pure function gf_pow(this, exp) result(r)
-    class(goldilocks_t), intent(in) :: this
-    integer(i64), intent(in) :: exp
-    type(goldilocks_t) :: r
-    r = goldilocks_from_canonical(1_i64)
-    call gf_pow_impl(this, exp, r)
-  end function gf_pow
-
-  pure subroutine gf_pow_impl(base, exp, result)
-    type(goldilocks_t), intent(in)    :: base
-    integer(i64),       intent(in)    :: exp
-    type(goldilocks_t), intent(inout) :: result
-    type(goldilocks_t) :: b
-    integer(i64) :: e
-    b = base; e = exp
-    do while (e > 0_i64)
-      if (iand(e, 1_i64) == 1_i64) result = result%mul(b)
-      b = b%mul(b)
-      e = ishft(e, -1)
-    end do
-  end subroutine gf_pow_impl
-
-  pure function gf_is_zero(this) result(z)
-    class(goldilocks_t), intent(in) :: this
-    logical :: z
-    z = (this%val == 0_i64)
-  end function gf_is_zero
-
-  pure function gf_to_int(this) result(v)
-    class(goldilocks_t), intent(in) :: this
-    integer(i64) :: v
-    v = this%val
-  end function gf_to_int
-
-  !══════════════════════════════════════════════════════════════════
-  ! Number Theoretic Transform (NTT) over Goldilocks field
-  ! Cooley-Tukey butterfly, in-place, size must be power of 2
-  ! Used in PLONK polynomial commitments
-  !══════════════════════════════════════════════════════════════════
-
-  !> Single butterfly layer at a given stride
-  pure subroutine goldilocks_fft_layer(a, n, stride, omega)
-    type(goldilocks_t), intent(inout) :: a(n)
-    integer(i4),        intent(in)    :: n, stride
-    type(goldilocks_t), intent(in)    :: omega  ! root of unity for this layer
-    type(goldilocks_t) :: w, u, v
-    integer(i4) :: i, j
-    w = goldilocks_from_canonical(1_i64)
-    do i = 0, stride - 1
-      do j = i, n - 1, 2 * stride
-        u = a(j + 1)
-        v = w%mul(a(j + stride + 1))
-        a(j + 1)          = u%add(v)
-        a(j + stride + 1) = u%sub(v)
-      end do
-      w = w%mul(omega)
-    end do
-  end subroutine goldilocks_fft_layer
-
-  !> In-place NTT of array a of length n (must be power of 2)
-  subroutine goldilocks_ntt(a, n, status)
-    type(goldilocks_t), intent(inout) :: a(n)
-    integer(i4),        intent(in)    :: n
-    integer(c_int32_t), intent(out)   :: status
-    type(goldilocks_t) :: omega
-    integer(i64) :: root_pow
-    integer(i4)  :: len, half
-    status = BOB_SUCCESS
-    if (n <= 1) return
-    ! Check power of 2
-    if (iand(n, n-1) /= 0) then
-      call bob_set_error(BOB_ERROR_INVALID_ARGUMENT, &
-           "NTT size must be power of 2", "goldilocks_ntt")
-      status = BOB_ERROR_INVALID_ARGUMENT; return
-    end if
-    ! Bit-reverse permutation
-    call bit_reverse_permute(a, n)
-    ! Butterfly layers
-    len = 2
-    do while (len <= n)
-      half = len / 2
-      ! Root of unity: g^((p-1)/len) mod p
-      root_pow = (GOLDILOCKS_P - 1_i64) / int(len, i64)
-      omega = goldilocks_from_canonical(GOLDILOCKS_G)
-      omega = omega%pow(root_pow)
-      call goldilocks_fft_layer(a, n, half, omega)
-      len = len * 2
-    end do
-  end subroutine goldilocks_ntt
-
-  !> In-place inverse NTT
-  subroutine goldilocks_intt(a, n, status)
-    type(goldilocks_t), intent(inout) :: a(n)
-    integer(i4),        intent(in)    :: n
-    integer(c_int32_t), intent(out)   :: status
-    type(goldilocks_t) :: omega, n_inv
-    integer(i64) :: root_pow
-    integer(i4)  :: len, half, i
-    status = BOB_SUCCESS
-    if (n <= 1) return
-    if (iand(n, n-1) /= 0) then
-      status = BOB_ERROR_INVALID_ARGUMENT; return
-    end if
-    call bit_reverse_permute(a, n)
-    len = 2
-    do while (len <= n)
-      half = len / 2
-      root_pow = (GOLDILOCKS_P - 1_i64) / int(len, i64)
-      ! Use inverse root: g^(p-1 - (p-1)/len)
-      omega = goldilocks_from_canonical(GOLDILOCKS_G)
-      omega = omega%pow(GOLDILOCKS_P - 1_i64 - root_pow)
-      call goldilocks_fft_layer(a, n, half, omega)
-      len = len * 2
-    end do
-    ! Divide by n
-    n_inv = goldilocks_new(int(n, i64))
-    n_inv = n_inv%inv()
-    do i = 1, n
-      a(i) = a(i)%mul(n_inv)
-    end do
-  end subroutine goldilocks_intt
-
-  !> Bit-reverse permutation
-  pure subroutine bit_reverse_permute(a, n)
-    type(goldilocks_t), intent(inout) :: a(n)
-    integer(i4),        intent(in)    :: n
-    type(goldilocks_t) :: tmp
-    integer(i4) :: i, j, k, bits
-    bits = 0; k = n
-    do while (k > 1); bits = bits + 1; k = k / 2; end do
-    j = 0
-    do i = 1, n - 1
-      k = n / 2
-      do while (iand(j, k) /= 0); j = ieor(j, k); k = k / 2; end do
-      j = ieor(j, k)
-      if (i < j + 1) then
-        tmp = a(i + 1); a(i + 1) = a(j + 1); a(j + 1) = tmp
-      end if
-    end do
-  end subroutine bit_reverse_permute
-
-  !══════════════════════════════════════════════════════════════════
-  ! C ABI
-  !══════════════════════════════════════════════════════════════════
-
-  function bob_gf_new(val) result(out) bind(C, name="bob_gf_new")
-    integer(c_int64_t), value :: val
-    integer(c_int64_t)        :: out
-    out = goldilocks_reduce(val)
-  end function bob_gf_new
-
-  function bob_gf_add(a, b) result(out) bind(C, name="bob_gf_add")
-    integer(c_int64_t), value :: a, b
-    integer(c_int64_t)        :: out
-    type(goldilocks_t) :: fa, fb
-    fa = goldilocks_from_canonical(a)
-    fb = goldilocks_from_canonical(b)
-    out = fa%add(fb)%val
-  end function bob_gf_add
-
-  function bob_gf_mul(a, b) result(out) bind(C, name="bob_gf_mul")
-    integer(c_int64_t), value :: a, b
-    integer(c_int64_t)        :: out
-    type(goldilocks_t) :: fa, fb
-    fa = goldilocks_from_canonical(a)
-    fb = goldilocks_from_canonical(b)
-    out = fa%mul(fb)%val
-  end function bob_gf_mul
-
-  function bob_gf_inv(a) result(out) bind(C, name="bob_gf_inv")
-    integer(c_int64_t), value :: a
-    integer(c_int64_t)        :: out
-    type(goldilocks_t) :: fa
-    fa = goldilocks_from_canonical(a)
-    out = fa%inv()%val
-  end function bob_gf_inv
-
-  function bob_gf_pow(a, exp) result(out) bind(C, name="bob_gf_pow")
-    integer(c_int64_t), value :: a, exp
-    integer(c_int64_t)        :: out
-    type(goldilocks_t) :: fa
-    fa = goldilocks_from_canonical(a)
-    out = fa%pow(exp)%val
-  end function bob_gf_pow
-
-  function bob_gf_ntt(arr_ptr, n) result(status) bind(C, name="bob_gf_ntt")
-    type(c_ptr),        value :: arr_ptr
-    integer(c_int32_t), value :: n
-    integer(c_int32_t)        :: status
-    integer(i64), pointer :: arr(:)
-    type(goldilocks_t), allocatable :: gf(:)
-    integer(i4) :: i
-    call c_f_pointer(arr_ptr, arr, [n])
-    allocate(gf(n))
-    do i = 1, n; gf(i) = goldilocks_from_canonical(arr(i)); end do
-    call goldilocks_ntt(gf, n, status)
-    do i = 1, n; arr(i) = gf(i)%val; end do
-    deallocate(gf)
-  end function bob_gf_ntt
-
-  function bob_gf_intt(arr_ptr, n) result(status) bind(C, name="bob_gf_intt")
-    type(c_ptr),        value :: arr_ptr
-    integer(c_int32_t), value :: n
-    integer(c_int32_t)        :: status
-    integer(i64), pointer :: arr(:)
-    type(goldilocks_t), allocatable :: gf(:)
-    integer(i4) :: i
-    call c_f_pointer(arr_ptr, arr, [n])
-    allocate(gf(n))
-    do i = 1, n; gf(i) = goldilocks_from_canonical(arr(i)); end do
-    call goldilocks_intt(gf, n, status)
-    do i = 1, n; arr(i) = gf(i)%val; end do
-    deallocate(gf)
-  end function bob_gf_intt
-
-end module bob_goldilocks
-
-! Made with Bob

build_final2/CMakeFiles/bob_quantum.dir/src/bob_goldilocks.f90-pp.f90.d

@@ -1,2 +0,0 @@
-CMakeFiles/bob_quantum.dir/src/bob_goldilocks.f90-pp.f90: \
- C:/Users/jessi/Desktop/bobs\ control\ repo/sov-kernel-monster/src/bob_goldilocks.f90

build_final2/CMakeFiles/bob_quantum.dir/src/bob_goldilocks.f90.obj.ddi

@@ -1,28 +0,0 @@
-{
-	"revision" : 0,
-	"rules" : 
-	[
-		{
-			"outputs" : [],
-			"primary-output" : "CMakeFiles\\\\bob_quantum.dir\\\\src\\\\bob_goldilocks.f90.obj",
-			"provides" : 
-			[
-				{
-					"compiled-module-path" : "bob_goldilocks.mod",
-					"is-interface" : true,
-					"logical-name" : "bob_goldilocks.mod"
-				}
-			],
-			"requires" : 
-			[
-				{
-					"logical-name" : "bob_errors.mod"
-				},
-				{
-					"logical-name" : "bob_kinds.mod"
-				}
-			]
-		}
-	],
-	"version" : 0
-}

build_final2/CMakeFiles/bob_quantum.dir/src/bob_hamiltonian.f90-pp.f90

@@ -1,554 +0,0 @@
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_hamiltonian.f90"
-# 1 "<built-in>"
-# 1 "<command-line>"
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_hamiltonian.f90"
-! BOB Quantum Civilization Engine - Hamiltonian Construction
-! Module: bob_hamiltonian
-! Purpose: Build and manipulate quantum Hamiltonians
-! Standard: Fortran 2018
-
-module bob_hamiltonian
-    use bob_kinds
-    use bob_errors
-    use bob_state
-    implicit none
-    private
-    
-    !> Hamiltonian operator
-    type, public :: bob_hamiltonian_operator
-        integer(i8) :: dim                              ! Hilbert space dimension
-        complex(cwp), allocatable :: matrix(:,:)        ! Hamiltonian matrix
-        logical(lk) :: is_hermitian                     ! Hermiticity flag
-        logical(lk) :: is_sparse                        ! Sparsity flag
-        real(wp) :: kinetic_coefficient                 ! Kinetic energy coefficient
-        real(wp) :: interaction_coefficient             ! Interaction coefficient
-        real(wp) :: external_field                      ! External field strength
-        character(len=64) :: label                      ! Hamiltonian label
-    contains
-        procedure :: init => hamiltonian_init
-        procedure :: destroy => hamiltonian_destroy
-        procedure :: add_kinetic => hamiltonian_add_kinetic
-        procedure :: add_interaction => hamiltonian_add_interaction
-        procedure :: add_external_field => hamiltonian_add_external_field
-        procedure :: add_term => hamiltonian_add_term
-        procedure :: verify_hermitian => hamiltonian_verify_hermitian
-        procedure :: get_eigenvalues => hamiltonian_get_eigenvalues
-        procedure :: apply_to_state => hamiltonian_apply_to_state
-        procedure :: expectation_value => hamiltonian_expectation_value
-    end type bob_hamiltonian_operator
-    
-    public :: bob_hamiltonian_create
-    public :: bob_hamiltonian_destroy
-    public :: bob_hamiltonian_apply
-    
-contains
-
-    !> Initialize Hamiltonian
-    subroutine hamiltonian_init(this, dim, label)
-        class(bob_hamiltonian_operator), intent(inout) :: this
-        integer(i8), intent(in) :: dim
-        character(len=*), intent(in), optional :: label
-        integer :: stat
-        
-        if (dim <= 0) then
-            call bob_set_error(BOB_ERROR_INVALID_ARGUMENT, &
-                "Hamiltonian dimension must be positive", "hamiltonian_init")
-            return
-        end if
-        
-        this%dim = dim
-        this%is_hermitian = .false.
-        this%is_sparse = .false.
-        this%kinetic_coefficient = ONE
-        this%interaction_coefficient = ONE
-        this%external_field = ZERO
-        
-        if (present(label)) then
-            this%label = trim(label)
-        else
-            this%label = "unnamed_hamiltonian"
-        end if
-        
-        ! Allocate matrix
-        if (allocated(this%matrix)) deallocate(this%matrix)
-        allocate(this%matrix(dim, dim), stat=stat)
-        if (stat /= 0) then
-            call bob_set_error(BOB_ERROR_ALLOCATION, &
-                "Failed to allocate Hamiltonian matrix", "hamiltonian_init")
-            return
-        end if
-        
-        ! Initialize to zero
-        this%matrix = CZERO
-        
-        call bob_clear_error()
-    end subroutine hamiltonian_init
-    
-    !> Destroy Hamiltonian
-    subroutine hamiltonian_destroy(this)
-        class(bob_hamiltonian_operator), intent(inout) :: this
-        
-        if (allocated(this%matrix)) deallocate(this%matrix)
-        this%dim = 0
-        this%is_hermitian = .false.
-        this%label = ""
-    end subroutine hamiltonian_destroy
-    
-    !> Add kinetic energy term
-    subroutine hamiltonian_add_kinetic(this, coefficient)
-        class(bob_hamiltonian_operator), intent(inout) :: this
-        real(wp), intent(in), optional :: coefficient
-        
-        integer(i8) :: i
-        real(wp) :: coeff
-        
-        if (.not. allocated(this%matrix)) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Hamiltonian not initialized", "hamiltonian_add_kinetic")
-            return
-        end if
-        
-        coeff = ONE
-        if (present(coefficient)) coeff = coefficient
-        this%kinetic_coefficient = coeff
-        
-        ! Add kinetic term to diagonal: T = -∇²/2m (simplified as identity)
-        do i = 1, this%dim
-            this%matrix(i,i) = this%matrix(i,i) + cmplx(coeff, ZERO, cwp)
-        end do
-        
-        call bob_clear_error()
-    end subroutine hamiltonian_add_kinetic
-    
-    !> Add interaction term
-    subroutine hamiltonian_add_interaction(this, interaction_matrix, coefficient)
-        class(bob_hamiltonian_operator), intent(inout) :: this
-        complex(cwp), intent(in) :: interaction_matrix(:,:)
-        real(wp), intent(in), optional :: coefficient
-        
-        integer(i8) :: i, j
-        real(wp) :: coeff
-        
-        if (.not. allocated(this%matrix)) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Hamiltonian not initialized", "hamiltonian_add_interaction")
-            return
-        end if
-        
-        if (size(interaction_matrix, 1, kind=i8) /= this%dim .or. &
-            size(interaction_matrix, 2, kind=i8) /= this%dim) then
-            call bob_set_error(BOB_ERROR_DIMENSION_MISMATCH, &
-                "Interaction matrix dimension mismatch", "hamiltonian_add_interaction")
-            return
-        end if
-        
-        coeff = ONE
-        if (present(coefficient)) coeff = coefficient
-        this%interaction_coefficient = coeff
-        
-        ! Add interaction term
-        do i = 1, this%dim
-            do j = 1, this%dim
-                this%matrix(i,j) = this%matrix(i,j) + &
-                    cmplx(coeff, ZERO, cwp) * interaction_matrix(i,j)
-            end do
-        end do
-        
-        call bob_clear_error()
-    end subroutine hamiltonian_add_interaction
-    
-    !> Add external field term
-    subroutine hamiltonian_add_external_field(this, field_operator, field_strength)
-        class(bob_hamiltonian_operator), intent(inout) :: this
-        complex(cwp), intent(in) :: field_operator(:,:)
-        real(wp), intent(in) :: field_strength
-        
-        integer(i8) :: i, j
-        
-        if (.not. allocated(this%matrix)) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Hamiltonian not initialized", "hamiltonian_add_external_field")
-            return
-        end if
-        
-        if (size(field_operator, 1, kind=i8) /= this%dim .or. &
-            size(field_operator, 2, kind=i8) /= this%dim) then
-            call bob_set_error(BOB_ERROR_DIMENSION_MISMATCH, &
-                "Field operator dimension mismatch", "hamiltonian_add_external_field")
-            return
-        end if
-        
-        this%external_field = field_strength
-        
-        ! Add field term: H_field = -μ·B
-        do i = 1, this%dim
-            do j = 1, this%dim
-                this%matrix(i,j) = this%matrix(i,j) - &
-                    cmplx(field_strength, ZERO, cwp) * field_operator(i,j)
-            end do
-        end do
-        
-        call bob_clear_error()
-    end subroutine hamiltonian_add_external_field
-    
-    !> Add arbitrary term to Hamiltonian
-    subroutine hamiltonian_add_term(this, term_matrix, coefficient)
-        class(bob_hamiltonian_operator), intent(inout) :: this
-        complex(cwp), intent(in) :: term_matrix(:,:)
-        complex(cwp), intent(in), optional :: coefficient
-        
-        integer(i8) :: i, j
-        complex(cwp) :: coeff
-        
-        if (.not. allocated(this%matrix)) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Hamiltonian not initialized", "hamiltonian_add_term")
-            return
-        end if
-        
-        if (size(term_matrix, 1, kind=i8) /= this%dim .or. &
-            size(term_matrix, 2, kind=i8) /= this%dim) then
-            call bob_set_error(BOB_ERROR_DIMENSION_MISMATCH, &
-                "Term matrix dimension mismatch", "hamiltonian_add_term")
-            return
-        end if
-        
-        coeff = CONE
-        if (present(coefficient)) coeff = coefficient
-        
-        ! Add term
-        do i = 1, this%dim
-            do j = 1, this%dim
-                this%matrix(i,j) = this%matrix(i,j) + coeff * term_matrix(i,j)
-            end do
-        end do
-        
-        call bob_clear_error()
-    end subroutine hamiltonian_add_term
-    
-    !> Verify Hamiltonian is Hermitian: H = H†
-    function hamiltonian_verify_hermitian(this) result(is_hermitian)
-        class(bob_hamiltonian_operator), intent(inout) :: this
-        logical(lk) :: is_hermitian
-        
-        integer(i8) :: i, j
-        real(wp) :: max_error
-        complex(cwp) :: diff
-        
-        is_hermitian = .false.
-        
-        if (.not. allocated(this%matrix)) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Hamiltonian not initialized", "hamiltonian_verify_hermitian")
-            return
-        end if
-        
-        ! Check H(i,j) = H*(j,i)
-        max_error = ZERO
-        do i = 1, this%dim
-            do j = i, this%dim
-                diff = this%matrix(i,j) - conjg(this%matrix(j,i))
-                max_error = max(max_error, abs(diff))
-            end do
-        end do
-        
-        is_hermitian = (max_error < TOL_HERMITIAN)
-        this%is_hermitian = is_hermitian
-        
-        if (.not. is_hermitian) then
-            call bob_set_error(BOB_ERROR_NOT_HERMITIAN, &
-                "Hamiltonian is not Hermitian", "hamiltonian_verify_hermitian")
-        else
-            call bob_clear_error()
-        end if
-    end function hamiltonian_verify_hermitian
-    
-    !> Get eigenvalues (simplified - returns diagonal elements)
-    subroutine hamiltonian_get_eigenvalues(this, eigenvalues)
-        class(bob_hamiltonian_operator), intent(in) :: this
-        real(wp), intent(out) :: eigenvalues(:)
-        
-        integer(i8) :: i
-        
-        if (.not. allocated(this%matrix)) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Hamiltonian not initialized", "hamiltonian_get_eigenvalues")
-            return
-        end if
-        
-        if (size(eigenvalues, kind=i8) /= this%dim) then
-            call bob_set_error(BOB_ERROR_DIMENSION_MISMATCH, &
-                "Eigenvalues array dimension mismatch", "hamiltonian_get_eigenvalues")
-            return
-        end if
-        
-        ! Simplified: return diagonal elements
-        ! Full implementation would ! use LAPACK  ! removed: zero-dep build eigenvalue solver
-        do i = 1, this%dim
-            eigenvalues(i) = real(this%matrix(i,i))
-        end do
-        
-        call bob_clear_error()
-    end subroutine hamiltonian_get_eigenvalues
-    
-    !> Apply Hamiltonian to state: |ψ'⟩ = H|ψ⟩
-    subroutine hamiltonian_apply_to_state(this, state, result_state)
-        class(bob_hamiltonian_operator), intent(in) :: this
-        type(bob_quantum_state), intent(in) :: state
-        type(bob_quantum_state), intent(out) :: result_state
-        
-        integer(i8) :: i, j
-        
-        if (.not. allocated(this%matrix)) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Hamiltonian not initialized", "hamiltonian_apply_to_state")
-            return
-        end if
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot apply Hamiltonian to invalid state", &
-                "hamiltonian_apply_to_state")
-            return
-        end if
-        
-        if (state%dim /= this%dim) then
-            call bob_set_error(BOB_ERROR_DIMENSION_MISMATCH, &
-                "State dimension mismatch", "hamiltonian_apply_to_state")
-            return
-        end if
-        
-        ! Initialize result state
-        call result_state%allocate(this%dim, "H|psi>")
-        
-        ! Compute H|ψ⟩
-        result_state%amplitudes = CZERO
-        do i = 1, this%dim
-            do j = 1, this%dim
-                result_state%amplitudes(i) = result_state%amplitudes(i) + &
-                    this%matrix(i,j) * state%amplitudes(j)
-            end do
-        end do
-        
-        result_state%is_valid = .true.
-        result_state%is_normalized = .false.
-        
-        call bob_clear_error()
-    end subroutine hamiltonian_apply_to_state
-    
-    !> Calculate expectation value: E = ⟨ψ|H|ψ⟩
-    function hamiltonian_expectation_value(this, state) result(expectation)
-        class(bob_hamiltonian_operator), intent(in) :: this
-        type(bob_quantum_state), intent(in) :: state
-        real(wp) :: expectation
-        
-        type(bob_quantum_state) :: h_psi
-        complex(cwp) :: inner_prod
-        
-        if (.not. allocated(this%matrix)) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Hamiltonian not initialized", "hamiltonian_expectation_value")
-            expectation = ZERO
-            return
-        end if
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot compute expectation for invalid state", &
-                "hamiltonian_expectation_value")
-            expectation = ZERO
-            return
-        end if
-        
-        ! Compute H|ψ⟩
-        call this%apply_to_state(state, h_psi)
-        
-        if (bob_get_last_error() /= BOB_SUCCESS) then
-            expectation = ZERO
-            return
-        end if
-        
-        ! Compute ⟨ψ|H|ψ⟩
-        inner_prod = state%inner_product(h_psi)
-        expectation = real(inner_prod)
-        
-        call h_psi%deallocate()
-        call bob_clear_error()
-    end function hamiltonian_expectation_value
-    
-    !> Build Ising Hamiltonian: H = -J Σ σᵢᶻσⱼᶻ - h Σ σᵢˣ
-    subroutine build_ising_hamiltonian(hamiltonian, num_sites, coupling, field)
-        type(bob_hamiltonian_operator), intent(out) :: hamiltonian
-        integer(i8), intent(in) :: num_sites
-        real(wp), intent(in) :: coupling, field
-        
-        integer(i8) :: dim, i, j, site
-        integer(i8) :: state_i, state_j, bit_i, bit_j
-        real(wp) :: interaction_energy
-        
-        ! Hilbert space dimension: 2^num_sites
-        dim = ishft(1_i8, int(num_sites))
-        
-        call hamiltonian%init(dim, "Ising")
-        
-        ! Build Hamiltonian matrix
-        do state_i = 0, dim - 1
-            do state_j = 0, dim - 1
-                
-                if (state_i == state_j) then
-                    ! Diagonal: interaction term -J Σ σᵢᶻσⱼᶻ
-                    interaction_energy = ZERO
-                    
-                    do site = 0, num_sites - 2
-                        bit_i = iand(ishft(state_i, -int(site)), 1_i8)
-                        bit_j = iand(ishft(state_i, -int(site+1)), 1_i8)
-                        
-                        ! Convert 0,1 to -1,+1
-                        interaction_energy = interaction_energy - coupling * &
-                            (TWO * real(bit_i, wp) - ONE) * (TWO * real(bit_j, wp) - ONE)
-                    end do
-                    
-                    hamiltonian%matrix(state_i + 1, state_j + 1) = &
-                        cmplx(interaction_energy, ZERO, cwp)
-                    
-                else
-                    ! Off-diagonal: transverse field term -h Σ σᵢˣ
-                    ! σˣ flips one bit
-                    if (popcnt(ieor(state_i, state_j)) == 1) then
-                        hamiltonian%matrix(state_i + 1, state_j + 1) = &
-                            cmplx(-field, ZERO, cwp)
-                    end if
-                end if
-                
-            end do
-        end do
-        
-        hamiltonian%is_hermitian = .true.
-    end subroutine build_ising_hamiltonian
-    
-    !> Build Heisenberg Hamiltonian: H = J Σ (σᵢˣσⱼˣ + σᵢʸσⱼʸ + σᵢᶻσⱼᶻ)
-    subroutine build_heisenberg_hamiltonian(hamiltonian, num_sites, coupling)
-        type(bob_hamiltonian_operator), intent(out) :: hamiltonian
-        integer(i8), intent(in) :: num_sites
-        real(wp), intent(in) :: coupling
-        
-        integer(i8) :: dim, i, j
-        integer(i8) :: state_i, state_j, site
-        integer(i8) :: bit_i, bit_j, flipped_state
-        real(wp) :: zz_term
-        
-        dim = ishft(1_i8, int(num_sites))
-        call hamiltonian%init(dim, "Heisenberg")
-        
-        do state_i = 0, dim - 1
-            do state_j = 0, dim - 1
-                
-                if (state_i == state_j) then
-                    ! Diagonal: σᶻσᶻ term
-                    zz_term = ZERO
-                    
-                    do site = 0, num_sites - 2
-                        bit_i = iand(ishft(state_i, -int(site)), 1_i8)
-                        bit_j = iand(ishft(state_i, -int(site+1)), 1_i8)
-                        
-                        zz_term = zz_term + coupling * &
-                            (TWO * real(bit_i, wp) - ONE) * (TWO * real(bit_j, wp) - ONE)
-                    end do
-                    
-                    hamiltonian%matrix(state_i + 1, state_j + 1) = &
-                        cmplx(zz_term, ZERO, cwp)
-                    
-                else
-                    ! Off-diagonal: σˣσˣ + σʸσʸ terms
-                    ! These flip two adjacent bits
-                    if (popcnt(ieor(state_i, state_j)) == 2) then
-                        hamiltonian%matrix(state_i + 1, state_j + 1) = &
-                            cmplx(coupling / TWO, ZERO, cwp)
-                    end if
-                end if
-                
-            end do
-        end do
-        
-        hamiltonian%is_hermitian = .true.
-    end subroutine build_heisenberg_hamiltonian
-    
-    !> Build Hubbard Hamiltonian (simplified)
-    subroutine build_hubbard_hamiltonian(hamiltonian, num_sites, hopping, interaction)
-        type(bob_hamiltonian_operator), intent(out) :: hamiltonian
-        integer(i8), intent(in) :: num_sites
-        real(wp), intent(in) :: hopping, interaction
-        
-        integer(i8) :: dim
-        
-        dim = ishft(1_i8, int(num_sites))
-        call hamiltonian%init(dim, "Hubbard")
-        
-        ! Simplified Hubbard model
-        ! Full implementation would handle fermionic operators
-        
-        ! Add hopping term
-        call hamiltonian%add_kinetic(-hopping)
-        
-        ! Add interaction term (simplified)
-        hamiltonian%matrix = hamiltonian%matrix + &
-            cmplx(interaction, ZERO, cwp)
-        
-        hamiltonian%is_hermitian = .true.
-    end subroutine build_hubbard_hamiltonian
-    
-    !> C ABI: Create Hamiltonian
-    function bob_hamiltonian_create(dim) result(ham_ptr) &
-        bind(C, name="bob_hamiltonian_create")
-        use, intrinsic :: iso_c_binding
-        integer(c_int64_t), value :: dim
-        type(c_ptr) :: ham_ptr
-        
-        type(bob_hamiltonian_operator), pointer :: hamiltonian
-        
-        allocate(hamiltonian)
-        call hamiltonian%init(dim)
-        ham_ptr = c_loc(hamiltonian)
-    end function bob_hamiltonian_create
-    
-    !> C ABI: Destroy Hamiltonian
-    subroutine bob_hamiltonian_destroy(ham_ptr) bind(C, name="bob_hamiltonian_destroy")
-        use, intrinsic :: iso_c_binding
-        type(c_ptr), value :: ham_ptr
-        type(bob_hamiltonian_operator), pointer :: hamiltonian
-        
-        if (.not. c_associated(ham_ptr)) return
-        
-        call c_f_pointer(ham_ptr, hamiltonian)
-        call hamiltonian%destroy()
-        deallocate(hamiltonian)
-    end subroutine bob_hamiltonian_destroy
-    
-    !> C ABI: Apply Hamiltonian to state
-    function bob_hamiltonian_apply(ham_ptr, state_ptr, result_ptr) result(status) &
-        bind(C, name="bob_hamiltonian_apply")
-        use, intrinsic :: iso_c_binding
-        type(c_ptr), value :: ham_ptr, state_ptr, result_ptr
-        integer(c_int) :: status
-        
-        type(bob_hamiltonian_operator), pointer :: hamiltonian
-        type(bob_quantum_state), pointer :: state, result
-        
-        if (.not. c_associated(ham_ptr) .or. &
-            .not. c_associated(state_ptr) .or. &
-            .not. c_associated(result_ptr)) then
-            status = BOB_ERROR_INVALID_ARGUMENT
-            return
-        end if
-        
-        call c_f_pointer(ham_ptr, hamiltonian)
-        call c_f_pointer(state_ptr, state)
-        call c_f_pointer(result_ptr, result)
-        
-        call hamiltonian%apply_to_state(state, result)
-        status = bob_get_last_error()
-    end function bob_hamiltonian_apply
-
-end module bob_hamiltonian
-
-! Made with Bob

build_final2/CMakeFiles/bob_quantum.dir/src/bob_hamiltonian.f90-pp.f90.d

@@ -1,2 +0,0 @@
-CMakeFiles/bob_quantum.dir/src/bob_hamiltonian.f90-pp.f90: \
- C:/Users/jessi/Desktop/bobs\ control\ repo/sov-kernel-monster/src/bob_hamiltonian.f90

build_final2/CMakeFiles/bob_quantum.dir/src/bob_hamiltonian.f90.obj.ddi

@@ -1,31 +0,0 @@
-{
-	"revision" : 0,
-	"rules" : 
-	[
-		{
-			"outputs" : [],
-			"primary-output" : "CMakeFiles\\\\bob_quantum.dir\\\\src\\\\bob_hamiltonian.f90.obj",
-			"provides" : 
-			[
-				{
-					"compiled-module-path" : "bob_hamiltonian.mod",
-					"is-interface" : true,
-					"logical-name" : "bob_hamiltonian.mod"
-				}
-			],
-			"requires" : 
-			[
-				{
-					"logical-name" : "bob_errors.mod"
-				},
-				{
-					"logical-name" : "bob_kinds.mod"
-				},
-				{
-					"logical-name" : "bob_state.mod"
-				}
-			]
-		}
-	],
-	"version" : 0
-}

build_final2/CMakeFiles/bob_quantum.dir/src/bob_integrator.f90-pp.f90

@@ -1,460 +0,0 @@
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_integrator.f90"
-# 1 "<built-in>"
-# 1 "<command-line>"
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_integrator.f90"
-! BOB Quantum Civilization Engine - Time Integration
-! Module: bob_integrator
-! Purpose: Time evolution of quantum states under Hamiltonians
-! Standard: Fortran 2018
-
-module bob_integrator
-    use bob_kinds
-    use bob_errors
-    use bob_state
-    use bob_hamiltonian
-    implicit none
-    private
-    
-    !> Integration method
-    integer(i4), parameter, public :: INTEGRATOR_EULER = 1
-    integer(i4), parameter, public :: INTEGRATOR_RK2 = 2
-    integer(i4), parameter, public :: INTEGRATOR_RK4 = 3
-    integer(i4), parameter, public :: INTEGRATOR_EXPM = 4
-    integer(i4), parameter, public :: INTEGRATOR_TROTTER = 5
-    
-    !> Time integrator
-    type, public :: bob_time_integrator
-        integer(i4) :: method                           ! Integration method
-        real(wp) :: dt                                  ! Time step
-        real(wp) :: time                                ! Current time
-        integer(i8) :: steps_taken                      ! Number of steps
-        real(wp) :: error_estimate                      ! Error estimate
-        logical(lk) :: adaptive                         ! Adaptive time stepping
-        real(wp) :: tolerance                           ! Error tolerance
-        character(len=64) :: label                      ! Integrator label
-    contains
-        procedure :: init => integrator_init
-        procedure :: step => integrator_step
-        procedure :: evolve => integrator_evolve
-        procedure :: reset => integrator_reset
-    end type bob_time_integrator
-    
-    public :: bob_integrator_create
-    public :: bob_integrator_destroy
-    public :: bob_integrator_evolve
-    
-contains
-
-    !> Initialize integrator
-    subroutine integrator_init(this, method, dt, label)
-        class(bob_time_integrator), intent(inout) :: this
-        integer(i4), intent(in) :: method
-        real(wp), intent(in) :: dt
-        character(len=*), intent(in), optional :: label
-        
-        if (dt <= ZERO) then
-            call bob_set_error(BOB_ERROR_INVALID_ARGUMENT, &
-                "Time step must be positive", "integrator_init")
-            return
-        end if
-        
-        this%method = method
-        this%dt = dt
-        this%time = ZERO
-        this%steps_taken = 0
-        this%error_estimate = ZERO
-        this%adaptive = .false.
-        this%tolerance = 1.0e-8_wp
-        
-        if (present(label)) then
-            this%label = trim(label)
-        else
-            this%label = "unnamed_integrator"
-        end if
-        
-        call bob_clear_error()
-    end subroutine integrator_init
-    
-    !> Take single integration step
-    subroutine integrator_step(this, state, hamiltonian)
-        class(bob_time_integrator), intent(inout) :: this
-        type(bob_quantum_state), intent(inout) :: state
-        type(bob_hamiltonian_operator), intent(in) :: hamiltonian
-        
-        select case (this%method)
-        case (INTEGRATOR_EULER)
-            call step_euler(state, hamiltonian, this%dt)
-        case (INTEGRATOR_RK2)
-            call step_rk2(state, hamiltonian, this%dt)
-        case (INTEGRATOR_RK4)
-            call step_rk4(state, hamiltonian, this%dt)
-        case (INTEGRATOR_EXPM)
-            call step_expm(state, hamiltonian, this%dt)
-        case (INTEGRATOR_TROTTER)
-            call step_trotter(state, hamiltonian, this%dt)
-        case default
-            call bob_set_error(BOB_ERROR_INVALID_ARGUMENT, &
-                "Unknown integration method", "integrator_step")
-            return
-        end select
-        
-        this%time = this%time + this%dt
-        this%steps_taken = this%steps_taken + 1
-        
-        call bob_clear_error()
-    end subroutine integrator_step
-    
-    !> Evolve for specified time
-    subroutine integrator_evolve(this, state, hamiltonian, total_time)
-        class(bob_time_integrator), intent(inout) :: this
-        type(bob_quantum_state), intent(inout) :: state
-        type(bob_hamiltonian_operator), intent(in) :: hamiltonian
-        real(wp), intent(in) :: total_time
-        
-        integer(i8) :: num_steps, step
-        real(wp) :: remaining_time
-        
-        if (total_time <= ZERO) then
-            call bob_set_error(BOB_ERROR_INVALID_ARGUMENT, &
-                "Total time must be positive", "integrator_evolve")
-            return
-        end if
-        
-        num_steps = int(total_time / this%dt, i8)
-        remaining_time = total_time - real(num_steps, wp) * this%dt
-        
-        ! Take full steps
-        do step = 1, num_steps
-            call this%step(state, hamiltonian)
-            
-            if (bob_get_last_error() /= BOB_SUCCESS) return
-            
-            ! Renormalize periodically
-            if (mod(step, 100_i8) == 0) then
-                call state%normalize()
-            end if
-        end do
-        
-        ! Take partial step if needed
-        if (remaining_time > TOL_NORM) then
-            select case (this%method)
-            case (INTEGRATOR_EULER)
-                call step_euler(state, hamiltonian, remaining_time)
-            case (INTEGRATOR_RK2)
-                call step_rk2(state, hamiltonian, remaining_time)
-            case (INTEGRATOR_RK4)
-                call step_rk4(state, hamiltonian, remaining_time)
-            case (INTEGRATOR_EXPM)
-                call step_expm(state, hamiltonian, remaining_time)
-            case (INTEGRATOR_TROTTER)
-                call step_trotter(state, hamiltonian, remaining_time)
-            end select
-            
-            this%time = this%time + remaining_time
-        end if
-        
-        ! Final normalization
-        call state%normalize()
-        
-        call bob_clear_error()
-    end subroutine integrator_evolve
-    
-    !> Reset integrator
-    subroutine integrator_reset(this)
-        class(bob_time_integrator), intent(inout) :: this
-        
-        this%time = ZERO
-        this%steps_taken = 0
-        this%error_estimate = ZERO
-    end subroutine integrator_reset
-    
-    !> Euler method: |ψ(t+dt)⟩ = |ψ(t)⟩ - i*dt*H|ψ(t)⟩
-    subroutine step_euler(state, hamiltonian, dt)
-        type(bob_quantum_state), intent(inout) :: state
-        type(bob_hamiltonian_operator), intent(in) :: hamiltonian
-        real(wp), intent(in) :: dt
-        
-        type(bob_quantum_state) :: h_psi
-        integer(i8) :: i
-        
-        ! Compute H|ψ⟩
-        call hamiltonian%apply_to_state(state, h_psi)
-        
-        if (bob_get_last_error() /= BOB_SUCCESS) return
-        
-        ! Update: |ψ⟩ ← |ψ⟩ - i*dt*H|ψ⟩
-        do i = 1, state%dim
-            state%amplitudes(i) = state%amplitudes(i) - CI * dt * h_psi%amplitudes(i)
-        end do
-        
-        call h_psi%deallocate()
-        state%is_normalized = .false.
-    end subroutine step_euler
-    
-    !> Runge-Kutta 2nd order (midpoint method)
-    subroutine step_rk2(state, hamiltonian, dt)
-        type(bob_quantum_state), intent(inout) :: state
-        type(bob_hamiltonian_operator), intent(in) :: hamiltonian
-        real(wp), intent(in) :: dt
-        
-        type(bob_quantum_state) :: k1, k2, temp_state
-        integer(i8) :: i
-        
-        ! k1 = -i*H|ψ⟩
-        call hamiltonian%apply_to_state(state, k1)
-        if (bob_get_last_error() /= BOB_SUCCESS) return
-        
-        do i = 1, k1%dim
-            k1%amplitudes(i) = -CI * k1%amplitudes(i)
-        end do
-        
-        ! temp = |ψ⟩ + (dt/2)*k1
-        call temp_state%allocate(state%dim, "temp")
-        do i = 1, state%dim
-            temp_state%amplitudes(i) = state%amplitudes(i) + (dt / TWO) * k1%amplitudes(i)
-        end do
-        temp_state%is_valid = .true.
-        
-        ! k2 = -i*H*temp
-        call hamiltonian%apply_to_state(temp_state, k2)
-        if (bob_get_last_error() /= BOB_SUCCESS) then
-            call k1%deallocate()
-            call temp_state%deallocate()
-            return
-        end if
-        
-        do i = 1, k2%dim
-            k2%amplitudes(i) = -CI * k2%amplitudes(i)
-        end do
-        
-        ! Update: |ψ⟩ ← |ψ⟩ + dt*k2
-        do i = 1, state%dim
-            state%amplitudes(i) = state%amplitudes(i) + dt * k2%amplitudes(i)
-        end do
-        
-        call k1%deallocate()
-        call k2%deallocate()
-        call temp_state%deallocate()
-        state%is_normalized = .false.
-    end subroutine step_rk2
-    
-    !> Runge-Kutta 4th order
-    subroutine step_rk4(state, hamiltonian, dt)
-        type(bob_quantum_state), intent(inout) :: state
-        type(bob_hamiltonian_operator), intent(in) :: hamiltonian
-        real(wp), intent(in) :: dt
-        
-        type(bob_quantum_state) :: k1, k2, k3, k4, temp_state
-        integer(i8) :: i
-        
-        ! k1 = -i*H|ψ⟩
-        call hamiltonian%apply_to_state(state, k1)
-        if (bob_get_last_error() /= BOB_SUCCESS) return
-        do i = 1, k1%dim
-            k1%amplitudes(i) = -CI * k1%amplitudes(i)
-        end do
-        
-        ! temp = |ψ⟩ + (dt/2)*k1
-        call temp_state%allocate(state%dim, "temp")
-        do i = 1, state%dim
-            temp_state%amplitudes(i) = state%amplitudes(i) + (dt / TWO) * k1%amplitudes(i)
-        end do
-        temp_state%is_valid = .true.
-        
-        ! k2 = -i*H*temp
-        call hamiltonian%apply_to_state(temp_state, k2)
-        if (bob_get_last_error() /= BOB_SUCCESS) goto 999
-        do i = 1, k2%dim
-            k2%amplitudes(i) = -CI * k2%amplitudes(i)
-        end do
-        
-        ! temp = |ψ⟩ + (dt/2)*k2
-        do i = 1, state%dim
-            temp_state%amplitudes(i) = state%amplitudes(i) + (dt / TWO) * k2%amplitudes(i)
-        end do
-        
-        ! k3 = -i*H*temp
-        call hamiltonian%apply_to_state(temp_state, k3)
-        if (bob_get_last_error() /= BOB_SUCCESS) goto 999
-        do i = 1, k3%dim
-            k3%amplitudes(i) = -CI * k3%amplitudes(i)
-        end do
-        
-        ! temp = |ψ⟩ + dt*k3
-        do i = 1, state%dim
-            temp_state%amplitudes(i) = state%amplitudes(i) + dt * k3%amplitudes(i)
-        end do
-        
-        ! k4 = -i*H*temp
-        call hamiltonian%apply_to_state(temp_state, k4)
-        if (bob_get_last_error() /= BOB_SUCCESS) goto 999
-        do i = 1, k4%dim
-            k4%amplitudes(i) = -CI * k4%amplitudes(i)
-        end do
-        
-        ! Update: |ψ⟩ ← |ψ⟩ + (dt/6)*(k1 + 2*k2 + 2*k3 + k4)
-        do i = 1, state%dim
-            state%amplitudes(i) = state%amplitudes(i) + &
-                (dt / 6.0_wp) * (k1%amplitudes(i) + TWO * k2%amplitudes(i) + &
-                                 TWO * k3%amplitudes(i) + k4%amplitudes(i))
-        end do
-        
-999     continue
-        call k1%deallocate()
-        call k2%deallocate()
-        call k3%deallocate()
-        call k4%deallocate()
-        call temp_state%deallocate()
-        state%is_normalized = .false.
-    end subroutine step_rk4
-    
-    !> Matrix exponential method: |ψ(t+dt)⟩ = exp(-i*H*dt)|ψ(t)⟩
-    subroutine step_expm(state, hamiltonian, dt)
-        type(bob_quantum_state), intent(inout) :: state
-        type(bob_hamiltonian_operator), intent(in) :: hamiltonian
-        real(wp), intent(in) :: dt
-        
-        complex(cwp), allocatable :: exp_matrix(:,:)
-        complex(cwp), allocatable :: new_amplitudes(:)
-        integer(i8) :: i, j, k
-        integer :: stat
-        real(wp) :: factorial
-        complex(cwp) :: term_coeff
-        integer, parameter :: MAX_TERMS = 20
-        
-        ! Allocate matrices
-        allocate(exp_matrix(state%dim, state%dim), stat=stat)
-        if (stat /= 0) then
-            call bob_set_error(BOB_ERROR_ALLOCATION, &
-                "Failed to allocate exponential matrix", "step_expm")
-            return
-        end if
-        
-        allocate(new_amplitudes(state%dim), stat=stat)
-        if (stat /= 0) then
-            deallocate(exp_matrix)
-            call bob_set_error(BOB_ERROR_ALLOCATION, &
-                "Failed to allocate new amplitudes", "step_expm")
-            return
-        end if
-        
-        ! Compute exp(-i*H*dt) using Taylor series
-        ! exp(A) = I + A + A²/2! + A³/3! + ...
-        
-        ! Initialize to identity
-        exp_matrix = CZERO
-        do i = 1, state%dim
-            exp_matrix(i,i) = CONE
-        end do
-        
-        ! Add terms
-        factorial = ONE
-        do k = 1, MAX_TERMS
-            factorial = factorial * real(k, wp)
-            term_coeff = (-CI * dt) ** k / factorial
-            
-            ! Add term: (-i*H*dt)^k / k!
-            ! Simplified: just add scaled Hamiltonian powers
-            do i = 1, state%dim
-                do j = 1, state%dim
-                    exp_matrix(i,j) = exp_matrix(i,j) + &
-                        term_coeff * hamiltonian%matrix(i,j)
-                end do
-            end do
-        end do
-        
-        ! Apply to state
-        new_amplitudes = CZERO
-        do i = 1, state%dim
-            do j = 1, state%dim
-                new_amplitudes(i) = new_amplitudes(i) + &
-                    exp_matrix(i,j) * state%amplitudes(j)
-            end do
-        end do
-        
-        state%amplitudes = new_amplitudes
-        
-        deallocate(exp_matrix, new_amplitudes)
-        state%is_normalized = .false.
-    end subroutine step_expm
-    
-    !> Trotter decomposition: exp(-i*H*dt) ≈ exp(-i*H₁*dt)exp(-i*H₂*dt)
-    subroutine step_trotter(state, hamiltonian, dt)
-        type(bob_quantum_state), intent(inout) :: state
-        type(bob_hamiltonian_operator), intent(in) :: hamiltonian
-        real(wp), intent(in) :: dt
-        
-        integer(i8) :: i
-        complex(cwp) :: phase_factor
-        
-        ! Simplified Trotter: apply diagonal and off-diagonal parts separately
-        
-        ! Apply diagonal part: exp(-i*diag(H)*dt)
-        do i = 1, state%dim
-            phase_factor = exp(-CI * hamiltonian%matrix(i,i) * dt)
-            state%amplitudes(i) = state%amplitudes(i) * phase_factor
-        end do
-        
-        ! Off-diagonal part would require more sophisticated treatment
-        ! This is a simplified version
-        
-        state%is_normalized = .false.
-    end subroutine step_trotter
-    
-    !> C ABI: Create integrator
-    function bob_integrator_create(method, dt) result(int_ptr) &
-        bind(C, name="bob_integrator_create")
-        use, intrinsic :: iso_c_binding
-        integer(c_int), value :: method
-        real(c_double), value :: dt
-        type(c_ptr) :: int_ptr
-        
-        type(bob_time_integrator), pointer :: integrator
-        
-        allocate(integrator)
-        call integrator%init(method, dt)
-        int_ptr = c_loc(integrator)
-    end function bob_integrator_create
-    
-    !> C ABI: Destroy integrator
-    subroutine bob_integrator_destroy(int_ptr) bind(C, name="bob_integrator_destroy")
-        use, intrinsic :: iso_c_binding
-        type(c_ptr), value :: int_ptr
-        type(bob_time_integrator), pointer :: integrator
-        
-        if (.not. c_associated(int_ptr)) return
-        
-        call c_f_pointer(int_ptr, integrator)
-        deallocate(integrator)
-    end subroutine bob_integrator_destroy
-    
-    !> C ABI: Evolve state
-    function bob_integrator_evolve(int_ptr, state_ptr, ham_ptr, total_time) result(status) &
-        bind(C, name="bob_integrator_evolve")
-        use, intrinsic :: iso_c_binding
-        type(c_ptr), value :: int_ptr, state_ptr, ham_ptr
-        real(c_double), value :: total_time
-        integer(c_int) :: status
-        
-        type(bob_time_integrator), pointer :: integrator
-        type(bob_quantum_state), pointer :: state
-        type(bob_hamiltonian_operator), pointer :: hamiltonian
-        
-        if (.not. c_associated(int_ptr) .or. &
-            .not. c_associated(state_ptr) .or. &
-            .not. c_associated(ham_ptr)) then
-            status = BOB_ERROR_INVALID_ARGUMENT
-            return
-        end if
-        
-        call c_f_pointer(int_ptr, integrator)
-        call c_f_pointer(state_ptr, state)
-        call c_f_pointer(ham_ptr, hamiltonian)
-        
-        call integrator%evolve(state, hamiltonian, total_time)
-        status = bob_get_last_error()
-    end function bob_integrator_evolve
-
-end module bob_integrator
-
-! Made with Bob

build_final2/CMakeFiles/bob_quantum.dir/src/bob_integrator.f90-pp.f90.d

@@ -1,2 +0,0 @@
-CMakeFiles/bob_quantum.dir/src/bob_integrator.f90-pp.f90: \
- C:/Users/jessi/Desktop/bobs\ control\ repo/sov-kernel-monster/src/bob_integrator.f90

build_final2/CMakeFiles/bob_quantum.dir/src/bob_integrator.f90.obj.ddi

@@ -1,34 +0,0 @@
-{
-	"revision" : 0,
-	"rules" : 
-	[
-		{
-			"outputs" : [],
-			"primary-output" : "CMakeFiles\\\\bob_quantum.dir\\\\src\\\\bob_integrator.f90.obj",
-			"provides" : 
-			[
-				{
-					"compiled-module-path" : "bob_integrator.mod",
-					"is-interface" : true,
-					"logical-name" : "bob_integrator.mod"
-				}
-			],
-			"requires" : 
-			[
-				{
-					"logical-name" : "bob_errors.mod"
-				},
-				{
-					"logical-name" : "bob_hamiltonian.mod"
-				},
-				{
-					"logical-name" : "bob_kinds.mod"
-				},
-				{
-					"logical-name" : "bob_state.mod"
-				}
-			]
-		}
-	],
-	"version" : 0
-}

build_final2/CMakeFiles/bob_quantum.dir/src/bob_kinds.f90-pp.f90

@@ -1,59 +0,0 @@
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_kinds.f90"
-# 1 "<built-in>"
-# 1 "<command-line>"
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_kinds.f90"
-! BOB Quantum Civilization Engine - Type Definitions
-! Module: bob_kinds
-! Purpose: Explicit kind parameters for portable numeric types
-! Standard: Fortran 2018
-! Compiler: GNU Fortran (gfortran)
-
-module bob_kinds
-    use, intrinsic :: iso_c_binding, only: c_int, c_int64_t, c_double, c_float, c_bool, c_char
-    implicit none
-    private
-    
-    ! Export C-compatible types
-    public :: c_int, c_int64_t, c_double, c_float, c_bool, c_char
-    
-    ! Integer kinds
-    integer, parameter, public :: i4 = c_int           ! 32-bit integer
-    integer, parameter, public :: i8 = c_int64_t       ! 64-bit integer
-    
-    ! Real kinds
-    integer, parameter, public :: sp = c_float         ! Single precision (32-bit)
-    integer, parameter, public :: dp = c_double        ! Double precision (64-bit)
-    
-    ! Default working precision for quantum states
-    integer, parameter, public :: wp = dp              ! Working precision = double
-    
-    ! Complex kinds
-    integer, parameter, public :: cwp = wp             ! Complex working precision
-    
-    ! Logical kind
-    integer, parameter, public :: lk = c_bool          ! Logical/boolean
-    
-    ! Character kind
-    integer, parameter, public :: ck = c_char          ! Character
-    
-    ! Constants
-    real(wp), parameter, public :: PI = 3.141592653589793238462643383279502884197_wp
-    real(wp), parameter, public :: HBAR = 1.054571817e-34_wp  ! Reduced Planck constant (J·s)
-    real(wp), parameter, public :: ZERO = 0.0_wp
-    real(wp), parameter, public :: ONE = 1.0_wp
-    real(wp), parameter, public :: TWO = 2.0_wp
-    real(wp), parameter, public :: HALF = 0.5_wp
-    
-    ! Complex constants
-    complex(cwp), parameter, public :: CZERO = (0.0_wp, 0.0_wp)
-    complex(cwp), parameter, public :: CONE = (1.0_wp, 0.0_wp)
-    complex(cwp), parameter, public :: CI = (0.0_wp, 1.0_wp)  ! Imaginary unit
-    
-    ! Numerical tolerances
-    real(wp), parameter, public :: TOL_NORM = 1.0e-10_wp      ! Normalization tolerance
-    real(wp), parameter, public :: TOL_HERMITIAN = 1.0e-12_wp ! Hermiticity tolerance
-    real(wp), parameter, public :: TOL_UNITARY = 1.0e-10_wp   ! Unitarity tolerance
-    
-end module bob_kinds
-
-! Made with Bob

build_final2/CMakeFiles/bob_quantum.dir/src/bob_kinds.f90-pp.f90.d

@@ -1,2 +0,0 @@
-CMakeFiles/bob_quantum.dir/src/bob_kinds.f90-pp.f90: \
- C:/Users/jessi/Desktop/bobs\ control\ repo/sov-kernel-monster/src/bob_kinds.f90

build_final2/CMakeFiles/bob_quantum.dir/src/bob_kinds.f90.obj.ddi

@@ -1,20 +0,0 @@
-{
-	"revision" : 0,
-	"rules" : 
-	[
-		{
-			"outputs" : [],
-			"primary-output" : "CMakeFiles\\\\bob_quantum.dir\\\\src\\\\bob_kinds.f90.obj",
-			"provides" : 
-			[
-				{
-					"compiled-module-path" : "bob_kinds.mod",
-					"is-interface" : true,
-					"logical-name" : "bob_kinds.mod"
-				}
-			],
-			"requires" : []
-		}
-	],
-	"version" : 0
-}

build_final2/CMakeFiles/bob_quantum.dir/src/bob_lattice.f90-pp.f90

@@ -1,512 +0,0 @@
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_lattice.f90"
-# 1 "<built-in>"
-# 1 "<command-line>"
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_lattice.f90"
-! BOB Quantum Civilization Engine - Quantum Vortex Lattice
-! Module: bob_lattice
-! Purpose: 3D lattice of quantum vortices with topological properties
-! Standard: Fortran 2018
-
-module bob_lattice
-    use bob_kinds
-    use bob_errors
-    use bob_state
-    use bob_rng
-    implicit none
-    private
-    
-    !> Vortex in lattice
-    type :: bob_vortex
-        integer(i8) :: position(3)              ! (x, y, z) position
-        integer(i4) :: winding_number           ! Topological charge
-        complex(cwp) :: phase                   ! Quantum phase
-        real(wp) :: energy                      ! Local energy
-        integer(i8) :: entangled_neighbors(6)   ! Indices of entangled neighbors
-        integer(i4) :: num_entangled            ! Number of entangled neighbors
-        integer(i8) :: measurement_count        ! Number of measurements
-        real(wp) :: creation_time               ! When vortex was created
-    end type bob_vortex
-    
-    !> 3D quantum vortex lattice
-    type, public :: bob_vortex_lattice
-        integer(i8) :: size(3)                  ! Lattice dimensions (nx, ny, nz)
-        integer(i8) :: num_vortices             ! Total number of vortices
-        type(bob_vortex), allocatable :: vortices(:,:,:)  ! 3D array of vortices
-        real(wp) :: coupling_strength           ! Nearest-neighbor coupling
-        real(wp) :: time                        ! Simulation time
-        real(wp) :: dt                          ! Time step
-        logical(lk) :: periodic_boundary        ! Periodic boundary conditions
-        logical(lk) :: is_initialized           ! Initialization flag
-        type(bob_rng_state) :: rng              ! Random number generator
-    contains
-        procedure :: init => lattice_init
-        procedure :: destroy => lattice_destroy
-        procedure :: evolve => lattice_evolve
-        procedure :: get_vortex => lattice_get_vortex
-        procedure :: set_vortex => lattice_set_vortex
-        procedure :: get_neighbors => lattice_get_neighbors
-        procedure :: create_entanglement => lattice_create_entanglement
-        procedure :: calculate_hamiltonian => lattice_calculate_hamiltonian
-        procedure :: total_energy => lattice_total_energy
-        procedure :: entanglement_entropy => lattice_entanglement_entropy
-        procedure :: apply_error_correction => lattice_apply_error_correction
-    end type bob_vortex_lattice
-    
-    public :: bob_lattice_create
-    public :: bob_lattice_destroy
-    public :: bob_lattice_evolve
-    public :: bob_lattice_get_energy
-    
-contains
-
-    !> Initialize lattice
-    subroutine lattice_init(this, nx, ny, nz, coupling, seed, periodic)
-        class(bob_vortex_lattice), intent(inout) :: this
-        integer(i8), intent(in) :: nx, ny, nz
-        real(wp), intent(in) :: coupling
-        integer(i8), intent(in) :: seed
-        logical(lk), intent(in), optional :: periodic
-        
-        integer(i8) :: i, j, k
-        integer :: stat
-        real(wp) :: phase_real, phase_imag
-        
-        if (nx <= 0 .or. ny <= 0 .or. nz <= 0) then
-            call bob_set_error(BOB_ERROR_INVALID_ARGUMENT, &
-                "Lattice dimensions must be positive", "lattice_init")
-            return
-        end if
-        
-        this%size = [nx, ny, nz]
-        this%num_vortices = nx * ny * nz
-        this%coupling_strength = coupling
-        this%time = ZERO
-        this%dt = 0.01_wp
-        this%periodic_boundary = .true.
-        if (present(periodic)) this%periodic_boundary = periodic
-        
-        ! Initialize RNG
-        call this%rng%init(seed)
-        
-        ! Allocate vortex array
-        if (allocated(this%vortices)) deallocate(this%vortices)
-        allocate(this%vortices(nx, ny, nz), stat=stat)
-        if (stat /= 0) then
-            call bob_set_error(BOB_ERROR_ALLOCATION, &
-                "Failed to allocate vortex lattice", "lattice_init")
-            return
-        end if
-        
-        ! Initialize each vortex
-        do k = 1, nz
-            do j = 1, ny
-                do i = 1, nx
-                    this%vortices(i,j,k)%position = [i, j, k]
-                    
-                    ! Random winding number: -1, 0, or 1
-                    this%vortices(i,j,k)%winding_number = &
-                        int(this%rng%integer_range(-1_i8, 1_i8), i4)
-                    
-                    ! Random initial phase
-                    phase_real = this%rng%normal(ZERO, ONE)
-                    phase_imag = this%rng%normal(ZERO, ONE)
-                    this%vortices(i,j,k)%phase = cmplx(phase_real, phase_imag, cwp)
-                    
-                    ! Normalize phase
-                    this%vortices(i,j,k)%phase = this%vortices(i,j,k)%phase / &
-                        abs(this%vortices(i,j,k)%phase)
-                    
-                    ! Initial energy
-                    this%vortices(i,j,k)%energy = this%rng%uniform() * TWO - ONE
-                    
-                    ! No entanglement yet
-                    this%vortices(i,j,k)%entangled_neighbors = 0
-                    this%vortices(i,j,k)%num_entangled = 0
-                    this%vortices(i,j,k)%measurement_count = 0
-                    this%vortices(i,j,k)%creation_time = ZERO
-                end do
-            end do
-        end do
-        
-        ! Create nearest-neighbor entanglement
-        call this%create_entanglement()
-        
-        this%is_initialized = .true.
-        call bob_clear_error()
-    end subroutine lattice_init
-    
-    !> Destroy lattice
-    subroutine lattice_destroy(this)
-        class(bob_vortex_lattice), intent(inout) :: this
-        
-        if (allocated(this%vortices)) deallocate(this%vortices)
-        this%num_vortices = 0
-        this%is_initialized = .false.
-    end subroutine lattice_destroy
-    
-    !> Evolve lattice in time
-    subroutine lattice_evolve(this, dt)
-        class(bob_vortex_lattice), intent(inout) :: this
-        real(wp), intent(in), optional :: dt
-        
-        integer(i8) :: i, j, k
-        real(wp) :: timestep, hamiltonian
-        complex(cwp) :: evolution_factor
-        
-        if (.not. this%is_initialized) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Lattice not initialized", "lattice_evolve")
-            return
-        end if
-        
-        timestep = this%dt
-        if (present(dt)) timestep = dt
-        
-        ! Evolve each vortex under local Hamiltonian
-        do k = 1, this%size(3)
-            do j = 1, this%size(2)
-                do i = 1, this%size(1)
-                    ! Calculate local Hamiltonian
-                    hamiltonian = this%calculate_hamiltonian(i, j, k)
-                    
-                    ! Time evolution: |ψ(t+dt)⟩ = exp(-iHdt/ℏ)|ψ(t)⟩
-                    ! Using ℏ = 1 for simplicity
-                    evolution_factor = exp(-CI * hamiltonian * timestep)
-                    
-                    ! Apply evolution
-                    this%vortices(i,j,k)%phase = this%vortices(i,j,k)%phase * evolution_factor
-                    this%vortices(i,j,k)%energy = hamiltonian
-                end do
-            end do
-        end do
-        
-        this%time = this%time + timestep
-        call bob_clear_error()
-    end subroutine lattice_evolve
-    
-    !> Get vortex at position
-    function lattice_get_vortex(this, i, j, k) result(vortex)
-        class(bob_vortex_lattice), intent(in) :: this
-        integer(i8), intent(in) :: i, j, k
-        type(bob_vortex) :: vortex
-        
-        if (i < 1 .or. i > this%size(1) .or. &
-            j < 1 .or. j > this%size(2) .or. &
-            k < 1 .or. k > this%size(3)) then
-            call bob_set_error(BOB_ERROR_INVALID_ARGUMENT, &
-                "Vortex position out of bounds", "lattice_get_vortex")
-            return
-        end if
-        
-        vortex = this%vortices(i, j, k)
-        call bob_clear_error()
-    end function lattice_get_vortex
-    
-    !> Set vortex at position
-    subroutine lattice_set_vortex(this, i, j, k, vortex)
-        class(bob_vortex_lattice), intent(inout) :: this
-        integer(i8), intent(in) :: i, j, k
-        type(bob_vortex), intent(in) :: vortex
-        
-        if (i < 1 .or. i > this%size(1) .or. &
-            j < 1 .or. j > this%size(2) .or. &
-            k < 1 .or. k > this%size(3)) then
-            call bob_set_error(BOB_ERROR_INVALID_ARGUMENT, &
-                "Vortex position out of bounds", "lattice_set_vortex")
-            return
-        end if
-        
-        this%vortices(i, j, k) = vortex
-        call bob_clear_error()
-    end subroutine lattice_set_vortex
-    
-    !> Get neighbor positions
-    subroutine lattice_get_neighbors(this, i, j, k, neighbors, num_neighbors)
-        class(bob_vortex_lattice), intent(in) :: this
-        integer(i8), intent(in) :: i, j, k
-        integer(i8), intent(out) :: neighbors(6, 3)
-        integer(i4), intent(out) :: num_neighbors
-        
-        integer(i8) :: ni, nj, nk
-        integer(i4) :: count
-        
-        count = 0
-        neighbors = 0
-        
-        ! Six nearest neighbors: ±x, ±y, ±z
-        ! +x neighbor
-        ni = i + 1
-        if (this%periodic_boundary) ni = mod(ni - 1, this%size(1)) + 1
-        if (ni >= 1 .and. ni <= this%size(1)) then
-            count = count + 1
-            neighbors(count, :) = [ni, j, k]
-        end if
-        
-        ! -x neighbor
-        ni = i - 1
-        if (this%periodic_boundary .and. ni < 1) ni = this%size(1)
-        if (ni >= 1 .and. ni <= this%size(1)) then
-            count = count + 1
-            neighbors(count, :) = [ni, j, k]
-        end if
-        
-        ! +y neighbor
-        nj = j + 1
-        if (this%periodic_boundary) nj = mod(nj - 1, this%size(2)) + 1
-        if (nj >= 1 .and. nj <= this%size(2)) then
-            count = count + 1
-            neighbors(count, :) = [i, nj, k]
-        end if
-        
-        ! -y neighbor
-        nj = j - 1
-        if (this%periodic_boundary .and. nj < 1) nj = this%size(2)
-        if (nj >= 1 .and. nj <= this%size(2)) then
-            count = count + 1
-            neighbors(count, :) = [i, nj, k]
-        end if
-        
-        ! +z neighbor
-        nk = k + 1
-        if (this%periodic_boundary) nk = mod(nk - 1, this%size(3)) + 1
-        if (nk >= 1 .and. nk <= this%size(3)) then
-            count = count + 1
-            neighbors(count, :) = [i, j, nk]
-        end if
-        
-        ! -z neighbor
-        nk = k - 1
-        if (this%periodic_boundary .and. nk < 1) nk = this%size(3)
-        if (nk >= 1 .and. nk <= this%size(3)) then
-            count = count + 1
-            neighbors(count, :) = [i, j, nk]
-        end if
-        
-        num_neighbors = count
-    end subroutine lattice_get_neighbors
-    
-    !> Create entanglement network
-    subroutine lattice_create_entanglement(this)
-        class(bob_vortex_lattice), intent(inout) :: this
-        
-        integer(i8) :: i, j, k, n
-        integer(i8) :: neighbors(6, 3)
-        integer(i4) :: num_neighbors
-        complex(cwp) :: entangled_phase
-        
-        do k = 1, this%size(3)
-            do j = 1, this%size(2)
-                do i = 1, this%size(1)
-                    call this%get_neighbors(i, j, k, neighbors, num_neighbors)
-                    
-                    this%vortices(i,j,k)%num_entangled = num_neighbors
-                    
-                    ! Entangle with neighbors
-                    do n = 1, num_neighbors
-                        ! Store neighbor index (flattened)
-                        this%vortices(i,j,k)%entangled_neighbors(n) = &
-                            (neighbors(n,1) - 1) * this%size(2) * this%size(3) + &
-                            (neighbors(n,2) - 1) * this%size(3) + &
-                            neighbors(n,3)
-                        
-                        ! Create entangled state: (|ψ₁⟩ + |ψ₂⟩)/√2
-                        entangled_phase = (this%vortices(i,j,k)%phase + &
-                            this%vortices(neighbors(n,1), neighbors(n,2), neighbors(n,3))%phase) / &
-                            sqrt(TWO)
-                        
-                        this%vortices(i,j,k)%phase = entangled_phase
-                        this%vortices(neighbors(n,1), neighbors(n,2), neighbors(n,3))%phase = &
-                            entangled_phase
-                    end do
-                end do
-            end do
-        end do
-    end subroutine lattice_create_entanglement
-    
-    !> Calculate local Hamiltonian for vortex
-    function lattice_calculate_hamiltonian(this, i, j, k) result(hamiltonian)
-        class(bob_vortex_lattice), intent(in) :: this
-        integer(i8), intent(in) :: i, j, k
-        real(wp) :: hamiltonian
-        
-        integer(i8) :: neighbors(6, 3)
-        integer(i4) :: num_neighbors, n
-        real(wp) :: kinetic, interaction
-        complex(cwp) :: neighbor_phase
-        
-        ! Kinetic energy: proportional to winding number squared
-        kinetic = real(this%vortices(i,j,k)%winding_number ** 2, wp)
-        
-        ! Interaction energy with neighbors
-        interaction = ZERO
-        call this%get_neighbors(i, j, k, neighbors, num_neighbors)
-        
-        do n = 1, num_neighbors
-            neighbor_phase = this%vortices(neighbors(n,1), neighbors(n,2), neighbors(n,3))%phase
-            
-            ! Quantum coupling: ⟨ψᵢ|ψⱼ⟩
-            interaction = interaction + real(this%vortices(i,j,k)%phase * conjg(neighbor_phase))
-        end do
-        
-        interaction = -this%coupling_strength * interaction
-        
-        hamiltonian = kinetic + interaction
-    end function lattice_calculate_hamiltonian
-    
-    !> Calculate total lattice energy
-    function lattice_total_energy(this) result(energy)
-        class(bob_vortex_lattice), intent(in) :: this
-        real(wp) :: energy
-        
-        integer(i8) :: i, j, k
-        
-        energy = ZERO
-        
-        if (.not. this%is_initialized) return
-        
-        do k = 1, this%size(3)
-            do j = 1, this%size(2)
-                do i = 1, this%size(1)
-                    energy = energy + this%vortices(i,j,k)%energy
-                end do
-            end do
-        end do
-    end function lattice_total_energy
-    
-    !> Calculate entanglement entropy
-    function lattice_entanglement_entropy(this) result(entropy)
-        class(bob_vortex_lattice), intent(in) :: this
-        real(wp) :: entropy
-        
-        integer(i8) :: i, j, k
-        integer(i8) :: total_entanglement, max_entanglement
-        
-        if (.not. this%is_initialized) then
-            entropy = ZERO
-            return
-        end if
-        
-        total_entanglement = 0
-        
-        do k = 1, this%size(3)
-            do j = 1, this%size(2)
-                do i = 1, this%size(1)
-                    total_entanglement = total_entanglement + &
-                        int(this%vortices(i,j,k)%num_entangled, i8)
-                end do
-            end do
-        end do
-        
-        ! Maximum possible entanglement (6 neighbors per vortex)
-        max_entanglement = this%num_vortices * 6
-        
-        if (max_entanglement > 0) then
-            entropy = real(total_entanglement, wp) / real(max_entanglement, wp)
-        else
-            entropy = ZERO
-        end if
-    end function lattice_entanglement_entropy
-    
-    !> Apply topological error correction
-    function lattice_apply_error_correction(this) result(errors_corrected)
-        class(bob_vortex_lattice), intent(inout) :: this
-        integer(i8) :: errors_corrected
-        
-        integer(i8) :: i, j, k
-        real(wp) :: phase_magnitude
-        
-        errors_corrected = 0
-        
-        if (.not. this%is_initialized) return
-        
-        ! Check for phase errors (magnitude too small)
-        do k = 1, this%size(3)
-            do j = 1, this%size(2)
-                do i = 1, this%size(1)
-                    phase_magnitude = abs(this%vortices(i,j,k)%phase)
-                    
-                    if (phase_magnitude < 0.1_wp) then
-                        ! Apply X gate (phase flip)
-                        this%vortices(i,j,k)%phase = -this%vortices(i,j,k)%phase
-                        errors_corrected = errors_corrected + 1
-                    end if
-                    
-                    ! Renormalize phase
-                    if (phase_magnitude > TOL_NORM) then
-                        this%vortices(i,j,k)%phase = this%vortices(i,j,k)%phase / phase_magnitude
-                    end if
-                end do
-            end do
-        end do
-    end function lattice_apply_error_correction
-    
-    !> C ABI: Create lattice
-    function bob_lattice_create(nx, ny, nz, coupling, seed) result(lattice_ptr) &
-        bind(C, name="bob_lattice_create")
-        use, intrinsic :: iso_c_binding
-        integer(c_int64_t), value :: nx, ny, nz
-        real(c_double), value :: coupling
-        integer(c_int64_t), value :: seed
-        type(c_ptr) :: lattice_ptr
-        
-        type(bob_vortex_lattice), pointer :: lattice
-        
-        allocate(lattice)
-        call lattice%init(nx, ny, nz, coupling, seed)
-        lattice_ptr = c_loc(lattice)
-    end function bob_lattice_create
-    
-    !> C ABI: Destroy lattice
-    subroutine bob_lattice_destroy(lattice_ptr) bind(C, name="bob_lattice_destroy")
-        use, intrinsic :: iso_c_binding
-        type(c_ptr), value :: lattice_ptr
-        type(bob_vortex_lattice), pointer :: lattice
-        
-        if (.not. c_associated(lattice_ptr)) return
-        
-        call c_f_pointer(lattice_ptr, lattice)
-        call lattice%destroy()
-        deallocate(lattice)
-    end subroutine bob_lattice_destroy
-    
-    !> C ABI: Evolve lattice
-    function bob_lattice_evolve(lattice_ptr, dt) result(status) &
-        bind(C, name="bob_lattice_evolve")
-        use, intrinsic :: iso_c_binding
-        type(c_ptr), value :: lattice_ptr
-        real(c_double), value :: dt
-        integer(c_int) :: status
-        
-        type(bob_vortex_lattice), pointer :: lattice
-        
-        if (.not. c_associated(lattice_ptr)) then
-            status = BOB_ERROR_INVALID_ARGUMENT
-            return
-        end if
-        
-        call c_f_pointer(lattice_ptr, lattice)
-        call lattice%evolve(dt)
-        status = bob_get_last_error()
-    end function bob_lattice_evolve
-    
-    !> C ABI: Get total energy
-    function bob_lattice_get_energy(lattice_ptr) result(energy) &
-        bind(C, name="bob_lattice_get_energy")
-        use, intrinsic :: iso_c_binding
-        type(c_ptr), value :: lattice_ptr
-        real(c_double) :: energy
-        
-        type(bob_vortex_lattice), pointer :: lattice
-        
-        if (.not. c_associated(lattice_ptr)) then
-            energy = ZERO
-            return
-        end if
-        
-        call c_f_pointer(lattice_ptr, lattice)
-        energy = lattice%total_energy()
-    end function bob_lattice_get_energy
-
-end module bob_lattice
-
-! Made with Bob

build_final2/CMakeFiles/bob_quantum.dir/src/bob_lattice.f90-pp.f90.d

@@ -1,2 +0,0 @@
-CMakeFiles/bob_quantum.dir/src/bob_lattice.f90-pp.f90: \
- C:/Users/jessi/Desktop/bobs\ control\ repo/sov-kernel-monster/src/bob_lattice.f90

build_final2/CMakeFiles/bob_quantum.dir/src/bob_lattice.f90.obj.ddi

@@ -1,34 +0,0 @@
-{
-	"revision" : 0,
-	"rules" : 
-	[
-		{
-			"outputs" : [],
-			"primary-output" : "CMakeFiles\\\\bob_quantum.dir\\\\src\\\\bob_lattice.f90.obj",
-			"provides" : 
-			[
-				{
-					"compiled-module-path" : "bob_lattice.mod",
-					"is-interface" : true,
-					"logical-name" : "bob_lattice.mod"
-				}
-			],
-			"requires" : 
-			[
-				{
-					"logical-name" : "bob_errors.mod"
-				},
-				{
-					"logical-name" : "bob_kinds.mod"
-				},
-				{
-					"logical-name" : "bob_rng.mod"
-				},
-				{
-					"logical-name" : "bob_state.mod"
-				}
-			]
-		}
-	],
-	"version" : 0
-}

build_final2/CMakeFiles/bob_quantum.dir/src/bob_measurement.f90-pp.f90

@@ -1,535 +0,0 @@
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_measurement.f90"
-# 1 "<built-in>"
-# 1 "<command-line>"
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_measurement.f90"
-! BOB Quantum Civilization Engine - Quantum Measurement
-! Module: bob_measurement
-! Purpose: Basis measurement, probability distributions, state collapse
-! Standard: Fortran 2018
-
-module bob_measurement
-    use bob_kinds
-    use bob_errors
-    use bob_state
-    use bob_rng
-    implicit none
-    private
-    
-    !> Measurement result
-    type, public :: bob_measurement_result
-        integer(i8) :: num_qubits                       ! Number of qubits measured
-        integer(i8), allocatable :: outcomes(:)         ! Measurement outcomes (0 or 1)
-        real(wp), allocatable :: probabilities(:)       ! Probability of each outcome
-        integer(i8) :: num_shots                        ! Number of measurement shots
-        integer(i8), allocatable :: counts(:)           ! Count of each outcome
-        real(wp) :: measurement_time                    ! When measurement occurred
-        logical(lk) :: collapsed                        ! Whether state collapsed
-    contains
-        procedure :: init => measurement_result_init
-        procedure :: destroy => measurement_result_destroy
-        procedure :: get_outcome => measurement_result_get_outcome
-        procedure :: get_probability => measurement_result_get_probability
-        procedure :: get_count => measurement_result_get_count
-    end type bob_measurement_result
-    
-    public :: measure_state
-    public :: measure_qubit
-    public :: measure_basis
-    public :: measure_shots
-    public :: calculate_probabilities
-    public :: collapse_state
-    
-contains
-
-    !> Initialize measurement result
-    subroutine measurement_result_init(this, num_qubits, num_shots)
-        class(bob_measurement_result), intent(inout) :: this
-        integer(i8), intent(in) :: num_qubits, num_shots
-        integer :: stat
-        integer(i8) :: num_outcomes
-        
-        this%num_qubits = num_qubits
-        this%num_shots = num_shots
-        this%collapsed = .false.
-        this%measurement_time = ZERO
-        
-        ! Number of possible outcomes: 2^num_qubits
-        num_outcomes = ishft(1_i8, int(num_qubits))
-        
-        ! Allocate arrays
-        if (allocated(this%outcomes)) deallocate(this%outcomes)
-        if (allocated(this%probabilities)) deallocate(this%probabilities)
-        if (allocated(this%counts)) deallocate(this%counts)
-        
-        allocate(this%outcomes(num_outcomes), stat=stat)
-        if (stat /= 0) then
-            call bob_set_error(BOB_ERROR_ALLOCATION, &
-                "Failed to allocate outcomes", "measurement_result_init")
-            return
-        end if
-        
-        allocate(this%probabilities(num_outcomes), stat=stat)
-        if (stat /= 0) then
-            call bob_set_error(BOB_ERROR_ALLOCATION, &
-                "Failed to allocate probabilities", "measurement_result_init")
-            return
-        end if
-        
-        allocate(this%counts(num_outcomes), stat=stat)
-        if (stat /= 0) then
-            call bob_set_error(BOB_ERROR_ALLOCATION, &
-                "Failed to allocate counts", "measurement_result_init")
-            return
-        end if
-        
-        ! Initialize to zero
-        this%outcomes = 0
-        this%probabilities = ZERO
-        this%counts = 0
-        
-        call bob_clear_error()
-    end subroutine measurement_result_init
-    
-    !> Destroy measurement result
-    subroutine measurement_result_destroy(this)
-        class(bob_measurement_result), intent(inout) :: this
-        
-        if (allocated(this%outcomes)) deallocate(this%outcomes)
-        if (allocated(this%probabilities)) deallocate(this%probabilities)
-        if (allocated(this%counts)) deallocate(this%counts)
-        
-        this%num_qubits = 0
-        this%num_shots = 0
-    end subroutine measurement_result_destroy
-    
-    !> Get measurement outcome
-    function measurement_result_get_outcome(this, index) result(outcome)
-        class(bob_measurement_result), intent(in) :: this
-        integer(i8), intent(in) :: index
-        integer(i8) :: outcome
-        
-        if (index < 1 .or. index > size(this%outcomes, kind=i8)) then
-            call bob_set_error(BOB_ERROR_INVALID_ARGUMENT, &
-                "Outcome index out of range", "measurement_result_get_outcome")
-            outcome = 0
-            return
-        end if
-        
-        outcome = this%outcomes(index)
-        call bob_clear_error()
-    end function measurement_result_get_outcome
-    
-    !> Get outcome probability
-    function measurement_result_get_probability(this, index) result(prob)
-        class(bob_measurement_result), intent(in) :: this
-        integer(i8), intent(in) :: index
-        real(wp) :: prob
-        
-        if (index < 1 .or. index > size(this%probabilities, kind=i8)) then
-            call bob_set_error(BOB_ERROR_INVALID_ARGUMENT, &
-                "Probability index out of range", "measurement_result_get_probability")
-            prob = ZERO
-            return
-        end if
-        
-        prob = this%probabilities(index)
-        call bob_clear_error()
-    end function measurement_result_get_probability
-    
-    !> Get outcome count
-    function measurement_result_get_count(this, index) result(count)
-        class(bob_measurement_result), intent(in) :: this
-        integer(i8), intent(in) :: index
-        integer(i8) :: count
-        
-        if (index < 1 .or. index > size(this%counts, kind=i8)) then
-            call bob_set_error(BOB_ERROR_INVALID_ARGUMENT, &
-                "Count index out of range", "measurement_result_get_count")
-            count = 0
-            return
-        end if
-        
-        count = this%counts(index)
-        call bob_clear_error()
-    end function measurement_result_get_count
-    
-    !> Measure entire quantum state
-    subroutine measure_state(state, rng, result, collapse)
-        type(bob_quantum_state), intent(inout) :: state
-        type(bob_rng_state), intent(inout) :: rng
-        type(bob_measurement_result), intent(out) :: result
-        logical(lk), intent(in), optional :: collapse
-        
-        integer(i8) :: num_qubits, i
-        real(wp) :: cumulative_prob, random_val
-        integer(i8) :: measured_outcome
-        logical(lk) :: do_collapse
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot measure invalid state", "measure_state")
-            return
-        end if
-        
-        do_collapse = .true.
-        if (present(collapse)) do_collapse = collapse
-        
-        ! Calculate number of qubits
-        num_qubits = int(log(real(state%dim, wp)) / log(TWO), i8)
-        
-        ! Initialize result
-        call result%init(num_qubits, 1_i8)
-        
-        ! Calculate probabilities
-        call calculate_probabilities(state, result)
-        
-        ! Sample from probability distribution
-        random_val = rng%uniform()
-        cumulative_prob = ZERO
-        measured_outcome = 0
-        
-        do i = 1, state%dim
-            cumulative_prob = cumulative_prob + result%probabilities(i)
-            if (random_val <= cumulative_prob) then
-                measured_outcome = i - 1
-                exit
-            end if
-        end do
-        
-        ! Store outcome
-        result%outcomes(measured_outcome + 1) = measured_outcome
-        result%counts(measured_outcome + 1) = 1
-        result%collapsed = do_collapse
-        
-        ! Collapse state if requested
-        if (do_collapse) then
-            call collapse_state(state, measured_outcome)
-        end if
-        
-        call bob_clear_error()
-    end subroutine measure_state
-    
-    !> Measure single qubit
-    subroutine measure_qubit(state, qubit_index, rng, result, collapse)
-        type(bob_quantum_state), intent(inout) :: state
-        integer(i8), intent(in) :: qubit_index
-        type(bob_rng_state), intent(inout) :: rng
-        integer(i8), intent(out) :: result
-        logical(lk), intent(in), optional :: collapse
-        
-        integer(i8) :: num_qubits, i, bit_mask, qubit_bit
-        real(wp) :: prob_0, prob_1, random_val
-        logical(lk) :: do_collapse
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot measure invalid state", "measure_qubit")
-            result = 0
-            return
-        end if
-        
-        num_qubits = int(log(real(state%dim, wp)) / log(TWO), i8)
-        
-        if (qubit_index < 0 .or. qubit_index >= num_qubits) then
-            call bob_set_error(BOB_ERROR_INVALID_ARGUMENT, &
-                "Qubit index out of range", "measure_qubit")
-            result = 0
-            return
-        end if
-        
-        do_collapse = .true.
-        if (present(collapse)) do_collapse = collapse
-        
-        ! Calculate probabilities for |0⟩ and |1⟩
-        bit_mask = ishft(1_i8, int(qubit_index))
-        prob_0 = ZERO
-        prob_1 = ZERO
-        
-        do i = 0, state%dim - 1
-            qubit_bit = iand(i, bit_mask)
-            
-            if (qubit_bit == 0) then
-                prob_0 = prob_0 + real(state%amplitudes(i + 1) * conjg(state%amplitudes(i + 1)))
-            else
-                prob_1 = prob_1 + real(state%amplitudes(i + 1) * conjg(state%amplitudes(i + 1)))
-            end if
-        end do
-        
-        ! Sample measurement outcome
-        random_val = rng%uniform()
-        
-        if (random_val < prob_0) then
-            result = 0
-        else
-            result = 1
-        end if
-        
-        ! Collapse state if requested
-        if (do_collapse) then
-            call collapse_qubit(state, qubit_index, result)
-        end if
-        
-        call bob_clear_error()
-    end subroutine measure_qubit
-    
-    !> Measure in arbitrary basis
-    subroutine measure_basis(state, basis_vectors, rng, result, collapse)
-        type(bob_quantum_state), intent(inout) :: state
-        complex(cwp), intent(in) :: basis_vectors(:,:)
-        type(bob_rng_state), intent(inout) :: rng
-        integer(i8), intent(out) :: result
-        logical(lk), intent(in), optional :: collapse
-        
-        integer(i8) :: num_basis, i, j
-        real(wp), allocatable :: probabilities(:)
-        real(wp) :: cumulative_prob, random_val
-        complex(cwp) :: inner_prod
-        logical(lk) :: do_collapse
-        integer :: stat
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot measure invalid state", "measure_basis")
-            result = 0
-            return
-        end if
-        
-        num_basis = size(basis_vectors, 2, kind=i8)
-        
-        if (size(basis_vectors, 1, kind=i8) /= state%dim) then
-            call bob_set_error(BOB_ERROR_DIMENSION_MISMATCH, &
-                "Basis vectors dimension mismatch", "measure_basis")
-            result = 0
-            return
-        end if
-        
-        do_collapse = .true.
-        if (present(collapse)) do_collapse = collapse
-        
-        ! Allocate probabilities
-        allocate(probabilities(num_basis), stat=stat)
-        if (stat /= 0) then
-            call bob_set_error(BOB_ERROR_ALLOCATION, &
-                "Failed to allocate probabilities", "measure_basis")
-            result = 0
-            return
-        end if
-        
-        ! Calculate probabilities: P(i) = |⟨basis_i|ψ⟩|²
-        do i = 1, num_basis
-            inner_prod = CZERO
-            
-            do j = 1, state%dim
-                inner_prod = inner_prod + conjg(basis_vectors(j, i)) * state%amplitudes(j)
-            end do
-            
-            probabilities(i) = real(inner_prod * conjg(inner_prod))
-        end do
-        
-        ! Sample from probability distribution
-        random_val = rng%uniform()
-        cumulative_prob = ZERO
-        result = 0
-        
-        do i = 1, num_basis
-            cumulative_prob = cumulative_prob + probabilities(i)
-            if (random_val <= cumulative_prob) then
-                result = i - 1
-                exit
-            end if
-        end do
-        
-        ! Collapse to measured basis state if requested
-        if (do_collapse) then
-            state%amplitudes = basis_vectors(:, result + 1)
-            call state%normalize()
-        end if
-        
-        deallocate(probabilities)
-        call bob_clear_error()
-    end subroutine measure_basis
-    
-    !> Perform multiple measurement shots
-    subroutine measure_shots(state, num_shots, rng, result)
-        type(bob_quantum_state), intent(in) :: state
-        integer(i8), intent(in) :: num_shots
-        type(bob_rng_state), intent(inout) :: rng
-        type(bob_measurement_result), intent(out) :: result
-        
-        integer(i8) :: num_qubits, shot, i
-        real(wp) :: cumulative_prob, random_val
-        integer(i8) :: measured_outcome
-        type(bob_quantum_state) :: temp_state
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot measure invalid state", "measure_shots")
-            return
-        end if
-        
-        if (num_shots <= 0) then
-            call bob_set_error(BOB_ERROR_INVALID_ARGUMENT, &
-                "Number of shots must be positive", "measure_shots")
-            return
-        end if
-        
-        num_qubits = int(log(real(state%dim, wp)) / log(TWO), i8)
-        
-        ! Initialize result
-        call result%init(num_qubits, num_shots)
-        
-        ! Calculate probabilities (once)
-        call calculate_probabilities(state, result)
-        
-        ! Perform shots
-        do shot = 1, num_shots
-            random_val = rng%uniform()
-            cumulative_prob = ZERO
-            measured_outcome = 0
-            
-            do i = 1, state%dim
-                cumulative_prob = cumulative_prob + result%probabilities(i)
-                if (random_val <= cumulative_prob) then
-                    measured_outcome = i - 1
-                    exit
-                end if
-            end do
-            
-            ! Increment count for this outcome
-            result%counts(measured_outcome + 1) = result%counts(measured_outcome + 1) + 1
-        end do
-        
-        result%collapsed = .false.
-        call bob_clear_error()
-    end subroutine measure_shots
-    
-    !> Calculate measurement probabilities
-    subroutine calculate_probabilities(state, result)
-        type(bob_quantum_state), intent(in) :: state
-        type(bob_measurement_result), intent(inout) :: result
-        
-        integer(i8) :: i
-        real(wp) :: total_prob
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot calculate probabilities for invalid state", &
-                "calculate_probabilities")
-            return
-        end if
-        
-        ! Calculate P(i) = |ψᵢ|²
-        total_prob = ZERO
-        do i = 1, state%dim
-            result%probabilities(i) = real(state%amplitudes(i) * conjg(state%amplitudes(i)))
-            total_prob = total_prob + result%probabilities(i)
-        end do
-        
-        ! Verify normalization
-        if (abs(total_prob - ONE) > TOL_NORM) then
-            call bob_set_error(BOB_ERROR_NOT_NORMALIZED, &
-                "State probabilities do not sum to 1", "calculate_probabilities")
-            return
-        end if
-        
-        call bob_clear_error()
-    end subroutine calculate_probabilities
-    
-    !> Collapse state to measured outcome
-    subroutine collapse_state(state, outcome)
-        type(bob_quantum_state), intent(inout) :: state
-        integer(i8), intent(in) :: outcome
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot collapse invalid state", "collapse_state")
-            return
-        end if
-        
-        if (outcome < 0 .or. outcome >= state%dim) then
-            call bob_set_error(BOB_ERROR_INVALID_ARGUMENT, &
-                "Outcome out of range", "collapse_state")
-            return
-        end if
-        
-        ! Set all amplitudes to zero except measured outcome
-        state%amplitudes = CZERO
-        state%amplitudes(outcome + 1) = CONE
-        state%is_normalized = .true.
-        
-        call bob_clear_error()
-    end subroutine collapse_state
-    
-    !> Collapse single qubit
-    subroutine collapse_qubit(state, qubit_index, outcome)
-        type(bob_quantum_state), intent(inout) :: state
-        integer(i8), intent(in) :: qubit_index, outcome
-        
-        integer(i8) :: i, bit_mask, qubit_bit
-        real(wp) :: norm_factor
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot collapse invalid state", "collapse_qubit")
-            return
-        end if
-        
-        if (outcome /= 0 .and. outcome /= 1) then
-            call bob_set_error(BOB_ERROR_INVALID_ARGUMENT, &
-                "Qubit outcome must be 0 or 1", "collapse_qubit")
-            return
-        end if
-        
-        bit_mask = ishft(1_i8, int(qubit_index))
-        
-        ! Zero out amplitudes inconsistent with measurement
-        do i = 0, state%dim - 1
-            qubit_bit = iand(i, bit_mask)
-            
-            if ((outcome == 0 .and. qubit_bit /= 0) .or. &
-                (outcome == 1 .and. qubit_bit == 0)) then
-                state%amplitudes(i + 1) = CZERO
-            end if
-        end do
-        
-        ! Renormalize
-        call state%normalize()
-        
-        call bob_clear_error()
-    end subroutine collapse_qubit
-    
-    !> C ABI: Measure state
-    function bob_state_measure(state_ptr, rng_ptr, outcome) result(status) &
-        bind(C, name="bob_state_measure")
-        use, intrinsic :: iso_c_binding
-        type(c_ptr), value :: state_ptr, rng_ptr
-        integer(c_int64_t), intent(out) :: outcome
-        integer(c_int) :: status
-        
-        type(bob_quantum_state), pointer :: state
-        type(bob_rng_state), pointer :: rng
-        type(bob_measurement_result) :: result
-        
-        if (.not. c_associated(state_ptr) .or. .not. c_associated(rng_ptr)) then
-            status = BOB_ERROR_INVALID_ARGUMENT
-            return
-        end if
-        
-        call c_f_pointer(state_ptr, state)
-        call c_f_pointer(rng_ptr, rng)
-        
-        call measure_state(state, rng, result, collapse=.true.)
-        
-        if (bob_get_last_error() == BOB_SUCCESS) then
-            outcome = result%outcomes(1)
-        else
-            outcome = 0
-        end if
-        
-        call result%destroy()
-        status = bob_get_last_error()
-    end function bob_state_measure
-
-end module bob_measurement
-
-! Made with Bob

build_final2/CMakeFiles/bob_quantum.dir/src/bob_measurement.f90-pp.f90.d

@@ -1,2 +0,0 @@
-CMakeFiles/bob_quantum.dir/src/bob_measurement.f90-pp.f90: \
- C:/Users/jessi/Desktop/bobs\ control\ repo/sov-kernel-monster/src/bob_measurement.f90

build_final2/CMakeFiles/bob_quantum.dir/src/bob_measurement.f90.obj.ddi

@@ -1,34 +0,0 @@
-{
-	"revision" : 0,
-	"rules" : 
-	[
-		{
-			"outputs" : [],
-			"primary-output" : "CMakeFiles\\\\bob_quantum.dir\\\\src\\\\bob_measurement.f90.obj",
-			"provides" : 
-			[
-				{
-					"compiled-module-path" : "bob_measurement.mod",
-					"is-interface" : true,
-					"logical-name" : "bob_measurement.mod"
-				}
-			],
-			"requires" : 
-			[
-				{
-					"logical-name" : "bob_errors.mod"
-				},
-				{
-					"logical-name" : "bob_kinds.mod"
-				},
-				{
-					"logical-name" : "bob_rng.mod"
-				},
-				{
-					"logical-name" : "bob_state.mod"
-				}
-			]
-		}
-	],
-	"version" : 0
-}

build_final2/CMakeFiles/bob_quantum.dir/src/bob_metrics.f90-pp.f90

@@ -1,499 +0,0 @@
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_metrics.f90"
-# 1 "<built-in>"
-# 1 "<command-line>"
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_metrics.f90"
-! BOB Quantum Civilization Engine - Quantum Metrics
-! Module: bob_metrics
-! Purpose: Energy, entropy, purity, fidelity, coherence calculations
-! Standard: Fortran 2018
-
-module bob_metrics
-    use bob_kinds
-    use bob_errors
-    use bob_state
-    use bob_lattice
-    implicit none
-    private
-    
-    !> Quantum metrics container
-    type, public :: bob_quantum_metrics
-        real(wp) :: norm                    ! State norm
-        real(wp) :: energy                  ! Energy expectation value
-        real(wp) :: purity                  ! State purity Tr(ρ²)
-        real(wp) :: von_neumann_entropy     ! Von Neumann entropy -Tr(ρ log ρ)
-        real(wp) :: linear_entropy          ! Linear entropy 1 - Tr(ρ²)
-        real(wp) :: fidelity                ! Fidelity with reference state
-        real(wp) :: coherence               ! Coherence measure
-        real(wp) :: entanglement_measure    ! Entanglement measure
-        real(wp) :: participation_ratio     ! Inverse participation ratio
-        real(wp) :: computation_time        ! Time to compute metrics
-    contains
-        procedure :: init => metrics_init
-        procedure :: compute_all => metrics_compute_all
-        procedure :: print => metrics_print
-    end type bob_quantum_metrics
-    
-    public :: compute_norm
-    public :: compute_energy
-    public :: compute_purity
-    public :: compute_von_neumann_entropy
-    public :: compute_linear_entropy
-    public :: compute_fidelity
-    public :: compute_coherence
-    public :: compute_entanglement
-    public :: compute_participation_ratio
-    
-contains
-
-    !> Initialize metrics
-    subroutine metrics_init(this)
-        class(bob_quantum_metrics), intent(inout) :: this
-        
-        this%norm = ZERO
-        this%energy = ZERO
-        this%purity = ZERO
-        this%von_neumann_entropy = ZERO
-        this%linear_entropy = ZERO
-        this%fidelity = ZERO
-        this%coherence = ZERO
-        this%entanglement_measure = ZERO
-        this%participation_ratio = ZERO
-        this%computation_time = ZERO
-    end subroutine metrics_init
-    
-    !> Compute all metrics
-    subroutine metrics_compute_all(this, state, hamiltonian, reference_state)
-        class(bob_quantum_metrics), intent(inout) :: this
-        type(bob_quantum_state), intent(in) :: state
-        complex(cwp), intent(in), optional :: hamiltonian(:,:)
-        type(bob_quantum_state), intent(in), optional :: reference_state
-        
-        real(wp) :: start_time, end_time
-        
-        call cpu_time(start_time)
-        
-        ! Compute basic metrics
-        this%norm = compute_norm(state)
-        this%purity = compute_purity(state)
-        this%linear_entropy = compute_linear_entropy(state)
-        this%von_neumann_entropy = compute_von_neumann_entropy(state)
-        this%coherence = compute_coherence(state)
-        this%participation_ratio = compute_participation_ratio(state)
-        
-        ! Compute energy if Hamiltonian provided
-        if (present(hamiltonian)) then
-            this%energy = compute_energy(state, hamiltonian)
-        end if
-        
-        ! Compute fidelity if reference state provided
-        if (present(reference_state)) then
-            this%fidelity = compute_fidelity(state, reference_state)
-        end if
-        
-        call cpu_time(end_time)
-        this%computation_time = end_time - start_time
-    end subroutine metrics_compute_all
-    
-    !> Print metrics
-    subroutine metrics_print(this)
-        class(bob_quantum_metrics), intent(in) :: this
-        
-        print '(A)', "Quantum Metrics:"
-        print '(A,F12.8)', "  Norm:                  ", this%norm
-        print '(A,F12.8)', "  Energy:                ", this%energy
-        print '(A,F12.8)', "  Purity:                ", this%purity
-        print '(A,F12.8)', "  Von Neumann Entropy:   ", this%von_neumann_entropy
-        print '(A,F12.8)', "  Linear Entropy:        ", this%linear_entropy
-        print '(A,F12.8)', "  Fidelity:              ", this%fidelity
-        print '(A,F12.8)', "  Coherence:             ", this%coherence
-        print '(A,F12.8)', "  Entanglement:          ", this%entanglement_measure
-        print '(A,F12.8)', "  Participation Ratio:   ", this%participation_ratio
-        print '(A,F12.8)', "  Computation Time (s):  ", this%computation_time
-    end subroutine metrics_print
-    
-    !> Compute state norm: ||ψ|| = sqrt(⟨ψ|ψ⟩)
-    function compute_norm(state) result(norm_val)
-        type(bob_quantum_state), intent(in) :: state
-        real(wp) :: norm_val
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot compute norm of invalid state", "compute_norm")
-            norm_val = ZERO
-            return
-        end if
-        
-        norm_val = state%norm()
-        call bob_clear_error()
-    end function compute_norm
-    
-    !> Compute energy expectation: E = ⟨ψ|H|ψ⟩
-    function compute_energy(state, hamiltonian) result(energy)
-        type(bob_quantum_state), intent(in) :: state
-        complex(cwp), intent(in) :: hamiltonian(:,:)
-        real(wp) :: energy
-        
-        complex(cwp), allocatable :: h_psi(:)
-        integer(i8) :: i, j
-        complex(cwp) :: expectation
-        integer :: stat
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot compute energy of invalid state", "compute_energy")
-            energy = ZERO
-            return
-        end if
-        
-        if (size(hamiltonian, 1, kind=i8) /= state%dim .or. &
-            size(hamiltonian, 2, kind=i8) /= state%dim) then
-            call bob_set_error(BOB_ERROR_DIMENSION_MISMATCH, &
-                "Hamiltonian dimension mismatch", "compute_energy")
-            energy = ZERO
-            return
-        end if
-        
-        ! Allocate temporary array
-        allocate(h_psi(state%dim), stat=stat)
-        if (stat /= 0) then
-            call bob_set_error(BOB_ERROR_ALLOCATION, &
-                "Failed to allocate temporary array", "compute_energy")
-            energy = ZERO
-            return
-        end if
-        
-        ! Compute H|ψ⟩
-        h_psi = CZERO
-        do i = 1, state%dim
-            do j = 1, state%dim
-                h_psi(i) = h_psi(i) + hamiltonian(i,j) * state%amplitudes(j)
-            end do
-        end do
-        
-        ! Compute ⟨ψ|H|ψ⟩
-        expectation = CZERO
-        do i = 1, state%dim
-            expectation = expectation + conjg(state%amplitudes(i)) * h_psi(i)
-        end do
-        
-        energy = real(expectation)
-        
-        deallocate(h_psi)
-        call bob_clear_error()
-    end function compute_energy
-    
-    !> Compute purity: Tr(ρ²) where ρ = |ψ⟩⟨ψ|
-    function compute_purity(state) result(purity)
-        type(bob_quantum_state), intent(in) :: state
-        real(wp) :: purity
-        
-        integer(i8) :: i
-        real(wp) :: sum_prob_squared
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot compute purity of invalid state", "compute_purity")
-            purity = ZERO
-            return
-        end if
-        
-        ! For pure states: Tr(ρ²) = Σᵢ|ψᵢ|⁴
-        sum_prob_squared = ZERO
-        do i = 1, state%dim
-            sum_prob_squared = sum_prob_squared + &
-                real(state%amplitudes(i) * conjg(state%amplitudes(i))) ** 2
-        end do
-        
-        purity = sum_prob_squared
-        call bob_clear_error()
-    end function compute_purity
-    
-    !> Compute von Neumann entropy: S = -Tr(ρ log ρ)
-    function compute_von_neumann_entropy(state) result(entropy)
-        type(bob_quantum_state), intent(in) :: state
-        real(wp) :: entropy
-        
-        integer(i8) :: i
-        real(wp) :: prob, log_prob
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot compute entropy of invalid state", "compute_von_neumann_entropy")
-            entropy = ZERO
-            return
-        end if
-        
-        ! For pure states: S = -Σᵢ pᵢ log(pᵢ) where pᵢ = |ψᵢ|²
-        entropy = ZERO
-        do i = 1, state%dim
-            prob = real(state%amplitudes(i) * conjg(state%amplitudes(i)))
-            
-            if (prob > TOL_NORM) then
-                log_prob = log(prob)
-                entropy = entropy - prob * log_prob
-            end if
-        end do
-        
-        call bob_clear_error()
-    end function compute_von_neumann_entropy
-    
-    !> Compute linear entropy: S_L = 1 - Tr(ρ²)
-    function compute_linear_entropy(state) result(entropy)
-        type(bob_quantum_state), intent(in) :: state
-        real(wp) :: entropy
-        
-        real(wp) :: purity
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot compute linear entropy of invalid state", "compute_linear_entropy")
-            entropy = ZERO
-            return
-        end if
-        
-        purity = compute_purity(state)
-        entropy = ONE - purity
-        
-        call bob_clear_error()
-    end function compute_linear_entropy
-    
-    !> Compute fidelity: F = |⟨ψ|φ⟩|²
-    function compute_fidelity(state1, state2) result(fidelity)
-        type(bob_quantum_state), intent(in) :: state1, state2
-        real(wp) :: fidelity
-        
-        complex(cwp) :: inner_prod
-        
-        if (.not. state1%is_valid .or. .not. state2%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot compute fidelity of invalid states", "compute_fidelity")
-            fidelity = ZERO
-            return
-        end if
-        
-        if (state1%dim /= state2%dim) then
-            call bob_set_error(BOB_ERROR_DIMENSION_MISMATCH, &
-                "States have different dimensions", "compute_fidelity")
-            fidelity = ZERO
-            return
-        end if
-        
-        inner_prod = state1%inner_product(state2)
-        fidelity = real(inner_prod * conjg(inner_prod))
-        
-        call bob_clear_error()
-    end function compute_fidelity
-    
-    !> Compute coherence: C = Σᵢ≠ⱼ |ρᵢⱼ|
-    function compute_coherence(state) result(coherence)
-        type(bob_quantum_state), intent(in) :: state
-        real(wp) :: coherence
-        
-        integer(i8) :: i, j
-        complex(cwp) :: rho_ij
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot compute coherence of invalid state", "compute_coherence")
-            coherence = ZERO
-            return
-        end if
-        
-        ! Coherence = sum of off-diagonal density matrix elements
-        coherence = ZERO
-        do i = 1, state%dim
-            do j = i + 1, state%dim
-                rho_ij = state%amplitudes(i) * conjg(state%amplitudes(j))
-                coherence = coherence + abs(rho_ij)
-            end do
-        end do
-        
-        ! Multiply by 2 for symmetry
-        coherence = TWO * coherence
-        
-        call bob_clear_error()
-    end function compute_coherence
-    
-    !> Compute entanglement measure (for bipartite systems)
-    function compute_entanglement(state, subsystem_dim) result(entanglement)
-        type(bob_quantum_state), intent(in) :: state
-        integer(i8), intent(in) :: subsystem_dim
-        real(wp) :: entanglement
-        
-        complex(cwp), allocatable :: reduced_density(:,:)
-        real(wp), allocatable :: eigenvalues(:)
-        integer(i8) :: i, j, k, l
-        integer(i8) :: dim_a, dim_b
-        integer :: stat
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot compute entanglement of invalid state", "compute_entanglement")
-            entanglement = ZERO
-            return
-        end if
-        
-        dim_a = subsystem_dim
-        dim_b = state%dim / subsystem_dim
-        
-        if (dim_a * dim_b /= state%dim) then
-            call bob_set_error(BOB_ERROR_DIMENSION_MISMATCH, &
-                "Subsystem dimension incompatible", "compute_entanglement")
-            entanglement = ZERO
-            return
-        end if
-        
-        ! Allocate reduced density matrix
-        allocate(reduced_density(dim_a, dim_a), stat=stat)
-        if (stat /= 0) then
-            call bob_set_error(BOB_ERROR_ALLOCATION, &
-                "Failed to allocate reduced density matrix", "compute_entanglement")
-            entanglement = ZERO
-            return
-        end if
-        
-        ! Compute reduced density matrix: ρ_A = Tr_B(|ψ⟩⟨ψ|)
-        reduced_density = CZERO
-        do i = 1, dim_a
-            do j = 1, dim_a
-                do k = 1, dim_b
-                    reduced_density(i,j) = reduced_density(i,j) + &
-                        state%amplitudes((i-1)*dim_b + k) * &
-                        conjg(state%amplitudes((j-1)*dim_b + k))
-                end do
-            end do
-        end do
-        
-        ! Compute von Neumann entropy of reduced density matrix
-        ! This requires eigenvalue decomposition (simplified here)
-        allocate(eigenvalues(dim_a), stat=stat)
-        if (stat /= 0) then
-            deallocate(reduced_density)
-            call bob_set_error(BOB_ERROR_ALLOCATION, &
-                "Failed to allocate eigenvalues", "compute_entanglement")
-            entanglement = ZERO
-            return
-        end if
-        
-        ! Simplified: ! use trace  ! inlined of ρ² as entanglement measure
-        entanglement = ZERO
-        do i = 1, dim_a
-            do j = 1, dim_a
-                entanglement = entanglement + &
-                    real(reduced_density(i,j) * conjg(reduced_density(j,i)))
-            end do
-        end do
-        
-        ! Convert to entropy-like measure
-        entanglement = ONE - entanglement
-        
-        deallocate(reduced_density, eigenvalues)
-        call bob_clear_error()
-    end function compute_entanglement
-    
-    !> Compute inverse participation ratio: IPR = Σᵢ|ψᵢ|⁴
-    function compute_participation_ratio(state) result(ipr)
-        type(bob_quantum_state), intent(in) :: state
-        real(wp) :: ipr
-        
-        integer(i8) :: i
-        real(wp) :: prob
-        
-        if (.not. state%is_valid) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot compute IPR of invalid state", "compute_participation_ratio")
-            ipr = ZERO
-            return
-        end if
-        
-        ipr = ZERO
-        do i = 1, state%dim
-            prob = real(state%amplitudes(i) * conjg(state%amplitudes(i)))
-            ipr = ipr + prob ** 2
-        end do
-        
-        call bob_clear_error()
-    end function compute_participation_ratio
-    
-    !> Compute lattice metrics
-    subroutine compute_lattice_metrics(lattice, metrics)
-        type(bob_vortex_lattice), intent(in) :: lattice
-        type(bob_quantum_metrics), intent(out) :: metrics
-        
-        call metrics%init()
-        
-        if (.not. lattice%is_initialized) then
-            call bob_set_error(BOB_ERROR_INVALID_STATE, &
-                "Cannot compute metrics of uninitialized lattice", &
-                "compute_lattice_metrics")
-            return
-        end if
-        
-        metrics%energy = lattice%total_energy()
-        metrics%entanglement_measure = lattice%entanglement_entropy()
-        metrics%norm = ONE  ! Lattice is always normalized
-        
-        call bob_clear_error()
-    end subroutine compute_lattice_metrics
-    
-    !> C ABI: Compute metrics
-    function bob_metrics_compute(state_ptr, metrics_ptr) result(status) &
-        bind(C, name="bob_metrics_compute")
-        use, intrinsic :: iso_c_binding
-        type(c_ptr), value :: state_ptr, metrics_ptr
-        integer(c_int) :: status
-        
-        type(bob_quantum_state), pointer :: state
-        type(bob_quantum_metrics), pointer :: metrics
-        
-        if (.not. c_associated(state_ptr) .or. .not. c_associated(metrics_ptr)) then
-            status = BOB_ERROR_INVALID_ARGUMENT
-            return
-        end if
-        
-        call c_f_pointer(state_ptr, state)
-        call c_f_pointer(metrics_ptr, metrics)
-        
-        call metrics%compute_all(state)
-        status = bob_get_last_error()
-    end function bob_metrics_compute
-    
-    !> C ABI: Get energy
-    function bob_metrics_get_energy(metrics_ptr) result(energy) &
-        bind(C, name="bob_metrics_get_energy")
-        use, intrinsic :: iso_c_binding
-        type(c_ptr), value :: metrics_ptr
-        real(c_double) :: energy
-        
-        type(bob_quantum_metrics), pointer :: metrics
-        
-        if (.not. c_associated(metrics_ptr)) then
-            energy = ZERO
-            return
-        end if
-        
-        call c_f_pointer(metrics_ptr, metrics)
-        energy = metrics%energy
-    end function bob_metrics_get_energy
-    
-    !> C ABI: Get entropy
-    function bob_metrics_get_entropy(metrics_ptr) result(entropy) &
-        bind(C, name="bob_metrics_get_entropy")
-        use, intrinsic :: iso_c_binding
-        type(c_ptr), value :: metrics_ptr
-        real(c_double) :: entropy
-        
-        type(bob_quantum_metrics), pointer :: metrics
-        
-        if (.not. c_associated(metrics_ptr)) then
-            entropy = ZERO
-            return
-        end if
-        
-        call c_f_pointer(metrics_ptr, metrics)
-        entropy = metrics%von_neumann_entropy
-    end function bob_metrics_get_entropy
-
-end module bob_metrics
-
-! Made with Bob

build_final2/CMakeFiles/bob_quantum.dir/src/bob_metrics.f90-pp.f90.d

@@ -1,2 +0,0 @@
-CMakeFiles/bob_quantum.dir/src/bob_metrics.f90-pp.f90: \
- C:/Users/jessi/Desktop/bobs\ control\ repo/sov-kernel-monster/src/bob_metrics.f90

build_final2/CMakeFiles/bob_quantum.dir/src/bob_metrics.f90.obj.ddi

@@ -1,34 +0,0 @@
-{
-	"revision" : 0,
-	"rules" : 
-	[
-		{
-			"outputs" : [],
-			"primary-output" : "CMakeFiles\\\\bob_quantum.dir\\\\src\\\\bob_metrics.f90.obj",
-			"provides" : 
-			[
-				{
-					"compiled-module-path" : "bob_metrics.mod",
-					"is-interface" : true,
-					"logical-name" : "bob_metrics.mod"
-				}
-			],
-			"requires" : 
-			[
-				{
-					"logical-name" : "bob_errors.mod"
-				},
-				{
-					"logical-name" : "bob_kinds.mod"
-				},
-				{
-					"logical-name" : "bob_lattice.mod"
-				},
-				{
-					"logical-name" : "bob_state.mod"
-				}
-			]
-		}
-	],
-	"version" : 0
-}

build_final2/CMakeFiles/bob_quantum.dir/src/bob_phdae.f90-pp.f90

@@ -1,404 +0,0 @@
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_phdae.f90"
-# 1 "<built-in>"
-# 1 "<command-line>"
-# 1 "C:/Users/jessi/Desktop/bobs control repo/sov-kernel-monster/src/bob_phdae.f90"
-!=====================================================================
-! bob_phdae.f90
-! Port-Hamiltonian Differential-Algebraic Equation (PH-DAE) kernel.
-! Matches sovereign-phdae/src/lib.rs exactly.
-!
-! Mathematical model:
-!   d/dt(T(t,z) * z) = [J(t,z) - R(t,z)] * Q(t,z) * z + B(t) * u
-!
-! Where:
-!   T — mass tensor operator (possibly singular for DAEs)
-!   J — interconnection matrix (skew-symmetric: J = -J^T)
-!   R — dissipation matrix (positive semi-definite: R = R^T >= 0)
-!   Q — gradient operator
-!   B — input map
-!   u — external input
-!
-! Structure preservation:
-!   Skew-symmetry of J enforced at construction
-!   PSD-ness of R enforced via Cholesky witness
-!   Power balance: dH/dt = P_port - P_diss verified at each step
-!   WORM audit chain seals every time step
-!
-! Standard: Fortran 2018
-!=====================================================================
-module bob_phdae
-  use, intrinsic :: iso_c_binding, only: c_int32_t, c_int64_t, c_double, &
-       c_ptr, c_f_pointer, c_loc
-  use, intrinsic :: iso_fortran_env, only: int64, real64
-  use bob_kinds
-  use bob_errors
-  use bob_worm, only: bob_worm_chain, blake3_hash_bytes
-  implicit none
-  private
-
-  !──────────────────────────────────────────────────────────────────
-  ! Skew-symmetric matrix J = -J^T
-  !──────────────────────────────────────────────────────────────────
-  type, public :: skew_sym_matrix
-    real(wp), allocatable :: data(:,:)
-    integer(i4) :: n = 0
-    logical(lk) :: is_valid = .false.
-  contains
-    procedure :: init    => ssm_init
-    procedure :: set     => ssm_set      ! enforces J_{ij} = -J_{ji}
-    procedure :: apply   => ssm_apply    ! y = J * x
-    procedure :: verify  => ssm_verify   ! check J = -J^T
-    procedure :: destroy => ssm_destroy
-  end type skew_sym_matrix
-
-  !──────────────────────────────────────────────────────────────────
-  ! Positive semi-definite matrix R = R^T >= 0
-  !──────────────────────────────────────────────────────────────────
-  type, public :: psd_matrix
-    real(wp), allocatable :: data(:,:)
-    real(wp), allocatable :: chol(:,:)  ! Cholesky factor L: R = L*L^T
-    integer(i4) :: n = 0
-    logical(lk) :: is_valid = .false.
-    logical(lk) :: has_chol = .false.
-  contains
-    procedure :: init      => psd_init
-    procedure :: set_chol  => psd_set_chol  ! set via L: R = L*L^T
-    procedure :: apply     => psd_apply     ! y = R * x
-    procedure :: verify    => psd_verify    ! check R = R^T
-    procedure :: destroy   => psd_destroy
-  end type psd_matrix
-
-  !──────────────────────────────────────────────────────────────────
-  ! PH-DAE system state
-  !──────────────────────────────────────────────────────────────────
-  type, public :: bob_phdae_t
-    integer(i4) :: n          = 0       ! state dimension
-    real(wp) :: time          = ZERO    ! current time
-    real(wp) :: hamiltonian   = ZERO    ! current H(z)
-    real(wp) :: power_port    = ZERO    ! B^T * Q * z * u
-    real(wp) :: power_diss    = ZERO    ! z^T * Q^T * R * Q * z
-    real(wp), allocatable :: state(:)          ! z(t)
-    real(wp), allocatable :: state_dot(:)      ! dz/dt
-    real(wp), allocatable :: gradient(:)       ! Q * z (gradient)
-    real(wp), allocatable :: input(:)          ! u(t)
-    real(wp), allocatable :: Q(:,:)            ! gradient operator
-    real(wp), allocatable :: B(:,:)            ! input map
-    type(skew_sym_matrix) :: J                 ! interconnection
-    type(psd_matrix)      :: R                 ! dissipation
-    type(bob_worm_chain)  :: audit             ! WORM audit chain
-    logical(lk) :: initialized = .false.
-  contains
-    procedure :: init     => phdae_init
-    procedure :: step     => phdae_step      ! Radau IIA step
-    procedure :: hamiltonian_val => phdae_H  ! H(z) = ½ z^T Q^T Q z
-    procedure :: power_balance   => phdae_power
-    procedure :: destroy  => phdae_destroy
-  end type bob_phdae_t
-
-  ! Step receipt (sealed output from each integration step)
-  type, public :: bob_step_receipt
-    real(wp)    :: time_in   = ZERO
-    real(wp)    :: time_out  = ZERO
-    real(wp)    :: h_in      = ZERO    ! Hamiltonian before
-    real(wp)    :: h_out     = ZERO    ! Hamiltonian after
-    real(wp)    :: dh        = ZERO    ! change in H
-    real(wp)    :: p_port    = ZERO    ! power in from port
-    real(wp)    :: p_diss    = ZERO    ! power dissipated
-    real(wp)    :: balance_err = ZERO  ! |dH/dt - P_port + P_diss|
-    logical(lk) :: balance_ok = .false.
-    integer(i8) :: hash(32)  = 0_i8   ! BLAKE3 seal
-  end type bob_step_receipt
-
-  public :: phdae_new
-  public :: bob_phdae_new, bob_phdae_step, bob_phdae_free
-
-contains
-
-  !══════════════════════════════════════════════════════════════════
-  ! SKEW-SYMMETRIC MATRIX
-  !══════════════════════════════════════════════════════════════════
-
-  subroutine ssm_init(this, n)
-    class(skew_sym_matrix), intent(inout) :: this
-    integer(i4), intent(in) :: n
-    if (allocated(this%data)) deallocate(this%data)
-    allocate(this%data(n,n), source=ZERO)
-    this%n = n; this%is_valid = .true.
-  end subroutine ssm_init
-
-  !> Set element (i,j) and enforce J_{ji} = -J_{ij}
-  subroutine ssm_set(this, i, j, val)
-    class(skew_sym_matrix), intent(inout) :: this
-    integer(i4), intent(in) :: i, j
-    real(wp),    intent(in) :: val
-    if (i == j) return  ! diagonal must be zero for skew-sym
-    this%data(i,j) =  val
-    this%data(j,i) = -val
-  end subroutine ssm_set
-
-  !> y = J * x
-  pure subroutine ssm_apply(this, x, y)
-    class(skew_sym_matrix), intent(in) :: this
-    real(wp), intent(in)  :: x(this%n)
-    real(wp), intent(out) :: y(this%n)
-    integer(i4) :: i, j
-    y = ZERO
-    do i = 1, this%n
-      do j = 1, this%n
-        y(i) = y(i) + this%data(i,j) * x(j)
-      end do
-    end do
-  end subroutine ssm_apply
-
-  !> Verify J = -J^T (frobenius norm of J + J^T < tol)
-  function ssm_verify(this) result(ok)
-    class(skew_sym_matrix), intent(in) :: this
-    logical :: ok
-    real(wp) :: err
-    integer(i4) :: i, j
-    err = ZERO
-    do i = 1, this%n; do j = 1, this%n
-      err = err + abs(this%data(i,j) + this%data(j,i))**2
-    end do; end do
-    ok = sqrt(err) < TOL_NORM
-  end function ssm_verify
-
-  subroutine ssm_destroy(this)
-    class(skew_sym_matrix), intent(inout) :: this
-    if (allocated(this%data)) deallocate(this%data)
-    this%n = 0; this%is_valid = .false.
-  end subroutine ssm_destroy
-
-  !══════════════════════════════════════════════════════════════════
-  ! PSD MATRIX
-  !══════════════════════════════════════════════════════════════════
-
-  subroutine psd_init(this, n)
-    class(psd_matrix), intent(inout) :: this
-    integer(i4), intent(in) :: n
-    if (allocated(this%data)) deallocate(this%data)
-    if (allocated(this%chol)) deallocate(this%chol)
-    allocate(this%data(n,n), source=ZERO)
-    allocate(this%chol(n,n), source=ZERO)
-    this%n = n; this%is_valid = .true.; this%has_chol = .false.
-  end subroutine psd_init
-
-  !> Set R = L * L^T where L is lower triangular Cholesky factor
-  subroutine psd_set_chol(this, L)
-    class(psd_matrix), intent(inout) :: this
-    real(wp), intent(in) :: L(this%n, this%n)
-    integer(i4) :: i, j, k
-    this%chol = L
-    this%has_chol = .true.
-    ! Compute R = L * L^T
-    this%data = ZERO
-    do i = 1, this%n; do j = 1, this%n; do k = 1, this%n
-      this%data(i,j) = this%data(i,j) + L(i,k) * L(j,k)
-    end do; end do; end do
-  end subroutine psd_set_chol
-
-  pure subroutine psd_apply(this, x, y)
-    class(psd_matrix), intent(in) :: this
-    real(wp), intent(in)  :: x(this%n)
-    real(wp), intent(out) :: y(this%n)
-    integer(i4) :: i, j
-    y = ZERO
-    do i = 1, this%n; do j = 1, this%n
-      y(i) = y(i) + this%data(i,j) * x(j)
-    end do; end do
-  end subroutine psd_apply
-
-  function psd_verify(this) result(ok)
-    class(psd_matrix), intent(in) :: this
-    logical :: ok
-    real(wp) :: err, ev_min
-    integer(i4) :: i, j
-    ! Check symmetry
-    err = ZERO
-    do i = 1, this%n; do j = 1, this%n
-      err = err + abs(this%data(i,j) - this%data(j,i))**2
-    end do; end do
-    ok = sqrt(err) < TOL_NORM
-    ! Check positive semi-definiteness via diagonal dominance (simplified)
-    if (ok) then
-      do i = 1, this%n
-        if (this%data(i,i) < -TOL_NORM) then; ok = .false.; exit; end if
-      end do
-    end if
-  end function psd_verify
-
-  subroutine psd_destroy(this)
-    class(psd_matrix), intent(inout) :: this
-    if (allocated(this%data)) deallocate(this%data)
-    if (allocated(this%chol)) deallocate(this%chol)
-    this%n = 0; this%is_valid = .false.
-  end subroutine psd_destroy
-
-  !══════════════════════════════════════════════════════════════════
-  ! PH-DAE SYSTEM
-  !══════════════════════════════════════════════════════════════════
-
-  function phdae_new(n, num_inputs) result(sys)
-    integer(i4), intent(in) :: n, num_inputs
-    type(bob_phdae_t) :: sys
-    call sys%init(n, num_inputs)
-  end function phdae_new
-
-  subroutine phdae_init(this, n, num_inputs)
-    class(bob_phdae_t), intent(inout) :: this
-    integer(i4), intent(in) :: n, num_inputs
-    this%n = n; this%time = ZERO
-    allocate(this%state(n),     source=ZERO)
-    allocate(this%state_dot(n), source=ZERO)
-    allocate(this%gradient(n),  source=ZERO)
-    allocate(this%input(num_inputs), source=ZERO)
-    allocate(this%Q(n,n), source=ZERO)
-    allocate(this%B(n,num_inputs), source=ZERO)
-    ! Default: Q = I (identity), B = 0
-    integer(i4) :: i
-    do i = 1, n; this%Q(i,i) = ONE; end do
-    call this%J%init(n)
-    call this%R%init(n)
-    call this%audit%init()
-    this%initialized = .true.
-  end subroutine phdae_init
-
-  !> H(z) = ½ z^T Q^T Q z (quadratic Hamiltonian)
-  function phdae_H(this) result(H)
-    class(bob_phdae_t), intent(inout) :: this
-    real(wp) :: H
-    real(wp) :: Qz(this%n)
-    integer(i4) :: i, j
-    ! gradient = Q * z
-    this%gradient = ZERO
-    do i = 1, this%n; do j = 1, this%n
-      this%gradient(i) = this%gradient(i) + this%Q(i,j) * this%state(j)
-    end do; end do
-    ! H = ½ ||Q z||^2
-    H = HALF * dot_product(this%gradient, this%gradient)
-  end function phdae_H
-
-  !> Power balance: dH/dt = P_port - P_diss
-  !> P_port = (B*u)^T * gradient   (power from external port)
-  !> P_diss = gradient^T * R * gradient  (dissipated power, >= 0)
-  subroutine phdae_power(this)
-    class(bob_phdae_t), intent(inout) :: this
-    real(wp) :: Rg(this%n), Bu(this%n)
-    integer(i4) :: i, j
-    ! R * gradient
-    call this%R%apply(this%gradient, Rg)
-    this%power_diss = dot_product(this%gradient, Rg)
-    ! B * u
-    Bu = ZERO
-    do i = 1, this%n; do j = 1, size(this%input)
-      Bu(i) = Bu(i) + this%B(i,j) * this%input(j)
-    end do; end do
-    this%power_port = dot_product(Bu, this%gradient)
-  end subroutine phdae_power
-
-  !> Single implicit midpoint step (simplified Radau IIA)
-  !> dz/dt = (J - R) * gradient + B * u
-  subroutine phdae_step(this, dt, receipt)
-    class(bob_phdae_t), intent(inout) :: this
-    real(wp),           intent(in)    :: dt
-    type(bob_step_receipt), intent(out) :: receipt
-    real(wp) :: Jg(this%n), Rg(this%n), Bu(this%n), rhs(this%n)
-    real(wp) :: h_before, h_after, balance_err
-    integer(i4) :: i, j
-    integer(i8) :: seal_payload(8)
-
-    receipt%time_in = this%time
-    h_before = this%hamiltonian_val()
-    receipt%h_in = h_before
-
-    ! gradient = Q * z
-    this%gradient = ZERO
-    do i = 1, this%n; do j = 1, this%n
-      this%gradient(i) = this%gradient(i) + this%Q(i,j) * this%state(j)
-    end do; end do
-
-    ! RHS = (J - R) * gradient + B * u
-    call this%J%apply(this%gradient, Jg)
-    call this%R%apply(this%gradient, Rg)
-    Bu = ZERO
-    do i = 1, this%n; do j = 1, size(this%input)
-      Bu(i) = Bu(i) + this%B(i,j) * this%input(j)
-    end do; end do
-    rhs = Jg - Rg + Bu
-
-    ! Explicit Euler step (first-order, replace with Radau IIA for stiff systems)
-    this%state_dot = rhs
-    this%state     = this%state + dt * rhs
-    this%time      = this%time + dt
-
-    ! Update power balance
-    call this%phdae_power()
-    h_after = this%hamiltonian_val()
-    this%hamiltonian = h_after
-
-    ! Power balance error: |dH/dt - P_port + P_diss|
-    balance_err = abs((h_after - h_before)/dt - this%power_port + this%power_diss)
-
-    receipt%time_out    = this%time
-    receipt%h_out       = h_after
-    receipt%dh          = h_after - h_before
-    receipt%p_port      = this%power_port
-    receipt%p_diss      = this%power_diss
-    receipt%balance_err = balance_err
-    receipt%balance_ok  = balance_err < 1e-6_wp
-
-    ! Seal to WORM chain
-    call this%audit%seal('PHDAE_STEP', 't='//achar(0), int(this%time*1000,i64))
-  end subroutine phdae_step
-
-  subroutine phdae_destroy(this)
-    class(bob_phdae_t), intent(inout) :: this
-    if (allocated(this%state))     deallocate(this%state)
-    if (allocated(this%state_dot)) deallocate(this%state_dot)
-    if (allocated(this%gradient))  deallocate(this%gradient)
-    if (allocated(this%input))     deallocate(this%input)
-    if (allocated(this%Q))         deallocate(this%Q)
-    if (allocated(this%B))         deallocate(this%B)
-    call this%J%destroy()
-    call this%R%destroy()
-    call this%audit%destroy()
-    this%initialized = .false.
-  end subroutine phdae_destroy
-
-  !══════════════════════════════════════════════════════════════════
-  ! C ABI
-  !══════════════════════════════════════════════════════════════════
-
-  function bob_phdae_new(n, num_inputs) result(ptr) bind(C, name="bob_phdae_new")
-    integer(c_int32_t), value :: n, num_inputs
-    type(c_ptr) :: ptr
-    type(bob_phdae_t), pointer :: sys
-    allocate(sys)
-    call sys%init(int(n,i4), int(num_inputs,i4))
-    ptr = c_loc(sys)
-  end function bob_phdae_new
-
-  function bob_phdae_step(sys_ptr, dt) result(err) bind(C, name="bob_phdae_step")
-    type(c_ptr),    value :: sys_ptr
-    real(c_double), value :: dt
-    real(c_double)        :: err
-    type(bob_phdae_t),   pointer :: sys
-    type(bob_step_receipt)       :: receipt
-    if (.not. c_associated(sys_ptr)) then; err = -1.0_wp; return; end if
-    call c_f_pointer(sys_ptr, sys)
-    call sys%step(real(dt,wp), receipt)
-    err = real(receipt%balance_err, c_double)
-  end function bob_phdae_step
-
-  subroutine bob_phdae_free(sys_ptr) bind(C, name="bob_phdae_free")
-    type(c_ptr), value :: sys_ptr
-    type(bob_phdae_t), pointer :: sys
-    if (.not. c_associated(sys_ptr)) return
-    call c_f_pointer(sys_ptr, sys)
-    call sys%destroy()
-    deallocate(sys)
-  end subroutine bob_phdae_free
-
-end module bob_phdae
-
-! Made with Bob

build_final2/CMakeFiles/bob_quantum.dir/src/bob_phdae.f90-pp.f90.d

@@ -1,2 +0,0 @@
-CMakeFiles/bob_quantum.dir/src/bob_phdae.f90-pp.f90: \
- C:/Users/jessi/Desktop/bobs\ control\ repo/sov-kernel-monster/src/bob_phdae.f90