Last change
on this file since 3553 was
1345,
checked in by aslmd, 10 years ago
|
LMDZ.COMMON. introduced an attenuation profile for nudging towards wind. new parameter: phalf: pressure at which attenuation factor is divided by two.
|
File size:
217 bytes
|
Rev | Line | |
---|
[1024] | 1 | module comuforc_h |
---|
| 2 | IMPLICIT NONE |
---|
| 3 | REAL,ALLOCATABLE,DIMENSION(:,:) :: uforc |
---|
[1345] | 4 | REAL,ALLOCATABLE,DIMENSION(:) :: attenua |
---|
[1024] | 5 | REAL :: facwind |
---|
[1345] | 6 | REAL :: phalf |
---|
[1024] | 7 | end module comuforc_h |
---|
| 8 | |
---|
| 9 | |
---|
Note: See
TracBrowser
for help on using the repository browser.