summer2021
New member
Hi,
In module_stoch.F, why to Initialize streamfunction with grid%KMINFORCT,grid%KMAXFORCT, grid%LMINFORCT and grid%LMAXFORCT of potential temperature, but not grid%KMAXFORC, grid%LMINFORC and grid%LMAXFORC of streamfunction.
Thank you!
! Initialize SKEBS
! Initialize streamfunction (1)
if ((.not.config_flags%restart) .or. (.not.config_flags%hrrr_cycling)) then
call rand_seed (config_flags, grid%ISEED_SKEBS, grid%iseedarr_skebs , kms, kme)
endif
call SETUP_RAND_PERTURB('W', &
grid%skebs_vertstruc,config_flags%restart, &
grid%SPSTREAM_AMP, &
grid%SPSTREAMFORCS,grid%SPSTREAMFORCC,grid%ALPH_PSI,&
grid%VERTSTRUCC,grid%VERTSTRUCS,grid%VERTAMPUV, &
grid%KMINFORCT,grid%KMAXFORCT, &
grid%LMINFORCT,grid%LMAXFORCT, &
grid%KMAXFORCTH,grid%LMAXFORCTH, &
grid%time_step,grid%DX,grid%DY, &
grid%gridpt_stddev_sppt, &
grid%lengthscale_sppt, &
grid%timescale_sppt, &
grid%TOT_BACKSCAT_PSI,grid%ZTAU_PSI, &
grid%REXPONENT_PSI, &
ids, ide, jds, jde, kds, kde, &
ims, ime, jms, jme, kms, kme, &
its, ite, jts, jte, kts, kte )
In module_stoch.F, why to Initialize streamfunction with grid%KMINFORCT,grid%KMAXFORCT, grid%LMINFORCT and grid%LMAXFORCT of potential temperature, but not grid%KMAXFORC, grid%LMINFORC and grid%LMAXFORC of streamfunction.
Thank you!
! Initialize SKEBS
! Initialize streamfunction (1)
if ((.not.config_flags%restart) .or. (.not.config_flags%hrrr_cycling)) then
call rand_seed (config_flags, grid%ISEED_SKEBS, grid%iseedarr_skebs , kms, kme)
endif
call SETUP_RAND_PERTURB('W', &
grid%skebs_vertstruc,config_flags%restart, &
grid%SPSTREAM_AMP, &
grid%SPSTREAMFORCS,grid%SPSTREAMFORCC,grid%ALPH_PSI,&
grid%VERTSTRUCC,grid%VERTSTRUCS,grid%VERTAMPUV, &
grid%KMINFORCT,grid%KMAXFORCT, &
grid%LMINFORCT,grid%LMAXFORCT, &
grid%KMAXFORCTH,grid%LMAXFORCTH, &
grid%time_step,grid%DX,grid%DY, &
grid%gridpt_stddev_sppt, &
grid%lengthscale_sppt, &
grid%timescale_sppt, &
grid%TOT_BACKSCAT_PSI,grid%ZTAU_PSI, &
grid%REXPONENT_PSI, &
ids, ide, jds, jde, kds, kde, &
ims, ime, jms, jme, kms, kme, &
its, ite, jts, jte, kts, kte )