Routine to store position of user variable defined state and state_gradient boundary variable in bc(iBC)%state(iVar)%varPos and bc(iBC)%state_gradient
VK if (mod(iVar,2)==1) then VK bc(iBC)%state_gradient(iVar,1)%varPos = user_varPos VK else VK end if
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(atl_boundary_type), | intent(inout) | :: | bc(:) |
Array of boundary conditions contains varDict with same size as state variables |
||
type(tem_varSys_type), | intent(in) | :: | varSys |
Global variable system |