Compute nside value from and
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in), | dimension(3) | :: | dim_cube | cube dimension |
nside of the cube
pure function dim2nside(dim_cube)
!! Compute nside value from \(dim_y\) and \(dim_x\)
implicit none
integer :: dim2nside !! nside of the cube
integer, intent(in), dimension(3) :: dim_cube !! cube dimension
dim2nside = max(0,int(ceiling(log(real(dim_cube(2))) / log(2.))), int(ceiling(log(real(dim_cube(3))) / log(2.))))
return
end function dim2nside