[Previous]
[Next]
NAME:
d2c
PURPOSE:
Convert digit from integer to single char
CATEGORY:
gen/for/lib/forstr.f
CALLING SEQUENCE:
character function d2c(i,n)
INPUTS:
i integer integer
n integer digit number (0,1, etc.)
OUTPUTS:
d2c character*1 decimal digit
CALLED BY:
Time2Str
PROCEDURE:
Used in functions like Time2Str instead of using a
write statement to avoid I/O recursion.
MODIFICATION HISTORY:
JUL-2005, Paul Hick (UCSD/CASS; pphick@ucsd.edu)
[Previous]
[Next]
NAME:
dacosd
CALLING SEQUENCE:
entry dacosd(a)
INPUTS:
a double precision cos(angle)
CALLED BY:
POINT_ON_LOS, Time2smei_quaternion, rotate, rotated
SEE ALSO:
cosd
MODIFICATION HISTORY:
JAN-2001, Paul Hick (UCSD; pphick@ucsd.edu)
[Previous]
[Next]
NAME:
dasind
CALLING SEQUENCE:
function dasind(a)
INPUTS:
a double precision sin(angle)
CALLED BY:
POINT_ON_LOS, quaternion_rotate_angles, smei_frm_fts_axis, smei_skyd_fts
smei_skyd_init, smei_skyd_make, smei_skyd_sky
INCLUDE:
include 'math.h'
SEE ALSO:
cosd
MODIFICATION HISTORY:
JAN-2001, Paul Hick (UCSD; pphick@ucsd.edu)
[Previous]
[Next]
NAME:
datan2d
CALLING SEQUENCE:
entry datan2d(a,b)
INPUTS:
a double precision sin(angle)
b double precision cos(angle)
CALLED BY:
POINT_ON_LOS, Time2KeplerOrbit, Time2smei_quaternion, quaternion_rotate_angles
rotate, rotated, smei_axis_cam, smei_axis_ccd, smei_cam2ccd, smei_ccd2cam
smei_frm_fts_axis, smei_frm_ok, smei_skyd_fill, smei_skyd_flush, smei_skyd_fts
smei_skyd_init, smei_skyd_make, smei_skyd_sky, smei_skyd_sort
SEE ALSO:
cosd
MODIFICATION HISTORY:
JAN-2001, Paul Hick (UCSD; pphick@ucsd.edu)
[Previous]
[Next]
NAME:
datand
CALLING SEQUENCE:
entry datand(a)
INPUTS:
a double precision tan(angle)
CALLED BY:
Time2PAnglePole
SEE ALSO:
cosd
MODIFICATION HISTORY:
JAN-2001, Paul Hick (UCSD; pphick@ucsd.edu)
[Previous]
[Next]
NAME:
DATE_DOY
PURPOSE:
Converts dates (iYr,Month,iDay) to daynumber iDoy and v.v.
CATEGORY:
Time keeping
CALLING SEQUENCE:
subroutine DATE_DOY(ID,iYr,cMon,iMon,iDay,iDoy)
INPUTS:
ID integer ID=0 date (yr,month,day) ----> doy of year
ID=1 doy of year ----> date (yr,month,day)
iYr integer year; the year xxxBC should be entered as -xxx+1.
ID = 0:
cMon character*3 month (either cMon or iMon must be specified)
iMon integer value 1-12 (see PROCEDURE)
iDay integer day of month
ID = 1:
iDoy integer day of year
OUTPUTS:
ID = 0:
iDoy integer day of year
ID = 1:
cMon character*3 month
iMon integer 1-12
iDay integer day of month
CALLS: ***
uppercase
RESTRICTIONS:
>>> For ID=0 (date --> doy) the input for the month may be given in the form
of a char-string cMon or as an integer iMon. cMon takes precedence
over iMon: first cMon is checked for valid input; if cMon is not valid
iMon is used (if iMon is invalid too, the program is aborted).
>>> ADVICE: ALWAYS use cMon for input.
Upon output the values of cMon and iMon are always consistent.
The returned value for cMon is always in uppercase.
PROCEDURE:
Dates before 5 october 1582 are interpreted as Julian dates; after 15
october as Gregorian dates.
>>> 5 october 1582 (Julian) = 15 october 1582 (Gregorian).
MODIFICATION HISTORY:
1989-1990, Paul Hick (MPAE,UCSD/CASS; pphick@ucsd.edu)
[Previous]
[Next]
NAME:
Dbl2Str
PURPOSE:
Convert floating point number to string
CATEGORY:
Strings: write floating point number to string
CALLING SEQUENCE:
integer function Dbl2Str(Fin,Nin,cFlt)
INPUTS:
Fin double precision floating point number to be converted
Nin integer (see PROCEDURE)
OUTPUTS:
cFlt character*(*) resulting string
Dbl2Str integer number of useful characters in cFlt
CALLED BY:
AskLimit, AskR8, MAP_TZERO, Time2CarringtonT0, cDbl2Str, smei_frm_ok, smei_orb
smei_skyd, smei_skyd_fts, smei_skyd_init, smei_skyd_make, smei_skyd_sky
INCLUDE:
include 'str2str_inc.h'
CALLS: ***
Int2Str, Int2StrSet, LocFirst, icompress
SEE ALSO:
Int2Str, Str2Str, cFlt2Str
PROCEDURE:
> Round-off is done properly (I think)
> Maximum number of digits behind the decimal point is 8
> ndig=mod(Nin,100) is the number of digits behind the decimal point
> The output string is made as short as possible. Trailing zero's in the
decimal fraction are dropped (unless ndig < 0). A zero decimal fraction
is dropped, including decimal point.
> If ndig < 0 then trailing zero's in the decimal fraction are retained
(this implies that a zero fraction is not automatically dropped)
> nexp = abs(Nin)/100 determines the range of numbers printed in F
format: 0.1 <= Fin < 10^nexp is printed in F format. Numbers outside
this range are printed in E format.
MODIFICATION HISTORY:
AUG-1995, Paul Hick (UCSD)
[Previous]
[Next]
NAME:
dcosd
CALLING SEQUENCE:
function dcosd(a)
INPUTS:
a double precision angle in degrees
CALLED BY:
POINT_ON_LOS, PRECESSION_APPROX, SunNewcomb, Time2KeplerOrbit, Time2PAnglePole
Time2SunNewcomb, quaternion_rotate_angles, rotate, rotate_euler2dcm, rotated
smei_axis_ccd, smei_cam2ccd, smei_ccd2cam, smei_skyd_fill, smei_skyd_flush
smei_skyd_fts, smei_skyd_init, smei_skyd_make, smei_skyd_pixel, smei_skyd_scan
smei_skyd_sky, smei_skyd_sort
INCLUDE:
include 'math.h'
SEE ALSO:
cosd
MODIFICATION HISTORY:
JAN-2001, Paul Hick (UCSD; pphick@ucsd.edu)
[Previous]
[Next]
NAME:
dir_dos
PURPOSE:
Operating system: DOS
Contains OS specific parameters related to the file system.
This is our main defense against platform-dependent I/O problems.
CALLING SEQUENCE:
include 'dirspec.h'
INCLUDE:
include 'dirspec_os.h'
PROCEDURE:
[Previous]
[Next]
NAME:
dir_linux
PURPOSE:
Operating system: LINUX
Contains OS specific parameters related to the file system.
This is our main defense against platform-dependent I/O problems.
CALLING SEQUENCE:
include 'dirspec.h'
INCLUDE:
include 'dirspec_os.h'
PROCEDURE:
[Previous]
[Next]
NAME:
dir_unix
PURPOSE:
UNIX
INCLUDE:
include 'dirspec_os.h'
PROCEDURE:
[Previous]
[Next]
NAME:
dir_win
PURPOSE:
Operating system: Windows
Contains OS specific parameters related to the file system.
This is our main defense against platform-dependent I/O problems.
CALLING SEQUENCE:
include 'dirspec.h'
INCLUDE:
include 'dirspec_os.h'
PROCEDURE:
[Previous]
[Next]
NAME:
dirspec
PURPOSE:
Operating system: LINUX
Contains OS specific parameters related to the file system.
This is our main defense against platform-dependent I/O problems.
CALLING SEQUENCE:
include 'dirspec.h'
INCLUDE:
include 'dirspec_os.h'
INCLUDED BY:
AskChar, AskLog, AskR4, AskR8, CvI2, CvI4, CvR4, CvR8, FileSelection, ForeignArg
ForeignArgFind, ForeignArgSet, ForeignArgs, ForeignI2ArgN, ForeignI4ArgN
ForeignInput, ForeignR4ArgN, ForeignR8ArgN, ForeignStrArg, HOSInquire, LogModFile
OSExitCmd [1], OSExitCmd [2], OSExitCmd [3], ParseRepair, Peep, Say, SetLog2Dir
SetRotations, Time2smei_eph, UlyssesOrbit, WR2DARR, bOSFind [1], bOSFind [2]
bOSFind [3], bOpenFile, bReadNic, bTempFile, bUncompressNic, bValidDriveName
bValidFileName [1], bValidFileName [2], bValidFileName [3], bValidFragment [1]
bValidFragment [2], bValidFragment [3], bValidPath [1], bValidPath [2]
bValidPath [3], bWriteNic, iDir2File, iFile2Dir, iFilePath, iFullFragment
iGetDefaultDir, iGetLogical [1], iGetLogical [2], iHideLogical, iLastFragment
iOSCheckDirectory [1], iOSCheckDirectory [2], iOSCheckDirectory [3]
iOSCopyFile [1], iOSCopyFile [2], iOSCopyFile [3], iOSGetDirectory [1]
iOSGetDirectory [2], iOSGetDirectory [3], iOSgunzip, iOpenFile [1]
iOpenFile [2], iOpenFile [3], iOpenFile [4], iParentFragment, iSearch [1]
iSearch [2], iSearchTree, iSetFileSpec, iShowDefaultDir, iTopFragment, jpl_state
jpl_test, mkenv, rice, smei_base, smei_cal, smei_cal_c3mask, smei_cal_get
smei_foreign, smei_frm_getlist, smei_frm_path, smei_get_glare, smei_get_lsff
smei_get_starmask, smei_orb, smei_orb_get, smei_orbit_info2, smei_skyd, sprint
PROCEDURE:
[Previous]
[Next]
NAME:
dirspec
PURPOSE:
UNIX
INCLUDE:
include 'dirspec_os.h'
INCLUDED BY:
AskChar, AskLog, AskR4, AskR8, CvI2, CvI4, CvR4, CvR8, FileSelection, ForeignArg
ForeignArgFind, ForeignArgSet, ForeignArgs, ForeignI2ArgN, ForeignI4ArgN
ForeignInput, ForeignR4ArgN, ForeignR8ArgN, ForeignStrArg, HOSInquire, LogModFile
OSExitCmd [1], OSExitCmd [2], OSExitCmd [3], ParseRepair, Peep, Say, SetLog2Dir
SetRotations, Time2smei_eph, UlyssesOrbit, WR2DARR, bOSFind [1], bOSFind [2]
bOSFind [3], bOpenFile, bReadNic, bTempFile, bUncompressNic, bValidDriveName
bValidFileName [1], bValidFileName [2], bValidFileName [3], bValidFragment [1]
bValidFragment [2], bValidFragment [3], bValidPath [1], bValidPath [2]
bValidPath [3], bWriteNic, iDir2File, iFile2Dir, iFilePath, iFullFragment
iGetDefaultDir, iGetLogical [1], iGetLogical [2], iHideLogical, iLastFragment
iOSCheckDirectory [1], iOSCheckDirectory [2], iOSCheckDirectory [3]
iOSCopyFile [1], iOSCopyFile [2], iOSCopyFile [3], iOSGetDirectory [1]
iOSGetDirectory [2], iOSGetDirectory [3], iOSgunzip, iOpenFile [1]
iOpenFile [2], iOpenFile [3], iOpenFile [4], iParentFragment, iSearch [1]
iSearch [2], iSearchTree, iSetFileSpec, iShowDefaultDir, iTopFragment, jpl_state
jpl_test, mkenv, rice, smei_base, smei_cal, smei_cal_c3mask, smei_cal_get
smei_foreign, smei_frm_getlist, smei_frm_path, smei_get_glare, smei_get_lsff
smei_get_starmask, smei_orb, smei_orb_get, smei_orbit_info2, smei_skyd, sprint
PROCEDURE:
[Previous]
[Next]
NAME:
dirspec
PURPOSE:
Operating system: Windows
Contains OS specific parameters related to the file system.
This is our main defense against platform-dependent I/O problems.
CALLING SEQUENCE:
include 'dirspec.h'
INCLUDE:
include 'dirspec_os.h'
INCLUDED BY:
AskChar, AskLog, AskR4, AskR8, CvI2, CvI4, CvR4, CvR8, FileSelection, ForeignArg
ForeignArgFind, ForeignArgSet, ForeignArgs, ForeignI2ArgN, ForeignI4ArgN
ForeignInput, ForeignR4ArgN, ForeignR8ArgN, ForeignStrArg, HOSInquire, LogModFile
OSExitCmd [1], OSExitCmd [2], OSExitCmd [3], ParseRepair, Peep, Say, SetLog2Dir
SetRotations, Time2smei_eph, UlyssesOrbit, WR2DARR, bOSFind [1], bOSFind [2]
bOSFind [3], bOpenFile, bReadNic, bTempFile, bUncompressNic, bValidDriveName
bValidFileName [1], bValidFileName [2], bValidFileName [3], bValidFragment [1]
bValidFragment [2], bValidFragment [3], bValidPath [1], bValidPath [2]
bValidPath [3], bWriteNic, iDir2File, iFile2Dir, iFilePath, iFullFragment
iGetDefaultDir, iGetLogical [1], iGetLogical [2], iHideLogical, iLastFragment
iOSCheckDirectory [1], iOSCheckDirectory [2], iOSCheckDirectory [3]
iOSCopyFile [1], iOSCopyFile [2], iOSCopyFile [3], iOSGetDirectory [1]
iOSGetDirectory [2], iOSGetDirectory [3], iOSgunzip, iOpenFile [1]
iOpenFile [2], iOpenFile [3], iOpenFile [4], iParentFragment, iSearch [1]
iSearch [2], iSearchTree, iSetFileSpec, iShowDefaultDir, iTopFragment, jpl_state
jpl_test, mkenv, rice, smei_base, smei_cal, smei_cal_c3mask, smei_cal_get
smei_foreign, smei_frm_getlist, smei_frm_path, smei_get_glare, smei_get_lsff
smei_get_starmask, smei_orb, smei_orb_get, smei_orbit_info2, smei_skyd, sprint
PROCEDURE:
[Previous]
[Next]
NAME:
dirspec_os
PURPOSE:
Defines parameters to identify operating systems.
Used to resolve platform-dependent problems
INCLUDED BY:
dir_alp, dir_dos, dir_linux, dir_unix, dir_vms, dir_win, dirspec [1], dirspec [2]
dirspec [3], dirspec [4]
MODIFICATION HISTORY:
JAN-2000, Paul Hick (UCSD/CASS; pphick@ucsd.edu)
[Previous]
[Next]
NAME:
DOW
PURPOSE:
Calculate day of week from Julian day number
CATEGORY:
Time keeping
CALLING SEQUENCE:
character*3 function DOW(JD)
INPUTS:
JD double precision Julian day number
OUTPUTS:
DOW character*3 day of week (standard abbreviation, e.g. MON,TUE)
PROCEDURE:
Julian day 1 is by definition a monday. The MOD function is used to
find the correct day of the week.
MODIFICATION HISTORY:
1990, Paul Hick (UCSD/CASS; pphick@ucsd.edu)
[Previous]
[Next]
NAME:
dsind
CALLING SEQUENCE:
entry dsind(a)
INPUTS:
a double precision angle in degrees
CALLED BY:
EqKeplerd, POINT_ON_LOS, PRECESSION_APPROX, SunNewcomb, Time2KeplerOrbit
Time2SunNewcomb, quaternion_rotate_angles, rotate, rotate_euler2dcm, rotated
smei_axis_cam, smei_axis_ccd, smei_cam2ccd, smei_ccd2cam, smei_skyd_fill
smei_skyd_flush, smei_skyd_fts, smei_skyd_init, smei_skyd_make, smei_skyd_pixel
smei_skyd_scan, smei_skyd_sky, smei_skyd_sort
SEE ALSO:
cosd
MODIFICATION HISTORY:
JAN-2001, Paul Hick (UCSD; pphick@ucsd.edu)
[Previous]
[Next]
NAME:
dtand
CALLING SEQUENCE:
entry dtand(a)
INPUTS:
a double precision angle in degrees
CALLED BY:
Time2PAnglePole
SEE ALSO:
cosd
MODIFICATION HISTORY:
JAN-2001, Paul Hick (UCSD; pphick@ucsd.edu)