C+ C NAME: C t3d_array_3 C PURPOSE: C Defines paramater constants for entries in header for tomography output files C CALLING SEQUENCE: C include 't3d_array.h' C PROCEDURE: C MODIFICATION HISTORY: C ???-????, Paul Hick (UCSD/CASS) C OCT-2002, Paul Hick (UCSD/CASS; pphick@ucsd.edu) C Added T3D_MARKER C JAN-2016, B. Jackson C Added to PWR marker C- !------- ! Element T3D__MODE is used to store bitwise switches (on/off) ! The meaning of individual bits is at the end of this include file. integer T3D__MODE parameter (T3D__MODE = 1) ! Dummy variable (not used yet) integer T3D__NLNG parameter (T3D__NLNG = 2) ! # longitudes integer T3D__NLAT parameter (T3D__NLAT = 3) ! # latitudes integer T3D__NRAD parameter (T3D__NRAD = 4) ! # radial distances integer T3D__NTIM parameter (T3D__NTIM = 5) ! # times integer T3D__NCOFF parameter (T3D__NCOFF = 6) ! Carrington offset to be added to Time, XCrange and XCroi integer T3D__ITERATION parameter (T3D__ITERATION = 7) ! Iteration (0 or t3d(T3D__ITERATIONS)+1 for final result) integer T3D__ITERATIONS parameter (T3D__ITERATIONS= 8) ! Total # iterations integer T3D__ITIME parameter (T3D__ITIME = 9) ! Time index ! t3d(T3D__TIME): Carrington time assigned to current time index in time-dependent ! tomography. For co-rotating tomogrophy this is set to the Carrington variable ! at the center of the array integer T3D__TIME parameter (T3D__TIME = 10) ! Carrington time assigned to current time index ! t3d(T3D__NOW): The forecast Carrington time. When the tomography is run in ! forecast mode this specifies the 'forecast time' (usually the system time ! when the program is started). integer T3D__TNOW parameter (T3D__TNOW = 11) ! Forecast time (Carrington time) integer T3D__XCMAT parameter (T3D__XCMAT = 12) ! Start and end Carrington variable of array integer T3D__XCROI ! Start and end Carrington variable for 'region of interest' parameter (T3D__XCROI = 14) ! Subrange of XCMAT; should should cover exactly 1 rotation integer T3D__LAT ! Range of latitudes covered (degrees) parameter (T3D__LAT = 16) ! (usually -90 to +90 degrees) integer T3D__RR parameter (T3D__RR = 18) ! Source surface distance (AU) integer T3D__DRR parameter (T3D__DRR = 19) ! Resolution in radial dist (AU) integer T3D__TT parameter (T3D__TT = 20) ! Start time (Carrington time) integer T3D__DTT parameter (T3D__DTT = 21) ! Time resolution (Carrington time) integer T3D__PWN_V parameter (T3D__PWN_V = 22) ! power used to convert g-level to normalized density integer T3D__PWN_G parameter (T3D__PWN_G = 23) ! power used to convert g-level to normalized density integer T3D__PWR_V parameter (T3D__PWR_V = 24) ! power used to set dependence of g-level on heliocentric distance integer T3D__PWR_G parameter (T3D__PWR_G = 25) ! power used to set dependence of g-level on heliocentric distance integer T3D__D1AU parameter (T3D__D1AU = 26) ! Density at 1 AU integer T3D__SMOOTH_V parameter (T3D__SMOOTH_V = 27) ! Spatial filter for velocities (used by GridSphere) integer T3D__SMOOTH_D parameter (T3D__SMOOTH_D = 28) ! Spatial filter for densities (used by GridSphere) integer T3D__FILL_V parameter (T3D__FILL_V = 29) ! Spatial filter for filling holes in velocity map integer T3D__FILL_D parameter (T3D__FILL_D = 30) ! Spatial filter for filling holes in density map integer T3D__SMOOTH_TIME_V parameter (T3D__SMOOTH_TIME_V = 31)! Time filter ???? (ignored for co-rotating tomography) integer T3D__SMOOTH_TIME_D parameter (T3D__SMOOTH_TIME_D = 32)! Time filter ???? (ignored for co-rotating tomography) integer T3D__CLIPLNG parameter (T3D__CLIPLNG = 33) ! 'clip longitude' (used by GridSphere) integer T3D__SCALE ! Scaling factors: y-intercept and slope parameter (T3D__SCALE = 34) ! Also uses T3D__SCALE+1, +2 and +3 integer T3D__R_PWR ! Power of r used in normalization parameter (T3D__R_PWR = 38) ! Also uses T3D__R_PWR+1 integer T3D__NL_V parameter (T3D__NL_V = 40) ! # lines of sight integer T3D__NL_G parameter (T3D__NL_G = 41) ! # lines of sight integer T3D__DLOS_V parameter (T3D__DLOS_V = 42) ! Step size along line of sight integer T3D__DLOS_G parameter (T3D__DLOS_G = 43) ! Step size along line of sight integer T3D__NLOS_V ! # steps along lines of sight parameter (T3D__NLOS_V = 44) integer T3D__NLOS_G ! # steps along lines of sight parameter (T3D__NLOS_G = 45) integer T3D__BINX_V parameter (T3D__BINX_V = 46) integer T3D__BINX_D parameter (T3D__BINX_D = 47) integer T3D__MARKER parameter (T3D__MARKER = 48) integer T3D__NELEMENTS parameter (T3D__NELEMENTS = 48) !------- ! Definitions of bit settings in element T3D__MODE ! DON'T USE THE SIGN BIT 31 integer T3D__MODE_TIME ! Bit 30: 0 for corotating tomography parameter (T3D__MODE_TIME = 30) ! : 1 for time-dependent tomography integer T3D__MODE_MOD360 parameter (T3D__MODE_MOD360= 29) ! Bit 29: 0 for no mod360 on line-of-sight projection ! : 1 for mod360 on line-of-sight projection integer T3D__MODE_WSO_RR parameter (T3D__MODE_WSO_RR = 28) ! Bit 28: bit for WSO radial CSSS files integer T3D__MODE_WSO_RC parameter (T3D__MODE_WSO_RC = 27) ! Bit 28: bit for WSO radial closed files integer T3D__MODE_WSO_TC parameter (T3D__MODE_WSO_TC = 26) ! Bit 28: bit for WSO tangential closed files integer T3D__MODE_WSO_NC parameter (T3D__MODE_WSO_NC = 25) ! Bit 28: bit for WSO normal closed files integer T3D__MODE_NSO_ADRR parameter (T3D__MODE_NSO_ADRR= 24) ! Bit 27: bit for NSO ADAPT radial CSSS files integer T3D__MODE_NSO_ADRC parameter (T3D__MODE_NSO_ADRC= 23) ! Bit 26: bit for NSO ADAPT radial closed files integer T3D__MODE_NSO_ADTC parameter (T3D__MODE_NSO_ADTC= 22) ! Bit 25: bit for NSO ADAPT tangential closed files integer T3D__MODE_NSO_ADNC parameter (T3D__MODE_NSO_ADNC= 21) ! Bit 24: bit for NSO ADAPT tangential closed files integer T3D__MODE_NSO_SORR parameter (T3D__MODE_NSO_SORR= 20) ! Bit 23: bit for NSO SOLIS radial CSSS files integer T3D__MODE_NSO_SORC parameter (T3D__MODE_NSO_SORC= 19) ! Bit 22: bit for NSO SOLIS radial closed files integer T3D__MODE_NSO_SOTC parameter (T3D__MODE_NSO_SOTC= 18) ! Bit 21: bit for NSO SOLIS tangential closed files integer T3D__MODE_NSO_SONC parameter (T3D__MODE_NSO_SONC= 17) ! Bit 20: bit for NSO SOLIS normal closed files integer T3D__MODE_NSO_GORR parameter (T3D__MODE_NSO_GORR= 16) ! Bit 19: bit for NSO GONG radial CSSS files integer T3D__MODE_NSO_GORC parameter (T3D__MODE_NSO_GORC= 15) ! Bit 18: bit for NSO GONG radial closed files integer T3D__MODE_NSO_GOTC parameter (T3D__MODE_NSO_GOTC= 14) ! Bit 17: bit for NSO GONG tangential closed files integer T3D__MODE_NSO_GONC parameter (T3D__MODE_NSO_GONC= 13) ! Bit 16: bit for NSO GONG normal closed files