Parent Directory | Revision Log | Patch
revision 67 by guez, Fri Apr 8 12:43:31 2011 UTC | revision 68 by guez, Wed Nov 14 16:59:30 2012 UTC | |
---|---|---|
# | Line 91 CONTAINS | Line 91 CONTAINS |
91 | ||
92 | print *, 'Compute all the parameters needed for the gravity wave drag code' | print *, 'Compute all the parameters needed for the gravity wave drag code' |
93 | ||
94 | ! Allocate the data we need to put in the interpolated fields: | ! Interpolated fields: |
95 | ALLOCATE(phis(iim + 1, jjm + 1)) | ALLOCATE(phis(iim + 1, jjm + 1)) |
96 | ALLOCATE(mask(iim + 1, jjm + 1)) | ALLOCATE(mask(iim + 1, jjm + 1)) |
97 |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |