guide_mod Module


Uses

  • module~~guide_mod~~UsesGraph module~guide_mod guide_mod netcdf netcdf module~guide_mod->netcdf module~write_field write_field module~guide_mod->module~write_field module~getparam~2 getparam module~guide_mod->module~getparam~2 module~pres2lev_mod pres2lev_mod module~guide_mod->module~pres2lev_mod module~paramet_mod_h paramet_mod_h module~guide_mod->module~paramet_mod_h module~iniprint_mod_h iniprint_mod_h module~guide_mod->module~iniprint_mod_h module~write_field->netcdf module~strings_mod strings_mod module~write_field->module~strings_mod IOIPSL IOIPSL module~getparam~2->IOIPSL dimensions_mod dimensions_mod module~paramet_mod_h->dimensions_mod iso_fortran_env iso_fortran_env module~strings_mod->iso_fortran_env

Used by

  • module~~guide_mod~~UsedByGraph module~guide_mod guide_mod proc~leapfrog leapfrog proc~leapfrog->module~guide_mod

Contents

Subroutines


Subroutines

public subroutine guide_init()

Arguments

None

public subroutine guide_main(itau, ucov, vcov, teta, q, masse, ps)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: itau
real, intent(inout), DIMENSION (ip1jmp1,llm) :: ucov
real, intent(inout), DIMENSION (ip1jm,llm) :: vcov
real, intent(inout), DIMENSION (ip1jmp1,llm) :: teta
real, intent(inout), DIMENSION (ip1jmp1,llm) :: q
real, intent(inout), DIMENSION (ip1jmp1,llm) :: masse
real, intent(inout), DIMENSION (ip1jmp1) :: ps

public subroutine guide_addfield(hsize, vsize, field, alpha)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: hsize
integer, intent(in) :: vsize
real, intent(inout), DIMENSION(hsize,vsize) :: field
real, intent(in), DIMENSION(hsize) :: alpha

public subroutine guide_zonave(typ, hsize, vsize, field)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: typ
integer, intent(in) :: hsize
integer, intent(in) :: vsize
real, intent(inout), DIMENSION(hsize*iip1,vsize) :: field

public subroutine guide_interp(psi, teta)

Arguments

Type IntentOptional Attributes Name
real, intent(in), DIMENSION (iip1,jjp1) :: psi
real, intent(in), DIMENSION (iip1,jjp1,llm) :: teta

public subroutine tau2alpha(typ, pim, pjm, factt, taumin, taumax, alpha)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: typ
integer, intent(in) :: pim
integer, intent(in) :: pjm
real, intent(in) :: factt
real, intent(in) :: taumin
real, intent(in) :: taumax
real, intent(out), DIMENSION(pim,pjm) :: alpha

public subroutine guide_read(timestep)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: timestep

public subroutine guide_read2D(timestep)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: timestep

public subroutine guide_out(varname, hsize, vsize, field)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: varname
integer, intent(in) :: hsize
integer, intent(in) :: vsize
real, intent(in), DIMENSION (iip1,hsize,vsize) :: field

public subroutine correctbid(iim, nl, x)

Arguments

Type IntentOptional Attributes Name
integer :: iim
integer :: nl
real :: x(iim+1,nl)