source code clone download copy to clipboard report bug / make suggestion

1
2
3
4
5
6
7
8
9
10
nalezy( X,[X|_] ).
nalezy( X,[H|T] ) :- nalezy( X,T ).
 
usun(X,[X|Reszta],Reszta).
usun(X,[Y|Ogon],[Y|Reszta]) :-
        usun(X,Ogon,Reszta).
 
sprawdz([H|T]):- nalezy(H,T)->usun(H,T);sprawdz(T).
 
powt(A):- sprawdz(A), writeln(A).

clone download copy to clipboard

• upload with new input
  You have reached a limit of free submissions this month.
  你已經將這個月的上傳額度用完了。請儲值你的帳戶。
  
• # 3:   hide show   clone   input   128 days 14 hours ago    Success

  結果: Success     time: 0.03s    記憶體: 6204 kB     回傳值: 0

  input:

  powt([1,1,3,4]).

  output: no
  stderr:

  Warning: /home/ghrLYJ/prog.pl:2:
  	Singleton variables: [H]
  
  ERROR: sprawdz/1: Undefined procedure: usun/2
  ERROR:     However, there are definitions for:
  ERROR:         usun/3
  
  

• # 2:   hide show   clone   input   128 days 14 hours ago    Success

  結果: Success     time: 0.02s    記憶體: 6204 kB     回傳值: 0

  input:

  powt([1,2,3,4]).

  output: no
  stderr:

  Warning: /home/LPPf5l/prog.pl:2:
  	Singleton variables: [H]
  
  false.
  
  
  

• # 1:   hide show   clone   input   128 days 14 hours ago    Success

  結果: Success     time: 0.02s    記憶體: 6204 kB     回傳值: 0

  input: 無
  output: no
  stderr:

  Warning: /home/NWyJVy/prog.pl:2:
  	Singleton variables: [H]