libsim Versione 8.0.0

◆ arrayof_gridinfo_append()

integer function, private arrayof_gridinfo_append ( type(arrayof_gridinfo) this,
type(gridinfo_def), intent(in) content )
private

Quick method to append an element to the array.

The return value is the position at which the element has been appended.

Parametri
thisarray object to extend
[in]contentobject of TYPE TYPE(gridinfo_def) to append

Definizione alla linea 493 del file gridinfo_class.F90.

494 "exporting to file "//trim(filename)//" "//t2c(this%arraysize)//" fields")
495#endif
496
497valid_grid_id = grid_id_new()
498DO i = 1, this%arraysize ! find a valid grid_id in this
499 IF (c_e(this%array(i)%gaid)) THEN
500 valid_grid_id = this%array(i)%gaid
501 EXIT
502 ENDIF

Generated with Doxygen.