create_etat0_unstruct_mod Module

Contents

Subroutines

init_create_etat0_unstruct init_param_gw create_etat0_unstruct

Subroutines

public subroutine init_create_etat0_unstruct()

Arguments

None

public subroutine init_param_gw(zmea, zpic, zval, zstd, zsig, zgam, zthe)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	zmea(klon)
real,	intent(in)			::	zpic(klon)
real,	intent(in)			::	zval(klon)
real,	intent(in)			::	zstd(klon)
real,	intent(in)			::	zsig(klon)
real,	intent(in)			::	zgam(klon)
real,	intent(in)			::	zthe(klon)

public subroutine create_etat0_unstruct()

WARNING DON'T FORGET FOR LATER ym IF(couple) pctsrf(:,is_oce)=ocemask_fi(:)

Arguments

None