libsim Versione 7.1.11

◆ vol7d_var_init()

elemental subroutine vol7d_var_init ( type(vol7d_var), intent(inout)  this,
character(len=*), intent(in), optional  btable,
character(len=*), intent(in), optional  description,
character(len=*), intent(in), optional  unit,
integer, intent(in), optional  scalefactor 
)

Inizializza un oggetto vol7d_var con i parametri opzionali forniti.

Se non viene passato nessun parametro opzionale l'oggetto è inizializzato a valore mancante. I membri r, d, i, b, c non possono essere assegnati tramite costruttore, ma solo direttamente.

Parametri
[in,out]thisoggetto da inizializzare
[in]btablecodice della variabile
[in]descriptiondescrizione della variabile
[in]unitunità di misura
[in]scalefactordecimali nella rappresentazione intera e character

Definizione alla linea 363 del file vol7d_var_class.F90.

364!! constants vartype_* defined in the module. To be extended.
365ELEMENTAL FUNCTION vol7d_vartype(this) RESULT(vartype)
366TYPE(vol7d_var),INTENT(in) :: this
367
368INTEGER :: vartype
369
370vartype = var_ord
371SELECT CASE(this%btable)
372CASE('B01012', 'B11001', 'B11043', 'B22001') ! direction, degree true
373 vartype = var_dir360
374CASE('B07004', 'B10004', 'B10051', 'B10060') ! pressure, Pa
375 vartype = var_press
376CASE('B11003', 'B11200') ! u-component
377 vartype = var_ucomp
378CASE('B11004', 'B11201') ! v-component
379 vartype = var_vcomp
380CASE('B11005', 'B11006') ! w-component
381 vartype = var_wcomp
382END SELECT
383
384END FUNCTION vol7d_vartype
385
386
387#include "array_utilities_inc.F90"
388
389
390END MODULE vol7d_var_class
Classe per la gestione delle variabili osservate da stazioni meteo e affini.

Generated with Doxygen.