Takeshi K. Komatsubara (KEK) 18-November-2002 (Thu) taken from e949.umc/37.html How to set RS thickness in GEOMTS1 ---------------------------------- When you want to set your own set of RS thickness; 1. copy geomrs1.F to your own directory. 2. Edit geomrs.1.F as: - Increase the PARAMETER MAX_TSCNRS from n to n+1 - Set your own set of RS thickness into the DATA statements of TSCNRS_NEW(1-19,n+1) At present, MAX_TSCNRS is set to 2 and REAL TSCNRS_NEW(19,MAX_TSCNRS) DATA TSCNRS_NEW + / C.. set 1: conventional thickness (TTRGRS, TSCNRS, TSCN19 in geodat.F) + 0.6350, 1.9050, 1.9050, 1.9050, 1.9050, + 1.9050, 1.9050, 1.9050, 1.9050, 1.9050, + 1.9050, 1.9050, 1.9050, 1.9050, 1.9050, + 1.9050, 1.9050, 1.9050, 0.9525, C.. set 2: a set of new thickness (T-counter 0.6350cm --> 0.7000cm) + 0.7000, 1.9050, 1.9050, 1.9050, 1.9050, + 1.9050, 1.9050, 1.9050, 1.9050, 1.9050, + 1.9050, 1.9050, 1.9050, 1.9050, 1.9050, + 1.9050, 1.9050, 1.9050, 0.9525 + / So you can set MAX_TSCNRS to 3 and put the new RS thickness to TSCNRS_NEW(1-19,3) 3. make your umc.exe 4. Run umc.exe with the following statement in the .par file: 'IRSTSC' 3/ ! use TSCNRS_NEW(1-19,3) in geomrs1.F to the RS thickness ---