libsim Versione 7.2.6

◆ supermacroa()

integer function supermacroa ( integer, intent(in) macroa)
private

Rielabora le macroarea facendole Valentine/Elements thinking OBSOLETA.

Definizione alla linea 1588 del file modqccli.F90.

1589 endif
1590 end do
1591end do
1592
1593!!$do i=1,size(that%ana)
1594!!$ call display(that%ana(i))
1595!!$end do
1596
1597#ifdef DEBUG
1598CALL l4f_category_log(this%category, l4f_debug, 'nana has value '//t2c(SIZE(this%v7d%ana)))
1599CALL l4f_category_log(this%category, l4f_debug, 'lpresentperc has value '//t2c(lpresentperc))
1600CALL l4f_category_log(this%category, l4f_debug, 'lpresentnumb has value '//t2c(lpresentnumb))
1601#endif
1602
1603
1604call vol7d_alloc(this%extreme,nlevel=size(this%v7d%level), ntimerange=size(this%v7d%timerange), &

Generated with Doxygen.