13.2.16} ophbdx.f user-defined Optical PHoton BounDary-(X)crossing properties

 -------------------------------------------------------------------------------

     Argument list (all variables are input only):
          OMGPHO : angular frequency (omega = 2 pi nu) of the photon (in s-1)
          WVLNGT : photon wavelength (in cm)
          MREG   : old region number
          NEWREG : new region number
          SIGANW : absorption coefficient in the new region (cm-1)
          SIGDNW : diffusion  coefficient in the new region (cm-1)
          RFNDPR : refractive index in the new region
          VGRPNW : group velocity in the new region (cm s-1)
          LPHKLL : if .TRUE., the photon will be absorbed on the boundary

 Subroutine OPHBDX sets the optical properties of a boundary surface.
 The call is activated by command OPT-PROP, with 
SDUM
 = SPEC-BDX.
 See option OPT-PROP and Chap. 12} for more information.

 If name-based input is being used, the names corresponding to MREG and NEWREG
 can be obtained via a call to routine GEOR2N:
           CALL GEOR2N (NUMREG, NAMREG, IERR)
 where NUMREG (input variable) is the region number, and NAMREG
 (returned variable) is the corresponding region name (to be declared
 as CHARACTER*8). IERR is a returned error code: if = 0, the
 conversion is successful. See example in the description of BXDRAW above.

Previous Index Next