Skip to content

Commit

Permalink
update tapenade
Browse files Browse the repository at this point in the history
  • Loading branch information
Apolline Elbaz committed Sep 9, 2024
1 parent 45c24fc commit 1615eb5
Show file tree
Hide file tree
Showing 2 changed files with 12 additions and 12 deletions.
12 changes: 6 additions & 6 deletions smash/fcore/forward/forward_db.f90
View file
Original file line number Diff line number Diff line change
Expand Up @@ -15060,7 +15060,7 @@ SUBROUTINE GR4_RI_TIME_STEP_D(setup, mesh, input_data, options, &
TYPE(MESHDT), INTENT(IN) :: mesh
TYPE(INPUT_DATADT), INTENT(IN) :: input_data
TYPE(OPTIONSDT), INTENT(IN) :: options
TYPE(RETURNSDT), INTENT(IN) :: returns
TYPE(RETURNSDT), INTENT(INOUT) :: returns
INTEGER, INTENT(IN) :: time_step
REAL(sp), DIMENSION(mesh%nac), INTENT(IN) :: ac_mlt
REAL(sp), DIMENSION(mesh%nac), INTENT(IN) :: ac_mlt_d
Expand Down Expand Up @@ -15159,7 +15159,7 @@ SUBROUTINE GR4_RI_TIME_STEP_B(setup, mesh, input_data, options, &
TYPE(MESHDT), INTENT(IN) :: mesh
TYPE(INPUT_DATADT), INTENT(IN) :: input_data
TYPE(OPTIONSDT), INTENT(IN) :: options
TYPE(RETURNSDT), INTENT(IN) :: returns
TYPE(RETURNSDT), INTENT(INOUT) :: returns
INTEGER, INTENT(IN) :: time_step
REAL(sp), DIMENSION(mesh%nac), INTENT(IN) :: ac_mlt
REAL(sp), DIMENSION(mesh%nac) :: ac_mlt_b
Expand Down Expand Up @@ -15306,7 +15306,7 @@ SUBROUTINE GR4_RI_TIME_STEP(setup, mesh, input_data, options, returns&
TYPE(MESHDT), INTENT(IN) :: mesh
TYPE(INPUT_DATADT), INTENT(IN) :: input_data
TYPE(OPTIONSDT), INTENT(IN) :: options
TYPE(RETURNSDT), INTENT(IN) :: returns
TYPE(RETURNSDT), INTENT(INOUT) :: returns
INTEGER, INTENT(IN) :: time_step
REAL(sp), DIMENSION(mesh%nac), INTENT(IN) :: ac_mlt
REAL(sp), DIMENSION(mesh%nac), INTENT(IN) :: ac_ci, ac_cp, ac_ct, &
Expand Down Expand Up @@ -16862,7 +16862,7 @@ SUBROUTINE GR5_RI_TIME_STEP_D(setup, mesh, input_data, options, &
TYPE(MESHDT), INTENT(IN) :: mesh
TYPE(INPUT_DATADT), INTENT(IN) :: input_data
TYPE(OPTIONSDT), INTENT(IN) :: options
TYPE(RETURNSDT), INTENT(IN) :: returns
TYPE(RETURNSDT), INTENT(INOUT) :: returns
INTEGER, INTENT(IN) :: time_step
REAL(sp), DIMENSION(mesh%nac), INTENT(IN) :: ac_mlt
REAL(sp), DIMENSION(mesh%nac), INTENT(IN) :: ac_mlt_d
Expand Down Expand Up @@ -16962,7 +16962,7 @@ SUBROUTINE GR5_RI_TIME_STEP_B(setup, mesh, input_data, options, &
TYPE(MESHDT), INTENT(IN) :: mesh
TYPE(INPUT_DATADT), INTENT(IN) :: input_data
TYPE(OPTIONSDT), INTENT(IN) :: options
TYPE(RETURNSDT), INTENT(IN) :: returns
TYPE(RETURNSDT), INTENT(INOUT) :: returns
INTEGER, INTENT(IN) :: time_step
REAL(sp), DIMENSION(mesh%nac), INTENT(IN) :: ac_mlt
REAL(sp), DIMENSION(mesh%nac) :: ac_mlt_b
Expand Down Expand Up @@ -17110,7 +17110,7 @@ SUBROUTINE GR5_RI_TIME_STEP(setup, mesh, input_data, options, returns&
TYPE(MESHDT), INTENT(IN) :: mesh
TYPE(INPUT_DATADT), INTENT(IN) :: input_data
TYPE(OPTIONSDT), INTENT(IN) :: options
TYPE(RETURNSDT), INTENT(IN) :: returns
TYPE(RETURNSDT), INTENT(INOUT) :: returns
INTEGER, INTENT(IN) :: time_step
REAL(sp), DIMENSION(mesh%nac), INTENT(IN) :: ac_mlt
REAL(sp), DIMENSION(mesh%nac), INTENT(IN) :: ac_ci, ac_cp, ac_ct, &
Expand Down
12 changes: 6 additions & 6 deletions smash/fcore/forward/forward_openmp_db.f90
View file
Original file line number Diff line number Diff line change
Expand Up @@ -15178,7 +15178,7 @@ SUBROUTINE GR4_RI_TIME_STEP_D(setup, mesh, input_data, options, &
TYPE(MESHDT), INTENT(IN) :: mesh
TYPE(INPUT_DATADT), INTENT(IN) :: input_data
TYPE(OPTIONSDT), INTENT(IN) :: options
TYPE(RETURNSDT), INTENT(IN) :: returns
TYPE(RETURNSDT), INTENT(INOUT) :: returns
INTEGER, INTENT(IN) :: time_step
REAL(sp), DIMENSION(mesh%nac), INTENT(IN) :: ac_mlt
REAL(sp), DIMENSION(mesh%nac), INTENT(IN) :: ac_mlt_d
Expand Down Expand Up @@ -15284,7 +15284,7 @@ SUBROUTINE GR4_RI_TIME_STEP_B(setup, mesh, input_data, options, &
TYPE(MESHDT), INTENT(IN) :: mesh
TYPE(INPUT_DATADT), INTENT(IN) :: input_data
TYPE(OPTIONSDT), INTENT(IN) :: options
TYPE(RETURNSDT), INTENT(IN) :: returns
TYPE(RETURNSDT), INTENT(INOUT) :: returns
INTEGER, INTENT(IN) :: time_step
REAL(sp), DIMENSION(mesh%nac), INTENT(IN) :: ac_mlt
REAL(sp), DIMENSION(mesh%nac) :: ac_mlt_b
Expand Down Expand Up @@ -15474,7 +15474,7 @@ SUBROUTINE GR4_RI_TIME_STEP(setup, mesh, input_data, options, returns&
TYPE(MESHDT), INTENT(IN) :: mesh
TYPE(INPUT_DATADT), INTENT(IN) :: input_data
TYPE(OPTIONSDT), INTENT(IN) :: options
TYPE(RETURNSDT), INTENT(IN) :: returns
TYPE(RETURNSDT), INTENT(INOUT) :: returns
INTEGER, INTENT(IN) :: time_step
REAL(sp), DIMENSION(mesh%nac), INTENT(IN) :: ac_mlt
REAL(sp), DIMENSION(mesh%nac), INTENT(IN) :: ac_ci, ac_cp, ac_ct, &
Expand Down Expand Up @@ -17212,7 +17212,7 @@ SUBROUTINE GR5_RI_TIME_STEP_D(setup, mesh, input_data, options, &
TYPE(MESHDT), INTENT(IN) :: mesh
TYPE(INPUT_DATADT), INTENT(IN) :: input_data
TYPE(OPTIONSDT), INTENT(IN) :: options
TYPE(RETURNSDT), INTENT(IN) :: returns
TYPE(RETURNSDT), INTENT(INOUT) :: returns
INTEGER, INTENT(IN) :: time_step
REAL(sp), DIMENSION(mesh%nac), INTENT(IN) :: ac_mlt
REAL(sp), DIMENSION(mesh%nac), INTENT(IN) :: ac_mlt_d
Expand Down Expand Up @@ -17320,7 +17320,7 @@ SUBROUTINE GR5_RI_TIME_STEP_B(setup, mesh, input_data, options, &
TYPE(MESHDT), INTENT(IN) :: mesh
TYPE(INPUT_DATADT), INTENT(IN) :: input_data
TYPE(OPTIONSDT), INTENT(IN) :: options
TYPE(RETURNSDT), INTENT(IN) :: returns
TYPE(RETURNSDT), INTENT(INOUT) :: returns
INTEGER, INTENT(IN) :: time_step
REAL(sp), DIMENSION(mesh%nac), INTENT(IN) :: ac_mlt
REAL(sp), DIMENSION(mesh%nac) :: ac_mlt_b
Expand Down Expand Up @@ -17512,7 +17512,7 @@ SUBROUTINE GR5_RI_TIME_STEP(setup, mesh, input_data, options, returns&
TYPE(MESHDT), INTENT(IN) :: mesh
TYPE(INPUT_DATADT), INTENT(IN) :: input_data
TYPE(OPTIONSDT), INTENT(IN) :: options
TYPE(RETURNSDT), INTENT(IN) :: returns
TYPE(RETURNSDT), INTENT(INOUT) :: returns
INTEGER, INTENT(IN) :: time_step
REAL(sp), DIMENSION(mesh%nac), INTENT(IN) :: ac_mlt
REAL(sp), DIMENSION(mesh%nac), INTENT(IN) :: ac_ci, ac_cp, ac_ct, &
Expand Down

0 comments on commit 1615eb5

Please sign in to comment.