My Project
Public Member Functions | List of all members
mod_time::days2time Interface Reference

Public Member Functions

type(time) function days2time_dbl (DAYS)
 
type(time) function days2time_flt (DAYS)
 
type(time) function days2time_int (DAYS)
 
type(time) function days2time_lint (DAYS)
 

Detailed Description

Definition at line 143 of file mod_time.f90.

Member Function/Subroutine Documentation

◆ days2time_dbl()

type(time) function mod_time::days2time::days2time_dbl ( real(dp), intent(in)  DAYS)

Definition at line 261 of file mod_time.f90.

261  implicit none
262  TYPE(TIME) :: MJD
263  real(DP), INTENT(IN) :: DAYS
264  real(DP) :: TEMP
265 
266  mjd%mjd = anint(days,itime)
267  temp = days - anint(days,itime)
268  mjd%MuSOD = anint(temp*real(muspd,dp),itime)
269  CALL adjust(mjd)
270  days2time_dbl = mjd
subroutine adjust(MJD)
Definition: mod_time.f90:377
type(time) function days2time_dbl(DAYS)
Definition: mod_time.f90:261
integer(itime), parameter muspd
Definition: mod_time.f90:159
real(dp) function days(MJD)
Definition: mod_time.f90:749
integer, parameter dp
Definition: mod_prec.f90:52
integer, parameter itime
Definition: mod_time.f90:48

◆ days2time_flt()

type(time) function mod_time::days2time::days2time_flt ( real(spa), intent(in)  DAYS)

Definition at line 294 of file mod_time.f90.

294  implicit none
295  real(SPA), INTENT(IN) :: DAYS
296  real(DP) :: TEMP
297  temp = dble(days)
type(time) function days2time_flt(DAYS)
Definition: mod_time.f90:294
type(time) function days2time_dbl(DAYS)
Definition: mod_time.f90:261
real(dp) function days(MJD)
Definition: mod_time.f90:749

◆ days2time_int()

type(time) function mod_time::days2time::days2time_int ( integer, intent(in)  DAYS)

Definition at line 274 of file mod_time.f90.

274  implicit none
275  TYPE(TIME) :: MJD
276  INTEGER, INTENT(IN) :: DAYS
277 
278  mjd%mjd = days
279  mjd%MuSOD = 0
280  days2time_int = mjd
type(time) function days2time_int(DAYS)
Definition: mod_time.f90:274
real(dp) function days(MJD)
Definition: mod_time.f90:749

◆ days2time_lint()

type(time) function mod_time::days2time::days2time_lint ( integer(itime), intent(in)  DAYS)

Definition at line 284 of file mod_time.f90.

284  implicit none
285  TYPE(TIME) :: MJD
286  INTEGER(ITIME), INTENT(IN) :: DAYS
287 
288  mjd%mjd = days
289  mjd%MuSOD = 0
290  days2time_lint = mjd
real(dp) function days(MJD)
Definition: mod_time.f90:749
type(time) function days2time_lint(DAYS)
Definition: mod_time.f90:284

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