libsim Versione 7.2.6
|
◆ vol7d_var_init()
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.
Definizione alla linea 357 del file vol7d_var_class.F90. 358END SUBROUTINE vol7d_var_features_posdef_apply
359
360
361!> Return the physical type of the variable.
362!! Returns a rough classification of the variable depending on the
363!! physical parameter it represents. The result is one of the
364!! constants vartype_* defined in the module. To be extended.
365ELEMENTAL FUNCTION vol7d_vartype(this) RESULT(vartype)
366TYPE(vol7d_var),INTENT(in) :: this !< vol7d_var object to be tested
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
Classe per la gestione delle variabili osservate da stazioni meteo e affini. Definition vol7d_var_class.F90:212 |