SUWAVEDI Subroutine

public subroutine SUWAVEDI(KSMAX, KTMAX, KPRTRW, KMYSETW, KASM0, KSPOLEGL, KPROCM, KUMPP, KSPEC, KSPEC2, KSPEC2MX, KPOSSP, KMYMS, KPTRMS, KALLMS, KDIM0G)

Uses

    • EC_PARKIND
  • proc~~suwavedi~~UsesGraph proc~suwavedi SUWAVEDI EC_PARKIND EC_PARKIND proc~suwavedi->EC_PARKIND

*** *SUWAVEDI * - Routine to initialize spectral wave distribution

  • Interface. ---------- CALL *SUWAVEDI *

Arguments

Type IntentOptional Attributes Name
integer(kind=JPIM), intent(in) :: KSMAX
integer(kind=JPIM), intent(in) :: KTMAX
integer(kind=JPIM), intent(in) :: KPRTRW
integer(kind=JPIM), intent(in) :: KMYSETW
integer(kind=JPIM), intent(out), optional :: KASM0(0:KSMAX)
integer(kind=JPIM), intent(out), optional :: KSPOLEGL
integer(kind=JPIM), intent(out), optional :: KPROCM(0:KSMAX)
integer(kind=JPIM), intent(out), optional :: KUMPP(KPRTRW)
integer(kind=JPIM), intent(out), optional :: KSPEC
integer(kind=JPIM), intent(out), optional :: KSPEC2
integer(kind=JPIM), intent(out), optional :: KSPEC2MX
integer(kind=JPIM), intent(out), optional :: KPOSSP(KPRTRW+1)
integer(kind=JPIM), intent(out), optional :: KMYMS(KSMAX+1)
integer(kind=JPIM), intent(out), optional :: KPTRMS(KPRTRW)
integer(kind=JPIM), intent(out), optional :: KALLMS(KSMAX+1)
integer(kind=JPIM), intent(out), optional :: KDIM0G(0:KSMAX)

Called by

proc~~suwavedi~~CalledByGraph proc~suwavedi SUWAVEDI proc~dist_spec DIST_SPEC proc~dist_spec->proc~suwavedi proc~dist_spec~2 DIST_SPEC proc~dist_spec~2->proc~suwavedi proc~gath_spec GATH_SPEC proc~gath_spec->proc~suwavedi proc~gath_spec~2 GATH_SPEC proc~gath_spec~2->proc~suwavedi proc~ini_spec_dist INI_SPEC_DIST proc~ini_spec_dist->proc~suwavedi proc~sump_trans_preleg SUMP_TRANS_PRELEG proc~sump_trans_preleg->proc~suwavedi proc~setup_trans SETUP_TRANS proc~setup_trans->proc~sump_trans_preleg proc~setup_trans~2 SETUP_TRANS proc~setup_trans~2->proc~sump_trans_preleg