|
◆ 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] | this | oggetto da inizializzare |
[in] | btable | codice della variabile |
[in] | description | descrizione della variabile |
[in] | unit | unità di misura |
[in] | scalefactor | decimali nella rappresentazione intera e character |
Definizione alla linea 363 del file vol7d_var_class.F90.
365 ELEMENTAL FUNCTION vol7d_vartype(this) RESULT(vartype)
366 TYPE(vol7d_var), INTENT(in) :: this
371 SELECT CASE(this%btable)
372 CASE( 'B01012', 'B11001', 'B11043', 'B22001')
374 CASE( 'B07004', 'B10004', 'B10051', 'B10060')
376 CASE( 'B11003', 'B11200')
378 CASE( 'B11004', 'B11201')
380 CASE( 'B11005', 'B11006')
384 END FUNCTION vol7d_vartype
387 #include "array_utilities_inc.F90"
Classe per la gestione delle variabili osservate da stazioni meteo e affini.
|