libsim Versione 7.2.0

◆ arrayof_gridinfo_append()

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

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
495IF (c_e(valid_grid_id)) THEN ! a valid grid_id has been found
496! open file
497 output_file = grid_file_id_new(filename, 'w', from_grid_id=valid_grid_id)
498 IF (c_e(output_file)) THEN
499 DO i = 1, this%arraysize
500 CALL export(this%array(i)) ! export information to gaid
501 CALL export(this%array(i)%gaid, output_file) ! export gaid to file
502 ENDDO

Generated with Doxygen.