Changeset 612 for codes/icosagcm/devel/src/diagnostics/diagflux.F90
- Timestamp:
- 11/22/17 00:06:57 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
codes/icosagcm/devel/src/diagnostics/diagflux.F90
r603 r612 170 170 ! => loop over interior region 171 171 CALL distrib_level(ij_begin_ext, ij_end_ext, ij_omp_begin_ext,ij_omp_end_ext) 172 #include "../kernels /energy_fluxes.k90"172 #include "../kernels_hex/energy_fluxes.k90" 173 173 END SUBROUTINE compute_diagflux_energy 174 174
Note: See TracChangeset
for help on using the changeset viewer.