This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
//////////////////// Função adaptada para excluir acompanhamento de projeto | |
function delete_acomp(id) { | |
var ret = window.confirm(msgtext("Please_confirm_this_delete_req")); | |
if (!ret) | |
return; | |
var num = id.substr(id.indexOf(":") + 1); | |
var wc = "id=" + num; | |
var query_string = cfgCgi + | |
"?SID=" + cfgSID + |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
<PDM_IF 0> | |
WHEN PRESENTED: | |
When we need to display details of a particular Factory | |
INTENT: | |
Web Screen Painter Template file for detail screens | |
</PDM_IF> | |
<HTML> | |
<HEAD> |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
<PDM_IF 0> | |
WHEN PRESENTED: | |
When we need to display a list of a particular Factory | |
INTENT: | |
Web Screen Painter Template file for list screens | |
</PDM_IF> | |
<HTML lang="en"> | |
<HEAD> | |
<PDM_PRAGMA RELEASE=110> | |
<PDM_INCLUDE FILE=styles.htmpl> |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
isTileBusy::[(Int, Int)] -> (Int, Int) -> Bool | |
isTileBusy [] x = False | |
isTileBusy (a:as) x = (isLos a x) || (isTileBusy as x) | |
isLos::(Int, Int) -> (Int, Int) -> Bool | |
isLos (a, b) (x, y) = or [a == x, b == y, abs (a - x) == abs (b - y)] | |
-- parametros | |
-- 1- rainhas ja posicionadas | |
-- 2- linha aonde se quer encontrar a proxima casa vazia |