VB-based fuzzy mathematics practical algorithm code set