wgtu

    User defined destributed source boundary weight factors used in conjunction with macro boun.

    • Group 1 - NAREA
    • Group 2 - IZONE_AREA(I), IAREAF(I), AREA01(I), AREA02(I), I = 1 to NAREA

    If (IAREAF(I) = 7) a weight factor is read for each node in the current zone.

    • Group 3 - II, (JJ, WGT_AREA(JJ), IJ = 1 to II)

    If (IAREAF(I) = 8) a weight factor is read for each node in the current zone from the specified file. See Group 3 above for file format.

    • Group 3 - WFILENAME
    Input Variable Format Description
    NAREA integer Number of zones for which a weight factor will be calculated.
    IZONE_AREA integer Zone on which to calculate weight factors.
    IAREAF integer Method for calculating weight factor for current zone.1 : Calculate area of each node in zone2 : Calculate area of each node based on total area given (area01) and portioned by volume size 3 : Calculate area of each node based on total area given (area01) and portioned by approximate area size 4 : Calculate weighting based on area (used in boun)5 : Calculate weighting based on area*perm (used in boun)6 : Calculate weighting based on vol*perm (used in boun)7 : Read a list of weights for every node in zone8 : Read a file with weights for every node in zone
    AREA01 real*8 Input area.
    AREA02 real*8 Base impedance parameter.
    II integer Number of nodes in the current zone.
    JJ integer Node number of the ijth node.
    WGT_AREA real*8 Weighting factor for JJ
    WFILENAME character*100 Name of file contining weight factors for the current zone.

    © Copyright 2018, Los Alamos National Laboratory