|
FUNCTION surface_weights_positive (b : rational_b_spline_surface) : BOOLEAN; LOCAL result : BOOLEAN := TRUE ; END_LOCAL ; REPEAT i := 0 TO b . u_upper ; REPEAT j := 0 TO b . v_upper ; IF ( b . weights [ i ] [ j ] <= 0.0 ) THEN result := FALSE ; RETURN ( result ) ; END_IF ; END_REPEAT ; END_REPEAT ; RETURN ( result ) ; END_FUNCTION; -- surface_weights_positive |
|
public class FSurface_weights_positive public static Value run(SdaiContext _context, Value b) |