libsim  Versione6.3.0

◆ timedelta_new()

type(timedelta) function, public datetime_class::timedelta_new ( integer, intent(in), optional  year,
integer, intent(in), optional  month,
integer, intent(in), optional  day,
integer, intent(in), optional  hour,
integer, intent(in), optional  minute,
integer, intent(in), optional  sec,
integer, intent(in), optional  msec,
character(len=*), intent(in), optional  isodate,
character(len=*), intent(in), optional  simpledate,
character(len=12), intent(in), optional  oraclesimdate 
)

Costruisce un oggetto timedelta con i parametri opzionali forniti.

Se non viene passato nulla lo inizializza a intervallo di durata nulla. L'intervallo ottenuto � pari alla somma dei valori di tutti i parametri forniti, ovviamente non fornire un parametro equivale a fornirlo =0. Questa � la versione FUNCTION, in stile F2003, del costruttore, da preferire rispetto alla versione SUBROUTINE init.

Parametri
[in]yearanni, se presente l'oggetto diventa "popolare"
[in]monthmesi, se presente l'oggetto diventa "popolare"
[in]daygiorni
[in]hourore
[in]minuteminuti
[in]secsecondi
[in]msecmillisecondi
[in]isodateinizializza l'oggetto ad un intervallo nel formato GGGGGGGGGG hh:mm:ss.msc, ignorando tutti gli altri parametri
[in]simpledateinizializza l'oggetto ad un intervallo nel formato GGGGGGGGhhmmmsc, ignorando tutti gli altri parametri, da preferire rispetto a oraclesimdate
[in]oraclesimdateinizializza l'oggetto ad un intervallo nel formato GGGGGGGGhhmm, ignorando tutti gli altri parametri
Restituisce
oggetto da inizializzare

Definizione alla linea 1545 del file datetime_class.F90.

1545 !!OMSTART NDYIN
1546 ! SUBROUTINE NDYIN(NDAYS,IGG,IMM,IAA)
1547 ! restituisce la data fornendo in input il numero di
1548 ! giorni dal 1/1/1
1549 !
1550 !!omend
1551 
1552 INTEGER,intent(in) :: ndays
1553 INTEGER,intent(out) :: igg, imm, iaa
1554 integer :: n,lndays
1555 
1556 lndays=ndays
1557 
1558 n = lndays/d400
1559 lndays = lndays - n*d400
1560 iaa = year0 + n*400

Generated with Doxygen.