libsim  Versione6.3.0

◆ cli_level()

subroutine, public modqccli::cli_level ( real, intent(in)  heigth,
type(vol7d_level), intent(out)  level 
)

Return a conventional level for climatological definition.

Starting from heigth of station in meter return a level where is defined (I hope) the climatological value

Parametri
[in]heigthheigth of station in meter
[out]levellevel where is defined the climatological value (layer)

Definizione alla linea 1561 del file modqccli.F90.

1561 
1562  if (c_e(height)) then
1563  iclv(k)=firsttrue(cli_level1 <= height .and. height <= cli_level2 )
1564  else
1565  iclv(k)=imiss
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 
1576 endif
1577 
1578 do i=1,narea
1579  do j=1,size(perc_vals)
Functions that return a trimmed CHARACTER representation of the input variable.

Generated with Doxygen.