libsim  Versione6.3.0

◆ datetime_vect_read_unit()

subroutine datetime_vect_read_unit ( type(datetime), dimension(:)  this,
integer, intent(in)  unit 
)

This method reads from a Fortran file unit the contents of the object this.

The record to be read must have been written with the ::write_unit method. The method works both on formatted and unformatted files.

Parametri
thisobject to be read
[in]unitunit from which to read, it must be an opened Fortran file unit

Definizione alla linea 1194 del file datetime_class.F90.

1194 IF (this%month == 0) THEN
1195  timedelta_depop = this
1196 ELSE
1197  tmpdt = datetime_new(1970, 1, 1)
1198  timedelta_depop = (tmpdt + this) - tmpdt
1199 ENDIF
1200 
1201 END FUNCTION timedelta_depop
1202 
1203 
1204 elemental FUNCTION timedelta_eq(this, that) RESULT(res)
1205 TYPE(timedelta),INTENT(IN) :: this, that
1206 LOGICAL :: res
1207 
1208 res = (this%iminuti == that%iminuti .AND. this%month == that%month)
1209 
1210 END FUNCTION timedelta_eq
1211 
1212 

Generated with Doxygen.