This file is indexed.

/usr/share/radiance/sun.cal is in radiance-materials 4R1+20120125-1.

This file is owned by root:root, with mode 0o644.

The actual contents of the file can be viewed below.

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
{*
 *           SOLAR CALCULATIONS
 *
 *               7/25/84
 *		10/10/86
 *
 *}

RLAT = 0.66;		{* Site latitude (radians) *}

RLON = 2.13;		{* Site longitude (radians) *}

RSM = 120 * PI/180;	{* Standard meridian (radians) *}


stadj(jd)		{* solar time adjustment (hours) *}
{ jd is days into year }
=
      0.170 * sin( 4*PI/373 * (jd - 80) ) -
      0.129 * sin( 2*PI/355 * (jd - 8 ) ) +
      12*(RSM-RLON)/PI
;


sdec(jd)		{* solar declination angle (radians) *}
{ jd is days into year }
=
  0.4093 * sin( 2*PI/368 * (jd - 81) )
;


salt(sd, st)		{* solar altitude (radians) *}
{ sd is solar declination, st is solar time (hours) }
=
 asin( sin(RLAT) * sin(sd) - cos(RLAT) * cos(sd) *
                                     cos(st*PI/12) )
;


sazi(sd, st)		{* the solar azimuth (radians) *}
{ sd is solar declination, st is solar time (hours) }
=
 -atan2( cos(sd) * sin(st*PI/12),
 	-cos(RLAT)*sin(sd) -
	sin(RLAT)*cos(sd)*cos(st*PI/12) )
;


SAZI = sazi(SDEC, STIME) * 180/PI;

SALT = salt(SDEC, STIME) * 180/PI;

SDEC = sdec(JDATE);

STIME = TIME + stadj(JDATE);

JDATE = DAY + select(MONTH,0,31,59,90,120,151,181,212,243,273,304,334);