Canoe
Comprehensive Atmosphere N' Ocean Engine
dirty.hpp
Go to the documentation of this file.
1 
4 #ifndef SRC_DIRTY_HPP_
5 #define SRC_DIRTY_HPP_
6 
7 // helper functions, will be moved in the future
8 int find_pressure_level_lesser(Real pres, AthenaArray<Real> const &w, int k,
9  int j, int is, int ie) {
10  for (int i = is; i <= ie; ++i)
11  if (w(IPR, k, j, i) < pres) return i;
12 
13  return ie + 1;
14 }
15 
16 #endif // SRC_DIRTY_HPP_
int find_pressure_level_lesser(Real pres, AthenaArray< Real > const &w, int k, int j, int is, int ie)
Definition: dirty.hpp:8