libsim Versione 7.1.11
|
◆ cli_level_generate()
Initialize level according to climate definition at SIMC.
Definizione alla linea 1565 del file modqccli.F90. 1566 endif
1567
1568#ifdef DEBUG
1569 CALL l4f_log(l4f_debug, 'qc_compute_percentile height has value '//t2c(height))
1570 CALL l4f_log(l4f_debug, 'for k having number '//t2c(k)//&
1571 ' iclv has value '//t2c(iclv(k)))
1572#endif
1573 end do
1574
1575
1576endif
1577
1578do i=1,narea
1579 do j=1,size(perc_vals)
|