Either this or/and that fact in prolog










0















I want do build a expense calculator in prolog. The facts onetime_expense(X). or monthly_expense(X). can be present. To sum up the expenses I use this formula:



expenses(X):-
findall(
Value,
( monthly_expense(Y),
Value is Y * 12
),
Values
),
findall(
Value1,
( onetime_expense(Z),
Value1 is Z
),
Values1
),
sum_list(Values, Sum),
sum_list(Values1, Sum1),
X is Sum + Sum1.


Unfortunately prolog throws the error "Undefined procedure" if one of the facts is not in the knowledge base. How can this problem be solved?










share|improve this question






















  • You can simply a little: findall( Value1, ( onetime_expense(Z), Value1 is Z ), Values1 ), --> findall( Value1, onetime_expense(Value1), Values1 ),

    – lurker
    Nov 14 '18 at 19:29















0















I want do build a expense calculator in prolog. The facts onetime_expense(X). or monthly_expense(X). can be present. To sum up the expenses I use this formula:



expenses(X):-
findall(
Value,
( monthly_expense(Y),
Value is Y * 12
),
Values
),
findall(
Value1,
( onetime_expense(Z),
Value1 is Z
),
Values1
),
sum_list(Values, Sum),
sum_list(Values1, Sum1),
X is Sum + Sum1.


Unfortunately prolog throws the error "Undefined procedure" if one of the facts is not in the knowledge base. How can this problem be solved?










share|improve this question






















  • You can simply a little: findall( Value1, ( onetime_expense(Z), Value1 is Z ), Values1 ), --> findall( Value1, onetime_expense(Value1), Values1 ),

    – lurker
    Nov 14 '18 at 19:29













0












0








0








I want do build a expense calculator in prolog. The facts onetime_expense(X). or monthly_expense(X). can be present. To sum up the expenses I use this formula:



expenses(X):-
findall(
Value,
( monthly_expense(Y),
Value is Y * 12
),
Values
),
findall(
Value1,
( onetime_expense(Z),
Value1 is Z
),
Values1
),
sum_list(Values, Sum),
sum_list(Values1, Sum1),
X is Sum + Sum1.


Unfortunately prolog throws the error "Undefined procedure" if one of the facts is not in the knowledge base. How can this problem be solved?










share|improve this question














I want do build a expense calculator in prolog. The facts onetime_expense(X). or monthly_expense(X). can be present. To sum up the expenses I use this formula:



expenses(X):-
findall(
Value,
( monthly_expense(Y),
Value is Y * 12
),
Values
),
findall(
Value1,
( onetime_expense(Z),
Value1 is Z
),
Values1
),
sum_list(Values, Sum),
sum_list(Values1, Sum1),
X is Sum + Sum1.


Unfortunately prolog throws the error "Undefined procedure" if one of the facts is not in the knowledge base. How can this problem be solved?







prolog






share|improve this question













share|improve this question











share|improve this question




share|improve this question










asked Nov 14 '18 at 12:11







user10462107



















  • You can simply a little: findall( Value1, ( onetime_expense(Z), Value1 is Z ), Values1 ), --> findall( Value1, onetime_expense(Value1), Values1 ),

    – lurker
    Nov 14 '18 at 19:29

















  • You can simply a little: findall( Value1, ( onetime_expense(Z), Value1 is Z ), Values1 ), --> findall( Value1, onetime_expense(Value1), Values1 ),

    – lurker
    Nov 14 '18 at 19:29
















You can simply a little: findall( Value1, ( onetime_expense(Z), Value1 is Z ), Values1 ), --> findall( Value1, onetime_expense(Value1), Values1 ),

– lurker
Nov 14 '18 at 19:29





You can simply a little: findall( Value1, ( onetime_expense(Z), Value1 is Z ), Values1 ), --> findall( Value1, onetime_expense(Value1), Values1 ),

– lurker
Nov 14 '18 at 19:29












1 Answer
1






active

oldest

votes


















1














A simple solution is to declare the predicates dynamic:



:- dynamic(monthly_expense/1).
:- dynamic(onetime_expense/1).


A call to a predicate that is declared as dynamic but not defined simply fails instead of throwing a predicate existence error.



P.S. You can simplify your code using the de facto standard predicate findall/4:



expenses(Sum):-
findall(
MonthlyValue,
( monthly_expense(Y),
MonthlyValue is Y * 12
),
MonthlyValues
),
findall(
OneTimeValue,
( onetime_expense(Z),
OneTimeValue is Z
),
Values,
MonthlyValues
),
sum_list(Values, Sum).





share|improve this answer























  • I feel like it would be weird to have this problem and not run into the missing dynamic declaration eventually anyway.

    – Daniel Lyons
    Nov 14 '18 at 17:17










Your Answer






StackExchange.ifUsing("editor", function ()
StackExchange.using("externalEditor", function ()
StackExchange.using("snippets", function ()
StackExchange.snippets.init();
);
);
, "code-snippets");

