Go to the source code of this file.
|
subroutine | scops (npoints, nlev, ncol, seed, cc, conv, overlap, frac_out, ncolprint) |
|
subroutine scops |
( |
integer |
npoints, |
|
|
integer |
nlev, |
|
|
integer |
ncol, |
|
|
integer, dimension(npoints) |
seed, |
|
|
real, dimension(npoints,nlev) |
cc, |
|
|
real, dimension(npoints,nlev) |
conv, |
|
|
integer |
overlap, |
|
|
real, dimension(npoints,ncol,nlev) |
frac_out, |
|
|
integer |
ncolprint |
|
) |
| |