BSCALE =
9.91806E-14 / Data value = FITS value x BSCALE + BZERO
BZERO =
3.24995E-09 /
DATAMIN =
2.05145E-12 / Minimum Value Not Equal to Zero
DATAMAX =
9.56944E-09 / Maximum Value NE Saturated
DATAZER =
183539 / Number of Zero Pixels
DATASAT =
91 / Number of Saturated Pixels
DSATVAL =
6.50000E-09 / Value used as saturated.
DATAAVG = 7.4424799E-11
/ Mean of Image
DATASIG = 2.2080698E-10
/ Standard Deviation of Image
DATAP01 = 8.5300000E-12
/ Percentile Value
DATAP10 = 1.2640000E-11
/ Percentile Value
DATAP25 = 1.6150000E-11
/ Percentile Value
DATAP50 = 2.5180000E-11
/ Percentile Value
DATAP75 = 5.1540000E-11
/ Percentile Value
DATAP90 = 1.3580000E-10
/ Percentile Value
DATAP95 = 2.6102000E-10
/ Percentile Value
DATAP98 = 5.5190000E-10
/ Percentile Value
DATAP99 = 9.3757000E-10
/ Percentile Value
IDL[calliope]>rndm=randomn(5,1024,1024)
; RANDOMN uses the Box-Muller method for generating normally-distributed (Gaussian) random numbers,
; here with a seed of 5.
IDL[calliope]>maxmin,rndm
4.86010 0.000247973 -5.02657IDL[calliope]>for i=31,1000,32 do rndm[*,i]=2
IDL[calliope]>for i=31,1000,32 do rndm[i,*]=2
IDL[calliope]>tvscl,rndm
IDL[calliope]>wrndm2=c3_warp(rndm,h0)
IDL[calliope]>tvscl,wrndm2
IDL[calliope]>rdif=wrndm2-rndm; ** to find circle which corresponds to zero in C3 distortion correction
IDL[calliope]>cf = DISTORTION_COEFFS ('C3')
IDL[calliope]>r=sqrt(-1*cf[0]/cf[1])
IDL[calliope]>print,r/.021
455.903
; Apply circle to rdif using TVCIRCLE
; **
TBD