Update flux_calc_kernel.f90

removed vector_length due to cce issues