Rielabora le macroarea facendole Valentine/Elements thinking OBSOLETA.
1598 CALL l4f_category_log(this%category, l4f_debug,
'nana has value '//t2c(
SIZE(this%v7d%ana)))
1599 CALL l4f_category_log(this%category, l4f_debug,
'lpresentperc has value '//t2c(lpresentperc))
1600 CALL l4f_category_log(this%category, l4f_debug,
'lpresentnumb has value '//t2c(lpresentnumb))
1604 call vol7d_alloc(this%extreme,nlevel=
size(this%v7d%level), ntimerange=
size(this%v7d%timerange), &
1605 ndativarr=
size(this%v7d%dativar%r), nnetwork=1,ntime=1)
1607 this%extreme%level=this%v7d%level
1608 this%extreme%timerange=this%v7d%timerange
1609 this%extreme%dativar%r=this%v7d%dativar%r
1610 this%extreme%time(1)=cyclicdatetime_to_conventional(cyclicdt)