Next: J.E. Chambers, Research Astronomer Up: Research Previous: Research Contents . ... Solar Variability and Climate . Other Activities . ... Applied to data of flares on Gliese866 he was able to estimate the area of hydrogen emitting flare regions as 1-13% of the stellar surface. ... As partners in the project, Armagh Observatory has been asked to contribute to the selection process in exchange for priority access to the data which will eventually flow from the satellite. ...

PROGRAM SUMMATION ! Summation forwards and backwards of 1/n^2 IMPLICIT NONE INTEGER :: N, NMAX CHARACTER :: ANSWER REAL :: SUM_SP, TEMP DOUBLE PRECISION :: SUM_DP INTEGER, PARAMETER :: QUAD = SELECTED_REAL_KIND(20,1000) REAL(KIND=QUAD) :: SUM_QUAD SUM_SP = 0.0 SUM_DP = 0.0D0 SUM_QUAD = 0.0_QUAD 1 WRITE(*,'(A)', ADVANCE='NO') 'How many numbers do you wish to add? ... 10) THEN WRITE(*,*) 'Too few numbers!' GO TO 1 ELSE IF (NMAX .GT. 100000000) THEN WRITE(*,*) 'Too many numbers!' ...