Index | Rundeck: E6TomaF40 | Created: Sat May 18 03:30:40 EDT 2024 |
hugh_make_crys_sedimentation | Module: MO_BULK2M_DRIVER_GCM | File: BLK_DRV.f |
Author :
Version:
Declaration:
logical function hugh_make_crys_sedimentation(dtmic, mx0) result (la)
- seconds_per_hour : used from timeconstants_mod
- dtmic :
real*8, intent(in)
- mx0 :
integer, intent(in)
- k :
integer
- n :
integer
- nstep :
integer
- Initial Value
= 1
- dtsed :
real*8
- lammax :
real*8
- lammin :
real*8
- rgvm :
real*8
- pgami :
real*8
- uni :
real*8
- umi :
real*8
- faltndmi :
real*8
- faltndni :
real*8
- dlami :
real*8
- lsedimi :
logical
- sname :
character*35
- Initial Value
= 'hugh_make_crys_sedimentation: '