Searched refs:meshG (Results 1 – 1 of 1) sorted by relevance
41 subroutine init_mesh_node( ucell , meshG , meshLim , nsm) argument53 integer, intent(in) :: meshG(3), meshLim(2,3) local80 ldimX = max(meshG(i),1)92 meshl = meshG ! same as meshLim(2,:) * nsm99 nm(1:3) = meshG(1:3) / nsm