source: lmdz_wrf/trunk/WRFV3/frame/module_alloc_space_0.F

Last change on this file was 1, checked in by lfita, 10 years ago
  • -- --- Opening of the WRF+LMDZ coupling repository --- -- -

WRF: version v3.3
LMDZ: version v1818

More details in:

File size: 726 bytes
Line 
1#define NNNMAX 9
2#define NNN 0
3#define ROUTINENAME alloc_space_field_core_0
4MODULE module_alloc_space_0
5CONTAINS
6
7! Split the allocation bits into separate routines.
8!
9! The following bit of maximal foolishness brought to you by the makers of certain compilers
10! that can't process large files of simple branches, assignment statements and calls to very simple
11! procedures and functions without whining to their mommies about it being too complex and insisting
12! you call your service representative or wait geological time to produce code that old 1-pass
13! compilers (or compilers for other languages) could have managed efficiently in a second or two.
14!
15
16#include "module_alloc_space.h"
17
18END MODULE module_alloc_space_0
19
Note: See TracBrowser for help on using the repository browser.