Here are some examples calculating daily average insolation at different locations and times.
These all call orbital.py to do the calculation. That code is very general and can compute accurate insolation anywhere over the last 5 million years.
import ClimateUtils as clim
import orbital
Calculate an array of insolation over the year and all latitudes (for present-day orbital parameters).
lat = np.linspace( -90., 90., 500. )
days = np.linspace(0, clim.days_per_year, 365. )
Q = orbital.daily_insolation( lat, days )
And make a contour plot of Q as function of latitude and time of year.
ax = plt.figure( figsize=(10,8) ).add_subplot(111)
CS = ax.contour( days, lat, Q , levels = arange(0., 600., 50.) )
ax.clabel(CS, CS.levels, inline=True, fmt='%r', fontsize=10)
ax.set_xlabel('Days since January 1', fontsize=16 )
ax.set_ylabel('Latitude', fontsize=16 )
ax.set_title('Daily average insolation', fontsize=24 )
ax.contourf ( days, lat, Q, levels=[0., 0.] )
show()
Take the area-weighted global, annual average of Q...
print sum( mean( Q, axis=1 ) * cos( deg2rad(lat) ) ) / sum( cos( deg2rad( lat ) ) )
Also plot the zonally averaged insolation at a few different times of the year:
summer_solstice = 170
winter_solstice = 353
ax = figure( figsize=(10,8) ).add_subplot(111)
ax.plot( lat, Q[:,(summer_solstice, winter_solstice)] );
ax.plot( lat, mean(Q, axis=1), linewidth=2 )
ax.set_xbound(-90, 90)
ax.set_xticks( range(-90,100,30) )
ax.set_xlabel('Latitude', fontsize=16 );
ax.set_ylabel('Insolation (W m$^{-2}$)', fontsize=16 );
ax.grid()
show()
The orbital.py code allows us to look up the orbital parameters for Earth over the last 5 million years.
Make reference plots of the variation in the three orbital parameter over the last 1 million years
kyears = np.linspace( 0., 1000., 1001 )
orb = orbital.lookup_parameters( kyears )
The Python object orb now holds 1 million years worth of orbital data, total of 1001 data points for each element: eccentricity ecc, obliquity angle obliquity, and solar longitude of perihelion long_peri.
print orb
print shape( orb['ecc'] ), shape( orb['long_peri'] ), shape( orb['obliquity'] )
fig = figure( figsize = (10,10) )
ax1 = fig.add_subplot(3,1,1)
ax1.plot( kyears, orb['ecc'] )
ax1.set_title('Eccentricity $e$', fontsize=18 )
ax2 = fig.add_subplot(3,1,2)
ax2.plot( kyears, orb['ecc'] * np.sin( np.deg2rad( orb['long_peri'] ) ) )
ax2.set_title('Precessional parameter $e \sin(\Lambda)$', fontsize=18 )
ax3 = fig.add_subplot(3,1,3)
ax3.plot( kyears, orb['obliquity'] )
ax3.set_title('Obliquity (axial tilt) $\Phi$', fontsize=18 )
ax3.set_xlabel( 'Thousands of years before present', fontsize=14 )
show()
Create a large array of insolation over the whole globe, whole year, and for every set of orbital parameters.
lat = linspace(-90, 90, 181)
days = linspace(1.,50.)/50 * clim.days_per_year
Q = orbital.daily_insolation(lat, days, **orb)
print Q.shape
Qann = mean(Q, axis=1) # time average over the year
print Qann.shape
Qglobal = empty_like( kyears )
for n in range( kyears.size ): # global area-weighted average
Qglobal[n] = sum( Qann[:,n] * cos( deg2rad(lat) ) ) / sum( cos( deg2rad(lat) ) )
print Qglobal.shape
We are going to create a figure showing past time variations in three quantities:
fig = figure( figsize = (10,14) )
ax1 = fig.add_subplot(3,1,1)
ax1.plot( kyears, Qglobal )
ax1.set_title('Global, annual mean insolation', fontsize=18 )
ax1.ticklabel_format( useOffset=False )
ax2 = fig.add_subplot(3,1,2)
ax2.plot( kyears, Qann[160,:] )
ax2.set_title('Annual mean insolation at 70N', fontsize=18 )
ax3 = fig.add_subplot(3,1,3)
ax3.plot( kyears, Q[160,23,:] )
ax3.set_title('Summer solstice insolation at 70N', fontsize=18 )
show()
And comparing with the plots of orbital variations above, we see that
Last Glacial Maximum or "LGM" occurred around 23,000 years before present, when the ice sheets were at their greatest extent. By 10,000 years ago, the ice sheets were mostly gone and the last ice age was over. Let's plot the changes in the seasonal distribution of insolation from 23 kyrs to 10 kyrs.
orb_0 = orbital.lookup_parameters( 0 ) # present-day orbital parameters
orb_10 = orbital.lookup_parameters( 10 ) # orbital parameters for 10 kyrs before present
orb_23 = orbital.lookup_parameters( 23 ) # 23 kyrs before present
Q_0 = orbital.daily_insolation( lat, days, **orb_0 )
Q_10 = orbital.daily_insolation( lat, days, **orb_10 ) # insolation arrays for each of the three sets of orbital parameters
Q_23 = orbital.daily_insolation( lat, days, **orb_23 )
fig = figure( figsize=(20,8) )
ax1 = fig.add_subplot(1,2,1)
Qdiff = Q_10 - Q_23
CS1 = ax1.contour( days, lat, Qdiff, levels = arange(-100., 100., 10.) )
ax1.clabel(CS1, CS1.levels, inline=True, fmt='%r', fontsize=10)
ax1.contour( days, lat, Qdiff, levels = (0,0), color = 'k' )
ax1.set_xlabel('Days since January 1', fontsize=16 )
ax1.set_ylabel('Latitude', fontsize=16 )
ax1.set_title('Insolation differences: 10 kyrs - 23 kyrs', fontsize=24 )
ax2 = fig.add_subplot(1,2,2)
ax2.plot( mean( Qdiff, axis=1 ), lat )
ax2.set_xlabel('W m$^{-2}$', fontsize=16 )
ax2.set_ylabel( 'Latitude', fontsize=16 )
ax2.set_title(' Annual mean differences', fontsize=24 )
ax2.set_ylim((-90,90))
ax2.grid()
show()
The annual mean plot shows a classic obliquity signal: at 10 kyrs, the axis close to its maximum tilt, around 24.2º. At 23 kyrs, the tilt was much weaker, only about 22.7º. In the annual mean, a stronger tilt means more sunlight to the poles and less to the equator. This is very helpful if you are trying to melt an ice sheet.
Finally, take the global average of the difference:
print sum( mean(Qdiff,axis=1) * cos( deg2rad(lat) ) ) / sum( cos(deg2rad(lat)) )
This confirms that the difference is tiny (and due to very small changes in the eccentricity). Ice ages are driven by seasonal and latitudinal redistributions of solar energy, NOT by changes in the total global amount of solar energy!