libsim  Versione 7.1.9

◆ arrayof_gridinfo_insert()

subroutine, private gridinfo_class::arrayof_gridinfo_insert ( type(arrayof_gridinfo this,
type(gridinfo_def), intent(in)  content,
integer, intent(in), optional  pos 
)
private

Method for inserting an element of the array at a desired position.

If necessary, the array is reallocated to accomodate the new element.

Parametri
thisarray object to extend
[in]contentobject of TYPE TYPE(gridinfo_def) to insert
[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 486 del file gridinfo_class.F90.

487 valid_grid_id = grid_id_new()
488 DO i = 1, this%arraysize ! find a valid grid_id in this
489  IF (c_e(this%array(i)%gaid)) THEN
490  valid_grid_id = this%array(i)%gaid
491  EXIT
492  ENDIF

Generated with Doxygen.