libsim Versione 7.2.4
|
◆ arrayof_datetime_insert_array()
Method for inserting a number of elements of the array at a desired position. If necessary, the array is reallocated to accomodate the new elements.
Definizione alla linea 1240 del file datetime_class.F90. 1241TYPE(timedelta),INTENT(IN) :: this, that
1242LOGICAL :: res
1243
1244IF (this == that) THEN
1245 res = .true.
1246ELSE IF (this > that) THEN
1247 res = .true.
1248ELSE
1249 res = .false.
1250ENDIF
1251
1252END FUNCTION timedelta_ge
1253
1254
1255elemental FUNCTION timedelta_le(this, that) RESULT(res)
1256TYPE(timedelta),INTENT(IN) :: this, that
1257LOGICAL :: res
1258
1259IF (this == that) THEN
1260 res = .true.
1261ELSE IF (this < that) THEN
1262 res = .true.
1263ELSE
1264 res = .false.
1265ENDIF
1266
1267END FUNCTION timedelta_le
1268
1269
1270ELEMENTAL FUNCTION timedelta_add(this, that) RESULT(res)
1271TYPE(timedelta),INTENT(IN) :: this, that
1272TYPE(timedelta) :: res
1273
1274res%iminuti = this%iminuti + that%iminuti
|