@@ -15,9 +15,9 @@ discard block |
||
| 15 | 15 | foreach($spotter_array as $spotter_item) |
| 16 | 16 | { |
| 17 | 17 | $output .= '<url>'; |
| 18 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/flightid/'.$spotter_item['spotter_id'].'</loc>'; |
|
| 19 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 20 | - $output .= '<changefreq>weekly</changefreq>'; |
|
| 18 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/flightid/'.$spotter_item['spotter_id'].'</loc>'; |
|
| 19 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 20 | + $output .= '<changefreq>weekly</changefreq>'; |
|
| 21 | 21 | $output .= '</url>'; |
| 22 | 22 | } |
| 23 | 23 | $output .= '</urlset>'; |
@@ -32,9 +32,9 @@ discard block |
||
| 32 | 32 | foreach($aircraft_types as $aircraft_item) |
| 33 | 33 | { |
| 34 | 34 | $output .= '<url>'; |
| 35 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/aircraft/'.$aircraft_item['aircraft_icao'].'</loc>'; |
|
| 36 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 37 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 35 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/aircraft/'.$aircraft_item['aircraft_icao'].'</loc>'; |
|
| 36 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 37 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 38 | 38 | $output .= '</url>'; |
| 39 | 39 | } |
| 40 | 40 | $output .= '</urlset>'; |
@@ -49,9 +49,9 @@ discard block |
||
| 49 | 49 | foreach($aircraft_registrations as $aircraft_item) |
| 50 | 50 | { |
| 51 | 51 | $output .= '<url>'; |
| 52 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/registration/'.$aircraft_item['registration'].'</loc>'; |
|
| 53 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 54 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 52 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/registration/'.$aircraft_item['registration'].'</loc>'; |
|
| 53 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 54 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 55 | 55 | $output .= '</url>'; |
| 56 | 56 | } |
| 57 | 57 | $output .= '</urlset>'; |
@@ -65,9 +65,9 @@ discard block |
||
| 65 | 65 | foreach($airline_names as $airline_item) |
| 66 | 66 | { |
| 67 | 67 | $output .= '<url>'; |
| 68 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/airline/'.$airline_item['airline_icao'].'</loc>'; |
|
| 69 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 70 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 68 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/airline/'.$airline_item['airline_icao'].'</loc>'; |
|
| 69 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 70 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 71 | 71 | $output .= '</url>'; |
| 72 | 72 | } |
| 73 | 73 | $output .= '</urlset>'; |
@@ -81,9 +81,9 @@ discard block |
||
| 81 | 81 | foreach($airport_names as $airport_item) |
| 82 | 82 | { |
| 83 | 83 | $output .= '<url>'; |
| 84 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/airport/'.$airport_item['airport_icao'].'</loc>'; |
|
| 85 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 86 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 84 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/airport/'.$airport_item['airport_icao'].'</loc>'; |
|
| 85 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 86 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 87 | 87 | $output .= '</url>'; |
| 88 | 88 | } |
| 89 | 89 | $output .= '</urlset>'; |
@@ -97,9 +97,9 @@ discard block |
||
| 97 | 97 | foreach($manufacturer_names as $manufacturer_item) |
| 98 | 98 | { |
| 99 | 99 | $output .= '<url>'; |
| 100 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/manufacturer/'.strtolower(str_replace(" ", "-", $manufacturer_item['aircraft_manufacturer'])).'</loc>'; |
|
| 101 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 102 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 100 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/manufacturer/'.strtolower(str_replace(" ", "-", $manufacturer_item['aircraft_manufacturer'])).'</loc>'; |
|
| 101 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 102 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 103 | 103 | $output .= '</url>'; |
| 104 | 104 | } |
| 105 | 105 | $output .= '</urlset>'; |
@@ -113,9 +113,9 @@ discard block |
||
| 113 | 113 | foreach($country_names as $country_item) |
| 114 | 114 | { |
| 115 | 115 | $output .= '<url>'; |
| 116 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/country/'.strtolower(str_replace(" ", "-", $country_item['country'])).'</loc>'; |
|
| 117 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 118 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 116 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/country/'.strtolower(str_replace(" ", "-", $country_item['country'])).'</loc>'; |
|
| 117 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 118 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 119 | 119 | $output .= '</url>'; |
| 120 | 120 | } |
| 121 | 121 | $output .= '</urlset>'; |
@@ -130,9 +130,9 @@ discard block |
||
| 130 | 130 | { |
| 131 | 131 | if (ctype_alnum($ident_item['ident'])) { |
| 132 | 132 | $output .= '<url>'; |
| 133 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/ident/'.$ident_item['ident'].'</loc>'; |
|
| 134 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 135 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 133 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/ident/'.$ident_item['ident'].'</loc>'; |
|
| 134 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 135 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 136 | 136 | $output .= '</url>'; |
| 137 | 137 | } |
| 138 | 138 | } |
@@ -147,9 +147,9 @@ discard block |
||
| 147 | 147 | foreach($date_names as $date_item) |
| 148 | 148 | { |
| 149 | 149 | $output .= '<url>'; |
| 150 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/date/'.date("Y-m-d", strtotime($date_item['date'])).'</loc>'; |
|
| 151 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 152 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 150 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/date/'.date("Y-m-d", strtotime($date_item['date'])).'</loc>'; |
|
| 151 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 152 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 153 | 153 | $output .= '</url>'; |
| 154 | 154 | } |
| 155 | 155 | $output .= '</urlset>'; |
@@ -163,9 +163,9 @@ discard block |
||
| 163 | 163 | foreach($route_names as $route_item) |
| 164 | 164 | { |
| 165 | 165 | $output .= '<url>'; |
| 166 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/route/'.$route_item['airport_departure_icao'].'/'.$route_item['airport_arrival_icao'].'</loc>'; |
|
| 167 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 168 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 166 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/route/'.$route_item['airport_departure_icao'].'/'.$route_item['airport_arrival_icao'].'</loc>'; |
|
| 167 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 168 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 169 | 169 | $output .= '</url>'; |
| 170 | 170 | } |
| 171 | 171 | $output .= '</urlset>'; |
@@ -177,117 +177,117 @@ discard block |
||
| 177 | 177 | |
| 178 | 178 | /* STATIC PAGES */ |
| 179 | 179 | $output .= '<url>'; |
| 180 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/</loc>'; |
|
| 181 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 182 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 180 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/</loc>'; |
|
| 181 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 182 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 183 | 183 | $output .= '</url>'; |
| 184 | 184 | $output .= '<url>'; |
| 185 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/latest</loc>'; |
|
| 186 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 187 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 185 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/latest</loc>'; |
|
| 186 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 187 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 188 | 188 | $output .= '</url>'; |
| 189 | 189 | $output .= '<url>'; |
| 190 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/highlights</loc>'; |
|
| 191 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 192 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 190 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/highlights</loc>'; |
|
| 191 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 192 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 193 | 193 | $output .= '</url>'; |
| 194 | 194 | $output .= '<url>'; |
| 195 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/aircraft</loc>'; |
|
| 196 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 197 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 195 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/aircraft</loc>'; |
|
| 196 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 197 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 198 | 198 | $output .= '</url>'; |
| 199 | 199 | $output .= '<url>'; |
| 200 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/airline</loc>'; |
|
| 201 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 202 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 200 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/airline</loc>'; |
|
| 201 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 202 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 203 | 203 | $output .= '</url>'; |
| 204 | 204 | $output .= '<url>'; |
| 205 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/airport</loc>'; |
|
| 206 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 207 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 205 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/airport</loc>'; |
|
| 206 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 207 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 208 | 208 | $output .= '</url>'; |
| 209 | 209 | $output .= '<url>'; |
| 210 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/search</loc>'; |
|
| 211 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 212 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 210 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/search</loc>'; |
|
| 211 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 212 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 213 | 213 | $output .= '</url>'; |
| 214 | 214 | $output .= '<url>'; |
| 215 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/about</loc>'; |
|
| 216 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 217 | - $output .= '<changefreq>weekly</changefreq>'; |
|
| 215 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/about</loc>'; |
|
| 216 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 217 | + $output .= '<changefreq>weekly</changefreq>'; |
|
| 218 | 218 | $output .= '</url>'; |
| 219 | 219 | |
| 220 | 220 | |
| 221 | 221 | /* STATISTIC PAGES */ |
| 222 | 222 | $output .= '<url>'; |
| 223 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/aircraft</loc>'; |
|
| 224 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 225 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 223 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/aircraft</loc>'; |
|
| 224 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 225 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 226 | 226 | $output .= '</url>'; |
| 227 | 227 | $output .= '<url>'; |
| 228 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/registration</loc>'; |
|
| 229 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 230 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 228 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/registration</loc>'; |
|
| 229 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 230 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 231 | 231 | $output .= '</url>'; |
| 232 | 232 | $output .= '<url>'; |
| 233 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/manufacturer</loc>'; |
|
| 234 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 235 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 233 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/manufacturer</loc>'; |
|
| 234 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 235 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 236 | 236 | $output .= '</url>'; |
| 237 | 237 | $output .= '<url>'; |
| 238 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/airline</loc>'; |
|
| 239 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 240 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 238 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/airline</loc>'; |
|
| 239 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 240 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 241 | 241 | $output .= '</url>'; |
| 242 | 242 | $output .= '<url>'; |
| 243 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/airline-country</loc>'; |
|
| 244 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 245 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 243 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/airline-country</loc>'; |
|
| 244 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 245 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 246 | 246 | $output .= '</url>'; |
| 247 | 247 | $output .= '<url>'; |
| 248 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/airport-departure</loc>'; |
|
| 249 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 250 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 248 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/airport-departure</loc>'; |
|
| 249 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 250 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 251 | 251 | $output .= '</url>'; |
| 252 | 252 | $output .= '<url>'; |
| 253 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/airport-departure-country</loc>'; |
|
| 254 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 255 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 253 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/airport-departure-country</loc>'; |
|
| 254 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 255 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 256 | 256 | $output .= '</url>'; |
| 257 | 257 | $output .= '<url>'; |
| 258 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/airport-arrival</loc>'; |
|
| 259 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 260 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 258 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/airport-arrival</loc>'; |
|
| 259 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 260 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 261 | 261 | $output .= '</url>'; |
| 262 | 262 | $output .= '<url>'; |
| 263 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/airport-arrival-country</loc>'; |
|
| 264 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 265 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 263 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/airport-arrival-country</loc>'; |
|
| 264 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 265 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 266 | 266 | $output .= '</url>'; |
| 267 | 267 | $output .= '<url>'; |
| 268 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/route-airport</loc>'; |
|
| 269 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 270 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 268 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/route-airport</loc>'; |
|
| 269 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 270 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 271 | 271 | $output .= '</url>'; |
| 272 | 272 | $output .= '<url>'; |
| 273 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/route-waypoint</loc>'; |
|
| 274 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 275 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 273 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/route-waypoint</loc>'; |
|
| 274 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 275 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 276 | 276 | $output .= '</url>'; |
| 277 | 277 | $output .= '<url>'; |
| 278 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/callsign</loc>'; |
|
| 279 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 280 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 278 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/callsign</loc>'; |
|
| 279 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 280 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 281 | 281 | $output .= '</url>'; |
| 282 | 282 | $output .= '<url>'; |
| 283 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/date</loc>'; |
|
| 284 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 285 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 283 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/date</loc>'; |
|
| 284 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 285 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 286 | 286 | $output .= '</url>'; |
| 287 | 287 | $output .= '<url>'; |
| 288 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/time</loc>'; |
|
| 289 | - $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 290 | - $output .= '<changefreq>daily</changefreq>'; |
|
| 288 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/statistics/time</loc>'; |
|
| 289 | + $output .= '<lastmod>'.date("c", time()).'</lastmod>'; |
|
| 290 | + $output .= '<changefreq>daily</changefreq>'; |
|
| 291 | 291 | $output .= '</url>'; |
| 292 | 292 | $output .= '</urlset>'; |
| 293 | 293 | |
@@ -297,37 +297,37 @@ discard block |
||
| 297 | 297 | $output .= '<?xml version="1.0" encoding="UTF-8"?>'; |
| 298 | 298 | $output .= '<sitemapindex xmlns="http://www.sitemaps.org/schemas/sitemap/0.9">'; |
| 299 | 299 | $output .= '<sitemap>'; |
| 300 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/static</loc>'; |
|
| 300 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/static</loc>'; |
|
| 301 | 301 | $output .= '</sitemap>'; |
| 302 | 302 | $output .= '<sitemap>'; |
| 303 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/flight</loc>'; |
|
| 303 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/flight</loc>'; |
|
| 304 | 304 | $output .= '</sitemap>'; |
| 305 | 305 | $output .= '<sitemap>'; |
| 306 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/aircraft</loc>'; |
|
| 306 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/aircraft</loc>'; |
|
| 307 | 307 | $output .= '</sitemap>'; |
| 308 | 308 | $output .= '<sitemap>'; |
| 309 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/registration</loc>'; |
|
| 309 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/registration</loc>'; |
|
| 310 | 310 | $output .= '</sitemap>'; |
| 311 | 311 | $output .= '<sitemap>'; |
| 312 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/airline</loc>'; |
|
| 312 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/airline</loc>'; |
|
| 313 | 313 | $output .= '</sitemap>'; |
| 314 | 314 | $output .= '<sitemap>'; |
| 315 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/airport</loc>'; |
|
| 315 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/airport</loc>'; |
|
| 316 | 316 | $output .= '</sitemap>'; |
| 317 | 317 | $output .= '<sitemap>'; |
| 318 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/manufacturer</loc>'; |
|
| 318 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/manufacturer</loc>'; |
|
| 319 | 319 | $output .= '</sitemap>'; |
| 320 | 320 | $output .= '<sitemap>'; |
| 321 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/country</loc>'; |
|
| 321 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/country</loc>'; |
|
| 322 | 322 | $output .= '</sitemap>'; |
| 323 | 323 | $output .= '<sitemap>'; |
| 324 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/ident</loc>'; |
|
| 324 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/ident</loc>'; |
|
| 325 | 325 | $output .= '</sitemap>'; |
| 326 | 326 | $output .= '<sitemap>'; |
| 327 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/date</loc>'; |
|
| 327 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/date</loc>'; |
|
| 328 | 328 | $output .= '</sitemap>'; |
| 329 | 329 | $output .= '<sitemap>'; |
| 330 | - $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/route</loc>'; |
|
| 330 | + $output .= '<loc>'.'http://'.$_SERVER['HTTP_HOST'].$globalURL.'/sitemap/route</loc>'; |
|
| 331 | 331 | $output .= '</sitemap>'; |
| 332 | 332 | $output .= '</sitemapindex>'; |
| 333 | 333 | |
@@ -9,10 +9,10 @@ discard block |
||
| 9 | 9 | $Common = new Common(); |
| 10 | 10 | |
| 11 | 11 | if (isset($_GET['download'])) { |
| 12 | - if ($_GET['download'] == "true") |
|
| 13 | - { |
|
| 12 | + if ($_GET['download'] == "true") |
|
| 13 | + { |
|
| 14 | 14 | header('Content-disposition: attachment; filename="flightairmap.json"'); |
| 15 | - } |
|
| 15 | + } |
|
| 16 | 16 | } |
| 17 | 17 | header('Content-Type: text/javascript'); |
| 18 | 18 | |
@@ -91,7 +91,7 @@ discard block |
||
| 91 | 91 | } |
| 92 | 92 | |
| 93 | 93 | //waypoint plotting |
| 94 | - /* |
|
| 94 | + /* |
|
| 95 | 95 | $output .= '{'; |
| 96 | 96 | $output .= '"type": "Feature",'; |
| 97 | 97 | $output .= '"properties": {'; |
@@ -270,8 +270,8 @@ discard block |
||
| 270 | 270 | $output_time .= (strtotime($spotter_history['date'])*1000).','; |
| 271 | 271 | } |
| 272 | 272 | if (isset($output_time)) { |
| 273 | - $output_time = substr($output_time, 0, -1); |
|
| 274 | - $output .= '"time": ['.$output_time.'],'; |
|
| 273 | + $output_time = substr($output_time, 0, -1); |
|
| 274 | + $output .= '"time": ['.$output_time.'],'; |
|
| 275 | 275 | } |
| 276 | 276 | |
| 277 | 277 | |
@@ -285,8 +285,8 @@ discard block |
||
| 285 | 285 | $output .= '"coordinates": ['; |
| 286 | 286 | |
| 287 | 287 | if (isset($output_history)) { |
| 288 | - $output_history = substr($output_history, 0, -1); |
|
| 289 | - $output .= $output_history; |
|
| 288 | + $output_history = substr($output_history, 0, -1); |
|
| 289 | + $output .= $output_history; |
|
| 290 | 290 | } |
| 291 | 291 | |
| 292 | 292 | $output .= ']'; |
@@ -16,11 +16,11 @@ discard block |
||
| 16 | 16 | $this->SI = new SpotterImport($this->db); |
| 17 | 17 | } |
| 18 | 18 | /** |
| 19 | - * Change IATA to ICAO value for ident |
|
| 20 | - * |
|
| 21 | - * @param String $ident ident |
|
| 22 | - * @return String the icao |
|
| 23 | - */ |
|
| 19 | + * Change IATA to ICAO value for ident |
|
| 20 | + * |
|
| 21 | + * @param String $ident ident |
|
| 22 | + * @return String the icao |
|
| 23 | + */ |
|
| 24 | 24 | public function ident2icao($ident) { |
| 25 | 25 | if (substr($ident,0,2) == 'AF') { |
| 26 | 26 | if (filter_var(substr($ident,2),FILTER_VALIDATE_INT,array("flags"=>FILTER_FLAG_ALLOW_OCTAL))) $icao = $ident; |
@@ -36,11 +36,11 @@ discard block |
||
| 36 | 36 | } |
| 37 | 37 | |
| 38 | 38 | /** |
| 39 | - * Deletes all info in the live table |
|
| 40 | - * |
|
| 41 | - * @return String success or false |
|
| 42 | - * |
|
| 43 | - */ |
|
| 39 | + * Deletes all info in the live table |
|
| 40 | + * |
|
| 41 | + * @return String success or false |
|
| 42 | + * |
|
| 43 | + */ |
|
| 44 | 44 | public function deleteLiveAcarsData() |
| 45 | 45 | { |
| 46 | 46 | global $globalDBdriver; |
@@ -60,11 +60,11 @@ discard block |
||
| 60 | 60 | } |
| 61 | 61 | |
| 62 | 62 | /** |
| 63 | - * Deletes all info in the archive table |
|
| 64 | - * |
|
| 65 | - * @return String success or false |
|
| 66 | - * |
|
| 67 | - */ |
|
| 63 | + * Deletes all info in the archive table |
|
| 64 | + * |
|
| 65 | + * @return String success or false |
|
| 66 | + * |
|
| 67 | + */ |
|
| 68 | 68 | public function deleteArchiveAcarsData() |
| 69 | 69 | { |
| 70 | 70 | global $globalACARSArchiveKeepMonths, $globalDBdriver; |
@@ -85,11 +85,11 @@ discard block |
||
| 85 | 85 | |
| 86 | 86 | |
| 87 | 87 | /** |
| 88 | - * Parse ACARS data |
|
| 89 | - * |
|
| 90 | - * @param String ACARS data in acarsdec data |
|
| 91 | - * |
|
| 92 | - */ |
|
| 88 | + * Parse ACARS data |
|
| 89 | + * |
|
| 90 | + * @param String ACARS data in acarsdec data |
|
| 91 | + * |
|
| 92 | + */ |
|
| 93 | 93 | public function parse($data) { |
| 94 | 94 | global $globalDebug, $globalACARSArchive; |
| 95 | 95 | //$Image = new Image($this->db); |
@@ -666,11 +666,11 @@ discard block |
||
| 666 | 666 | |
| 667 | 667 | |
| 668 | 668 | /** |
| 669 | - * Add ACARS data |
|
| 670 | - * |
|
| 671 | - * @param String ACARS data in acarsdec data |
|
| 672 | - * |
|
| 673 | - */ |
|
| 669 | + * Add ACARS data |
|
| 670 | + * |
|
| 671 | + * @param String ACARS data in acarsdec data |
|
| 672 | + * |
|
| 673 | + */ |
|
| 674 | 674 | function add($data) { |
| 675 | 675 | global $globalDebug, $globalACARSArchive; |
| 676 | 676 | $Image = new Image($this->db); |
@@ -725,15 +725,15 @@ discard block |
||
| 725 | 725 | } |
| 726 | 726 | |
| 727 | 727 | /** |
| 728 | - * Add Live ACARS data in DB |
|
| 729 | - * |
|
| 730 | - * @param String $ident ident |
|
| 731 | - * @param String $registration Registration of the aircraft |
|
| 732 | - * @param String $label Label of the ACARS message |
|
| 733 | - * @param String $block_id Block id of the ACARS message |
|
| 734 | - * @param String $msg_no Number of the ACARS message |
|
| 735 | - * @param String $message ACARS message |
|
| 736 | - */ |
|
| 728 | + * Add Live ACARS data in DB |
|
| 729 | + * |
|
| 730 | + * @param String $ident ident |
|
| 731 | + * @param String $registration Registration of the aircraft |
|
| 732 | + * @param String $label Label of the ACARS message |
|
| 733 | + * @param String $block_id Block id of the ACARS message |
|
| 734 | + * @param String $msg_no Number of the ACARS message |
|
| 735 | + * @param String $message ACARS message |
|
| 736 | + */ |
|
| 737 | 737 | public function addLiveAcarsData($ident,$registration,$label,$block_id,$msg_no,$message,$decode = '') { |
| 738 | 738 | global $globalDebug; |
| 739 | 739 | date_default_timezone_set('UTC'); |
@@ -771,15 +771,15 @@ discard block |
||
| 771 | 771 | } |
| 772 | 772 | |
| 773 | 773 | /** |
| 774 | - * Add Archive ACARS data in DB |
|
| 775 | - * |
|
| 776 | - * @param String $ident ident |
|
| 777 | - * @param String $registration Registration of the aircraft |
|
| 778 | - * @param String $label Label of the ACARS message |
|
| 779 | - * @param String $block_id Block id of the ACARS message |
|
| 780 | - * @param String $msg_no Number of the ACARS message |
|
| 781 | - * @param String $message ACARS message |
|
| 782 | - */ |
|
| 774 | + * Add Archive ACARS data in DB |
|
| 775 | + * |
|
| 776 | + * @param String $ident ident |
|
| 777 | + * @param String $registration Registration of the aircraft |
|
| 778 | + * @param String $label Label of the ACARS message |
|
| 779 | + * @param String $block_id Block id of the ACARS message |
|
| 780 | + * @param String $msg_no Number of the ACARS message |
|
| 781 | + * @param String $message ACARS message |
|
| 782 | + */ |
|
| 783 | 783 | public function addArchiveAcarsData($ident,$registration,$label,$block_id,$msg_no,$message,$decode = '') { |
| 784 | 784 | global $globalDebug; |
| 785 | 785 | date_default_timezone_set('UTC'); |
@@ -813,11 +813,11 @@ discard block |
||
| 813 | 813 | } |
| 814 | 814 | |
| 815 | 815 | /** |
| 816 | - * Get Message title from label from DB |
|
| 817 | - * |
|
| 818 | - * @param String $label |
|
| 819 | - * @return String Return ACARS title |
|
| 820 | - */ |
|
| 816 | + * Get Message title from label from DB |
|
| 817 | + * |
|
| 818 | + * @param String $label |
|
| 819 | + * @return String Return ACARS title |
|
| 820 | + */ |
|
| 821 | 821 | public function getTitlefromLabel($label) { |
| 822 | 822 | $Connection = new Connection($this->db); |
| 823 | 823 | $this->db = $Connection->db; |
@@ -837,10 +837,10 @@ discard block |
||
| 837 | 837 | } |
| 838 | 838 | |
| 839 | 839 | /** |
| 840 | - * List all Message title & label from DB |
|
| 841 | - * |
|
| 842 | - * @return Array Return ACARS data in array |
|
| 843 | - */ |
|
| 840 | + * List all Message title & label from DB |
|
| 841 | + * |
|
| 842 | + * @return Array Return ACARS data in array |
|
| 843 | + */ |
|
| 844 | 844 | public function getAllTitleLabel() { |
| 845 | 845 | $query = "SELECT * FROM acars_label ORDER BY title"; |
| 846 | 846 | $query_values = array(); |
@@ -858,11 +858,11 @@ discard block |
||
| 858 | 858 | } |
| 859 | 859 | |
| 860 | 860 | /** |
| 861 | - * Get Live ACARS data from DB |
|
| 862 | - * |
|
| 863 | - * @param String $ident |
|
| 864 | - * @return Array Return ACARS data in array |
|
| 865 | - */ |
|
| 861 | + * Get Live ACARS data from DB |
|
| 862 | + * |
|
| 863 | + * @param String $ident |
|
| 864 | + * @return Array Return ACARS data in array |
|
| 865 | + */ |
|
| 866 | 866 | public function getLiveAcarsData($ident) { |
| 867 | 867 | $query = "SELECT * FROM acars_live WHERE ident = :ident ORDER BY acars_live_id DESC"; |
| 868 | 868 | $query_values = array(':ident' => $ident); |
@@ -880,10 +880,10 @@ discard block |
||
| 880 | 880 | } |
| 881 | 881 | |
| 882 | 882 | /** |
| 883 | - * Get Latest ACARS data from DB |
|
| 884 | - * |
|
| 885 | - * @return Array Return ACARS data in array |
|
| 886 | - */ |
|
| 883 | + * Get Latest ACARS data from DB |
|
| 884 | + * |
|
| 885 | + * @return Array Return ACARS data in array |
|
| 886 | + */ |
|
| 887 | 887 | public function getLatestAcarsData($limit = '',$label = '') { |
| 888 | 888 | global $globalURL, $globalDBdriver; |
| 889 | 889 | $Image = new Image($this->db); |
@@ -980,10 +980,10 @@ discard block |
||
| 980 | 980 | } |
| 981 | 981 | |
| 982 | 982 | /** |
| 983 | - * Get Archive ACARS data from DB |
|
| 984 | - * |
|
| 985 | - * @return Array Return ACARS data in array |
|
| 986 | - */ |
|
| 983 | + * Get Archive ACARS data from DB |
|
| 984 | + * |
|
| 985 | + * @return Array Return ACARS data in array |
|
| 986 | + */ |
|
| 987 | 987 | public function getArchiveAcarsData($limit = '',$label = '') { |
| 988 | 988 | global $globalURL, $globalDBdriver; |
| 989 | 989 | $Image = new Image($this->db); |
@@ -1085,13 +1085,13 @@ discard block |
||
| 1085 | 1085 | } |
| 1086 | 1086 | |
| 1087 | 1087 | /** |
| 1088 | - * Add ModeS data to DB |
|
| 1089 | - * |
|
| 1090 | - * @param String $ident ident |
|
| 1091 | - * @param String $registration Registration of the aircraft |
|
| 1092 | - * @param String $icao |
|
| 1093 | - * @param String $ICAOTypeCode |
|
| 1094 | - */ |
|
| 1088 | + * Add ModeS data to DB |
|
| 1089 | + * |
|
| 1090 | + * @param String $ident ident |
|
| 1091 | + * @param String $registration Registration of the aircraft |
|
| 1092 | + * @param String $icao |
|
| 1093 | + * @param String $ICAOTypeCode |
|
| 1094 | + */ |
|
| 1095 | 1095 | public function addModeSData($ident,$registration,$icao = '',$ICAOTypeCode = '',$latitude = '', $longitude = '') { |
| 1096 | 1096 | global $globalDebug, $globalDBdriver; |
| 1097 | 1097 | $ident = trim($ident); |
@@ -52,824 +52,824 @@ |
||
| 52 | 52 | */ |
| 53 | 53 | class Predict |
| 54 | 54 | { |
| 55 | - const de2ra = 1.74532925E-2; /* Degrees to Radians */ |
|
| 56 | - const pi = 3.1415926535898; /* Pi */ |
|
| 57 | - const pio2 = 1.5707963267949; /* Pi/2 */ |
|
| 58 | - const x3pio2 = 4.71238898; /* 3*Pi/2 */ |
|
| 59 | - const twopi = 6.2831853071796; /* 2*Pi */ |
|
| 60 | - const e6a = 1.0E-6; |
|
| 61 | - const tothrd = 6.6666667E-1; /* 2/3 */ |
|
| 62 | - const xj2 = 1.0826158E-3; /* J2 Harmonic */ |
|
| 63 | - const xj3 = -2.53881E-6; /* J3 Harmonic */ |
|
| 64 | - const xj4 = -1.65597E-6; /* J4 Harmonic */ |
|
| 65 | - const xke = 7.43669161E-2; |
|
| 66 | - const xkmper = 6.378135E3; /* Earth radius km */ |
|
| 67 | - const xmnpda = 1.44E3; /* Minutes per day */ |
|
| 68 | - const km2mi = 0.621371; /* Kilometers per Mile */ |
|
| 69 | - const ae = 1.0; |
|
| 70 | - const ck2 = 5.413079E-4; |
|
| 71 | - const ck4 = 6.209887E-7; |
|
| 72 | - const __f = 3.352779E-3; |
|
| 73 | - const ge = 3.986008E5; |
|
| 74 | - const __s__ = 1.012229; |
|
| 75 | - const qoms2t = 1.880279E-09; |
|
| 76 | - const secday = 8.6400E4; /* Seconds per day */ |
|
| 77 | - const omega_E = 1.0027379; |
|
| 78 | - const omega_ER = 6.3003879; |
|
| 79 | - const zns = 1.19459E-5; |
|
| 80 | - const c1ss = 2.9864797E-6; |
|
| 81 | - const zes = 1.675E-2; |
|
| 82 | - const znl = 1.5835218E-4; |
|
| 83 | - const c1l = 4.7968065E-7; |
|
| 84 | - const zel = 5.490E-2; |
|
| 85 | - const zcosis = 9.1744867E-1; |
|
| 86 | - const zsinis = 3.9785416E-1; |
|
| 87 | - const zsings = -9.8088458E-1; |
|
| 88 | - const zcosgs = 1.945905E-1; |
|
| 89 | - const zcoshs = 1; |
|
| 90 | - const zsinhs = 0; |
|
| 91 | - const q22 = 1.7891679E-6; |
|
| 92 | - const q31 = 2.1460748E-6; |
|
| 93 | - const q33 = 2.2123015E-7; |
|
| 94 | - const g22 = 5.7686396; |
|
| 95 | - const g32 = 9.5240898E-1; |
|
| 96 | - const g44 = 1.8014998; |
|
| 97 | - const g52 = 1.0508330; |
|
| 98 | - const g54 = 4.4108898; |
|
| 99 | - const root22 = 1.7891679E-6; |
|
| 100 | - const root32 = 3.7393792E-7; |
|
| 101 | - const root44 = 7.3636953E-9; |
|
| 102 | - const root52 = 1.1428639E-7; |
|
| 103 | - const root54 = 2.1765803E-9; |
|
| 104 | - const thdt = 4.3752691E-3; |
|
| 105 | - const rho = 1.5696615E-1; |
|
| 106 | - const mfactor = 7.292115E-5; |
|
| 107 | - const __sr__ = 6.96000E5; /*Solar radius - kilometers (IAU 76)*/ |
|
| 108 | - const AU = 1.49597870E8; /*Astronomical unit - kilometers (IAU 76)*/ |
|
| 109 | - |
|
| 110 | - /* visibility constants */ |
|
| 111 | - const SAT_VIS_NONE = 0; |
|
| 112 | - const SAT_VIS_VISIBLE = 1; |
|
| 113 | - const SAT_VIS_DAYLIGHT = 2; |
|
| 114 | - const SAT_VIS_ECLIPSED = 3; |
|
| 115 | - |
|
| 116 | - /* preferences */ |
|
| 117 | - public $minEle = 10; // Minimum elevation |
|
| 118 | - public $timeRes = 10; // Pass details: time resolution |
|
| 119 | - public $numEntries = 20; // Pass details: number of entries |
|
| 120 | - public $threshold = -6; // Twilight threshold |
|
| 121 | - |
|
| 122 | - /** |
|
| 123 | - * Predict the next pass. |
|
| 124 | - * |
|
| 125 | - * This function simply wraps the get_pass function using the current time |
|
| 126 | - * as parameter. |
|
| 127 | - * |
|
| 128 | - * Note: the data in sat will be corrupt (future) and must be refreshed |
|
| 129 | - * by the caller, if the caller will need it later on (eg. if the caller |
|
| 130 | - * is GtkSatList). |
|
| 131 | - * |
|
| 132 | - * @param Predict_Sat $sat The satellite data. |
|
| 133 | - * @param Predict_QTH $qth The observer data. |
|
| 134 | - * @param int $maxdt The maximum number of days to look ahead. |
|
| 135 | - * |
|
| 136 | - * @return Predict_Pass Pointer instance or NULL if no pass can be |
|
| 137 | - * found. |
|
| 138 | - */ |
|
| 139 | - public function get_next_pass(Predict_Sat $sat, Predict_QTH $qth, $maxdt) |
|
| 140 | - { |
|
| 141 | - /* get the current time and call the get_pass function */ |
|
| 142 | - $now = Predict_Time::get_current_daynum(); |
|
| 143 | - |
|
| 144 | - return $this->get_pass($sat, $qth, $now, $maxdt); |
|
| 145 | - } |
|
| 146 | - |
|
| 147 | - /** Predict first pass after a certain time. |
|
| 148 | - * |
|
| 149 | - * @param Predict_Sat $sat The satellite data. |
|
| 150 | - * @param Predict_QTH $qth The observer's location data. |
|
| 151 | - * @param float $start Starting time. |
|
| 152 | - * @param int $maxdt The maximum number of days to look ahead (0 for no limit). |
|
| 153 | - * |
|
| 154 | - * @return Predict_Pass or NULL if there was an error. |
|
| 155 | - * |
|
| 156 | - * This function will find the first upcoming pass with AOS no earlier than |
|
| 157 | - * t = start and no later than t = (start+maxdt). |
|
| 158 | - * |
|
| 159 | - * note For no time limit use maxdt = 0.0 |
|
| 160 | - * |
|
| 161 | - * note the data in sat will be corrupt (future) and must be refreshed |
|
| 162 | - * by the caller, if the caller will need it later on |
|
| 163 | - */ |
|
| 164 | - public function get_pass(Predict_Sat $sat_in, Predict_QTH $qth, $start, $maxdt) |
|
| 165 | - { |
|
| 166 | - $aos = 0.0; /* time of AOS */ |
|
| 167 | - $tca = 0.0; /* time of TCA */ |
|
| 168 | - $los = 0.0; /* time of LOS */ |
|
| 169 | - $dt = 0.0; /* time diff */ |
|
| 170 | - $step = 0.0; /* time step */ |
|
| 171 | - $t0 = $start; |
|
| 172 | - $tres = 0.0; /* required time resolution */ |
|
| 173 | - $max_el = 0.0; /* maximum elevation */ |
|
| 174 | - $pass = null; |
|
| 175 | - $detail = null; |
|
| 176 | - $done = false; |
|
| 177 | - $iter = 0; /* number of iterations */ |
|
| 178 | - /* FIXME: watchdog */ |
|
| 179 | - |
|
| 180 | - /*copy sat_in to a working structure*/ |
|
| 181 | - $sat = clone $sat_in; |
|
| 182 | - $sat_working = clone $sat_in; |
|
| 183 | - |
|
| 184 | - /* get time resolution; sat-cfg stores it in seconds */ |
|
| 185 | - $tres = $this->timeRes / 86400.0; |
|
| 186 | - |
|
| 187 | - /* loop until we find a pass with elevation > SAT_CFG_INT_PRED_MIN_EL |
|
| 55 | + const de2ra = 1.74532925E-2; /* Degrees to Radians */ |
|
| 56 | + const pi = 3.1415926535898; /* Pi */ |
|
| 57 | + const pio2 = 1.5707963267949; /* Pi/2 */ |
|
| 58 | + const x3pio2 = 4.71238898; /* 3*Pi/2 */ |
|
| 59 | + const twopi = 6.2831853071796; /* 2*Pi */ |
|
| 60 | + const e6a = 1.0E-6; |
|
| 61 | + const tothrd = 6.6666667E-1; /* 2/3 */ |
|
| 62 | + const xj2 = 1.0826158E-3; /* J2 Harmonic */ |
|
| 63 | + const xj3 = -2.53881E-6; /* J3 Harmonic */ |
|
| 64 | + const xj4 = -1.65597E-6; /* J4 Harmonic */ |
|
| 65 | + const xke = 7.43669161E-2; |
|
| 66 | + const xkmper = 6.378135E3; /* Earth radius km */ |
|
| 67 | + const xmnpda = 1.44E3; /* Minutes per day */ |
|
| 68 | + const km2mi = 0.621371; /* Kilometers per Mile */ |
|
| 69 | + const ae = 1.0; |
|
| 70 | + const ck2 = 5.413079E-4; |
|
| 71 | + const ck4 = 6.209887E-7; |
|
| 72 | + const __f = 3.352779E-3; |
|
| 73 | + const ge = 3.986008E5; |
|
| 74 | + const __s__ = 1.012229; |
|
| 75 | + const qoms2t = 1.880279E-09; |
|
| 76 | + const secday = 8.6400E4; /* Seconds per day */ |
|
| 77 | + const omega_E = 1.0027379; |
|
| 78 | + const omega_ER = 6.3003879; |
|
| 79 | + const zns = 1.19459E-5; |
|
| 80 | + const c1ss = 2.9864797E-6; |
|
| 81 | + const zes = 1.675E-2; |
|
| 82 | + const znl = 1.5835218E-4; |
|
| 83 | + const c1l = 4.7968065E-7; |
|
| 84 | + const zel = 5.490E-2; |
|
| 85 | + const zcosis = 9.1744867E-1; |
|
| 86 | + const zsinis = 3.9785416E-1; |
|
| 87 | + const zsings = -9.8088458E-1; |
|
| 88 | + const zcosgs = 1.945905E-1; |
|
| 89 | + const zcoshs = 1; |
|
| 90 | + const zsinhs = 0; |
|
| 91 | + const q22 = 1.7891679E-6; |
|
| 92 | + const q31 = 2.1460748E-6; |
|
| 93 | + const q33 = 2.2123015E-7; |
|
| 94 | + const g22 = 5.7686396; |
|
| 95 | + const g32 = 9.5240898E-1; |
|
| 96 | + const g44 = 1.8014998; |
|
| 97 | + const g52 = 1.0508330; |
|
| 98 | + const g54 = 4.4108898; |
|
| 99 | + const root22 = 1.7891679E-6; |
|
| 100 | + const root32 = 3.7393792E-7; |
|
| 101 | + const root44 = 7.3636953E-9; |
|
| 102 | + const root52 = 1.1428639E-7; |
|
| 103 | + const root54 = 2.1765803E-9; |
|
| 104 | + const thdt = 4.3752691E-3; |
|
| 105 | + const rho = 1.5696615E-1; |
|
| 106 | + const mfactor = 7.292115E-5; |
|
| 107 | + const __sr__ = 6.96000E5; /*Solar radius - kilometers (IAU 76)*/ |
|
| 108 | + const AU = 1.49597870E8; /*Astronomical unit - kilometers (IAU 76)*/ |
|
| 109 | + |
|
| 110 | + /* visibility constants */ |
|
| 111 | + const SAT_VIS_NONE = 0; |
|
| 112 | + const SAT_VIS_VISIBLE = 1; |
|
| 113 | + const SAT_VIS_DAYLIGHT = 2; |
|
| 114 | + const SAT_VIS_ECLIPSED = 3; |
|
| 115 | + |
|
| 116 | + /* preferences */ |
|
| 117 | + public $minEle = 10; // Minimum elevation |
|
| 118 | + public $timeRes = 10; // Pass details: time resolution |
|
| 119 | + public $numEntries = 20; // Pass details: number of entries |
|
| 120 | + public $threshold = -6; // Twilight threshold |
|
| 121 | + |
|
| 122 | + /** |
|
| 123 | + * Predict the next pass. |
|
| 124 | + * |
|
| 125 | + * This function simply wraps the get_pass function using the current time |
|
| 126 | + * as parameter. |
|
| 127 | + * |
|
| 128 | + * Note: the data in sat will be corrupt (future) and must be refreshed |
|
| 129 | + * by the caller, if the caller will need it later on (eg. if the caller |
|
| 130 | + * is GtkSatList). |
|
| 131 | + * |
|
| 132 | + * @param Predict_Sat $sat The satellite data. |
|
| 133 | + * @param Predict_QTH $qth The observer data. |
|
| 134 | + * @param int $maxdt The maximum number of days to look ahead. |
|
| 135 | + * |
|
| 136 | + * @return Predict_Pass Pointer instance or NULL if no pass can be |
|
| 137 | + * found. |
|
| 138 | + */ |
|
| 139 | + public function get_next_pass(Predict_Sat $sat, Predict_QTH $qth, $maxdt) |
|
| 140 | + { |
|
| 141 | + /* get the current time and call the get_pass function */ |
|
| 142 | + $now = Predict_Time::get_current_daynum(); |
|
| 143 | + |
|
| 144 | + return $this->get_pass($sat, $qth, $now, $maxdt); |
|
| 145 | + } |
|
| 146 | + |
|
| 147 | + /** Predict first pass after a certain time. |
|
| 148 | + * |
|
| 149 | + * @param Predict_Sat $sat The satellite data. |
|
| 150 | + * @param Predict_QTH $qth The observer's location data. |
|
| 151 | + * @param float $start Starting time. |
|
| 152 | + * @param int $maxdt The maximum number of days to look ahead (0 for no limit). |
|
| 153 | + * |
|
| 154 | + * @return Predict_Pass or NULL if there was an error. |
|
| 155 | + * |
|
| 156 | + * This function will find the first upcoming pass with AOS no earlier than |
|
| 157 | + * t = start and no later than t = (start+maxdt). |
|
| 158 | + * |
|
| 159 | + * note For no time limit use maxdt = 0.0 |
|
| 160 | + * |
|
| 161 | + * note the data in sat will be corrupt (future) and must be refreshed |
|
| 162 | + * by the caller, if the caller will need it later on |
|
| 163 | + */ |
|
| 164 | + public function get_pass(Predict_Sat $sat_in, Predict_QTH $qth, $start, $maxdt) |
|
| 165 | + { |
|
| 166 | + $aos = 0.0; /* time of AOS */ |
|
| 167 | + $tca = 0.0; /* time of TCA */ |
|
| 168 | + $los = 0.0; /* time of LOS */ |
|
| 169 | + $dt = 0.0; /* time diff */ |
|
| 170 | + $step = 0.0; /* time step */ |
|
| 171 | + $t0 = $start; |
|
| 172 | + $tres = 0.0; /* required time resolution */ |
|
| 173 | + $max_el = 0.0; /* maximum elevation */ |
|
| 174 | + $pass = null; |
|
| 175 | + $detail = null; |
|
| 176 | + $done = false; |
|
| 177 | + $iter = 0; /* number of iterations */ |
|
| 178 | + /* FIXME: watchdog */ |
|
| 179 | + |
|
| 180 | + /*copy sat_in to a working structure*/ |
|
| 181 | + $sat = clone $sat_in; |
|
| 182 | + $sat_working = clone $sat_in; |
|
| 183 | + |
|
| 184 | + /* get time resolution; sat-cfg stores it in seconds */ |
|
| 185 | + $tres = $this->timeRes / 86400.0; |
|
| 186 | + |
|
| 187 | + /* loop until we find a pass with elevation > SAT_CFG_INT_PRED_MIN_EL |
|
| 188 | 188 | or we run out of time |
| 189 | 189 | FIXME: we should have a safety break |
| 190 | 190 | */ |
| 191 | - while (!$done) { |
|
| 192 | - /* Find los of next pass or of current pass */ |
|
| 193 | - $los = $this->find_los($sat, $qth, $t0, $maxdt); // See if a pass is ongoing |
|
| 194 | - $aos = $this->find_aos($sat, $qth, $t0, $maxdt); |
|
| 195 | - /* sat_log_log(SAT_LOG_LEVEL_MSG, "%s:%s:%d: found aos %f and los %f for t0=%f", */ |
|
| 196 | - /* __FILE__, */ |
|
| 197 | - /* __FUNCTION__, */ |
|
| 198 | - /* __LINE__, */ |
|
| 199 | - /* aos, */ |
|
| 200 | - /* los, */ |
|
| 201 | - /* t0); */ |
|
| 202 | - if ($aos > $los) { |
|
| 203 | - // los is from an currently happening pass, find previous aos |
|
| 204 | - $aos = $this->find_prev_aos($sat, $qth, $t0); |
|
| 205 | - } |
|
| 206 | - |
|
| 207 | - /* aos = 0.0 means no aos */ |
|
| 208 | - if ($aos == 0.0) { |
|
| 209 | - $done = true; |
|
| 210 | - } else if (($maxdt > 0.0) && ($aos > ($start + $maxdt)) ) { |
|
| 211 | - /* check whether we are within time limits; |
|
| 191 | + while (!$done) { |
|
| 192 | + /* Find los of next pass or of current pass */ |
|
| 193 | + $los = $this->find_los($sat, $qth, $t0, $maxdt); // See if a pass is ongoing |
|
| 194 | + $aos = $this->find_aos($sat, $qth, $t0, $maxdt); |
|
| 195 | + /* sat_log_log(SAT_LOG_LEVEL_MSG, "%s:%s:%d: found aos %f and los %f for t0=%f", */ |
|
| 196 | + /* __FILE__, */ |
|
| 197 | + /* __FUNCTION__, */ |
|
| 198 | + /* __LINE__, */ |
|
| 199 | + /* aos, */ |
|
| 200 | + /* los, */ |
|
| 201 | + /* t0); */ |
|
| 202 | + if ($aos > $los) { |
|
| 203 | + // los is from an currently happening pass, find previous aos |
|
| 204 | + $aos = $this->find_prev_aos($sat, $qth, $t0); |
|
| 205 | + } |
|
| 206 | + |
|
| 207 | + /* aos = 0.0 means no aos */ |
|
| 208 | + if ($aos == 0.0) { |
|
| 209 | + $done = true; |
|
| 210 | + } else if (($maxdt > 0.0) && ($aos > ($start + $maxdt)) ) { |
|
| 211 | + /* check whether we are within time limits; |
|
| 212 | 212 | maxdt = 0 mean no time limit. |
| 213 | 213 | */ |
| 214 | - $done = true; |
|
| 215 | - } else { |
|
| 216 | - //los = find_los (sat, qth, aos + 0.001, maxdt); // +1.5 min later |
|
| 217 | - $dt = $los - $aos; |
|
| 214 | + $done = true; |
|
| 215 | + } else { |
|
| 216 | + //los = find_los (sat, qth, aos + 0.001, maxdt); // +1.5 min later |
|
| 217 | + $dt = $los - $aos; |
|
| 218 | 218 | |
| 219 | - /* get time step, which will give us the max number of entries */ |
|
| 220 | - $step = $dt / $this->numEntries; |
|
| 219 | + /* get time step, which will give us the max number of entries */ |
|
| 220 | + $step = $dt / $this->numEntries; |
|
| 221 | 221 | |
| 222 | - /* but if this is smaller than the required resolution |
|
| 222 | + /* but if this is smaller than the required resolution |
|
| 223 | 223 | we go with the resolution |
| 224 | 224 | */ |
| 225 | - if ($step < $tres) { |
|
| 226 | - $step = $tres; |
|
| 227 | - } |
|
| 228 | - |
|
| 229 | - /* create a pass_t entry; FIXME: g_try_new in 2.8 */ |
|
| 230 | - $pass = new Predict_Pass(); |
|
| 231 | - |
|
| 232 | - $pass->aos = $aos; |
|
| 233 | - $pass->los = $los; |
|
| 234 | - $pass->max_el = 0.0; |
|
| 235 | - $pass->aos_az = 0.0; |
|
| 236 | - $pass->los_az = 0.0; |
|
| 237 | - $pass->maxel_az = 0.0; |
|
| 238 | - $pass->vis = '---'; |
|
| 239 | - $pass->satname = $sat->nickname; |
|
| 240 | - $pass->details = array(); |
|
| 241 | - |
|
| 242 | - /* iterate over each time step */ |
|
| 243 | - for ($t = $pass->aos; $t <= $pass->los; $t += $step) { |
|
| 244 | - |
|
| 245 | - /* calculate satellite data */ |
|
| 246 | - $this->predict_calc($sat, $qth, $t); |
|
| 247 | - |
|
| 248 | - /* in the first iter we want to store |
|
| 225 | + if ($step < $tres) { |
|
| 226 | + $step = $tres; |
|
| 227 | + } |
|
| 228 | + |
|
| 229 | + /* create a pass_t entry; FIXME: g_try_new in 2.8 */ |
|
| 230 | + $pass = new Predict_Pass(); |
|
| 231 | + |
|
| 232 | + $pass->aos = $aos; |
|
| 233 | + $pass->los = $los; |
|
| 234 | + $pass->max_el = 0.0; |
|
| 235 | + $pass->aos_az = 0.0; |
|
| 236 | + $pass->los_az = 0.0; |
|
| 237 | + $pass->maxel_az = 0.0; |
|
| 238 | + $pass->vis = '---'; |
|
| 239 | + $pass->satname = $sat->nickname; |
|
| 240 | + $pass->details = array(); |
|
| 241 | + |
|
| 242 | + /* iterate over each time step */ |
|
| 243 | + for ($t = $pass->aos; $t <= $pass->los; $t += $step) { |
|
| 244 | + |
|
| 245 | + /* calculate satellite data */ |
|
| 246 | + $this->predict_calc($sat, $qth, $t); |
|
| 247 | + |
|
| 248 | + /* in the first iter we want to store |
|
| 249 | 249 | pass->aos_az |
| 250 | 250 | */ |
| 251 | - if ($t == $pass->aos) { |
|
| 252 | - $pass->aos_az = $sat->az; |
|
| 253 | - $pass->orbit = $sat->orbit; |
|
| 254 | - } |
|
| 255 | - |
|
| 256 | - /* append details to sat->details */ |
|
| 257 | - $detail = new Predict_PassDetail(); |
|
| 258 | - $detail->time = $t; |
|
| 259 | - $detail->pos->x = $sat->pos->x; |
|
| 260 | - $detail->pos->y = $sat->pos->y; |
|
| 261 | - $detail->pos->z = $sat->pos->z; |
|
| 262 | - $detail->pos->w = $sat->pos->w; |
|
| 263 | - $detail->vel->x = $sat->vel->x; |
|
| 264 | - $detail->vel->y = $sat->vel->y; |
|
| 265 | - $detail->vel->z = $sat->vel->z; |
|
| 266 | - $detail->vel->w = $sat->vel->w; |
|
| 267 | - $detail->velo = $sat->velo; |
|
| 268 | - $detail->az = $sat->az; |
|
| 269 | - $detail->el = $sat->el; |
|
| 270 | - $detail->range = $sat->range; |
|
| 271 | - $detail->range_rate = $sat->range_rate; |
|
| 272 | - $detail->lat = $sat->ssplat; |
|
| 273 | - $detail->lon = $sat->ssplon; |
|
| 274 | - $detail->alt = $sat->alt; |
|
| 275 | - $detail->ma = $sat->ma; |
|
| 276 | - $detail->phase = $sat->phase; |
|
| 277 | - $detail->footprint = $sat->footprint; |
|
| 278 | - $detail->orbit = $sat->orbit; |
|
| 279 | - $detail->vis = $this->get_sat_vis($sat, $qth, $t); |
|
| 280 | - |
|
| 281 | - /* also store visibility "bit" */ |
|
| 282 | - switch ($detail->vis) { |
|
| 283 | - case self::SAT_VIS_VISIBLE: |
|
| 284 | - $pass->vis[0] = 'V'; |
|
| 285 | - break; |
|
| 286 | - case self::SAT_VIS_DAYLIGHT: |
|
| 287 | - $pass->vis[1] = 'D'; |
|
| 288 | - break; |
|
| 289 | - case self::SAT_VIS_ECLIPSED: |
|
| 290 | - $pass->vis[2] = 'E'; |
|
| 291 | - break; |
|
| 292 | - default: |
|
| 293 | - break; |
|
| 294 | - } |
|
| 295 | - |
|
| 296 | - // Using an array, no need to prepend and reverse the list |
|
| 297 | - // as gpredict does |
|
| 298 | - $pass->details[] = $detail; |
|
| 299 | - |
|
| 300 | - // Look up apparent magnitude if this is a visible pass |
|
| 301 | - if ($detail->vis === self::SAT_VIS_VISIBLE) { |
|
| 302 | - $apmag = $sat->calculateApparentMagnitude($t, $qth); |
|
| 303 | - if ($pass->max_apparent_magnitude === null || $apmag < $pass->max_apparent_magnitude) { |
|
| 304 | - $pass->max_apparent_magnitude = $apmag; |
|
| 305 | - } |
|
| 306 | - } |
|
| 307 | - |
|
| 308 | - /* store elevation if greater than the |
|
| 251 | + if ($t == $pass->aos) { |
|
| 252 | + $pass->aos_az = $sat->az; |
|
| 253 | + $pass->orbit = $sat->orbit; |
|
| 254 | + } |
|
| 255 | + |
|
| 256 | + /* append details to sat->details */ |
|
| 257 | + $detail = new Predict_PassDetail(); |
|
| 258 | + $detail->time = $t; |
|
| 259 | + $detail->pos->x = $sat->pos->x; |
|
| 260 | + $detail->pos->y = $sat->pos->y; |
|
| 261 | + $detail->pos->z = $sat->pos->z; |
|
| 262 | + $detail->pos->w = $sat->pos->w; |
|
| 263 | + $detail->vel->x = $sat->vel->x; |
|
| 264 | + $detail->vel->y = $sat->vel->y; |
|
| 265 | + $detail->vel->z = $sat->vel->z; |
|
| 266 | + $detail->vel->w = $sat->vel->w; |
|
| 267 | + $detail->velo = $sat->velo; |
|
| 268 | + $detail->az = $sat->az; |
|
| 269 | + $detail->el = $sat->el; |
|
| 270 | + $detail->range = $sat->range; |
|
| 271 | + $detail->range_rate = $sat->range_rate; |
|
| 272 | + $detail->lat = $sat->ssplat; |
|
| 273 | + $detail->lon = $sat->ssplon; |
|
| 274 | + $detail->alt = $sat->alt; |
|
| 275 | + $detail->ma = $sat->ma; |
|
| 276 | + $detail->phase = $sat->phase; |
|
| 277 | + $detail->footprint = $sat->footprint; |
|
| 278 | + $detail->orbit = $sat->orbit; |
|
| 279 | + $detail->vis = $this->get_sat_vis($sat, $qth, $t); |
|
| 280 | + |
|
| 281 | + /* also store visibility "bit" */ |
|
| 282 | + switch ($detail->vis) { |
|
| 283 | + case self::SAT_VIS_VISIBLE: |
|
| 284 | + $pass->vis[0] = 'V'; |
|
| 285 | + break; |
|
| 286 | + case self::SAT_VIS_DAYLIGHT: |
|
| 287 | + $pass->vis[1] = 'D'; |
|
| 288 | + break; |
|
| 289 | + case self::SAT_VIS_ECLIPSED: |
|
| 290 | + $pass->vis[2] = 'E'; |
|
| 291 | + break; |
|
| 292 | + default: |
|
| 293 | + break; |
|
| 294 | + } |
|
| 295 | + |
|
| 296 | + // Using an array, no need to prepend and reverse the list |
|
| 297 | + // as gpredict does |
|
| 298 | + $pass->details[] = $detail; |
|
| 299 | + |
|
| 300 | + // Look up apparent magnitude if this is a visible pass |
|
| 301 | + if ($detail->vis === self::SAT_VIS_VISIBLE) { |
|
| 302 | + $apmag = $sat->calculateApparentMagnitude($t, $qth); |
|
| 303 | + if ($pass->max_apparent_magnitude === null || $apmag < $pass->max_apparent_magnitude) { |
|
| 304 | + $pass->max_apparent_magnitude = $apmag; |
|
| 305 | + } |
|
| 306 | + } |
|
| 307 | + |
|
| 308 | + /* store elevation if greater than the |
|
| 309 | 309 | previously stored one |
| 310 | 310 | */ |
| 311 | - if ($sat->el > $max_el) { |
|
| 312 | - $max_el = $sat->el; |
|
| 313 | - $tca = $t; |
|
| 314 | - $pass->maxel_az = $sat->az; |
|
| 315 | - } |
|
| 316 | - |
|
| 317 | - /* g_print ("TIME: %f\tAZ: %f\tEL: %f (MAX: %f)\n", */ |
|
| 318 | - /* t, sat->az, sat->el, max_el); */ |
|
| 319 | - } |
|
| 320 | - |
|
| 321 | - /* calculate satellite data */ |
|
| 322 | - $this->predict_calc($sat, $qth, $pass->los); |
|
| 323 | - /* store los_az, max_el and tca */ |
|
| 324 | - $pass->los_az = $sat->az; |
|
| 325 | - $pass->max_el = $max_el; |
|
| 326 | - $pass->tca = $tca; |
|
| 327 | - |
|
| 328 | - /* check whether this pass is good */ |
|
| 329 | - if ($max_el >= $this->minEle) { |
|
| 330 | - $done = true; |
|
| 331 | - } else { |
|
| 332 | - $done = false; |
|
| 333 | - $t0 = $los + 0.014; // +20 min |
|
| 334 | - $pass = null; |
|
| 335 | - } |
|
| 336 | - |
|
| 337 | - $iter++; |
|
| 338 | - } |
|
| 339 | - } |
|
| 340 | - |
|
| 341 | - return $pass; |
|
| 342 | - } |
|
| 343 | - |
|
| 344 | - /** |
|
| 345 | - * Calculate satellite visibility. |
|
| 346 | - * |
|
| 347 | - * @param Predict_Sat $sat The satellite structure. |
|
| 348 | - * @param Predict_QTH $qth The QTH |
|
| 349 | - * @param float $jul_utc The time at which the visibility should be calculated. |
|
| 350 | - * |
|
| 351 | - * @return int The visiblity constant, 0, 1, 2, or 3 (see above) |
|
| 352 | - */ |
|
| 353 | - public function get_sat_vis(Predict_Sat $sat, Predict_QTH $qth, $jul_utc) |
|
| 354 | - { |
|
| 355 | - /* gboolean sat_sun_status; |
|
| 311 | + if ($sat->el > $max_el) { |
|
| 312 | + $max_el = $sat->el; |
|
| 313 | + $tca = $t; |
|
| 314 | + $pass->maxel_az = $sat->az; |
|
| 315 | + } |
|
| 316 | + |
|
| 317 | + /* g_print ("TIME: %f\tAZ: %f\tEL: %f (MAX: %f)\n", */ |
|
| 318 | + /* t, sat->az, sat->el, max_el); */ |
|
| 319 | + } |
|
| 320 | + |
|
| 321 | + /* calculate satellite data */ |
|
| 322 | + $this->predict_calc($sat, $qth, $pass->los); |
|
| 323 | + /* store los_az, max_el and tca */ |
|
| 324 | + $pass->los_az = $sat->az; |
|
| 325 | + $pass->max_el = $max_el; |
|
| 326 | + $pass->tca = $tca; |
|
| 327 | + |
|
| 328 | + /* check whether this pass is good */ |
|
| 329 | + if ($max_el >= $this->minEle) { |
|
| 330 | + $done = true; |
|
| 331 | + } else { |
|
| 332 | + $done = false; |
|
| 333 | + $t0 = $los + 0.014; // +20 min |
|
| 334 | + $pass = null; |
|
| 335 | + } |
|
| 336 | + |
|
| 337 | + $iter++; |
|
| 338 | + } |
|
| 339 | + } |
|
| 340 | + |
|
| 341 | + return $pass; |
|
| 342 | + } |
|
| 343 | + |
|
| 344 | + /** |
|
| 345 | + * Calculate satellite visibility. |
|
| 346 | + * |
|
| 347 | + * @param Predict_Sat $sat The satellite structure. |
|
| 348 | + * @param Predict_QTH $qth The QTH |
|
| 349 | + * @param float $jul_utc The time at which the visibility should be calculated. |
|
| 350 | + * |
|
| 351 | + * @return int The visiblity constant, 0, 1, 2, or 3 (see above) |
|
| 352 | + */ |
|
| 353 | + public function get_sat_vis(Predict_Sat $sat, Predict_QTH $qth, $jul_utc) |
|
| 354 | + { |
|
| 355 | + /* gboolean sat_sun_status; |
|
| 356 | 356 | gdouble sun_el; |
| 357 | 357 | gdouble threshold; |
| 358 | 358 | gdouble eclipse_depth; |
| 359 | 359 | sat_vis_t vis = SAT_VIS_NONE; */ |
| 360 | 360 | |
| 361 | - $eclipse_depth = 0.0; |
|
| 362 | - $zero_vector = new Predict_Vector(); |
|
| 363 | - $obs_geodetic = new Predict_Geodetic(); |
|
| 364 | - |
|
| 365 | - /* Solar ECI position vector */ |
|
| 366 | - $solar_vector = new Predict_Vector(); |
|
| 367 | - |
|
| 368 | - /* Solar observed az and el vector */ |
|
| 369 | - $solar_set = new Predict_ObsSet(); |
|
| 370 | - |
|
| 371 | - /* FIXME: could be passed as parameter */ |
|
| 372 | - $obs_geodetic->lon = $qth->lon * self::de2ra; |
|
| 373 | - $obs_geodetic->lat = $qth->lat * self::de2ra; |
|
| 374 | - $obs_geodetic->alt = $qth->alt / 1000.0; |
|
| 375 | - $obs_geodetic->theta = 0; |
|
| 376 | - |
|
| 377 | - Predict_Solar::Calculate_Solar_Position($jul_utc, $solar_vector); |
|
| 378 | - Predict_SGPObs::Calculate_Obs($jul_utc, $solar_vector, $zero_vector, $obs_geodetic, $solar_set); |
|
| 379 | - |
|
| 380 | - if (Predict_Solar::Sat_Eclipsed($sat->pos, $solar_vector, $eclipse_depth)) { |
|
| 381 | - /* satellite is eclipsed */ |
|
| 382 | - $sat_sun_status = false; |
|
| 383 | - } else { |
|
| 384 | - /* satellite in sunlight => may be visible */ |
|
| 385 | - $sat_sun_status = true; |
|
| 386 | - } |
|
| 387 | - |
|
| 388 | - if ($sat_sun_status) { |
|
| 389 | - $sun_el = Predict_Math::Degrees($solar_set->el); |
|
| 390 | - |
|
| 391 | - if ($sun_el <= $this->threshold && $sat->el >= 0.0) { |
|
| 392 | - $vis = self::SAT_VIS_VISIBLE; |
|
| 393 | - } else { |
|
| 394 | - $vis = self::SAT_VIS_DAYLIGHT; |
|
| 395 | - } |
|
| 396 | - } else { |
|
| 397 | - $vis = self::SAT_VIS_ECLIPSED; |
|
| 398 | - } |
|
| 399 | - |
|
| 400 | - return $vis; |
|
| 401 | - } |
|
| 402 | - |
|
| 403 | - /** Find the AOS time of the next pass. |
|
| 404 | - * @author Alexandru Csete, OZ9AEC |
|
| 405 | - * @author John A. Magliacane, KD2BD |
|
| 406 | - * @param Predict_Sat $sat The satellite data. |
|
| 407 | - * @param Predict_QTH $qth The observer's location (QTH) data. |
|
| 408 | - * @param float $start The julian date where calculation should start. |
|
| 409 | - * @param int $maxdt The upper time limit in days (0.0 = no limit) |
|
| 410 | - * @return The julain date of the next AOS or 0.0 if the satellite has no AOS. |
|
| 411 | - * |
|
| 412 | - * This function finds the time of AOS for the first coming pass taking place |
|
| 413 | - * no earlier that start. |
|
| 414 | - * If the satellite is currently within range, the function first calls |
|
| 415 | - * find_los to get the next LOS time. Then the calculations are done using |
|
| 416 | - * the new start time. |
|
| 417 | - * |
|
| 418 | - */ |
|
| 419 | - public function find_aos(Predict_Sat $sat, Predict_QTH $qth, $start, $maxdt) |
|
| 420 | - { |
|
| 421 | - $t = $start; |
|
| 422 | - $aostime = 0.0; |
|
| 423 | - |
|
| 424 | - |
|
| 425 | - /* make sure current sat values are |
|
| 361 | + $eclipse_depth = 0.0; |
|
| 362 | + $zero_vector = new Predict_Vector(); |
|
| 363 | + $obs_geodetic = new Predict_Geodetic(); |
|
| 364 | + |
|
| 365 | + /* Solar ECI position vector */ |
|
| 366 | + $solar_vector = new Predict_Vector(); |
|
| 367 | + |
|
| 368 | + /* Solar observed az and el vector */ |
|
| 369 | + $solar_set = new Predict_ObsSet(); |
|
| 370 | + |
|
| 371 | + /* FIXME: could be passed as parameter */ |
|
| 372 | + $obs_geodetic->lon = $qth->lon * self::de2ra; |
|
| 373 | + $obs_geodetic->lat = $qth->lat * self::de2ra; |
|
| 374 | + $obs_geodetic->alt = $qth->alt / 1000.0; |
|
| 375 | + $obs_geodetic->theta = 0; |
|
| 376 | + |
|
| 377 | + Predict_Solar::Calculate_Solar_Position($jul_utc, $solar_vector); |
|
| 378 | + Predict_SGPObs::Calculate_Obs($jul_utc, $solar_vector, $zero_vector, $obs_geodetic, $solar_set); |
|
| 379 | + |
|
| 380 | + if (Predict_Solar::Sat_Eclipsed($sat->pos, $solar_vector, $eclipse_depth)) { |
|
| 381 | + /* satellite is eclipsed */ |
|
| 382 | + $sat_sun_status = false; |
|
| 383 | + } else { |
|
| 384 | + /* satellite in sunlight => may be visible */ |
|
| 385 | + $sat_sun_status = true; |
|
| 386 | + } |
|
| 387 | + |
|
| 388 | + if ($sat_sun_status) { |
|
| 389 | + $sun_el = Predict_Math::Degrees($solar_set->el); |
|
| 390 | + |
|
| 391 | + if ($sun_el <= $this->threshold && $sat->el >= 0.0) { |
|
| 392 | + $vis = self::SAT_VIS_VISIBLE; |
|
| 393 | + } else { |
|
| 394 | + $vis = self::SAT_VIS_DAYLIGHT; |
|
| 395 | + } |
|
| 396 | + } else { |
|
| 397 | + $vis = self::SAT_VIS_ECLIPSED; |
|
| 398 | + } |
|
| 399 | + |
|
| 400 | + return $vis; |
|
| 401 | + } |
|
| 402 | + |
|
| 403 | + /** Find the AOS time of the next pass. |
|
| 404 | + * @author Alexandru Csete, OZ9AEC |
|
| 405 | + * @author John A. Magliacane, KD2BD |
|
| 406 | + * @param Predict_Sat $sat The satellite data. |
|
| 407 | + * @param Predict_QTH $qth The observer's location (QTH) data. |
|
| 408 | + * @param float $start The julian date where calculation should start. |
|
| 409 | + * @param int $maxdt The upper time limit in days (0.0 = no limit) |
|
| 410 | + * @return The julain date of the next AOS or 0.0 if the satellite has no AOS. |
|
| 411 | + * |
|
| 412 | + * This function finds the time of AOS for the first coming pass taking place |
|
| 413 | + * no earlier that start. |
|
| 414 | + * If the satellite is currently within range, the function first calls |
|
| 415 | + * find_los to get the next LOS time. Then the calculations are done using |
|
| 416 | + * the new start time. |
|
| 417 | + * |
|
| 418 | + */ |
|
| 419 | + public function find_aos(Predict_Sat $sat, Predict_QTH $qth, $start, $maxdt) |
|
| 420 | + { |
|
| 421 | + $t = $start; |
|
| 422 | + $aostime = 0.0; |
|
| 423 | + |
|
| 424 | + |
|
| 425 | + /* make sure current sat values are |
|
| 426 | 426 | in sync with the time |
| 427 | 427 | */ |
| 428 | - $this->predict_calc($sat, $qth, $start); |
|
| 429 | - |
|
| 430 | - /* check whether satellite has aos */ |
|
| 431 | - if (($sat->otype == Predict_SGPSDP::ORBIT_TYPE_GEO) || |
|
| 432 | - ($sat->otype == Predict_SGPSDP::ORBIT_TYPE_DECAYED) || |
|
| 433 | - !$this->has_aos($sat, $qth)) { |
|
| 434 | - |
|
| 435 | - return 0.0; |
|
| 436 | - } |
|
| 437 | - |
|
| 438 | - if ($sat->el > 0.0) { |
|
| 439 | - $t = $this->find_los($sat, $qth, $start, $maxdt) + 0.014; // +20 min |
|
| 440 | - } |
|
| 441 | - |
|
| 442 | - /* invalid time (potentially returned by find_los) */ |
|
| 443 | - if ($t < 0.1) { |
|
| 444 | - return 0.0; |
|
| 445 | - } |
|
| 446 | - |
|
| 447 | - /* update satellite data */ |
|
| 448 | - $this->predict_calc($sat, $qth, $t); |
|
| 449 | - |
|
| 450 | - /* use upper time limit */ |
|
| 451 | - if ($maxdt > 0.0) { |
|
| 452 | - |
|
| 453 | - /* coarse time steps */ |
|
| 454 | - while (($sat->el < -1.0) && ($t <= ($start + $maxdt))) { |
|
| 455 | - $t -= 0.00035 * ($sat->el * (($sat->alt / 8400.0) + 0.46) - 2.0); |
|
| 456 | - $this->predict_calc($sat, $qth, $t); |
|
| 457 | - } |
|
| 458 | - |
|
| 459 | - /* fine steps */ |
|
| 460 | - while (($aostime == 0.0) && ($t <= ($start + $maxdt))) { |
|
| 461 | - |
|
| 462 | - if (abs($sat->el) < 0.005) { |
|
| 463 | - $aostime = $t; |
|
| 464 | - } else { |
|
| 465 | - $t -= $sat->el * sqrt($sat->alt) / 530000.0; |
|
| 466 | - $this->predict_calc($sat, $qth, $t); |
|
| 467 | - } |
|
| 468 | - } |
|
| 469 | - } else { |
|
| 470 | - /* don't use upper time limit */ |
|
| 471 | - |
|
| 472 | - /* coarse time steps */ |
|
| 473 | - while ($sat->el < -1.0) { |
|
| 474 | - |
|
| 475 | - $t -= 0.00035 * ($sat->el * (($sat->alt / 8400.0) + 0.46) - 2.0); |
|
| 476 | - $this->predict_calc($sat, $qth, $t); |
|
| 477 | - } |
|
| 478 | - |
|
| 479 | - /* fine steps */ |
|
| 480 | - while ($aostime == 0.0) { |
|
| 481 | - |
|
| 482 | - if (abs($sat->el) < 0.005) { |
|
| 483 | - $aostime = $t; |
|
| 484 | - } else { |
|
| 485 | - $t -= $sat->el * sqrt($sat->alt) / 530000.0; |
|
| 486 | - $this->predict_calc($sat, $qth, $t); |
|
| 487 | - } |
|
| 488 | - |
|
| 489 | - } |
|
| 490 | - } |
|
| 491 | - |
|
| 492 | - return $aostime; |
|
| 493 | - } |
|
| 494 | - |
|
| 495 | - /** SGP4SDP4 driver for doing AOS/LOS calculations. |
|
| 496 | - * @param Predict_Sat $sat The satellite data. |
|
| 497 | - * @param Predict_QTH $qth The QTH observer location data. |
|
| 498 | - * @param float $t The time for calculation (Julian Date) |
|
| 499 | - * |
|
| 500 | - */ |
|
| 501 | - public function predict_calc(Predict_Sat $sat, Predict_QTH $qth, $t) |
|
| 502 | - { |
|
| 503 | - $obs_set = new Predict_ObsSet(); |
|
| 504 | - $sat_geodetic = new Predict_Geodetic(); |
|
| 505 | - $obs_geodetic = new Predict_Geodetic(); |
|
| 506 | - |
|
| 507 | - $obs_geodetic->lon = $qth->lon * self::de2ra; |
|
| 508 | - $obs_geodetic->lat = $qth->lat * self::de2ra; |
|
| 509 | - $obs_geodetic->alt = $qth->alt / 1000.0; |
|
| 510 | - $obs_geodetic->theta = 0; |
|
| 511 | - |
|
| 512 | - $sat->jul_utc = $t; |
|
| 513 | - $sat->tsince = ($sat->jul_utc - $sat->jul_epoch) * self::xmnpda; |
|
| 514 | - |
|
| 515 | - /* call the norad routines according to the deep-space flag */ |
|
| 516 | - $sgpsdp = Predict_SGPSDP::getInstance($sat); |
|
| 517 | - if ($sat->flags & Predict_SGPSDP::DEEP_SPACE_EPHEM_FLAG) { |
|
| 518 | - $sgpsdp->SDP4($sat, $sat->tsince); |
|
| 519 | - } else { |
|
| 520 | - $sgpsdp->SGP4($sat, $sat->tsince); |
|
| 521 | - } |
|
| 522 | - |
|
| 523 | - Predict_Math::Convert_Sat_State($sat->pos, $sat->vel); |
|
| 524 | - |
|
| 525 | - /* get the velocity of the satellite */ |
|
| 526 | - $sat->vel->w = sqrt($sat->vel->x * $sat->vel->x + $sat->vel->y * $sat->vel->y + $sat->vel->z * $sat->vel->z); |
|
| 527 | - $sat->velo = $sat->vel->w; |
|
| 528 | - Predict_SGPObs::Calculate_Obs($sat->jul_utc, $sat->pos, $sat->vel, $obs_geodetic, $obs_set); |
|
| 529 | - Predict_SGPObs::Calculate_LatLonAlt($sat->jul_utc, $sat->pos, $sat_geodetic); |
|
| 530 | - |
|
| 531 | - while ($sat_geodetic->lon < -self::pi) { |
|
| 532 | - $sat_geodetic->lon += self::twopi; |
|
| 533 | - } |
|
| 534 | - |
|
| 535 | - while ($sat_geodetic->lon > (self::pi)) { |
|
| 536 | - $sat_geodetic->lon -= self::twopi; |
|
| 537 | - } |
|
| 538 | - |
|
| 539 | - $sat->az = Predict_Math::Degrees($obs_set->az); |
|
| 540 | - $sat->el = Predict_Math::Degrees($obs_set->el); |
|
| 541 | - $sat->range = $obs_set->range; |
|
| 542 | - $sat->range_rate = $obs_set->range_rate; |
|
| 543 | - $sat->ssplat = Predict_Math::Degrees($sat_geodetic->lat); |
|
| 544 | - $sat->ssplon = Predict_Math::Degrees($sat_geodetic->lon); |
|
| 545 | - $sat->alt = $sat_geodetic->alt; |
|
| 546 | - $sat->ma = Predict_Math::Degrees($sat->phase); |
|
| 547 | - $sat->ma *= 256.0 / 360.0; |
|
| 548 | - $sat->phase = Predict_Math::Degrees($sat->phase); |
|
| 549 | - |
|
| 550 | - /* same formulas, but the one from predict is nicer */ |
|
| 551 | - //sat->footprint = 2.0 * xkmper * acos (xkmper/sat->pos.w); |
|
| 552 | - $sat->footprint = 12756.33 * acos(self::xkmper / (self::xkmper + $sat->alt)); |
|
| 553 | - $age = $sat->jul_utc - $sat->jul_epoch; |
|
| 554 | - $sat->orbit = floor(($sat->tle->xno * self::xmnpda / self::twopi + |
|
| 555 | - $age * $sat->tle->bstar * self::ae) * $age + |
|
| 556 | - $sat->tle->xmo / self::twopi) + $sat->tle->revnum - 1; |
|
| 557 | - } |
|
| 558 | - |
|
| 559 | - /** Find the LOS time of the next pass. |
|
| 560 | - * @author Alexandru Csete, OZ9AEC |
|
| 561 | - * @author John A. Magliacane, KD2BD |
|
| 562 | - * @param Predict_Sat $sat The satellite data. |
|
| 563 | - * @param Predict_QTH $qth The QTH observer location data. |
|
| 564 | - * @param float $start The time where calculation should start. (Julian Date) |
|
| 565 | - * @param int $maxdt The upper time limit in days (0.0 = no limit) |
|
| 566 | - * @return The time (julian date) of the next LOS or 0.0 if the satellite has no LOS. |
|
| 567 | - * |
|
| 568 | - * This function finds the time of LOS for the first coming pass taking place |
|
| 569 | - * no earlier that start. |
|
| 570 | - * If the satellite is currently out of range, the function first calls |
|
| 571 | - * find_aos to get the next AOS time. Then the calculations are done using |
|
| 572 | - * the new start time. |
|
| 573 | - * The function has a built-in watchdog to ensure that we don't end up in |
|
| 574 | - * lengthy loops. |
|
| 575 | - * |
|
| 576 | - */ |
|
| 577 | - public function find_los(Predict_Sat $sat, Predict_QTH $qth, $start, $maxdt) |
|
| 578 | - { |
|
| 579 | - $t = $start; |
|
| 580 | - $lostime = 0.0; |
|
| 581 | - |
|
| 582 | - |
|
| 583 | - $this->predict_calc($sat, $qth, $start); |
|
| 584 | - |
|
| 585 | - /* check whether satellite has aos */ |
|
| 586 | - if (($sat->otype == Predict_SGPSDP::ORBIT_TYPE_GEO) || |
|
| 587 | - ($sat->otype == Predict_SGPSDP::ORBIT_TYPE_DECAYED) || |
|
| 588 | - !$this->has_aos ($sat, $qth)) { |
|
| 589 | - |
|
| 590 | - return 0.0; |
|
| 591 | - } |
|
| 592 | - |
|
| 593 | - if ($sat->el < 0.0) { |
|
| 594 | - $t = $this->find_aos($sat, $qth, $start, $maxdt) + 0.001; // +1.5 min |
|
| 595 | - } |
|
| 596 | - |
|
| 597 | - /* invalid time (potentially returned by find_aos) */ |
|
| 598 | - if ($t < 0.01) { |
|
| 599 | - return 0.0; |
|
| 600 | - } |
|
| 601 | - |
|
| 602 | - /* update satellite data */ |
|
| 603 | - $this->predict_calc($sat, $qth, $t); |
|
| 604 | - |
|
| 605 | - /* use upper time limit */ |
|
| 606 | - if ($maxdt > 0.0) { |
|
| 607 | - |
|
| 608 | - /* coarse steps */ |
|
| 609 | - while (($sat->el >= 1.0) && ($t <= ($start + $maxdt))) { |
|
| 610 | - $t += cos(($sat->el - 1.0) * self::de2ra) * sqrt($sat->alt) / 25000.0; |
|
| 611 | - $this->predict_calc($sat, $qth, $t); |
|
| 612 | - } |
|
| 613 | - |
|
| 614 | - /* fine steps */ |
|
| 615 | - while (($lostime == 0.0) && ($t <= ($start + $maxdt))) { |
|
| 616 | - |
|
| 617 | - $t += $sat->el * sqrt($sat->alt) / 502500.0; |
|
| 618 | - $this->predict_calc($sat, $qth, $t); |
|
| 619 | - |
|
| 620 | - if (abs($sat->el) < 0.005) { |
|
| 621 | - $lostime = $t; |
|
| 622 | - } |
|
| 623 | - } |
|
| 624 | - } else { |
|
| 625 | - /* don't use upper limit */ |
|
| 626 | - |
|
| 627 | - /* coarse steps */ |
|
| 628 | - while ($sat->el >= 1.0) { |
|
| 629 | - $t += cos(($sat->el - 1.0) * self::de2ra) * sqrt($sat->alt) / 25000.0; |
|
| 630 | - $this->predict_calc($sat, $qth, $t); |
|
| 631 | - } |
|
| 632 | - |
|
| 633 | - /* fine steps */ |
|
| 634 | - while ($lostime == 0.0) { |
|
| 635 | - |
|
| 636 | - $t += $sat->el * sqrt($sat->alt) / 502500.0; |
|
| 637 | - $this->predict_calc($sat, $qth, $t); |
|
| 638 | - |
|
| 639 | - if (abs($sat->el) < 0.005) |
|
| 640 | - $lostime = $t; |
|
| 641 | - } |
|
| 642 | - } |
|
| 643 | - |
|
| 644 | - return $lostime; |
|
| 645 | - } |
|
| 646 | - |
|
| 647 | - /** Find AOS time of current pass. |
|
| 648 | - * @param Predict_Sat $sat The satellite to find AOS for. |
|
| 649 | - * @param Predict_QTH $qth The ground station. |
|
| 650 | - * @param float $start Start time, prefereably now. |
|
| 651 | - * @return The time of the previous AOS or 0.0 if the satellite has no AOS. |
|
| 652 | - * |
|
| 653 | - * This function can be used to find the AOS time in the past of the |
|
| 654 | - * current pass. |
|
| 655 | - */ |
|
| 656 | - public function find_prev_aos(Predict_Sat $sat, Predict_QTH $qth, $start) |
|
| 657 | - { |
|
| 658 | - $aostime = $start; |
|
| 659 | - |
|
| 660 | - /* make sure current sat values are |
|
| 428 | + $this->predict_calc($sat, $qth, $start); |
|
| 429 | + |
|
| 430 | + /* check whether satellite has aos */ |
|
| 431 | + if (($sat->otype == Predict_SGPSDP::ORBIT_TYPE_GEO) || |
|
| 432 | + ($sat->otype == Predict_SGPSDP::ORBIT_TYPE_DECAYED) || |
|
| 433 | + !$this->has_aos($sat, $qth)) { |
|
| 434 | + |
|
| 435 | + return 0.0; |
|
| 436 | + } |
|
| 437 | + |
|
| 438 | + if ($sat->el > 0.0) { |
|
| 439 | + $t = $this->find_los($sat, $qth, $start, $maxdt) + 0.014; // +20 min |
|
| 440 | + } |
|
| 441 | + |
|
| 442 | + /* invalid time (potentially returned by find_los) */ |
|
| 443 | + if ($t < 0.1) { |
|
| 444 | + return 0.0; |
|
| 445 | + } |
|
| 446 | + |
|
| 447 | + /* update satellite data */ |
|
| 448 | + $this->predict_calc($sat, $qth, $t); |
|
| 449 | + |
|
| 450 | + /* use upper time limit */ |
|
| 451 | + if ($maxdt > 0.0) { |
|
| 452 | + |
|
| 453 | + /* coarse time steps */ |
|
| 454 | + while (($sat->el < -1.0) && ($t <= ($start + $maxdt))) { |
|
| 455 | + $t -= 0.00035 * ($sat->el * (($sat->alt / 8400.0) + 0.46) - 2.0); |
|
| 456 | + $this->predict_calc($sat, $qth, $t); |
|
| 457 | + } |
|
| 458 | + |
|
| 459 | + /* fine steps */ |
|
| 460 | + while (($aostime == 0.0) && ($t <= ($start + $maxdt))) { |
|
| 461 | + |
|
| 462 | + if (abs($sat->el) < 0.005) { |
|
| 463 | + $aostime = $t; |
|
| 464 | + } else { |
|
| 465 | + $t -= $sat->el * sqrt($sat->alt) / 530000.0; |
|
| 466 | + $this->predict_calc($sat, $qth, $t); |
|
| 467 | + } |
|
| 468 | + } |
|
| 469 | + } else { |
|
| 470 | + /* don't use upper time limit */ |
|
| 471 | + |
|
| 472 | + /* coarse time steps */ |
|
| 473 | + while ($sat->el < -1.0) { |
|
| 474 | + |
|
| 475 | + $t -= 0.00035 * ($sat->el * (($sat->alt / 8400.0) + 0.46) - 2.0); |
|
| 476 | + $this->predict_calc($sat, $qth, $t); |
|
| 477 | + } |
|
| 478 | + |
|
| 479 | + /* fine steps */ |
|
| 480 | + while ($aostime == 0.0) { |
|
| 481 | + |
|
| 482 | + if (abs($sat->el) < 0.005) { |
|
| 483 | + $aostime = $t; |
|
| 484 | + } else { |
|
| 485 | + $t -= $sat->el * sqrt($sat->alt) / 530000.0; |
|
| 486 | + $this->predict_calc($sat, $qth, $t); |
|
| 487 | + } |
|
| 488 | + |
|
| 489 | + } |
|
| 490 | + } |
|
| 491 | + |
|
| 492 | + return $aostime; |
|
| 493 | + } |
|
| 494 | + |
|
| 495 | + /** SGP4SDP4 driver for doing AOS/LOS calculations. |
|
| 496 | + * @param Predict_Sat $sat The satellite data. |
|
| 497 | + * @param Predict_QTH $qth The QTH observer location data. |
|
| 498 | + * @param float $t The time for calculation (Julian Date) |
|
| 499 | + * |
|
| 500 | + */ |
|
| 501 | + public function predict_calc(Predict_Sat $sat, Predict_QTH $qth, $t) |
|
| 502 | + { |
|
| 503 | + $obs_set = new Predict_ObsSet(); |
|
| 504 | + $sat_geodetic = new Predict_Geodetic(); |
|
| 505 | + $obs_geodetic = new Predict_Geodetic(); |
|
| 506 | + |
|
| 507 | + $obs_geodetic->lon = $qth->lon * self::de2ra; |
|
| 508 | + $obs_geodetic->lat = $qth->lat * self::de2ra; |
|
| 509 | + $obs_geodetic->alt = $qth->alt / 1000.0; |
|
| 510 | + $obs_geodetic->theta = 0; |
|
| 511 | + |
|
| 512 | + $sat->jul_utc = $t; |
|
| 513 | + $sat->tsince = ($sat->jul_utc - $sat->jul_epoch) * self::xmnpda; |
|
| 514 | + |
|
| 515 | + /* call the norad routines according to the deep-space flag */ |
|
| 516 | + $sgpsdp = Predict_SGPSDP::getInstance($sat); |
|
| 517 | + if ($sat->flags & Predict_SGPSDP::DEEP_SPACE_EPHEM_FLAG) { |
|
| 518 | + $sgpsdp->SDP4($sat, $sat->tsince); |
|
| 519 | + } else { |
|
| 520 | + $sgpsdp->SGP4($sat, $sat->tsince); |
|
| 521 | + } |
|
| 522 | + |
|
| 523 | + Predict_Math::Convert_Sat_State($sat->pos, $sat->vel); |
|
| 524 | + |
|
| 525 | + /* get the velocity of the satellite */ |
|
| 526 | + $sat->vel->w = sqrt($sat->vel->x * $sat->vel->x + $sat->vel->y * $sat->vel->y + $sat->vel->z * $sat->vel->z); |
|
| 527 | + $sat->velo = $sat->vel->w; |
|
| 528 | + Predict_SGPObs::Calculate_Obs($sat->jul_utc, $sat->pos, $sat->vel, $obs_geodetic, $obs_set); |
|
| 529 | + Predict_SGPObs::Calculate_LatLonAlt($sat->jul_utc, $sat->pos, $sat_geodetic); |
|
| 530 | + |
|
| 531 | + while ($sat_geodetic->lon < -self::pi) { |
|
| 532 | + $sat_geodetic->lon += self::twopi; |
|
| 533 | + } |
|
| 534 | + |
|
| 535 | + while ($sat_geodetic->lon > (self::pi)) { |
|
| 536 | + $sat_geodetic->lon -= self::twopi; |
|
| 537 | + } |
|
| 538 | + |
|
| 539 | + $sat->az = Predict_Math::Degrees($obs_set->az); |
|
| 540 | + $sat->el = Predict_Math::Degrees($obs_set->el); |
|
| 541 | + $sat->range = $obs_set->range; |
|
| 542 | + $sat->range_rate = $obs_set->range_rate; |
|
| 543 | + $sat->ssplat = Predict_Math::Degrees($sat_geodetic->lat); |
|
| 544 | + $sat->ssplon = Predict_Math::Degrees($sat_geodetic->lon); |
|
| 545 | + $sat->alt = $sat_geodetic->alt; |
|
| 546 | + $sat->ma = Predict_Math::Degrees($sat->phase); |
|
| 547 | + $sat->ma *= 256.0 / 360.0; |
|
| 548 | + $sat->phase = Predict_Math::Degrees($sat->phase); |
|
| 549 | + |
|
| 550 | + /* same formulas, but the one from predict is nicer */ |
|
| 551 | + //sat->footprint = 2.0 * xkmper * acos (xkmper/sat->pos.w); |
|
| 552 | + $sat->footprint = 12756.33 * acos(self::xkmper / (self::xkmper + $sat->alt)); |
|
| 553 | + $age = $sat->jul_utc - $sat->jul_epoch; |
|
| 554 | + $sat->orbit = floor(($sat->tle->xno * self::xmnpda / self::twopi + |
|
| 555 | + $age * $sat->tle->bstar * self::ae) * $age + |
|
| 556 | + $sat->tle->xmo / self::twopi) + $sat->tle->revnum - 1; |
|
| 557 | + } |
|
| 558 | + |
|
| 559 | + /** Find the LOS time of the next pass. |
|
| 560 | + * @author Alexandru Csete, OZ9AEC |
|
| 561 | + * @author John A. Magliacane, KD2BD |
|
| 562 | + * @param Predict_Sat $sat The satellite data. |
|
| 563 | + * @param Predict_QTH $qth The QTH observer location data. |
|
| 564 | + * @param float $start The time where calculation should start. (Julian Date) |
|
| 565 | + * @param int $maxdt The upper time limit in days (0.0 = no limit) |
|
| 566 | + * @return The time (julian date) of the next LOS or 0.0 if the satellite has no LOS. |
|
| 567 | + * |
|
| 568 | + * This function finds the time of LOS for the first coming pass taking place |
|
| 569 | + * no earlier that start. |
|
| 570 | + * If the satellite is currently out of range, the function first calls |
|
| 571 | + * find_aos to get the next AOS time. Then the calculations are done using |
|
| 572 | + * the new start time. |
|
| 573 | + * The function has a built-in watchdog to ensure that we don't end up in |
|
| 574 | + * lengthy loops. |
|
| 575 | + * |
|
| 576 | + */ |
|
| 577 | + public function find_los(Predict_Sat $sat, Predict_QTH $qth, $start, $maxdt) |
|
| 578 | + { |
|
| 579 | + $t = $start; |
|
| 580 | + $lostime = 0.0; |
|
| 581 | + |
|
| 582 | + |
|
| 583 | + $this->predict_calc($sat, $qth, $start); |
|
| 584 | + |
|
| 585 | + /* check whether satellite has aos */ |
|
| 586 | + if (($sat->otype == Predict_SGPSDP::ORBIT_TYPE_GEO) || |
|
| 587 | + ($sat->otype == Predict_SGPSDP::ORBIT_TYPE_DECAYED) || |
|
| 588 | + !$this->has_aos ($sat, $qth)) { |
|
| 589 | + |
|
| 590 | + return 0.0; |
|
| 591 | + } |
|
| 592 | + |
|
| 593 | + if ($sat->el < 0.0) { |
|
| 594 | + $t = $this->find_aos($sat, $qth, $start, $maxdt) + 0.001; // +1.5 min |
|
| 595 | + } |
|
| 596 | + |
|
| 597 | + /* invalid time (potentially returned by find_aos) */ |
|
| 598 | + if ($t < 0.01) { |
|
| 599 | + return 0.0; |
|
| 600 | + } |
|
| 601 | + |
|
| 602 | + /* update satellite data */ |
|
| 603 | + $this->predict_calc($sat, $qth, $t); |
|
| 604 | + |
|
| 605 | + /* use upper time limit */ |
|
| 606 | + if ($maxdt > 0.0) { |
|
| 607 | + |
|
| 608 | + /* coarse steps */ |
|
| 609 | + while (($sat->el >= 1.0) && ($t <= ($start + $maxdt))) { |
|
| 610 | + $t += cos(($sat->el - 1.0) * self::de2ra) * sqrt($sat->alt) / 25000.0; |
|
| 611 | + $this->predict_calc($sat, $qth, $t); |
|
| 612 | + } |
|
| 613 | + |
|
| 614 | + /* fine steps */ |
|
| 615 | + while (($lostime == 0.0) && ($t <= ($start + $maxdt))) { |
|
| 616 | + |
|
| 617 | + $t += $sat->el * sqrt($sat->alt) / 502500.0; |
|
| 618 | + $this->predict_calc($sat, $qth, $t); |
|
| 619 | + |
|
| 620 | + if (abs($sat->el) < 0.005) { |
|
| 621 | + $lostime = $t; |
|
| 622 | + } |
|
| 623 | + } |
|
| 624 | + } else { |
|
| 625 | + /* don't use upper limit */ |
|
| 626 | + |
|
| 627 | + /* coarse steps */ |
|
| 628 | + while ($sat->el >= 1.0) { |
|
| 629 | + $t += cos(($sat->el - 1.0) * self::de2ra) * sqrt($sat->alt) / 25000.0; |
|
| 630 | + $this->predict_calc($sat, $qth, $t); |
|
| 631 | + } |
|
| 632 | + |
|
| 633 | + /* fine steps */ |
|
| 634 | + while ($lostime == 0.0) { |
|
| 635 | + |
|
| 636 | + $t += $sat->el * sqrt($sat->alt) / 502500.0; |
|
| 637 | + $this->predict_calc($sat, $qth, $t); |
|
| 638 | + |
|
| 639 | + if (abs($sat->el) < 0.005) |
|
| 640 | + $lostime = $t; |
|
| 641 | + } |
|
| 642 | + } |
|
| 643 | + |
|
| 644 | + return $lostime; |
|
| 645 | + } |
|
| 646 | + |
|
| 647 | + /** Find AOS time of current pass. |
|
| 648 | + * @param Predict_Sat $sat The satellite to find AOS for. |
|
| 649 | + * @param Predict_QTH $qth The ground station. |
|
| 650 | + * @param float $start Start time, prefereably now. |
|
| 651 | + * @return The time of the previous AOS or 0.0 if the satellite has no AOS. |
|
| 652 | + * |
|
| 653 | + * This function can be used to find the AOS time in the past of the |
|
| 654 | + * current pass. |
|
| 655 | + */ |
|
| 656 | + public function find_prev_aos(Predict_Sat $sat, Predict_QTH $qth, $start) |
|
| 657 | + { |
|
| 658 | + $aostime = $start; |
|
| 659 | + |
|
| 660 | + /* make sure current sat values are |
|
| 661 | 661 | in sync with the time |
| 662 | 662 | */ |
| 663 | - $this->predict_calc($sat, $qth, $start); |
|
| 664 | - |
|
| 665 | - /* check whether satellite has aos */ |
|
| 666 | - if (($sat->otype == Predict_SGPSDP::ORBIT_TYPE_GEO) || |
|
| 667 | - ($sat->otype == Predict_SGPSDP::ORBIT_TYPE_DECAYED) || |
|
| 668 | - !$this->has_aos($sat, $qth)) { |
|
| 669 | - |
|
| 670 | - return 0.0; |
|
| 671 | - } |
|
| 672 | - |
|
| 673 | - while ($sat->el >= 0.0) { |
|
| 674 | - $aostime -= 0.0005; // 0.75 min |
|
| 675 | - $this->predict_calc($sat, $qth, $aostime); |
|
| 676 | - } |
|
| 677 | - |
|
| 678 | - return $aostime; |
|
| 679 | - } |
|
| 680 | - |
|
| 681 | - /** Determine whether satellite ever reaches AOS. |
|
| 682 | - * @author John A. Magliacane, KD2BD |
|
| 683 | - * @author Alexandru Csete, OZ9AEC |
|
| 684 | - * @param Predict_Sat $sat The satellite data. |
|
| 685 | - * @param Predict_QTH $qth The observer's location data |
|
| 686 | - * @return bool true if the satellite will reach AOS, false otherwise. |
|
| 687 | - * |
|
| 688 | - */ |
|
| 689 | - public function has_aos(Predict_Sat $sat, Predict_QTH $qth) |
|
| 690 | - { |
|
| 691 | - $retcode = false; |
|
| 692 | - |
|
| 693 | - /* FIXME */ |
|
| 694 | - if ($sat->meanmo == 0.0) { |
|
| 695 | - $retcode = false; |
|
| 696 | - } else { |
|
| 697 | - |
|
| 698 | - /* xincl is already in RAD by select_ephemeris */ |
|
| 699 | - $lin = $sat->tle->xincl; |
|
| 700 | - if ($lin >= self::pio2) { |
|
| 701 | - $lin = self::pi - $lin; |
|
| 702 | - } |
|
| 703 | - |
|
| 704 | - $sma = 331.25 * exp(log(1440.0 / $sat->meanmo) * (2.0 / 3.0)); |
|
| 705 | - $apogee = $sma * (1.0 + $sat->tle->eo) - self::xkmper; |
|
| 706 | - |
|
| 707 | - if ((acos(self::xkmper / ($apogee + self::xkmper)) + ($lin)) > abs($qth->lat * self::de2ra)) { |
|
| 708 | - $retcode = true; |
|
| 709 | - } else { |
|
| 710 | - $retcode = false; |
|
| 711 | - } |
|
| 712 | - } |
|
| 713 | - |
|
| 714 | - return $retcode; |
|
| 715 | - } |
|
| 716 | - |
|
| 717 | - /** Predict passes after a certain time. |
|
| 718 | - * |
|
| 719 | - * |
|
| 720 | - * This function calculates num upcoming passes with AOS no earlier |
|
| 721 | - * than t = start and not later that t = (start+maxdt). The function will |
|
| 722 | - * repeatedly call get_pass until |
|
| 723 | - * the number of predicted passes is equal to num, the time has reached |
|
| 724 | - * limit or the get_pass function returns NULL. |
|
| 725 | - * |
|
| 726 | - * note For no time limit use maxdt = 0.0 |
|
| 727 | - * |
|
| 728 | - * note the data in sat will be corrupt (future) and must be refreshed |
|
| 729 | - * by the caller, if the caller will need it later on (eg. if the caller |
|
| 730 | - * is GtkSatList). |
|
| 731 | - * |
|
| 732 | - * note Prepending to a singly linked list is much faster than appending. |
|
| 733 | - * Therefore, the elements are prepended whereafter the GSList is |
|
| 734 | - * reversed |
|
| 735 | - * |
|
| 736 | - * |
|
| 737 | - * @param Predict_Sat $sat The satellite data |
|
| 738 | - * @param Predict_QTH $qth The observer's location data |
|
| 739 | - * @param float $start The start julian date |
|
| 740 | - * @param int $maxdt The max # of days to look |
|
| 741 | - * @param int $num The max # of passes to get |
|
| 742 | - * @return array of Predict_Pass instances if found, empty array otherwise |
|
| 743 | - */ |
|
| 744 | - public function get_passes(Predict_Sat $sat, Predict_QTH $qth, $start, $maxdt, $num = 0) |
|
| 745 | - { |
|
| 746 | - $passes = array(); |
|
| 747 | - |
|
| 748 | - /* if no number has been specified |
|
| 663 | + $this->predict_calc($sat, $qth, $start); |
|
| 664 | + |
|
| 665 | + /* check whether satellite has aos */ |
|
| 666 | + if (($sat->otype == Predict_SGPSDP::ORBIT_TYPE_GEO) || |
|
| 667 | + ($sat->otype == Predict_SGPSDP::ORBIT_TYPE_DECAYED) || |
|
| 668 | + !$this->has_aos($sat, $qth)) { |
|
| 669 | + |
|
| 670 | + return 0.0; |
|
| 671 | + } |
|
| 672 | + |
|
| 673 | + while ($sat->el >= 0.0) { |
|
| 674 | + $aostime -= 0.0005; // 0.75 min |
|
| 675 | + $this->predict_calc($sat, $qth, $aostime); |
|
| 676 | + } |
|
| 677 | + |
|
| 678 | + return $aostime; |
|
| 679 | + } |
|
| 680 | + |
|
| 681 | + /** Determine whether satellite ever reaches AOS. |
|
| 682 | + * @author John A. Magliacane, KD2BD |
|
| 683 | + * @author Alexandru Csete, OZ9AEC |
|
| 684 | + * @param Predict_Sat $sat The satellite data. |
|
| 685 | + * @param Predict_QTH $qth The observer's location data |
|
| 686 | + * @return bool true if the satellite will reach AOS, false otherwise. |
|
| 687 | + * |
|
| 688 | + */ |
|
| 689 | + public function has_aos(Predict_Sat $sat, Predict_QTH $qth) |
|
| 690 | + { |
|
| 691 | + $retcode = false; |
|
| 692 | + |
|
| 693 | + /* FIXME */ |
|
| 694 | + if ($sat->meanmo == 0.0) { |
|
| 695 | + $retcode = false; |
|
| 696 | + } else { |
|
| 697 | + |
|
| 698 | + /* xincl is already in RAD by select_ephemeris */ |
|
| 699 | + $lin = $sat->tle->xincl; |
|
| 700 | + if ($lin >= self::pio2) { |
|
| 701 | + $lin = self::pi - $lin; |
|
| 702 | + } |
|
| 703 | + |
|
| 704 | + $sma = 331.25 * exp(log(1440.0 / $sat->meanmo) * (2.0 / 3.0)); |
|
| 705 | + $apogee = $sma * (1.0 + $sat->tle->eo) - self::xkmper; |
|
| 706 | + |
|
| 707 | + if ((acos(self::xkmper / ($apogee + self::xkmper)) + ($lin)) > abs($qth->lat * self::de2ra)) { |
|
| 708 | + $retcode = true; |
|
| 709 | + } else { |
|
| 710 | + $retcode = false; |
|
| 711 | + } |
|
| 712 | + } |
|
| 713 | + |
|
| 714 | + return $retcode; |
|
| 715 | + } |
|
| 716 | + |
|
| 717 | + /** Predict passes after a certain time. |
|
| 718 | + * |
|
| 719 | + * |
|
| 720 | + * This function calculates num upcoming passes with AOS no earlier |
|
| 721 | + * than t = start and not later that t = (start+maxdt). The function will |
|
| 722 | + * repeatedly call get_pass until |
|
| 723 | + * the number of predicted passes is equal to num, the time has reached |
|
| 724 | + * limit or the get_pass function returns NULL. |
|
| 725 | + * |
|
| 726 | + * note For no time limit use maxdt = 0.0 |
|
| 727 | + * |
|
| 728 | + * note the data in sat will be corrupt (future) and must be refreshed |
|
| 729 | + * by the caller, if the caller will need it later on (eg. if the caller |
|
| 730 | + * is GtkSatList). |
|
| 731 | + * |
|
| 732 | + * note Prepending to a singly linked list is much faster than appending. |
|
| 733 | + * Therefore, the elements are prepended whereafter the GSList is |
|
| 734 | + * reversed |
|
| 735 | + * |
|
| 736 | + * |
|
| 737 | + * @param Predict_Sat $sat The satellite data |
|
| 738 | + * @param Predict_QTH $qth The observer's location data |
|
| 739 | + * @param float $start The start julian date |
|
| 740 | + * @param int $maxdt The max # of days to look |
|
| 741 | + * @param int $num The max # of passes to get |
|
| 742 | + * @return array of Predict_Pass instances if found, empty array otherwise |
|
| 743 | + */ |
|
| 744 | + public function get_passes(Predict_Sat $sat, Predict_QTH $qth, $start, $maxdt, $num = 0) |
|
| 745 | + { |
|
| 746 | + $passes = array(); |
|
| 747 | + |
|
| 748 | + /* if no number has been specified |
|
| 749 | 749 | set it to something big */ |
| 750 | - if ($num == 0) { |
|
| 751 | - $num = 100; |
|
| 752 | - } |
|
| 750 | + if ($num == 0) { |
|
| 751 | + $num = 100; |
|
| 752 | + } |
|
| 753 | 753 | |
| 754 | - $t = $start; |
|
| 754 | + $t = $start; |
|
| 755 | 755 | |
| 756 | - for ($i = 0; $i < $num; $i++) { |
|
| 757 | - $pass = $this->get_pass($sat, $qth, $t, $maxdt); |
|
| 756 | + for ($i = 0; $i < $num; $i++) { |
|
| 757 | + $pass = $this->get_pass($sat, $qth, $t, $maxdt); |
|
| 758 | 758 | |
| 759 | - if ($pass != null) { |
|
| 760 | - $passes[] = $pass; |
|
| 761 | - $t = $pass->los + 0.014; // +20 min |
|
| 759 | + if ($pass != null) { |
|
| 760 | + $passes[] = $pass; |
|
| 761 | + $t = $pass->los + 0.014; // +20 min |
|
| 762 | 762 | |
| 763 | - /* if maxdt > 0.0 check whether we have reached t = start+maxdt |
|
| 763 | + /* if maxdt > 0.0 check whether we have reached t = start+maxdt |
|
| 764 | 764 | if yes finish predictions |
| 765 | 765 | */ |
| 766 | - if (($maxdt > 0.0) && ($t >= ($start + $maxdt))) { |
|
| 767 | - $i = $num; |
|
| 768 | - } |
|
| 769 | - } else { |
|
| 770 | - /* we can't get any more passes */ |
|
| 771 | - $i = $num; |
|
| 772 | - } |
|
| 773 | - } |
|
| 774 | - |
|
| 775 | - return $passes; |
|
| 776 | - } |
|
| 777 | - |
|
| 778 | - /** |
|
| 779 | - * Filters out visible passes and adds the visible aos, tca, los, and |
|
| 780 | - * corresponding az and ele for each. |
|
| 781 | - * |
|
| 782 | - * @param array $passes The passes returned from get_passes() |
|
| 783 | - * |
|
| 784 | - * @author Bill Shupp |
|
| 785 | - * @return array |
|
| 786 | - */ |
|
| 787 | - public function filterVisiblePasses(array $passes) |
|
| 788 | - { |
|
| 789 | - $filtered = array(); |
|
| 790 | - |
|
| 791 | - foreach ($passes as $result) { |
|
| 792 | - // Dummy check |
|
| 793 | - if ($result->vis[0] != 'V') { |
|
| 794 | - continue; |
|
| 795 | - } |
|
| 796 | - |
|
| 797 | - $aos = false; |
|
| 798 | - $aos_az = false; |
|
| 799 | - $aos = false; |
|
| 800 | - $tca = false; |
|
| 801 | - $los_az = false; |
|
| 802 | - $max_el = 0; |
|
| 803 | - |
|
| 804 | - foreach ($result->details as $detail) { |
|
| 805 | - if ($detail->vis != Predict::SAT_VIS_VISIBLE) { |
|
| 806 | - continue; |
|
| 807 | - } |
|
| 808 | - if ($detail->el < $this->minEle) { |
|
| 809 | - continue; |
|
| 810 | - } |
|
| 811 | - |
|
| 812 | - if ($aos == false) { |
|
| 813 | - $aos = $detail->time; |
|
| 814 | - $aos_az = $detail->az; |
|
| 815 | - $aos_el = $detail->el; |
|
| 816 | - $tca = $detail->time; |
|
| 817 | - $los = $detail->time; |
|
| 818 | - $los_az = $detail->az; |
|
| 819 | - $los_el = $detail->el; |
|
| 820 | - $max_el = $detail->el; |
|
| 821 | - $max_el_az = $detail->el; |
|
| 822 | - continue; |
|
| 823 | - } |
|
| 824 | - $los = $detail->time; |
|
| 825 | - $los_az = $detail->az; |
|
| 826 | - $los_el = $detail->el; |
|
| 827 | - |
|
| 828 | - if ($detail->el > $max_el) { |
|
| 829 | - $tca = $detail->time; |
|
| 830 | - $max_el = $detail->el; |
|
| 831 | - $max_el_az = $detail->az; |
|
| 832 | - } |
|
| 833 | - } |
|
| 834 | - |
|
| 835 | - if ($aos === false) { |
|
| 836 | - // Does not reach minimum elevation, skip |
|
| 837 | - continue; |
|
| 838 | - } |
|
| 839 | - |
|
| 840 | - $result->visible_aos = $aos; |
|
| 841 | - $result->visible_aos_az = $aos_az; |
|
| 842 | - $result->visible_aos_el = $aos_el; |
|
| 843 | - $result->visible_tca = $tca; |
|
| 844 | - $result->visible_max_el = $max_el; |
|
| 845 | - $result->visible_max_el_az = $max_el_az; |
|
| 846 | - $result->visible_los = $los; |
|
| 847 | - $result->visible_los_az = $los_az; |
|
| 848 | - $result->visible_los_el = $los_el; |
|
| 849 | - |
|
| 850 | - $filtered[] = $result; |
|
| 851 | - } |
|
| 852 | - |
|
| 853 | - return $filtered; |
|
| 854 | - } |
|
| 855 | - |
|
| 856 | - /** |
|
| 857 | - * Translates aziumuth degrees to compass direction: |
|
| 858 | - * |
|
| 859 | - * N (0°), NNE (22.5°), NE (45°), ENE (67.5°), E (90°), ESE (112.5°), |
|
| 860 | - * SE (135°), SSE (157.5°), S (180°), SSW (202.5°), SW (225°), |
|
| 861 | - * WSW (247.5°), W (270°), WNW (292.5°), NW (315°), NNW (337.5°) |
|
| 862 | - * |
|
| 863 | - * @param int $az The azimuth in degrees, defaults to 0 |
|
| 864 | - * |
|
| 865 | - * @return string |
|
| 866 | - */ |
|
| 867 | - public function azDegreesToDirection($az = 0) |
|
| 868 | - { |
|
| 869 | - $i = floor($az / 22.5); |
|
| 870 | - $m = (22.5 * (2 * $i + 1)) / 2; |
|
| 871 | - $i = ($az >= $m) ? $i + 1 : $i; |
|
| 872 | - |
|
| 873 | - return trim(substr('N NNENE ENEE ESESE SSES SSWSW WSWW WNWNW NNWN ', $i * 3, 3)); |
|
| 874 | - } |
|
| 766 | + if (($maxdt > 0.0) && ($t >= ($start + $maxdt))) { |
|
| 767 | + $i = $num; |
|
| 768 | + } |
|
| 769 | + } else { |
|
| 770 | + /* we can't get any more passes */ |
|
| 771 | + $i = $num; |
|
| 772 | + } |
|
| 773 | + } |
|
| 774 | + |
|
| 775 | + return $passes; |
|
| 776 | + } |
|
| 777 | + |
|
| 778 | + /** |
|
| 779 | + * Filters out visible passes and adds the visible aos, tca, los, and |
|
| 780 | + * corresponding az and ele for each. |
|
| 781 | + * |
|
| 782 | + * @param array $passes The passes returned from get_passes() |
|
| 783 | + * |
|
| 784 | + * @author Bill Shupp |
|
| 785 | + * @return array |
|
| 786 | + */ |
|
| 787 | + public function filterVisiblePasses(array $passes) |
|
| 788 | + { |
|
| 789 | + $filtered = array(); |
|
| 790 | + |
|
| 791 | + foreach ($passes as $result) { |
|
| 792 | + // Dummy check |
|
| 793 | + if ($result->vis[0] != 'V') { |
|
| 794 | + continue; |
|
| 795 | + } |
|
| 796 | + |
|
| 797 | + $aos = false; |
|
| 798 | + $aos_az = false; |
|
| 799 | + $aos = false; |
|
| 800 | + $tca = false; |
|
| 801 | + $los_az = false; |
|
| 802 | + $max_el = 0; |
|
| 803 | + |
|
| 804 | + foreach ($result->details as $detail) { |
|
| 805 | + if ($detail->vis != Predict::SAT_VIS_VISIBLE) { |
|
| 806 | + continue; |
|
| 807 | + } |
|
| 808 | + if ($detail->el < $this->minEle) { |
|
| 809 | + continue; |
|
| 810 | + } |
|
| 811 | + |
|
| 812 | + if ($aos == false) { |
|
| 813 | + $aos = $detail->time; |
|
| 814 | + $aos_az = $detail->az; |
|
| 815 | + $aos_el = $detail->el; |
|
| 816 | + $tca = $detail->time; |
|
| 817 | + $los = $detail->time; |
|
| 818 | + $los_az = $detail->az; |
|
| 819 | + $los_el = $detail->el; |
|
| 820 | + $max_el = $detail->el; |
|
| 821 | + $max_el_az = $detail->el; |
|
| 822 | + continue; |
|
| 823 | + } |
|
| 824 | + $los = $detail->time; |
|
| 825 | + $los_az = $detail->az; |
|
| 826 | + $los_el = $detail->el; |
|
| 827 | + |
|
| 828 | + if ($detail->el > $max_el) { |
|
| 829 | + $tca = $detail->time; |
|
| 830 | + $max_el = $detail->el; |
|
| 831 | + $max_el_az = $detail->az; |
|
| 832 | + } |
|
| 833 | + } |
|
| 834 | + |
|
| 835 | + if ($aos === false) { |
|
| 836 | + // Does not reach minimum elevation, skip |
|
| 837 | + continue; |
|
| 838 | + } |
|
| 839 | + |
|
| 840 | + $result->visible_aos = $aos; |
|
| 841 | + $result->visible_aos_az = $aos_az; |
|
| 842 | + $result->visible_aos_el = $aos_el; |
|
| 843 | + $result->visible_tca = $tca; |
|
| 844 | + $result->visible_max_el = $max_el; |
|
| 845 | + $result->visible_max_el_az = $max_el_az; |
|
| 846 | + $result->visible_los = $los; |
|
| 847 | + $result->visible_los_az = $los_az; |
|
| 848 | + $result->visible_los_el = $los_el; |
|
| 849 | + |
|
| 850 | + $filtered[] = $result; |
|
| 851 | + } |
|
| 852 | + |
|
| 853 | + return $filtered; |
|
| 854 | + } |
|
| 855 | + |
|
| 856 | + /** |
|
| 857 | + * Translates aziumuth degrees to compass direction: |
|
| 858 | + * |
|
| 859 | + * N (0°), NNE (22.5°), NE (45°), ENE (67.5°), E (90°), ESE (112.5°), |
|
| 860 | + * SE (135°), SSE (157.5°), S (180°), SSW (202.5°), SW (225°), |
|
| 861 | + * WSW (247.5°), W (270°), WNW (292.5°), NW (315°), NNW (337.5°) |
|
| 862 | + * |
|
| 863 | + * @param int $az The azimuth in degrees, defaults to 0 |
|
| 864 | + * |
|
| 865 | + * @return string |
|
| 866 | + */ |
|
| 867 | + public function azDegreesToDirection($az = 0) |
|
| 868 | + { |
|
| 869 | + $i = floor($az / 22.5); |
|
| 870 | + $m = (22.5 * (2 * $i + 1)) / 2; |
|
| 871 | + $i = ($az >= $m) ? $i + 1 : $i; |
|
| 872 | + |
|
| 873 | + return trim(substr('N NNENE ENEE ESESE SSES SSWSW WSWW WNWNW NNWN ', $i * 3, 3)); |
|
| 874 | + } |
|
| 875 | 875 | } |
@@ -6,30 +6,30 @@ |
||
| 6 | 6 | /* Common arguments between deep-space functions */ |
| 7 | 7 | class Predict_DeepArg |
| 8 | 8 | { |
| 9 | - /* Used by dpinit part of Deep() */ |
|
| 10 | - public $eosq; |
|
| 11 | - public $sinio; |
|
| 12 | - public $cosio; |
|
| 13 | - public $betao; |
|
| 14 | - public $aodp; |
|
| 15 | - public $theta2; |
|
| 16 | - public $sing; |
|
| 17 | - public $cosg; |
|
| 18 | - public $betao2; |
|
| 19 | - public $xmdot; |
|
| 20 | - public $omgdot; |
|
| 21 | - public $xnodot; |
|
| 22 | - public $xnodp; |
|
| 9 | + /* Used by dpinit part of Deep() */ |
|
| 10 | + public $eosq; |
|
| 11 | + public $sinio; |
|
| 12 | + public $cosio; |
|
| 13 | + public $betao; |
|
| 14 | + public $aodp; |
|
| 15 | + public $theta2; |
|
| 16 | + public $sing; |
|
| 17 | + public $cosg; |
|
| 18 | + public $betao2; |
|
| 19 | + public $xmdot; |
|
| 20 | + public $omgdot; |
|
| 21 | + public $xnodot; |
|
| 22 | + public $xnodp; |
|
| 23 | 23 | |
| 24 | - /* Used by dpsec and dpper parts of Deep() */ |
|
| 25 | - public $xll; |
|
| 26 | - public $omgadf; |
|
| 27 | - public $xnode; |
|
| 28 | - public $em; |
|
| 29 | - public $xinc; |
|
| 30 | - public $xn; |
|
| 31 | - public $t; |
|
| 24 | + /* Used by dpsec and dpper parts of Deep() */ |
|
| 25 | + public $xll; |
|
| 26 | + public $omgadf; |
|
| 27 | + public $xnode; |
|
| 28 | + public $em; |
|
| 29 | + public $xinc; |
|
| 30 | + public $xn; |
|
| 31 | + public $t; |
|
| 32 | 32 | |
| 33 | - /* Used by thetg and Deep() */ |
|
| 34 | - public $ds50; |
|
| 33 | + /* Used by thetg and Deep() */ |
|
| 34 | + public $ds50; |
|
| 35 | 35 | } |
@@ -3,16 +3,16 @@ |
||
| 3 | 3 | /** Brief satellite pass info. */ |
| 4 | 4 | class Predict_Pass |
| 5 | 5 | { |
| 6 | - public $satname; /*!< satellite name */ |
|
| 7 | - public $aos; /*!< AOS time in "jul_utc" */ |
|
| 8 | - public $tca; /*!< TCA time in "jul_utc" */ |
|
| 9 | - public $los; /*!< LOS time in "jul_utc" */ |
|
| 10 | - public $max_el; /*!< Maximum elevation during pass */ |
|
| 11 | - public $aos_az; /*!< Azimuth at AOS */ |
|
| 12 | - public $los_az; /*!< Azimuth at LOS */ |
|
| 13 | - public $orbit; /*!< Orbit number */ |
|
| 14 | - public $maxel_az; /*!< Azimuth at maximum elevation */ |
|
| 15 | - public $vis; /*!< Visibility string, e.g. VSE, -S-, V-- */ |
|
| 16 | - public $details = array(); /*!< List of pass_detail_t entries */ |
|
| 17 | - public $max_apparent_magnitude = null; /* maximum apparent magnitude, experimental */ |
|
| 6 | + public $satname; /*!< satellite name */ |
|
| 7 | + public $aos; /*!< AOS time in "jul_utc" */ |
|
| 8 | + public $tca; /*!< TCA time in "jul_utc" */ |
|
| 9 | + public $los; /*!< LOS time in "jul_utc" */ |
|
| 10 | + public $max_el; /*!< Maximum elevation during pass */ |
|
| 11 | + public $aos_az; /*!< Azimuth at AOS */ |
|
| 12 | + public $los_az; /*!< Azimuth at LOS */ |
|
| 13 | + public $orbit; /*!< Orbit number */ |
|
| 14 | + public $maxel_az; /*!< Azimuth at maximum elevation */ |
|
| 15 | + public $vis; /*!< Visibility string, e.g. VSE, -S-, V-- */ |
|
| 16 | + public $details = array(); /*!< List of pass_detail_t entries */ |
|
| 17 | + public $max_apparent_magnitude = null; /* maximum apparent magnitude, experimental */ |
|
| 18 | 18 | } |
@@ -19,178 +19,178 @@ |
||
| 19 | 19 | */ |
| 20 | 20 | class Predict_Math |
| 21 | 21 | { |
| 22 | - /* Returns sign of a float */ |
|
| 23 | - public static function Sign($arg) |
|
| 24 | - { |
|
| 25 | - if ($arg > 0 ) { |
|
| 26 | - return 1; |
|
| 27 | - } else if ($arg < 0 ) { |
|
| 28 | - return -1; |
|
| 29 | - } else { |
|
| 30 | - return 0; |
|
| 31 | - } |
|
| 32 | - } |
|
| 33 | - |
|
| 34 | - /* Returns the arcsine of the argument */ |
|
| 35 | - public static function ArcSin($arg) |
|
| 36 | - { |
|
| 37 | - if (abs($arg) >= 1 ) { |
|
| 38 | - return (self::Sign($arg) * Predict::pio2); |
|
| 39 | - } else { |
|
| 40 | - return(atan($arg / sqrt(1 - $arg * $arg))); |
|
| 41 | - } |
|
| 42 | - } |
|
| 43 | - |
|
| 44 | - /* Returns arccosine of rgument */ |
|
| 45 | - public static function ArcCos($arg) |
|
| 46 | - { |
|
| 47 | - return Predict::pio2 - self::ArcSin($arg); |
|
| 48 | - } |
|
| 49 | - |
|
| 50 | - /* Adds vectors v1 and v2 together to produce v3 */ |
|
| 51 | - public static function Vec_Add(Predict_Vector $v1, Predict_Vector $v2, Predict_Vector $v3) |
|
| 52 | - { |
|
| 53 | - $v3->x = $v1->x + $v2->x; |
|
| 54 | - $v3->y = $v1->y + $v2->y; |
|
| 55 | - $v3->z = $v1->z + $v2->z; |
|
| 56 | - |
|
| 57 | - $v3->w = sqrt($v3->x * $v3->x + $v3->y * $v3->y + $v3->z * $v3->z); |
|
| 58 | - } |
|
| 59 | - |
|
| 60 | - /* Subtracts vector v2 from v1 to produce v3 */ |
|
| 61 | - public static function Vec_Sub(Predict_Vector $v1, Predict_Vector $v2, Predict_Vector $v3) |
|
| 62 | - { |
|
| 63 | - $v3->x = $v1->x - $v2->x; |
|
| 64 | - $v3->y = $v1->y - $v2->y; |
|
| 65 | - $v3->z = $v1->z - $v2->z; |
|
| 66 | - |
|
| 67 | - $v3->w = sqrt($v3->x * $v3->x + $v3->y * $v3->y + $v3->z * $v3->z); |
|
| 68 | - } |
|
| 69 | - |
|
| 70 | - /* Multiplies the vector v1 by the scalar k to produce the vector v2 */ |
|
| 71 | - public static function Scalar_Multiply($k, Predict_Vector $v1, Predict_Vector $v2) |
|
| 72 | - { |
|
| 73 | - $v2->x = $k * $v1->x; |
|
| 74 | - $v2->y = $k * $v1->y; |
|
| 75 | - $v2->z = $k * $v1->z; |
|
| 76 | - $v2->w = abs($k) * $v1->w; |
|
| 77 | - } |
|
| 78 | - |
|
| 79 | - /* Multiplies the vector v1 by the scalar k */ |
|
| 80 | - public static function Scale_Vector($k, Predict_Vector $v) |
|
| 81 | - { |
|
| 82 | - $v->x *= $k; |
|
| 83 | - $v->y *= $k; |
|
| 84 | - $v->z *= $k; |
|
| 85 | - |
|
| 86 | - $v->w = sqrt($v->x * $v->x + $v->y * $v->y + $v->z * $v->z); |
|
| 87 | - } |
|
| 88 | - |
|
| 89 | - /* Returns the dot product of two vectors */ |
|
| 90 | - public static function Dot(Predict_Vector $v1, Predict_Vector $v2) |
|
| 91 | - { |
|
| 92 | - return ($v1->x * $v2->x + $v1->y * $v2->y + $v1->z * $v2->z); |
|
| 93 | - } |
|
| 94 | - |
|
| 95 | - /* Calculates the angle between vectors v1 and v2 */ |
|
| 96 | - public static function Angle(Predict_Vector $v1, Predict_Vector $v2) |
|
| 97 | - { |
|
| 98 | - $v1->w = sqrt($v1->x * $v1->x + $v1->y * $v1->y + $v1->z * $v1->z); |
|
| 99 | - $v2->w = sqrt($v2->x * $v2->x + $v2->y * $v2->y + $v2->z * $v2->z); |
|
| 100 | - return (self::ArcCos(self::Dot($v1, $v2) / ($v1->w * $v2->w))); |
|
| 101 | - } |
|
| 102 | - |
|
| 103 | - /* Produces cross product of v1 and v2, and returns in v3 */ |
|
| 104 | - public static function Cross(Predict_Vector $v1, Predict_Vector $v2 ,Predict_Vector $v3) |
|
| 105 | - { |
|
| 106 | - $v3->x = $v1->y * $v2->z - $v1->z * $v2->y; |
|
| 107 | - $v3->y = $v1->z * $v2->x - $v1->x * $v2->z; |
|
| 108 | - $v3->z = $v1->x * $v2->y - $v1->y * $v2->x; |
|
| 109 | - |
|
| 110 | - $v3->w = sqrt($v3->x * $v3->x + $v3->y * $v3->y + $v3->z * $v3->z); |
|
| 111 | - } |
|
| 112 | - |
|
| 113 | - /* Normalizes a vector */ |
|
| 114 | - public static function Normalize(Predict_Vector $v ) |
|
| 115 | - { |
|
| 116 | - $v->x /= $v->w; |
|
| 117 | - $v->y /= $v->w; |
|
| 118 | - $v->z /= $v->w; |
|
| 119 | - } |
|
| 120 | - |
|
| 121 | - /* Four-quadrant arctan function */ |
|
| 122 | - public static function AcTan($sinx, $cosx) |
|
| 123 | - { |
|
| 124 | - if ($cosx == 0) { |
|
| 125 | - if ($sinx > 0) { |
|
| 126 | - return Predict::pio2; |
|
| 127 | - } else { |
|
| 128 | - return Predict::x3pio2; |
|
| 129 | - } |
|
| 130 | - } else { |
|
| 131 | - if ($cosx > 0) { |
|
| 132 | - if ($sinx > 0) { |
|
| 133 | - return atan($sinx / $cosx); |
|
| 134 | - } else { |
|
| 135 | - return Predict::twopi + atan($sinx / $cosx); |
|
| 136 | - } |
|
| 137 | - } else { |
|
| 138 | - return Predict::pi + atan($sinx / $cosx); |
|
| 139 | - } |
|
| 140 | - } |
|
| 141 | - } |
|
| 142 | - |
|
| 143 | - /* Returns mod 2pi of argument */ |
|
| 144 | - public static function FMod2p($x) |
|
| 145 | - { |
|
| 146 | - $ret_val = $x; |
|
| 147 | - $i = (int) ($ret_val / Predict::twopi); |
|
| 148 | - $ret_val -= $i * Predict::twopi; |
|
| 149 | - |
|
| 150 | - if ($ret_val < 0) { |
|
| 151 | - $ret_val += Predict::twopi; |
|
| 152 | - } |
|
| 153 | - |
|
| 154 | - return $ret_val; |
|
| 155 | - } |
|
| 156 | - |
|
| 157 | - /* Returns arg1 mod arg2 */ |
|
| 158 | - public static function Modulus($arg1, $arg2) |
|
| 159 | - { |
|
| 160 | - $ret_val = $arg1; |
|
| 161 | - $i = (int) ($ret_val / $arg2); |
|
| 162 | - $ret_val -= $i * $arg2; |
|
| 163 | - |
|
| 164 | - if ($ret_val < 0) { |
|
| 165 | - $ret_val += $arg2; |
|
| 166 | - } |
|
| 167 | - |
|
| 168 | - return $ret_val; |
|
| 169 | - } |
|
| 170 | - |
|
| 171 | - /* Returns fractional part of double argument */ |
|
| 172 | - public static function Frac($arg) |
|
| 173 | - { |
|
| 174 | - return $arg - floor($arg); |
|
| 175 | - } |
|
| 176 | - |
|
| 177 | - /* Converts the satellite's position and velocity */ |
|
| 178 | - /* vectors from normalised values to km and km/sec */ |
|
| 179 | - public static function Convert_Sat_State(Predict_Vector $pos, Predict_Vector $vel) |
|
| 180 | - { |
|
| 181 | - self::Scale_Vector(Predict::xkmper, $pos); |
|
| 182 | - self::Scale_Vector(Predict::xkmper * Predict::xmnpda / Predict::secday, $vel); |
|
| 183 | - } |
|
| 184 | - |
|
| 185 | - /* Returns angle in radians from arg in degrees */ |
|
| 186 | - public static function Radians($arg) |
|
| 187 | - { |
|
| 188 | - return $arg * Predict::de2ra; |
|
| 189 | - } |
|
| 190 | - |
|
| 191 | - /* Returns angle in degrees from arg in rads */ |
|
| 192 | - public static function Degrees($arg) |
|
| 193 | - { |
|
| 194 | - return $arg / Predict::de2ra; |
|
| 195 | - } |
|
| 22 | + /* Returns sign of a float */ |
|
| 23 | + public static function Sign($arg) |
|
| 24 | + { |
|
| 25 | + if ($arg > 0 ) { |
|
| 26 | + return 1; |
|
| 27 | + } else if ($arg < 0 ) { |
|
| 28 | + return -1; |
|
| 29 | + } else { |
|
| 30 | + return 0; |
|
| 31 | + } |
|
| 32 | + } |
|
| 33 | + |
|
| 34 | + /* Returns the arcsine of the argument */ |
|
| 35 | + public static function ArcSin($arg) |
|
| 36 | + { |
|
| 37 | + if (abs($arg) >= 1 ) { |
|
| 38 | + return (self::Sign($arg) * Predict::pio2); |
|
| 39 | + } else { |
|
| 40 | + return(atan($arg / sqrt(1 - $arg * $arg))); |
|
| 41 | + } |
|
| 42 | + } |
|
| 43 | + |
|
| 44 | + /* Returns arccosine of rgument */ |
|
| 45 | + public static function ArcCos($arg) |
|
| 46 | + { |
|
| 47 | + return Predict::pio2 - self::ArcSin($arg); |
|
| 48 | + } |
|
| 49 | + |
|
| 50 | + /* Adds vectors v1 and v2 together to produce v3 */ |
|
| 51 | + public static function Vec_Add(Predict_Vector $v1, Predict_Vector $v2, Predict_Vector $v3) |
|
| 52 | + { |
|
| 53 | + $v3->x = $v1->x + $v2->x; |
|
| 54 | + $v3->y = $v1->y + $v2->y; |
|
| 55 | + $v3->z = $v1->z + $v2->z; |
|
| 56 | + |
|
| 57 | + $v3->w = sqrt($v3->x * $v3->x + $v3->y * $v3->y + $v3->z * $v3->z); |
|
| 58 | + } |
|
| 59 | + |
|
| 60 | + /* Subtracts vector v2 from v1 to produce v3 */ |
|
| 61 | + public static function Vec_Sub(Predict_Vector $v1, Predict_Vector $v2, Predict_Vector $v3) |
|
| 62 | + { |
|
| 63 | + $v3->x = $v1->x - $v2->x; |
|
| 64 | + $v3->y = $v1->y - $v2->y; |
|
| 65 | + $v3->z = $v1->z - $v2->z; |
|
| 66 | + |
|
| 67 | + $v3->w = sqrt($v3->x * $v3->x + $v3->y * $v3->y + $v3->z * $v3->z); |
|
| 68 | + } |
|
| 69 | + |
|
| 70 | + /* Multiplies the vector v1 by the scalar k to produce the vector v2 */ |
|
| 71 | + public static function Scalar_Multiply($k, Predict_Vector $v1, Predict_Vector $v2) |
|
| 72 | + { |
|
| 73 | + $v2->x = $k * $v1->x; |
|
| 74 | + $v2->y = $k * $v1->y; |
|
| 75 | + $v2->z = $k * $v1->z; |
|
| 76 | + $v2->w = abs($k) * $v1->w; |
|
| 77 | + } |
|
| 78 | + |
|
| 79 | + /* Multiplies the vector v1 by the scalar k */ |
|
| 80 | + public static function Scale_Vector($k, Predict_Vector $v) |
|
| 81 | + { |
|
| 82 | + $v->x *= $k; |
|
| 83 | + $v->y *= $k; |
|
| 84 | + $v->z *= $k; |
|
| 85 | + |
|
| 86 | + $v->w = sqrt($v->x * $v->x + $v->y * $v->y + $v->z * $v->z); |
|
| 87 | + } |
|
| 88 | + |
|
| 89 | + /* Returns the dot product of two vectors */ |
|
| 90 | + public static function Dot(Predict_Vector $v1, Predict_Vector $v2) |
|
| 91 | + { |
|
| 92 | + return ($v1->x * $v2->x + $v1->y * $v2->y + $v1->z * $v2->z); |
|
| 93 | + } |
|
| 94 | + |
|
| 95 | + /* Calculates the angle between vectors v1 and v2 */ |
|
| 96 | + public static function Angle(Predict_Vector $v1, Predict_Vector $v2) |
|
| 97 | + { |
|
| 98 | + $v1->w = sqrt($v1->x * $v1->x + $v1->y * $v1->y + $v1->z * $v1->z); |
|
| 99 | + $v2->w = sqrt($v2->x * $v2->x + $v2->y * $v2->y + $v2->z * $v2->z); |
|
| 100 | + return (self::ArcCos(self::Dot($v1, $v2) / ($v1->w * $v2->w))); |
|
| 101 | + } |
|
| 102 | + |
|
| 103 | + /* Produces cross product of v1 and v2, and returns in v3 */ |
|
| 104 | + public static function Cross(Predict_Vector $v1, Predict_Vector $v2 ,Predict_Vector $v3) |
|
| 105 | + { |
|
| 106 | + $v3->x = $v1->y * $v2->z - $v1->z * $v2->y; |
|
| 107 | + $v3->y = $v1->z * $v2->x - $v1->x * $v2->z; |
|
| 108 | + $v3->z = $v1->x * $v2->y - $v1->y * $v2->x; |
|
| 109 | + |
|
| 110 | + $v3->w = sqrt($v3->x * $v3->x + $v3->y * $v3->y + $v3->z * $v3->z); |
|
| 111 | + } |
|
| 112 | + |
|
| 113 | + /* Normalizes a vector */ |
|
| 114 | + public static function Normalize(Predict_Vector $v ) |
|
| 115 | + { |
|
| 116 | + $v->x /= $v->w; |
|
| 117 | + $v->y /= $v->w; |
|
| 118 | + $v->z /= $v->w; |
|
| 119 | + } |
|
| 120 | + |
|
| 121 | + /* Four-quadrant arctan function */ |
|
| 122 | + public static function AcTan($sinx, $cosx) |
|
| 123 | + { |
|
| 124 | + if ($cosx == 0) { |
|
| 125 | + if ($sinx > 0) { |
|
| 126 | + return Predict::pio2; |
|
| 127 | + } else { |
|
| 128 | + return Predict::x3pio2; |
|
| 129 | + } |
|
| 130 | + } else { |
|
| 131 | + if ($cosx > 0) { |
|
| 132 | + if ($sinx > 0) { |
|
| 133 | + return atan($sinx / $cosx); |
|
| 134 | + } else { |
|
| 135 | + return Predict::twopi + atan($sinx / $cosx); |
|
| 136 | + } |
|
| 137 | + } else { |
|
| 138 | + return Predict::pi + atan($sinx / $cosx); |
|
| 139 | + } |
|
| 140 | + } |
|
| 141 | + } |
|
| 142 | + |
|
| 143 | + /* Returns mod 2pi of argument */ |
|
| 144 | + public static function FMod2p($x) |
|
| 145 | + { |
|
| 146 | + $ret_val = $x; |
|
| 147 | + $i = (int) ($ret_val / Predict::twopi); |
|
| 148 | + $ret_val -= $i * Predict::twopi; |
|
| 149 | + |
|
| 150 | + if ($ret_val < 0) { |
|
| 151 | + $ret_val += Predict::twopi; |
|
| 152 | + } |
|
| 153 | + |
|
| 154 | + return $ret_val; |
|
| 155 | + } |
|
| 156 | + |
|
| 157 | + /* Returns arg1 mod arg2 */ |
|
| 158 | + public static function Modulus($arg1, $arg2) |
|
| 159 | + { |
|
| 160 | + $ret_val = $arg1; |
|
| 161 | + $i = (int) ($ret_val / $arg2); |
|
| 162 | + $ret_val -= $i * $arg2; |
|
| 163 | + |
|
| 164 | + if ($ret_val < 0) { |
|
| 165 | + $ret_val += $arg2; |
|
| 166 | + } |
|
| 167 | + |
|
| 168 | + return $ret_val; |
|
| 169 | + } |
|
| 170 | + |
|
| 171 | + /* Returns fractional part of double argument */ |
|
| 172 | + public static function Frac($arg) |
|
| 173 | + { |
|
| 174 | + return $arg - floor($arg); |
|
| 175 | + } |
|
| 176 | + |
|
| 177 | + /* Converts the satellite's position and velocity */ |
|
| 178 | + /* vectors from normalised values to km and km/sec */ |
|
| 179 | + public static function Convert_Sat_State(Predict_Vector $pos, Predict_Vector $vel) |
|
| 180 | + { |
|
| 181 | + self::Scale_Vector(Predict::xkmper, $pos); |
|
| 182 | + self::Scale_Vector(Predict::xkmper * Predict::xmnpda / Predict::secday, $vel); |
|
| 183 | + } |
|
| 184 | + |
|
| 185 | + /* Returns angle in radians from arg in degrees */ |
|
| 186 | + public static function Radians($arg) |
|
| 187 | + { |
|
| 188 | + return $arg * Predict::de2ra; |
|
| 189 | + } |
|
| 190 | + |
|
| 191 | + /* Returns angle in degrees from arg in rads */ |
|
| 192 | + public static function Degrees($arg) |
|
| 193 | + { |
|
| 194 | + return $arg / Predict::de2ra; |
|
| 195 | + } |
|
| 196 | 196 | } |
@@ -24,91 +24,91 @@ |
||
| 24 | 24 | */ |
| 25 | 25 | class Predict_Solar |
| 26 | 26 | { |
| 27 | - /* Calculates solar position vector */ |
|
| 28 | - public static function Calculate_Solar_Position($time, Predict_Vector $solar_vector) |
|
| 29 | - { |
|
| 30 | - $mjd = $time - 2415020.0; |
|
| 31 | - $year = 1900 + $mjd / 365.25; |
|
| 32 | - $T = ($mjd + Predict_Time::Delta_ET($year) / Predict::secday) / 36525.0; |
|
| 33 | - $M = Predict_Math::Radians(Predict_Math::Modulus(358.47583 + Predict_Math::Modulus(35999.04975 * $T, 360.0) |
|
| 34 | - - (0.000150 + 0.0000033 * $T) * ($T * $T), 360.0)); |
|
| 35 | - $L = Predict_Math::Radians(Predict_Math::Modulus(279.69668 + Predict_Math::Modulus(36000.76892 * $T, 360.0) |
|
| 36 | - + 0.0003025 * ($T * $T), 360.0)); |
|
| 37 | - $e = 0.01675104 - (0.0000418 + 0.000000126 * $T) * $T; |
|
| 38 | - $C = Predict_Math::Radians((1.919460 - (0.004789 + 0.000014 * $T) * $T) * sin($M) |
|
| 39 | - + (0.020094 - 0.000100 * $T) * sin(2 * $M) + 0.000293 * sin(3 * $M)); |
|
| 40 | - $O = Predict_Math::Radians(Predict_Math::Modulus(259.18 - 1934.142 * $T, 360.0)); |
|
| 41 | - $Lsa = Predict_Math::Modulus($L + $C - Predict_Math::Radians(0.00569 - 0.00479 * sin($O)), Predict::twopi); |
|
| 42 | - $nu = Predict_Math::Modulus($M + $C, Predict::twopi); |
|
| 43 | - $R = 1.0000002 * (1 - ($e * $e)) / (1 + $e * cos($nu)); |
|
| 44 | - $eps = Predict_Math::Radians(23.452294 - (0.0130125 + (0.00000164 - 0.000000503 * $T) * $T) * $T + 0.00256 * cos($O)); |
|
| 45 | - $R = Predict::AU * $R; |
|
| 27 | + /* Calculates solar position vector */ |
|
| 28 | + public static function Calculate_Solar_Position($time, Predict_Vector $solar_vector) |
|
| 29 | + { |
|
| 30 | + $mjd = $time - 2415020.0; |
|
| 31 | + $year = 1900 + $mjd / 365.25; |
|
| 32 | + $T = ($mjd + Predict_Time::Delta_ET($year) / Predict::secday) / 36525.0; |
|
| 33 | + $M = Predict_Math::Radians(Predict_Math::Modulus(358.47583 + Predict_Math::Modulus(35999.04975 * $T, 360.0) |
|
| 34 | + - (0.000150 + 0.0000033 * $T) * ($T * $T), 360.0)); |
|
| 35 | + $L = Predict_Math::Radians(Predict_Math::Modulus(279.69668 + Predict_Math::Modulus(36000.76892 * $T, 360.0) |
|
| 36 | + + 0.0003025 * ($T * $T), 360.0)); |
|
| 37 | + $e = 0.01675104 - (0.0000418 + 0.000000126 * $T) * $T; |
|
| 38 | + $C = Predict_Math::Radians((1.919460 - (0.004789 + 0.000014 * $T) * $T) * sin($M) |
|
| 39 | + + (0.020094 - 0.000100 * $T) * sin(2 * $M) + 0.000293 * sin(3 * $M)); |
|
| 40 | + $O = Predict_Math::Radians(Predict_Math::Modulus(259.18 - 1934.142 * $T, 360.0)); |
|
| 41 | + $Lsa = Predict_Math::Modulus($L + $C - Predict_Math::Radians(0.00569 - 0.00479 * sin($O)), Predict::twopi); |
|
| 42 | + $nu = Predict_Math::Modulus($M + $C, Predict::twopi); |
|
| 43 | + $R = 1.0000002 * (1 - ($e * $e)) / (1 + $e * cos($nu)); |
|
| 44 | + $eps = Predict_Math::Radians(23.452294 - (0.0130125 + (0.00000164 - 0.000000503 * $T) * $T) * $T + 0.00256 * cos($O)); |
|
| 45 | + $R = Predict::AU * $R; |
|
| 46 | 46 | |
| 47 | - $solar_vector->x = $R * cos($Lsa); |
|
| 48 | - $solar_vector->y = $R * sin($Lsa) * cos($eps); |
|
| 49 | - $solar_vector->z = $R * sin($Lsa) * sin($eps); |
|
| 50 | - $solar_vector->w = $R; |
|
| 51 | - } |
|
| 47 | + $solar_vector->x = $R * cos($Lsa); |
|
| 48 | + $solar_vector->y = $R * sin($Lsa) * cos($eps); |
|
| 49 | + $solar_vector->z = $R * sin($Lsa) * sin($eps); |
|
| 50 | + $solar_vector->w = $R; |
|
| 51 | + } |
|
| 52 | 52 | |
| 53 | - /* Calculates stellite's eclipse status and depth */ |
|
| 54 | - public static function Sat_Eclipsed(Predict_Vector $pos, Predict_Vector $sol, &$depth) |
|
| 55 | - { |
|
| 56 | - $Rho = new Predict_Vector(); |
|
| 57 | - $earth = new Predict_Vector(); |
|
| 53 | + /* Calculates stellite's eclipse status and depth */ |
|
| 54 | + public static function Sat_Eclipsed(Predict_Vector $pos, Predict_Vector $sol, &$depth) |
|
| 55 | + { |
|
| 56 | + $Rho = new Predict_Vector(); |
|
| 57 | + $earth = new Predict_Vector(); |
|
| 58 | 58 | |
| 59 | - /* Determine partial eclipse */ |
|
| 60 | - $sd_earth = Predict_Math::ArcSin(Predict::xkmper / $pos->w); |
|
| 61 | - Predict_Math::Vec_Sub($sol, $pos, $Rho); |
|
| 62 | - $sd_sun = Predict_Math::ArcSin(Predict::__sr__ / $Rho->w); |
|
| 63 | - Predict_Math::Scalar_Multiply(-1, $pos, $earth); |
|
| 64 | - $delta = Predict_Math::Angle($sol, $earth); |
|
| 65 | - $depth = $sd_earth - $sd_sun - $delta; |
|
| 59 | + /* Determine partial eclipse */ |
|
| 60 | + $sd_earth = Predict_Math::ArcSin(Predict::xkmper / $pos->w); |
|
| 61 | + Predict_Math::Vec_Sub($sol, $pos, $Rho); |
|
| 62 | + $sd_sun = Predict_Math::ArcSin(Predict::__sr__ / $Rho->w); |
|
| 63 | + Predict_Math::Scalar_Multiply(-1, $pos, $earth); |
|
| 64 | + $delta = Predict_Math::Angle($sol, $earth); |
|
| 65 | + $depth = $sd_earth - $sd_sun - $delta; |
|
| 66 | 66 | |
| 67 | - if ($sd_earth < $sd_sun) { |
|
| 68 | - return 0; |
|
| 69 | - } else if ($depth >= 0) { |
|
| 70 | - return 1; |
|
| 71 | - } else { |
|
| 72 | - return 0; |
|
| 73 | - } |
|
| 74 | - } |
|
| 67 | + if ($sd_earth < $sd_sun) { |
|
| 68 | + return 0; |
|
| 69 | + } else if ($depth >= 0) { |
|
| 70 | + return 1; |
|
| 71 | + } else { |
|
| 72 | + return 0; |
|
| 73 | + } |
|
| 74 | + } |
|
| 75 | 75 | |
| 76 | - /** |
|
| 77 | - * Finds the current location of the sun based on the observer location |
|
| 78 | - * |
|
| 79 | - * @param Predict_QTH $qth The observer location |
|
| 80 | - * @param int $daynum The daynum or null to use the current daynum |
|
| 81 | - * |
|
| 82 | - * @return Predict_ObsSet |
|
| 83 | - */ |
|
| 84 | - public static function FindSun(Predict_QTH $qth, $daynum = null) |
|
| 85 | - { |
|
| 86 | - if ($daynum === null) { |
|
| 87 | - $daynum = Predict_Time::get_current_daynum(); |
|
| 88 | - } |
|
| 76 | + /** |
|
| 77 | + * Finds the current location of the sun based on the observer location |
|
| 78 | + * |
|
| 79 | + * @param Predict_QTH $qth The observer location |
|
| 80 | + * @param int $daynum The daynum or null to use the current daynum |
|
| 81 | + * |
|
| 82 | + * @return Predict_ObsSet |
|
| 83 | + */ |
|
| 84 | + public static function FindSun(Predict_QTH $qth, $daynum = null) |
|
| 85 | + { |
|
| 86 | + if ($daynum === null) { |
|
| 87 | + $daynum = Predict_Time::get_current_daynum(); |
|
| 88 | + } |
|
| 89 | 89 | |
| 90 | - $obs_geodetic = new Predict_Geodetic(); |
|
| 91 | - $obs_geodetic->lon = $qth->lon * Predict::de2ra; |
|
| 92 | - $obs_geodetic->lat = $qth->lat * Predict::de2ra; |
|
| 93 | - $obs_geodetic->alt = $qth->alt / 1000.0; |
|
| 94 | - $obs_geodetic->theta = 0; |
|
| 90 | + $obs_geodetic = new Predict_Geodetic(); |
|
| 91 | + $obs_geodetic->lon = $qth->lon * Predict::de2ra; |
|
| 92 | + $obs_geodetic->lat = $qth->lat * Predict::de2ra; |
|
| 93 | + $obs_geodetic->alt = $qth->alt / 1000.0; |
|
| 94 | + $obs_geodetic->theta = 0; |
|
| 95 | 95 | |
| 96 | - $solar_vector = new Predict_Vector(); |
|
| 97 | - $zero_vector = new Predict_Vector(); |
|
| 98 | - $solar_set = new Predict_ObsSet(); |
|
| 96 | + $solar_vector = new Predict_Vector(); |
|
| 97 | + $zero_vector = new Predict_Vector(); |
|
| 98 | + $solar_set = new Predict_ObsSet(); |
|
| 99 | 99 | |
| 100 | - self::Calculate_Solar_Position($daynum, $solar_vector); |
|
| 101 | - Predict_SGPObs::Calculate_Obs( |
|
| 102 | - $daynum, |
|
| 103 | - $solar_vector, |
|
| 104 | - $zero_vector, |
|
| 105 | - $obs_geodetic, |
|
| 106 | - $solar_set |
|
| 107 | - ); |
|
| 100 | + self::Calculate_Solar_Position($daynum, $solar_vector); |
|
| 101 | + Predict_SGPObs::Calculate_Obs( |
|
| 102 | + $daynum, |
|
| 103 | + $solar_vector, |
|
| 104 | + $zero_vector, |
|
| 105 | + $obs_geodetic, |
|
| 106 | + $solar_set |
|
| 107 | + ); |
|
| 108 | 108 | |
| 109 | - $solar_set->az = Predict_Math::Degrees($solar_set->az); |
|
| 110 | - $solar_set->el = Predict_Math::Degrees($solar_set->el); |
|
| 109 | + $solar_set->az = Predict_Math::Degrees($solar_set->az); |
|
| 110 | + $solar_set->el = Predict_Math::Degrees($solar_set->el); |
|
| 111 | 111 | |
| 112 | - return $solar_set; |
|
| 113 | - } |
|
| 112 | + return $solar_set; |
|
| 113 | + } |
|
| 114 | 114 | } |
@@ -6,78 +6,78 @@ |
||
| 6 | 6 | /* static data for DEEP */ |
| 7 | 7 | class Predict_DeepStatic |
| 8 | 8 | { |
| 9 | - public $thgr; |
|
| 10 | - public $xnq; |
|
| 11 | - public $xqncl; |
|
| 12 | - public $omegaq; |
|
| 13 | - public $zmol; |
|
| 14 | - public $zmos; |
|
| 15 | - public $savtsn; |
|
| 16 | - public $ee2; |
|
| 17 | - public $e3; |
|
| 18 | - public $xi2; |
|
| 19 | - public $xl2; |
|
| 20 | - public $xl3; |
|
| 21 | - public $xl4; |
|
| 22 | - public $xgh2; |
|
| 23 | - public $xgh3; |
|
| 24 | - public $xgh4; |
|
| 25 | - public $xh2; |
|
| 26 | - public $xh3; |
|
| 27 | - public $sse; |
|
| 28 | - public $ssi; |
|
| 29 | - public $ssg; |
|
| 30 | - public $xi3; |
|
| 31 | - public $se2; |
|
| 32 | - public $si2; |
|
| 33 | - public $sl2; |
|
| 34 | - public $sgh2; |
|
| 35 | - public $sh2; |
|
| 36 | - public $se3; |
|
| 37 | - public $si3; |
|
| 38 | - public $sl3; |
|
| 39 | - public $sgh3; |
|
| 40 | - public $sh3; |
|
| 41 | - public $sl4; |
|
| 42 | - public $sgh4; |
|
| 43 | - public $ssl; |
|
| 44 | - public $ssh; |
|
| 45 | - public $d3210; |
|
| 46 | - public $d3222; |
|
| 47 | - public $d4410; |
|
| 48 | - public $d4422; |
|
| 49 | - public $d5220; |
|
| 50 | - public $d5232; |
|
| 51 | - public $d5421; |
|
| 52 | - public $d5433; |
|
| 53 | - public $del1; |
|
| 54 | - public $del2; |
|
| 55 | - public $del3; |
|
| 56 | - public $fasx2; |
|
| 57 | - public $fasx4; |
|
| 58 | - public $fasx6; |
|
| 59 | - public $xlamo; |
|
| 60 | - public $xfact; |
|
| 61 | - public $xni; |
|
| 62 | - public $atime; |
|
| 63 | - public $stepp; |
|
| 64 | - public $stepn; |
|
| 65 | - public $step2; |
|
| 66 | - public $preep; |
|
| 67 | - public $pl; |
|
| 68 | - public $sghs; |
|
| 69 | - public $xli; |
|
| 70 | - public $d2201; |
|
| 71 | - public $d2211; |
|
| 72 | - public $sghl; |
|
| 73 | - public $sh1; |
|
| 74 | - public $pinc; |
|
| 75 | - public $pe; |
|
| 76 | - public $shs; |
|
| 77 | - public $zsingl; |
|
| 78 | - public $zcosgl; |
|
| 79 | - public $zsinhl; |
|
| 80 | - public $zcoshl; |
|
| 81 | - public $zsinil; |
|
| 82 | - public $zcosil; |
|
| 9 | + public $thgr; |
|
| 10 | + public $xnq; |
|
| 11 | + public $xqncl; |
|
| 12 | + public $omegaq; |
|
| 13 | + public $zmol; |
|
| 14 | + public $zmos; |
|
| 15 | + public $savtsn; |
|
| 16 | + public $ee2; |
|
| 17 | + public $e3; |
|
| 18 | + public $xi2; |
|
| 19 | + public $xl2; |
|
| 20 | + public $xl3; |
|
| 21 | + public $xl4; |
|
| 22 | + public $xgh2; |
|
| 23 | + public $xgh3; |
|
| 24 | + public $xgh4; |
|
| 25 | + public $xh2; |
|
| 26 | + public $xh3; |
|
| 27 | + public $sse; |
|
| 28 | + public $ssi; |
|
| 29 | + public $ssg; |
|
| 30 | + public $xi3; |
|
| 31 | + public $se2; |
|
| 32 | + public $si2; |
|
| 33 | + public $sl2; |
|
| 34 | + public $sgh2; |
|
| 35 | + public $sh2; |
|
| 36 | + public $se3; |
|
| 37 | + public $si3; |
|
| 38 | + public $sl3; |
|
| 39 | + public $sgh3; |
|
| 40 | + public $sh3; |
|
| 41 | + public $sl4; |
|
| 42 | + public $sgh4; |
|
| 43 | + public $ssl; |
|
| 44 | + public $ssh; |
|
| 45 | + public $d3210; |
|
| 46 | + public $d3222; |
|
| 47 | + public $d4410; |
|
| 48 | + public $d4422; |
|
| 49 | + public $d5220; |
|
| 50 | + public $d5232; |
|
| 51 | + public $d5421; |
|
| 52 | + public $d5433; |
|
| 53 | + public $del1; |
|
| 54 | + public $del2; |
|
| 55 | + public $del3; |
|
| 56 | + public $fasx2; |
|
| 57 | + public $fasx4; |
|
| 58 | + public $fasx6; |
|
| 59 | + public $xlamo; |
|
| 60 | + public $xfact; |
|
| 61 | + public $xni; |
|
| 62 | + public $atime; |
|
| 63 | + public $stepp; |
|
| 64 | + public $stepn; |
|
| 65 | + public $step2; |
|
| 66 | + public $preep; |
|
| 67 | + public $pl; |
|
| 68 | + public $sghs; |
|
| 69 | + public $xli; |
|
| 70 | + public $d2201; |
|
| 71 | + public $d2211; |
|
| 72 | + public $sghl; |
|
| 73 | + public $sh1; |
|
| 74 | + public $pinc; |
|
| 75 | + public $pe; |
|
| 76 | + public $shs; |
|
| 77 | + public $zsingl; |
|
| 78 | + public $zcosgl; |
|
| 79 | + public $zsinhl; |
|
| 80 | + public $zcoshl; |
|
| 81 | + public $zsinil; |
|
| 82 | + public $zcosil; |
|
| 83 | 83 | } |