;BUT:MESURER LE DEPLACEMENT DE L'OCCULTEUR INTERNE
	;PREPARATION
	;SE METTRE EN IDL
        ;IDL
        ;LANCER IDL SESSION
        ;@IDLSESSION
        ;CATALOGUE DE DARKS
        CD,'DATAVS5:[LASCO.IMAGES.MV_NRL.NRLOCT]'
        DARK_CATA
        ;TRAITEMENT IMAGES ACQUISITIONS EN COMPATIBLE IDL
        PRO_CAL,'C2CVIG300.IMG',DARK,HDARK,VIG300,HVIG300
        PRO_CAL,'C2CVIG301.IMG',DARK,HDARK,VIG301,HVIG301
        CD,'DATAVS5:[LASCO.IMAGES.MV_NRL.NRLNOV]'
        DARK_CATA
        PRO_CAL,'C2CVIG400.IMG',DARK,HDARK,VIG400,HVIG400
        PRO_CAL,'C2CVIG401.IMG',DARK,HDARK,VIG401,HVIG401
        CD,'DATAVS5:[LASCO.IMAGES.MV_NRL.NRLOCT]'
        WSET,0
        TVSCL,BYTSCL(VIG300,MIN=MIN(VIG300),MAX=MAX(VIG300))
        WSET,1
        TVSCL,BYTSCL(VIG400,MIN=MIN(VIG400),MAX=MAX(VIG400))
        WINDOW,2,XSIZE=512,YSIZE=512
        TVSCL,BYTSCL(VIG301,MIN=MIN(VIG301),MAX=MAX(VIG301))
        WINDOW,3,XSIZE=512,YSIZE=512
        TVSCL,BYTSCL(VIG401,MIN=MIN(VIG401),MAX=MAX(VIG401))
	;VISUALISER LES 4 FENETRES
	;NORMALISER LES 2 CLICHES
	; a : EVALUER L'INTENSITE DES 2 CLICHES
	      PAR STAT_CURSOR,IMA			
	; b : CORRIGER	
	PAR SOUSTRACTION DE LEUR PROPRE FOND DE L'OCCULTEUR
	EN NORMALISANT LA PERIPHERIE  ---->VIG300C ET VIG400C
	
	WINDOW,4,XSIZE=512,YSIZE=512
	VDIF300=VIG400C-VIG300C
	TVSCL,BYTSCL(VDIF300,MIN=MIN(VDIF300),MAX=MAX(VDIF300))
	
	METHODE DES CERCLES
	
	VIG300C:
	X_CENTRE =       263.057  Y_CENTRE =       252.664
	RAYON=       174.354
	VIG400C:
	X_CENTRE =       262.578  Y_CENTRE =       250.964
	RAYON=       174.487
	SOIT
	 PRINT,263.057-262.578
     	EN X	0.479004
	EN Y
	PRINT,252.664-250.964
        	1.70000

	PAR LA METHODE DIFFERENTIELLE ONT TROUVE:
	
	VIG400R3=ROT_INT(VIG400,0.,1.,254.75,254.20)
	VDIF300R3=VIG400R3-VIG300
	TVSCL,BYTSCL(VDIF300R3,MIN=-200,MAX=+200)
	SOIT
	PRINT,255.5-254.75
     	0.750000
	PRINT,255.5-254.20
     	1.30000

	CONTROLE SUR LES VIGNETTAGES DEFOCALISES