fix boday nsec overwrite (#30)

* fix boday nsec overwrite * bump version --------- Co-authored-by: Joshua Anibal <[email protected]>
joanibal · Mar 21, 2024 · 31b4bd6 · 31b4bd6
1 parent a0cb243
commit 31b4bd6
Show file tree

Hide file tree

Showing 4 changed files with 6 additions and 5 deletions.
diff --git a/meson.build b/meson.build
@@ -1,7 +1,7 @@
 project(
  'pyavl',
  'c',
- version: '1.6.1',
+ version: '1.6.2',
  license: 'GPL-2.0',
  meson_version: '>= 0.64.0',
  default_options: [

diff --git a/pyproject.toml b/pyproject.toml
@@ -19,7 +19,7 @@ dependencies = [
  "numpy>=1.19",
 ]
 readme = "README.md"
-version = "1.6.1" # this automatically updates __init__.py
+version = "1.6.2" # this automatically updates __init__.py
 
 
 [tool.cibuildwheel]

diff --git a/src/ainput.f b/src/ainput.f
@@ -88,6 +88,7 @@ SUBROUTINE INPUT(LUN,FNAME,FERR)
 C
 C---- initialize all entity counters
  NSEC = 0
+ NSEC_B = 0
 C
  NSURF = 0
  NVOR = 0
@@ -324,7 +325,7 @@ SUBROUTINE INPUT(LUN,FNAME,FERR)
  NBODY = NBODY + 1
  IBODY = MIN( NBODY , NBMAX )
 C
- NSEC = 0
+ NSEC_B(IBODY) = 0
  ISEC = 0
  NBOD = 0
 C

diff --git a/src/includes/AVL.INC b/src/includes/AVL.INC
@@ -365,10 +365,10 @@ C !start added variables for python geometry minipulation
 
  LOGICAL LDUPL_B
  COMMON /BODY_GEOM_L/
- & LDUPL_B(NBMAX) ! T if surface is a duplicated
+ & LDUPL_B(NBMAX) ! T if body is a duplicated
 c
  COMMON /BODY_GEOM_I/
- & NSEC_B(NBMAX) ! number of sections in surface
+ & NSEC_B(NBMAX) ! number of sections in body
 
  REAL(kind=avl_real) XYZSCAL_B
  REAL(kind=avl_real) XYZTRAN_B