#include "dimensions.h"
#include "statto.h"
#include "netcdf.inc"
Go to the source code of this file.
|
subroutine | wstats (ngrid, nom, titre, unite, dim, px) |
|
subroutine | inivar (nid, varid, ngrid, dim, index, px, ierr) |
|
subroutine | def_var_stats (nid, name, title, units, nbdim, dimids, nvarid, ierr) |
|
subroutine def_var_stats |
( |
integer, intent(in) |
nid, |
|
|
character(len=*), intent(in) |
name, |
|
|
character(len=*), intent(in) |
title, |
|
|
character(len=*), intent(in) |
units, |
|
|
integer, intent(in) |
nbdim, |
|
|
integer, dimension(nbdim), intent(in) |
dimids, |
|
|
integer, intent(out) |
nvarid, |
|
|
integer, intent(out) |
ierr |
|
) |
| |
subroutine inivar |
( |
integer, intent(in) |
nid, |
|
|
integer, intent(in) |
varid, |
|
|
integer, intent(in) |
ngrid, |
|
|
integer, intent(in) |
dim, |
|
|
integer, intent(in) |
index, |
|
|
real, dimension(ngrid,llm), intent(in) |
px, |
|
|
integer, intent(out) |
ierr |
|
) |
| |
subroutine wstats |
( |
integer, intent(in) |
ngrid, |
|
|
character (len=*), intent(in) |
nom, |
|
|
character (len=*), intent(in) |
titre, |
|
|
character (len=*), intent(in) |
unite, |
|
|
integer, intent(in) |
dim, |
|
|
real, dimension(ngrid,llm), intent(in) |
px |
|
) |
| |