psi_init()

subroutine __module_sf_noahmplsm_f90__::psi_init ( integer  psi_opt, character(len=*), intent(out)  errmsg, integer, intent(out)  errflg  )

private

Definition at line 11473 of file module_sf_noahmplsm.F90.

References psih_stable_full(), psih_unstable_full(), psim_stable_full(), and psim_unstable_full().

Referenced by noahmpdrv_init().

Here is the call graph for this function:

Here is the caller graph for this function: