mod_time::operator(/) Interface Reference

Public Member Functions
type(time) function	time_div_int (MJD, int)
type(time) function	time_div_long (MJD, long)
type(time) function	time_div_flt (MJD, flt)
type(time) function	time_div_dbl (MJD, dbl)

Detailed Description

Definition at line 88 of file mod_time.f90.

Member Function/Subroutine Documentation

time_div_dbl()

type(time) function mod_time::operator(/)::time_div_dbl	(	type(time), intent(in)	MJD,
		real(dp), intent(in)	dbl
	)

Definition at line 898 of file mod_time.f90.

     IMPLICIT NONE
     TYPE(TIME), INTENT(IN)  :: MJD
     real(DP), INTENT(IN) :: dbl

     time_div_dbl = mjd * (1.0_dp / dbl)

time_div_flt()

type(time) function mod_time::operator(/)::time_div_flt	(	type(time), intent(in)	MJD,
		real(spa), intent(in)	flt
	)

Definition at line 886 of file mod_time.f90.

     IMPLICIT NONE
     TYPE(TIME), INTENT(IN)  :: MJD
     real(SPA), INTENT(IN) :: flt
     real(DP) :: dbl

     dbl = dble(flt)
     dbl = 1.0_dp / dbl
     time_div_flt = mjd * dbl

time_div_int()

type(time) function mod_time::operator(/)::time_div_int	(	type(time), intent(in)	MJD,
		integer, intent(in)	int
	)

Definition at line 862 of file mod_time.f90.

     IMPLICIT NONE
     TYPE(TIME), INTENT(IN)  :: MJD
     integer, INTENT(IN) :: int
     real(DP) :: dbl

     dbl = dble(int)
     dbl = 1.0_dp / dbl
     time_div_int = mjd * dbl

time_div_long()

type(time) function mod_time::operator(/)::time_div_long	(	type(time), intent(in)	MJD,
		integer(itime), intent(in)	long
	)

Definition at line 874 of file mod_time.f90.

     IMPLICIT NONE
     TYPE(TIME), INTENT(IN)  :: MJD
     integer(itime), INTENT(IN) :: long
     real(DP) :: dbl

     dbl = dble(long)
     dbl = 1.0_dp / dbl
     time_div_long = mjd * dbl

---

The documentation for this interface was generated from the following file:

• FVCOMg01/mod_time.f90