Skip to content
Snippets Groups Projects
Commit 0d368ce6 authored by Antoine Cyril David Hoffmann's avatar Antoine Cyril David Hoffmann
Browse files

typo correction

parent 3a8d34ff
Branches
Tags
No related merge requests found
...@@ -29,8 +29,7 @@ SUBROUTINE stepon ...@@ -29,8 +29,7 @@ SUBROUTINE stepon
CALL advance_time_level CALL advance_time_level
! Update moments with the hierarchy RHS (step by step) ! Update moments with the hierarchy RHS (step by step)
! N_n+1 = N_n + N_rhs(n) ! N_n+1 = N_n + N_rhs(n)
! CALL advance_moments CALL advance_moments
CALL advance_moments_explicit
! Closure enforcement of N_n+1 ! Closure enforcement of N_n+1
CALL apply_closure_model CALL apply_closure_model
! Exchanges the ghosts values of N_n+1 ! Exchanges the ghosts values of N_n+1
...@@ -53,27 +52,6 @@ SUBROUTINE stepon ...@@ -53,27 +52,6 @@ SUBROUTINE stepon
CONTAINS CONTAINS
! SUBROUTINE advance_moments
! ! Execution time start
! CALL cpu_time(t0_adv_field)
!
! DO ip=ips_e,ipe_e
! DO ij=ijs_e,ije_e
! CALL advance_field(moments_e(ip,ij,:,:,:),moments_rhs_e(ip,ij,:,:,:))
! ENDDO
! ENDDO
! DO ip=ips_i,ipe_i
! DO ij=ijs_i,ije_i
! CALL advance_field(moments_i(ip,ij,:,:,:),moments_rhs_i(ip,ij,:,:,:))
! ENDDO
! ENDDO
!
! ! Execution time end
! CALL cpu_time(t1_adv_field)
! tc_adv_field = tc_adv_field + (t1_adv_field - t0_adv_field)
! END SUBROUTINE advance_moments
SUBROUTINE checkfield_all ! Check all the fields for inf or nan SUBROUTINE checkfield_all ! Check all the fields for inf or nan
! Execution time start ! Execution time start
CALL cpu_time(t0_checkfield) CALL cpu_time(t0_checkfield)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment