source: codes/icosagcm/devel/Python/src/kernels_caldyn_hevi.jin @ 928

Last change on this file since 928 was 928, checked in by dubos, 5 years ago

devel : separate modules for caldyn_vert and caldyn_vert_NH

File size: 342 bytes
Line 
1KERNEL(gradient)
2  FORALL_CELLS_EXT()
3    ON_EDGES
4      grad(EDGE) = SIGN*(b(CELL2)-b(CELL1))
5    END_BLOCK
6  END_BLOCK
7END_BLOCK
8
9KERNEL(div)
10  FORALL_CELLS_EXT()
11    ON_PRIMAL
12      div_ij=0.
13      FORALL_EDGES
14        div_ij = div_ij + SIGN*LE_DE*u(EDGE)
15      END_BLOCK
16      divu(CELL) = div_ij / AI
17    END_BLOCK
18  END_BLOCK
19END_BLOCK
Note: See TracBrowser for help on using the repository browser.