Context Navigation

zdfddm_substitute.h90 @ 105

Last change on this file since 105 was 105, checked in by cvs2svn, 20 years ago
This commit was manufactured by cvs2svn to create tag 'nemo_dev_x3'.
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 664 bytes

Line
1	!!----------------------------------------------------------------------
2	!! * zdfddm_substitute.h90 *
3	!!----------------------------------------------------------------------
4	!! ** purpose : substitute fsaht. the eddy diffusivity coeff.
5	!! with a constant or 1D or 2D or 3D array, using CPP macro.
6	!!----------------------------------------------------------------------
7	#if defined key_zdfddm
8	! 'key_zdfddm' : avs: 3D array defined in zdfddm module
9	# define fsavs(i,j,k) avs(i,j,k)
10	#else
11	! Defautl option : avs = avt
12	# define fsavs(i,j,k) avt(i,j,k)
13	#endif

Note: See TracBrowser for help on using the repository browser.