Destroy a geo_proj object.
Definizione alla linea 572 del file geo_proj_class.F90.
575 END SUBROUTINE geo_proj_read_unit
582 SUBROUTINE geo_proj_write_unit(this, unit)
583 TYPE(geo_proj),
INTENT(in) :: this
584 INTEGER,
INTENT(in) :: unit
586 CHARACTER(len=40) :: form
588 INQUIRE(unit, form=form)
589 IF (form ==
'FORMATTED')
THEN