Skip to content
Snippets Groups Projects
Commit 1aaf979f authored by Antoine Cyril David Hoffmann's avatar Antoine Cyril David Hoffmann :seedling:
Browse files

typoooo

parent 49badfc9
No related branches found
No related tags found
No related merge requests found
......@@ -180,7 +180,7 @@ SUBROUTINE interp_z(target,local_nz,ngz,f_in,f_out)
CASE(2) ! output on odd grid
CALL interp_e2o_z(local_nz,ngz,f_in,f_out)
CASE DEFAULT ! No staggered grid -> usual centered finite differences
f_out = f_in(1+ngz/2:local_nz+ngz/2)
f_out = f_in((1+ngz/2):(local_nz+ngz/2))
END SELECT
CONTAINS
SUBROUTINE interp_o2e_z(local_nz, ngz,fo,fe)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment