read_pstoke0 Subroutine

subroutine read_pstoke0(irec, zrec, zkon, zkev, airefi, phisfi, t, mfu, mfd, en_u, de_u, en_d, de_d, coefh, fm_therm, en_therm, frac_impa, frac_nucl, pyu1, pyv1, ftsol, psrf)

Uses

  • proc~~read_pstoke0~2~~UsesGraph proc~read_pstoke0~2 read_pstoke0 module~indice_sol_mod indice_sol_mod proc~read_pstoke0~2->module~indice_sol_mod module~mod_grid_phy_lmdz mod_grid_phy_lmdz proc~read_pstoke0~2->module~mod_grid_phy_lmdz module~dimphy~3 dimphy proc~read_pstoke0~2->module~dimphy~3 netcdf netcdf proc~read_pstoke0~2->netcdf

Arguments

Type IntentOptional Attributes Name
integer :: irec
integer :: zrec
integer :: zkon
integer :: zkev
real :: airefi(nbp_lon*(nbp_lat-2)+2)
real :: phisfi(nbp_lon*(nbp_lat-2)+2)
real :: t(nbp_lon*(nbp_lat-2)+2,nbp_lev)
real :: mfu(nbp_lon*(nbp_lat-2)+2,nbp_lev)
real :: mfd(nbp_lon*(nbp_lat-2)+2,nbp_lev)
real :: en_u(nbp_lon*(nbp_lat-2)+2,nbp_lev)
real :: de_u(nbp_lon*(nbp_lat-2)+2,nbp_lev)
real :: en_d(nbp_lon*(nbp_lat-2)+2,nbp_lev)
real :: de_d(nbp_lon*(nbp_lat-2)+2,nbp_lev)
real :: coefh(nbp_lon*(nbp_lat-2)+2,nbp_lev)
real :: fm_therm(nbp_lon*(nbp_lat-2)+2,nbp_lev)
real :: en_therm(nbp_lon*(nbp_lat-2)+2,nbp_lev)
real :: frac_impa(nbp_lon*(nbp_lat-2)+2,nbp_lev)
real :: frac_nucl(nbp_lon*(nbp_lat-2)+2,nbp_lev)
real :: pyu1(nbp_lon*(nbp_lat-2)+2)
real :: pyv1(nbp_lon*(nbp_lat-2)+2)
real :: ftsol(nbp_lon*(nbp_lat-2)+2,nbp_lev)
real :: psrf(nbp_lon*(nbp_lat-2)+2,nbp_lev)

Calls

proc~~read_pstoke0~2~~CallsGraph proc~read_pstoke0~2 read_pstoke0 nf90_inq_varid nf90_inq_varid proc~read_pstoke0~2->nf90_inq_varid nf90_get_var nf90_get_var proc~read_pstoke0~2->nf90_get_var nf90_inq_dimid nf90_inq_dimid proc~read_pstoke0~2->nf90_inq_dimid nf90_open nf90_open proc~read_pstoke0~2->nf90_open proc~gr_ecrit_fi gr_ecrit_fi proc~read_pstoke0~2->proc~gr_ecrit_fi nf90_inquire_dimension nf90_inquire_dimension proc~read_pstoke0~2->nf90_inquire_dimension

Contents