Hello,
Thank you for your reply. I am a bit lost on how to begin to modify the BORD3D subroutine. Could you please provide more details? I see:
UBORL%R(IBORD)=-MESH2D%XNEBOR%R(K)*VIT3(IVIT,AT,N,INFOGR)
VBORL%R(IBORD)=-MESH2D%YNEBOR%R(K)*VIT3(IVIT,AT,N,INFOGR)
which I believe I would change to:
UBORL%R(IBORD)=-MESH2D%XNEBOR%R(K)*MYVIT3(IVIT,AT,N,INFOGR)
VBORL%R(IBORD)=-MESH2D%YNEBOR%R(K)*MYVIT3(IVIT,AT,N,INFOGR)
but I am not sure if that is the only place I need to make a change in BORD3D.
Thank you,
Taylor