remove some old comments about Fortran (#3022)

AMReX-Astro · Jan 17, 2025 · 046cf07 · 046cf07
1 parent 057363c
commit 046cf07
Show file tree

Hide file tree

Showing 4 changed files with 4 additions and 11 deletions.
diff --git a/Source/driver/Castro.cpp b/Source/driver/Castro.cpp
@@ -1015,7 +1015,7 @@ Castro::initData ()
     BL_PROFILE("Castro::initData()");
 
     //
-    // Loop over grids, call FORTRAN function to init with data.
+    // Loop over grids, call initialization functions
     //
 #if AMREX_SPACEDIM > 1
     const Real* dx  = geom.CellSize();
@@ -3716,8 +3716,7 @@ Castro::extern_init ()
     std::cout << "reading extern runtime parameters ..." << std::endl;
   }
 
-  // grab them from Fortran to C++; then read any C++ parameters directly
-  // from inputs (via ParmParse)
+  // read any runtime parameters directly from inputs (via ParmParse)
   init_extern_parameters();
 
 }

diff --git a/Source/driver/Castro_setup.cpp b/Source/driver/Castro_setup.cpp
@@ -975,8 +975,7 @@ Castro::variableSetUp ()
   //
   // We want a derived type that corresponds to the number of particles
   // in each cell.  We only intend to use it in plotfiles for debugging
-  // purposes.  We'll just use the DERNULL since don't do anything in
-  // fortran for now.  We'll actually set the values in writePlotFile().
+  // purposes.  We'll actually set the values in writePlotFile().
   //
   derive_lst.add("particle_count",IndexType::TheCellType(),1,ca_dernull,the_same_box);
   derive_lst.addComponent("particle_count",desc_lst,State_Type,URHO,1);

diff --git a/Source/driver/Derive.cpp b/Source/driver/Derive.cpp
@@ -14,9 +14,6 @@ extern "C"
 {
 #endif
 
-    // Note that in the following routines, we are NOT passing
-    // several variables to Fortran that would be unused.
-
     // These routines are called in an MFIter loop, so we do not
     // need to explicitly synchronize after GPU kernels.
 

diff --git a/Source/rotation/rotation_sources.cpp b/Source/rotation/rotation_sources.cpp
@@ -148,9 +148,7 @@ Castro::corrrsrc(const Box& bx,
 
   // Corrector step for the rotation source terms. This is applied
   // after the hydrodynamics update to fix the time-level n
-  // prediction and add the time-level n+1 data.  This subroutine
-  // exists outside of the Fortran module above because it needs to
-  // be called directly from C++.
+  // prediction and add the time-level n+1 data.
 
   // uold and unew are the old and new time state data