subroutine la2ga |
( |
real (kind=kind_io8), dimension (imxin,jmxin) |
regin, |
|
|
integer |
imxin, |
|
|
integer |
jmxin, |
|
|
real (kind=kind_io8), dimension(imxin) |
rinlon, |
|
|
real (kind=kind_io8), dimension(jmxin) |
rinlat, |
|
|
real (kind=kind_io8) |
rlon, |
|
|
real (kind=kind_io8) |
rlat, |
|
|
integer |
inttyp, |
|
|
real (kind=kind_io8), dimension(len) |
gauout, |
|
|
integer |
len, |
|
|
logical |
lmask, |
|
|
real (kind=kind_io8), dimension(imxin,jmxin) |
rslmsk, |
|
|
real (kind=kind_io8), dimension(len) |
slmask, |
|
|
real (kind=kind_io8), dimension(len) |
outlat, |
|
|
real (kind=kind_io8), dimension(len) |
outlon, |
|
|
integer |
me |
|
) |
| |