StackExchange.ready(function()
var channelOptions =
tags: "".split(" "),
id: "1"
;
initTagRenderer("".split(" "), "".split(" "), channelOptions);

StackExchange.using("externalEditor", function()
// Have to fire editor after snippets, if snippets enabled
if (StackExchange.settings.snippets.snippetsEnabled)
StackExchange.using("snippets", function()
createEditor();
);

else
createEditor();

);

function createEditor()
StackExchange.prepareEditor(
heartbeatType: 'answer',
autoActivateHeartbeat: false,
convertImagesToLinks: true,
noModals: true,
showLowRepImageUploadWarning: true,
reputationToPostImages: 10,
bindNavPrevention: true,
postfix: "",
imageUploader:
brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
allowUrls: true
,
onDemand: true,
discardSelector: ".discard-answer"
,immediatelyShowMarkdownHelp:true
);



);













draft saved

draft discarded


















StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53299951%2feither-this-or-and-that-fact-in-prolog%23new-answer', 'question_page');

);

Post as a guest















Required, but never shown
























1 Answer
1






active

oldest

votes








1 Answer
1






active

oldest

votes









active

oldest

votes






active

oldest

votes









1














A simple solution is to declare the predicates dynamic:



:- dynamic(monthly_expense/1).
:- dynamic(onetime_expense/1).


A call to a predicate that is declared as dynamic but not defined simply fails instead of throwing a predicate existence error.



P.S. You can simplify your code using the de facto standard predicate findall/4:



expenses(Sum):-
findall(
MonthlyValue,
( monthly_expense(Y),
MonthlyValue is Y * 12
),
MonthlyValues
),
findall(
OneTimeValue,
( onetime_expense(Z),
OneTimeValue is Z
),
Values,
MonthlyValues
),
sum_list(Values, Sum).





share|improve this answer























  • I feel like it would be weird to have this problem and not run into the missing dynamic declaration eventually anyway.

    – Daniel Lyons
    Nov 14 '18 at 17:17















1














A simple solution is to declare the predicates dynamic:



:- dynamic(monthly_expense/1).
:- dynamic(onetime_expense/1).


A call to a predicate that is declared as dynamic but not defined simply fails instead of throwing a predicate existence error.



P.S. You can simplify your code using the de facto standard predicate findall/4:



expenses(Sum):-
findall(
MonthlyValue,
( monthly_expense(Y),
MonthlyValue is Y * 12
),
MonthlyValues
),
findall(
OneTimeValue,
( onetime_expense(Z),
OneTimeValue is Z
),
Values,
MonthlyValues
),
sum_list(Values, Sum).





share|improve this answer























  • I feel like it would be weird to have this problem and not run into the missing dynamic declaration eventually anyway.

    – Daniel Lyons
    Nov 14 '18 at 17:17













1












1








1







A simple solution is to declare the predicates dynamic:



:- dynamic(monthly_expense/1).
:- dynamic(onetime_expense/1).


A call to a predicate that is declared as dynamic but not defined simply fails instead of throwing a predicate existence error.



P.S. You can simplify your code using the de facto standard predicate findall/4:



expenses(Sum):-
findall(
MonthlyValue,
( monthly_expense(Y),
MonthlyValue is Y * 12
),
MonthlyValues
),
findall(
OneTimeValue,
( onetime_expense(Z),
OneTimeValue is Z
),
Values,
MonthlyValues
),
sum_list(Values, Sum).





share|improve this answer













A simple solution is to declare the predicates dynamic:



:- dynamic(monthly_expense/1).
:- dynamic(onetime_expense/1).


A call to a predicate that is declared as dynamic but not defined simply fails instead of throwing a predicate existence error.



P.S. You can simplify your code using the de facto standard predicate findall/4:



expenses(Sum):-
findall(
MonthlyValue,
( monthly_expense(Y),
MonthlyValue is Y * 12
),
MonthlyValues
),
findall(
OneTimeValue,
( onetime_expense(Z),
OneTimeValue is Z
),
Values,
MonthlyValues
),
sum_list(Values, Sum).






share|improve this answer












share|improve this answer



share|improve this answer










answered Nov 14 '18 at 12:36









Paulo MouraPaulo Moura

11.8k21325




11.8k21325












  • I feel like it would be weird to have this problem and not run into the missing dynamic declaration eventually anyway.

    – Daniel Lyons
    Nov 14 '18 at 17:17

















  • I feel like it would be weird to have this problem and not run into the missing dynamic declaration eventually anyway.

    – Daniel Lyons
    Nov 14 '18 at 17:17
















I feel like it would be weird to have this problem and not run into the missing dynamic declaration eventually anyway.

– Daniel Lyons
Nov 14 '18 at 17:17





I feel like it would be weird to have this problem and not run into the missing dynamic declaration eventually anyway.

– Daniel Lyons
Nov 14 '18 at 17:17



















draft saved

draft discarded
















































Thanks for contributing an answer to Stack Overflow!


  • Please be sure to answer the question. Provide details and share your research!

But avoid


  • Asking for help, clarification, or responding to other answers.

  • Making statements based on opinion; back them up with references or personal experience.

To learn more, see our tips on writing great answers.




draft saved


draft discarded














StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53299951%2feither-this-or-and-that-fact-in-prolog%23new-answer', 'question_page');

);

Post as a guest















Required, but never shown





















































Required, but never shown














Required, but never shown












Required, but never shown







Required, but never shown

































Required, but never shown














Required, but never shown












Required, but never shown







Required, but never shown







這個網誌中的熱門文章

Barbados

How to read a connectionString WITH PROVIDER in .NET Core?

Node.js Script on GitHub Pages or Amazon S3