libsim Versione 7.2.1

◆ geo_proj_copy()

subroutine geo_proj_copy ( type(geo_proj), intent(in)  this,
type(geo_proj), intent(out)  that 
)

Create an independent copy of a geo_proj object.

Definizione alla linea 588 del file geo_proj_class.F90.

589IF (form == 'FORMATTED') THEN
590 WRITE(unit,*)this
591ELSE
592 WRITE(unit)this
593ENDIF

Generated with Doxygen.