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