libsim  Versione 7.1.7

◆ arrayof_datetime_insert_array()

subroutine arrayof_datetime_insert_array ( type(arrayof_datetime this,
type(datetime), dimension(:), intent(in), optional  content,
integer, intent(in), optional  nelem,
integer, intent(in), optional  pos 
)

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.

Parametri
thisarray object to extend
[in]contentobject of TYPE TYPE(datetime) to insert, if not provided, space is reserved but not initialized
[in]nelemnumber of elements to add, mutually exclusive with the previous parameter, if both are not provided, a single element is added without initialization
[in]posposition where to insert, if it is out of range, it is clipped, if it is not provided, the object is appended

Definizione alla linea 1246 del file datetime_class.F90.

1247  res = .true.
1248 ELSE
1249  res = .false.
1250 ENDIF
1251 
1252 END FUNCTION timedelta_ge
1253 
1254 
1255 elemental FUNCTION timedelta_le(this, that) RESULT(res)
1256 TYPE(timedelta),INTENT(IN) :: this, that
1257 LOGICAL :: res
1258 
1259 IF (this == that) THEN
1260  res = .true.
1261 ELSE IF (this < that) THEN
1262  res = .true.
1263 ELSE
1264  res = .false.
1265 ENDIF
1266 
1267 END FUNCTION timedelta_le
1268 
1269 
1270 ELEMENTAL FUNCTION timedelta_add(this, that) RESULT(res)
1271 TYPE(timedelta),INTENT(IN) :: this, that
1272 TYPE(timedelta) :: res
1273 
1274 res%iminuti = this%iminuti + that%iminuti
1275 res%month = this%month + that%month
1276 
1277 END FUNCTION timedelta_add
1278 
1279 
1280 ELEMENTAL FUNCTION timedelta_sub(this, that) RESULT(res)

Generated with Doxygen.