libsim  Versione7.2.1

◆ cli_level_generate()

subroutine, public modqccli::cli_level_generate ( type(vol7d_level), dimension(:), intent(out)  level)

Initialize level according to climate definition at SIMC.

Parametri
[out]levellevel where is defined the climatological value (layer)

Definizione alla linea 1570 del file modqccli.F90.

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 
1576 endif
1577 
1578 do i=1,narea
1579  do j=1,size(perc_vals)
1580  if (this%height2level) then
1581  do k=1,cli_nlevel
1582  write(ident,'("#",i2.2,2i3.3)')k,area(i),nint(perc_vals(j))
1583  call init(this%extreme%ana((k-1)*size(perc_vals)*narea + (j-1)*narea + i),ident=ident,lat=0d0,lon=0d0)

Generated with Doxygen.