1 | !     =================================================================!
   2 | !     clperso.inc: Temperature profile for the walls of the domain     !
   3 | !                  patch numbers are the same as in .asciBound file    !
   4 | !     variables  : x, y, z - position of the face in 'patch'           !
   5 | !                  T       - Temperature of the face in 'patch'        !
   6 | !                  emissivityon - Emissivity of the face in 'patch'    !
   7 | !     available auxiliary variables: L_ref, R_ref, x_ref, y_ref, z_ref !
   8 | !                  you can use this variables as auxiliary data to     !
   9 | !                  create the profiles.                                !
  10 | !     how to     : Give T and emmisivity profiles for each 'patch'     !
  11 | !                  using the face's coordinates x, y and z. This is    !
  12 | !                  NOT an automatic generated file: add or erase       !
  13 | !                  the needed patches at the IF statements.            !
  14 | !     =================================================================!
  15 | 
  16 |       IF     (patch.eq.1) THEN
  17 |         T = 300.52
  18 |         emissivity = 1.0
  19 |       ELSEIF (patch.eq.2) THEN
  20 |         T = 300.
  21 |         emissivity = 1.
  22 |       ELSE
  23 |         T = 0.
  24 |         emissivity = 0.
  25 |       ENDIF
  26 |