libsim  Versione 7.2.6

◆ vol7d_level_init()

subroutine vol7d_level_class::vol7d_level_init ( type(vol7d_level), intent(inout)  this,
integer, intent(in), optional  level1,
integer, intent(in), optional  l1,
integer, intent(in), optional  level2,
integer, intent(in), optional  l2 
)

Inizializza un oggetto vol7d_level con i parametri opzionali forniti.

Se non viene passato nessun parametro opzionale l'oggetto รจ inizializzato a valore mancante.

Parametri
[in,out]thisoggetto da inizializzare
[in]level1type for level 1
[in]l1value for level 1
[in]level2type for level 2
[in]l2value for level 2

Definizione alla linea 457 del file vol7d_level_class.F90.

458 FUNCTION vol7d_level_to_var_log10_int(level) RESULT(log10)
459 INTEGER,INTENT(in) :: level
460 REAL :: log10
461 
462 log10 = 0.
463 IF (any(level == height_level)) THEN
464  log10 = -3.
465 ELSE IF (any(level == thermo_level)) THEN
466  log10 = -1.
467 ELSE IF (any(level == sigma_level)) THEN
468  log10 = -4.
469 ENDIF
470 
471 END FUNCTION vol7d_level_to_var_log10_int
472 
473 END MODULE vol7d_level_class
Classe per la gestione dei livelli verticali in osservazioni meteo e affini.

Generated with Doxygen.