1/******************************************************************************* 2* McStas instrument definition URL=http://www.mcstas.org 3* 4* Instrument: templateLaue 5* 6* %Identification 7* Written by: K. Nielsen 8* Date: June 2nd, 2010 9* Origin: ILL 10* Modified by: EF, 11* %INSTRUMENT_SITE: Templates 12* 13* A simple Laue diffractometer 14* 15* %Description 16* A single crystal sample is illuminated with a white cold beam. 17* Based on a Laue tutorial written by K. Nielsen, Feb 7, 2000. 18* 19* %Example: templateLaue Detector: det_I=1.14351e+07 20* 21* %Parameters 22* 23* %End 24*******************************************************************************/ 25 26/* Change name of instrument and input parameters with default values */ 27DEFINE INSTRUMENT templateLaue() 28 29TRACE 30 31COMPONENT Origin = Progress_bar() 32 AT (0,0,0) ABSOLUTE 33 34COMPONENT source = Source_simple( 35 radius=0.02, focus_xw=0.01, focus_yh=0.01, 36 lambda0=7, dlambda=5, flux=1e12) 37AT (0,0,0) ABSOLUTE 38 39COMPONENT slit = Slit( 40 xwidth=0.01, yheight=0.01) 41AT (0,0,5) RELATIVE source 42 43COMPONENT sample = Single_crystal( 44 xwidth=0.01, yheight=0.01, zdepth=0.01, 45 delta_d_d=1e-4, mosaic = 5, 46 ax = 3.8186, ay = 0, az = 0, 47 bx = 0, by = 3.8843, bz = 0, 48 cx = 0, cy = 0, cz = 11.6777, 49 reflections="YBaCuO.lau") 50AT (0,0,0.10) RELATIVE slit 51EXTEND %{ 52 if (!SCATTERED) ABSORB; /* perfect beam stop */ 53%} 54 55COMPONENT det= PSD_monitor_4PI(radius=1, nx=360,ny=180,filename="psd") 56AT (0,0,0) RELATIVE sample 57 58END 59 60