43 integer(i4b) :: n_surf
45 real(dp),
dimension(:),
allocatable :: lambda_surf
47 real(dp),
dimension(:),
allocatable :: phi_surf
49 real(dp),
dimension(:),
allocatable :: x_surf
51 real(dp),
dimension(:),
allocatable :: y_surf
53 real(dp),
dimension(0:JMAX,0:IMAX) :: snowfall
55 real(dp),
dimension(0:JMAX,0:IMAX) :: rainfall
57 #if (ICE_STREAM==2) /* with ice streams */
62 integer(i2b),
dimension(0:JMAX,0:IMAX) :: maske_sedi
Declarations of kind types for SICOPOLIS.
Declarations of global variables for SICOPOLIS (for the ANT domain).