S_0:;
do{
sub_cls(NULL,NULL,0);
if(!qbevent)break;evnt(1);}while(r);
do{
qbs_print(nothingstring,1);
skip39188:
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(3);}while(r);
do{
tqbs=qbs_new(0,0);
qbs_set(tqbs,qbs_new_txt_len("    VARIACAO DAS CONDICOES DOS PAVIMENTOS AO LONGO DO TEMPO ",60));
if (new_error) goto skip39189;
makefit(tqbs);
qbs_print(tqbs,0);
qbs_free(tqbs);
qbs_print(nothingstring,1);
skip39189:
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(4);}while(r);
do{
qbs_print(nothingstring,1);
skip39190:
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(5);}while(r);
do{
*__SINGLE_NLMAX= 30 ;
if(!qbevent)break;evnt(10);}while(r);
do{

if (__ARRAY_STRING_VALOR[2]&2){
error(10);
}else{
if (__ARRAY_STRING_VALOR[2]&1){
error(10);
}else{
__ARRAY_STRING_VALOR[4]= 0 ;
__ARRAY_STRING_VALOR[5]=(qbr(*__SINGLE_NLMAX))-__ARRAY_STRING_VALOR[4]+1;
__ARRAY_STRING_VALOR[6]=1;
__ARRAY_STRING_VALOR[0]=(unsigned long)malloc(__ARRAY_STRING_VALOR[5]*8);
if (!__ARRAY_STRING_VALOR[0]) error(257);
__ARRAY_STRING_VALOR[2]|=1;
tmp_long=__ARRAY_STRING_VALOR[5];
if (__ARRAY_STRING_VALOR[2]&4){
while(tmp_long--) ((uint64*)(__ARRAY_STRING_VALOR[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0);
}else{
while(tmp_long--) ((uint64*)(__ARRAY_STRING_VALOR[0]))[tmp_long]=(uint64)qbs_new(0,0);
}
}
}

if (__ARRAY_SINGLE_PERCT[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_PERCT[2]&1){
error(10);
}else{
__ARRAY_SINGLE_PERCT[4]= 0 ;
__ARRAY_SINGLE_PERCT[5]=(qbr(*__SINGLE_NLMAX))-__ARRAY_SINGLE_PERCT[4]+1;
__ARRAY_SINGLE_PERCT[6]=1;
if (__ARRAY_SINGLE_PERCT[2]&4){
__ARRAY_SINGLE_PERCT[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_PERCT[5]*4);
memset((void*)(__ARRAY_SINGLE_PERCT[0]),0,__ARRAY_SINGLE_PERCT[5]*4);
}else{
__ARRAY_SINGLE_PERCT[0]=(unsigned long)calloc(__ARRAY_SINGLE_PERCT[5]*4,1);
if (!__ARRAY_SINGLE_PERCT[0]) error(257);
}
__ARRAY_SINGLE_PERCT[2]|=1;
}
}

if (__ARRAY_SINGLE_LIMITE[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_LIMITE[2]&1){
error(10);
}else{
__ARRAY_SINGLE_LIMITE[4]= 0 ;
__ARRAY_SINGLE_LIMITE[5]=(qbr(*__SINGLE_NLMAX))-__ARRAY_SINGLE_LIMITE[4]+1;
__ARRAY_SINGLE_LIMITE[6]=1;
if (__ARRAY_SINGLE_LIMITE[2]&4){
__ARRAY_SINGLE_LIMITE[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_LIMITE[5]*4);
memset((void*)(__ARRAY_SINGLE_LIMITE[0]),0,__ARRAY_SINGLE_LIMITE[5]*4);
}else{
__ARRAY_SINGLE_LIMITE[0]=(unsigned long)calloc(__ARRAY_SINGLE_LIMITE[5]*4,1);
if (!__ARRAY_SINGLE_LIMITE[0]) error(257);
}
__ARRAY_SINGLE_LIMITE[2]|=1;
}
}

if (__ARRAY_SINGLE_ICONT[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_ICONT[2]&1){
error(10);
}else{
__ARRAY_SINGLE_ICONT[4]= 0 ;
__ARRAY_SINGLE_ICONT[5]=(qbr(*__SINGLE_NLMAX))-__ARRAY_SINGLE_ICONT[4]+1;
__ARRAY_SINGLE_ICONT[6]=1;
if (__ARRAY_SINGLE_ICONT[2]&4){
__ARRAY_SINGLE_ICONT[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_ICONT[5]*4);
memset((void*)(__ARRAY_SINGLE_ICONT[0]),0,__ARRAY_SINGLE_ICONT[5]*4);
}else{
__ARRAY_SINGLE_ICONT[0]=(unsigned long)calloc(__ARRAY_SINGLE_ICONT[5]*4,1);
if (!__ARRAY_SINGLE_ICONT[0]) error(257);
}
__ARRAY_SINGLE_ICONT[2]|=1;
}
}
if(!qbevent)break;evnt(11);}while(r);
do{
*__SINGLE_NFAIXASMAX= 4 ;
if(!qbevent)break;evnt(12);}while(r);
do{
*__SINGLE_NPOLOS= 50 ;
if(!qbevent)break;evnt(12);}while(r);
do{
*__SINGLE_NRODOVMAX=*__SINGLE_NPOLOS;
if(!qbevent)break;evnt(12);}while(r);
do{
*__SINGLE_NITENSCUSTO= 16 ;
if(!qbevent)break;evnt(12);}while(r);
do{
*__SINGLE_NEIXOSMAX= 6 ;
if(!qbevent)break;evnt(12);}while(r);
do{

if (__ARRAY_SINGLE_CONSERP[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_CONSERP[2]&1){
error(10);
}else{
__ARRAY_SINGLE_CONSERP[4]= 0 ;
__ARRAY_SINGLE_CONSERP[5]=(qbr(*__SINGLE_NPOLOS))-__ARRAY_SINGLE_CONSERP[4]+1;
__ARRAY_SINGLE_CONSERP[6]=1;
if (__ARRAY_SINGLE_CONSERP[2]&4){
__ARRAY_SINGLE_CONSERP[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_CONSERP[5]*4);
memset((void*)(__ARRAY_SINGLE_CONSERP[0]),0,__ARRAY_SINGLE_CONSERP[5]*4);
}else{
__ARRAY_SINGLE_CONSERP[0]=(unsigned long)calloc(__ARRAY_SINGLE_CONSERP[5]*4,1);
if (!__ARRAY_SINGLE_CONSERP[0]) error(257);
}
__ARRAY_SINGLE_CONSERP[2]|=1;
}
}

if (__ARRAY_STRING_ULTCAMADA[2]&2){
error(10);
}else{
if (__ARRAY_STRING_ULTCAMADA[2]&1){
error(10);
}else{
__ARRAY_STRING_ULTCAMADA[4]= 0 ;
__ARRAY_STRING_ULTCAMADA[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_STRING_ULTCAMADA[4]+1;
__ARRAY_STRING_ULTCAMADA[6]=1;
__ARRAY_STRING_ULTCAMADA[0]=(unsigned long)malloc(__ARRAY_STRING_ULTCAMADA[5]*8);
if (!__ARRAY_STRING_ULTCAMADA[0]) error(257);
__ARRAY_STRING_ULTCAMADA[2]|=1;
tmp_long=__ARRAY_STRING_ULTCAMADA[5];
if (__ARRAY_STRING_ULTCAMADA[2]&4){
while(tmp_long--) ((uint64*)(__ARRAY_STRING_ULTCAMADA[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0);
}else{
while(tmp_long--) ((uint64*)(__ARRAY_STRING_ULTCAMADA[0]))[tmp_long]=(uint64)qbs_new(0,0);
}
}
}

if (__ARRAY_SINGLE_SN[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_SN[2]&1){
error(10);
}else{
__ARRAY_SINGLE_SN[4]= 0 ;
__ARRAY_SINGLE_SN[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_SN[4]+1;
__ARRAY_SINGLE_SN[6]=1;
if (__ARRAY_SINGLE_SN[2]&4){
__ARRAY_SINGLE_SN[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_SN[5]*4);
memset((void*)(__ARRAY_SINGLE_SN[0]),0,__ARRAY_SINGLE_SN[5]*4);
}else{
__ARRAY_SINGLE_SN[0]=(unsigned long)calloc(__ARRAY_SINGLE_SN[5]*4,1);
if (!__ARRAY_SINGLE_SN[0]) error(257);
}
__ARRAY_SINGLE_SN[2]|=1;
}
}
if(!qbevent)break;evnt(13);}while(r);
do{

if (__ARRAY_STRING_ITEM[2]&2){
error(10);
}else{
if (__ARRAY_STRING_ITEM[2]&1){
error(10);
}else{
__ARRAY_STRING_ITEM[4]= 0 ;
__ARRAY_STRING_ITEM[5]=(qbr(*__SINGLE_NITENSCUSTO))-__ARRAY_STRING_ITEM[4]+1;
__ARRAY_STRING_ITEM[6]=1;
__ARRAY_STRING_ITEM[0]=(unsigned long)malloc(__ARRAY_STRING_ITEM[5]*8);
if (!__ARRAY_STRING_ITEM[0]) error(257);
__ARRAY_STRING_ITEM[2]|=1;
tmp_long=__ARRAY_STRING_ITEM[5];
if (__ARRAY_STRING_ITEM[2]&4){
while(tmp_long--) ((uint64*)(__ARRAY_STRING_ITEM[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0);
}else{
while(tmp_long--) ((uint64*)(__ARRAY_STRING_ITEM[0]))[tmp_long]=(uint64)qbs_new(0,0);
}
}
}

if (__ARRAY_STRING_UNIDADEITEM[2]&2){
error(10);
}else{
if (__ARRAY_STRING_UNIDADEITEM[2]&1){
error(10);
}else{
__ARRAY_STRING_UNIDADEITEM[4]= 0 ;
__ARRAY_STRING_UNIDADEITEM[5]=(qbr(*__SINGLE_NITENSCUSTO))-__ARRAY_STRING_UNIDADEITEM[4]+1;
__ARRAY_STRING_UNIDADEITEM[6]=1;
__ARRAY_STRING_UNIDADEITEM[0]=(unsigned long)malloc(__ARRAY_STRING_UNIDADEITEM[5]*8);
if (!__ARRAY_STRING_UNIDADEITEM[0]) error(257);
__ARRAY_STRING_UNIDADEITEM[2]|=1;
tmp_long=__ARRAY_STRING_UNIDADEITEM[5];
if (__ARRAY_STRING_UNIDADEITEM[2]&4){
while(tmp_long--) ((uint64*)(__ARRAY_STRING_UNIDADEITEM[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0);
}else{
while(tmp_long--) ((uint64*)(__ARRAY_STRING_UNIDADEITEM[0]))[tmp_long]=(uint64)qbs_new(0,0);
}
}
}

if (__ARRAY_SINGLE_VDMUNI[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_VDMUNI[2]&1){
error(10);
}else{
__ARRAY_SINGLE_VDMUNI[4]= 0 ;
__ARRAY_SINGLE_VDMUNI[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_VDMUNI[4]+1;
__ARRAY_SINGLE_VDMUNI[6]=1;
if (__ARRAY_SINGLE_VDMUNI[2]&4){
__ARRAY_SINGLE_VDMUNI[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_VDMUNI[5]*4);
memset((void*)(__ARRAY_SINGLE_VDMUNI[0]),0,__ARRAY_SINGLE_VDMUNI[5]*4);
}else{
__ARRAY_SINGLE_VDMUNI[0]=(unsigned long)calloc(__ARRAY_SINGLE_VDMUNI[5]*4,1);
if (!__ARRAY_SINGLE_VDMUNI[0]) error(257);
}
__ARRAY_SINGLE_VDMUNI[2]|=1;
}
}
if(!qbevent)break;evnt(14);}while(r);
do{

if (__ARRAY_STRING_REVEST[2]&2){
error(10);
}else{
if (__ARRAY_STRING_REVEST[2]&1){
error(10);
}else{
__ARRAY_STRING_REVEST[4]= 0 ;
__ARRAY_STRING_REVEST[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_STRING_REVEST[4]+1;
__ARRAY_STRING_REVEST[6]=1;
__ARRAY_STRING_REVEST[0]=(unsigned long)malloc(__ARRAY_STRING_REVEST[5]*8);
if (!__ARRAY_STRING_REVEST[0]) error(257);
__ARRAY_STRING_REVEST[2]|=1;
tmp_long=__ARRAY_STRING_REVEST[5];
if (__ARRAY_STRING_REVEST[2]&4){
while(tmp_long--) ((uint64*)(__ARRAY_STRING_REVEST[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0);
}else{
while(tmp_long--) ((uint64*)(__ARRAY_STRING_REVEST[0]))[tmp_long]=(uint64)qbs_new(0,0);
}
}
}

if (__ARRAY_SINGLE_NACUM[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_NACUM[2]&1){
error(10);
}else{
__ARRAY_SINGLE_NACUM[4]= 0 ;
__ARRAY_SINGLE_NACUM[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_NACUM[4]+1;
__ARRAY_SINGLE_NACUM[6]=1;
if (__ARRAY_SINGLE_NACUM[2]&4){
__ARRAY_SINGLE_NACUM[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_NACUM[5]*4);
memset((void*)(__ARRAY_SINGLE_NACUM[0]),0,__ARRAY_SINGLE_NACUM[5]*4);
}else{
__ARRAY_SINGLE_NACUM[0]=(unsigned long)calloc(__ARRAY_SINGLE_NACUM[5]*4,1);
if (!__ARRAY_SINGLE_NACUM[0]) error(257);
}
__ARRAY_SINGLE_NACUM[2]|=1;
}
}

if (__ARRAY_SINGLE_VIDARES[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_VIDARES[2]&1){
error(10);
}else{
__ARRAY_SINGLE_VIDARES[4]= 0 ;
__ARRAY_SINGLE_VIDARES[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_VIDARES[4]+1;
__ARRAY_SINGLE_VIDARES[6]=1;
if (__ARRAY_SINGLE_VIDARES[2]&4){
__ARRAY_SINGLE_VIDARES[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_VIDARES[5]*4);
memset((void*)(__ARRAY_SINGLE_VIDARES[0]),0,__ARRAY_SINGLE_VIDARES[5]*4);
}else{
__ARRAY_SINGLE_VIDARES[0]=(unsigned long)calloc(__ARRAY_SINGLE_VIDARES[5]*4,1);
if (!__ARRAY_SINGLE_VIDARES[0]) error(257);
}
__ARRAY_SINGLE_VIDARES[2]|=1;
}
}

if (__ARRAY_SINGLE_COTAFAIXA[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_COTAFAIXA[2]&1){
error(10);
}else{
__ARRAY_SINGLE_COTAFAIXA[4]= 0 ;
__ARRAY_SINGLE_COTAFAIXA[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_COTAFAIXA[4]+1;
__ARRAY_SINGLE_COTAFAIXA[6]=1;
if (__ARRAY_SINGLE_COTAFAIXA[2]&4){
__ARRAY_SINGLE_COTAFAIXA[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_COTAFAIXA[5]*4);
memset((void*)(__ARRAY_SINGLE_COTAFAIXA[0]),0,__ARRAY_SINGLE_COTAFAIXA[5]*4);
}else{
__ARRAY_SINGLE_COTAFAIXA[0]=(unsigned long)calloc(__ARRAY_SINGLE_COTAFAIXA[5]*4,1);
if (!__ARRAY_SINGLE_COTAFAIXA[0]) error(257);
}
__ARRAY_SINGLE_COTAFAIXA[2]|=1;
}
}
if(!qbevent)break;evnt(15);}while(r);
do{

if (__ARRAY_SINGLE_ALFAIGG[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_ALFAIGG[2]&1){
error(10);
}else{
__ARRAY_SINGLE_ALFAIGG[4]= 0 ;
__ARRAY_SINGLE_ALFAIGG[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_ALFAIGG[4]+1;
__ARRAY_SINGLE_ALFAIGG[6]=1;
if (__ARRAY_SINGLE_ALFAIGG[2]&4){
__ARRAY_SINGLE_ALFAIGG[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_ALFAIGG[5]*4);
memset((void*)(__ARRAY_SINGLE_ALFAIGG[0]),0,__ARRAY_SINGLE_ALFAIGG[5]*4);
}else{
__ARRAY_SINGLE_ALFAIGG[0]=(unsigned long)calloc(__ARRAY_SINGLE_ALFAIGG[5]*4,1);
if (!__ARRAY_SINGLE_ALFAIGG[0]) error(257);
}
__ARRAY_SINGLE_ALFAIGG[2]|=1;
}
}

if (__ARRAY_STRING_RESTAURADO[2]&2){
error(10);
}else{
if (__ARRAY_STRING_RESTAURADO[2]&1){
error(10);
}else{
__ARRAY_STRING_RESTAURADO[4]= 0 ;
__ARRAY_STRING_RESTAURADO[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_STRING_RESTAURADO[4]+1;
__ARRAY_STRING_RESTAURADO[6]=1;
__ARRAY_STRING_RESTAURADO[0]=(unsigned long)malloc(__ARRAY_STRING_RESTAURADO[5]*8);
if (!__ARRAY_STRING_RESTAURADO[0]) error(257);
__ARRAY_STRING_RESTAURADO[2]|=1;
tmp_long=__ARRAY_STRING_RESTAURADO[5];
if (__ARRAY_STRING_RESTAURADO[2]&4){
while(tmp_long--) ((uint64*)(__ARRAY_STRING_RESTAURADO[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0);
}else{
while(tmp_long--) ((uint64*)(__ARRAY_STRING_RESTAURADO[0]))[tmp_long]=(uint64)qbs_new(0,0);
}
}
}

if (__ARRAY_SINGLE_PSINOVO[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_PSINOVO[2]&1){
error(10);
}else{
__ARRAY_SINGLE_PSINOVO[4]= 0 ;
__ARRAY_SINGLE_PSINOVO[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_PSINOVO[4]+1;
__ARRAY_SINGLE_PSINOVO[6]=1;
if (__ARRAY_SINGLE_PSINOVO[2]&4){
__ARRAY_SINGLE_PSINOVO[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_PSINOVO[5]*4);
memset((void*)(__ARRAY_SINGLE_PSINOVO[0]),0,__ARRAY_SINGLE_PSINOVO[5]*4);
}else{
__ARRAY_SINGLE_PSINOVO[0]=(unsigned long)calloc(__ARRAY_SINGLE_PSINOVO[5]*4,1);
if (!__ARRAY_SINGLE_PSINOVO[0]) error(257);
}
__ARRAY_SINGLE_PSINOVO[2]|=1;
}
}
if(!qbevent)break;evnt(16);}while(r);
do{

if (__ARRAY_SINGLE_QIMED[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_QIMED[2]&1){
error(10);
}else{
__ARRAY_SINGLE_QIMED[4]= 0 ;
__ARRAY_SINGLE_QIMED[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_QIMED[4]+1;
__ARRAY_SINGLE_QIMED[6]=1;
if (__ARRAY_SINGLE_QIMED[2]&4){
__ARRAY_SINGLE_QIMED[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_QIMED[5]*4);
memset((void*)(__ARRAY_SINGLE_QIMED[0]),0,__ARRAY_SINGLE_QIMED[5]*4);
}else{
__ARRAY_SINGLE_QIMED[0]=(unsigned long)calloc(__ARRAY_SINGLE_QIMED[5]*4,1);
if (!__ARRAY_SINGLE_QIMED[0]) error(257);
}
__ARRAY_SINGLE_QIMED[2]|=1;
}
}

if (__ARRAY_SINGLE_H1REV[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_H1REV[2]&1){
error(10);
}else{
__ARRAY_SINGLE_H1REV[4]= 0 ;
__ARRAY_SINGLE_H1REV[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_H1REV[4]+1;
__ARRAY_SINGLE_H1REV[6]=1;
if (__ARRAY_SINGLE_H1REV[2]&4){
__ARRAY_SINGLE_H1REV[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_H1REV[5]*4);
memset((void*)(__ARRAY_SINGLE_H1REV[0]),0,__ARRAY_SINGLE_H1REV[5]*4);
}else{
__ARRAY_SINGLE_H1REV[0]=(unsigned long)calloc(__ARRAY_SINGLE_H1REV[5]*4,1);
if (!__ARRAY_SINGLE_H1REV[0]) error(257);
}
__ARRAY_SINGLE_H1REV[2]|=1;
}
}

if (__ARRAY_SINGLE_HRECEXIST[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_HRECEXIST[2]&1){
error(10);
}else{
__ARRAY_SINGLE_HRECEXIST[4]= 0 ;
__ARRAY_SINGLE_HRECEXIST[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_HRECEXIST[4]+1;
__ARRAY_SINGLE_HRECEXIST[6]=1;
if (__ARRAY_SINGLE_HRECEXIST[2]&4){
__ARRAY_SINGLE_HRECEXIST[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_HRECEXIST[5]*4);
memset((void*)(__ARRAY_SINGLE_HRECEXIST[0]),0,__ARRAY_SINGLE_HRECEXIST[5]*4);
}else{
__ARRAY_SINGLE_HRECEXIST[0]=(unsigned long)calloc(__ARRAY_SINGLE_HRECEXIST[5]*4,1);
if (!__ARRAY_SINGLE_HRECEXIST[0]) error(257);
}
__ARRAY_SINGLE_HRECEXIST[2]|=1;
}
}

if (__ARRAY_SINGLE_VRMED[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_VRMED[2]&1){
error(10);
}else{
__ARRAY_SINGLE_VRMED[4]= 0 ;
__ARRAY_SINGLE_VRMED[5]=(qbr(*__SINGLE_NPERIODOS))-__ARRAY_SINGLE_VRMED[4]+1;
__ARRAY_SINGLE_VRMED[6]=1;
if (__ARRAY_SINGLE_VRMED[2]&4){
__ARRAY_SINGLE_VRMED[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_VRMED[5]*4);
memset((void*)(__ARRAY_SINGLE_VRMED[0]),0,__ARRAY_SINGLE_VRMED[5]*4);
}else{
__ARRAY_SINGLE_VRMED[0]=(unsigned long)calloc(__ARRAY_SINGLE_VRMED[5]*4,1);
if (!__ARRAY_SINGLE_VRMED[0]) error(257);
}
__ARRAY_SINGLE_VRMED[2]|=1;
}
}
if(!qbevent)break;evnt(17);}while(r);
do{

if (__ARRAY_SINGLE_IDADE[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_IDADE[2]&1){
error(10);
}else{
__ARRAY_SINGLE_IDADE[4]= 0 ;
__ARRAY_SINGLE_IDADE[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_IDADE[4]+1;
__ARRAY_SINGLE_IDADE[6]=1;
if (__ARRAY_SINGLE_IDADE[2]&4){
__ARRAY_SINGLE_IDADE[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_IDADE[5]*4);
memset((void*)(__ARRAY_SINGLE_IDADE[0]),0,__ARRAY_SINGLE_IDADE[5]*4);
}else{
__ARRAY_SINGLE_IDADE[0]=(unsigned long)calloc(__ARRAY_SINGLE_IDADE[5]*4,1);
if (!__ARRAY_SINGLE_IDADE[0]) error(257);
}
__ARRAY_SINGLE_IDADE[2]|=1;
}
}

if (__ARRAY_SINGLE_PSIAT[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_PSIAT[2]&1){
error(10);
}else{
__ARRAY_SINGLE_PSIAT[4]= 0 ;
__ARRAY_SINGLE_PSIAT[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_PSIAT[4]+1;
__ARRAY_SINGLE_PSIAT[6]=1;
if (__ARRAY_SINGLE_PSIAT[2]&4){
__ARRAY_SINGLE_PSIAT[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_PSIAT[5]*4);
memset((void*)(__ARRAY_SINGLE_PSIAT[0]),0,__ARRAY_SINGLE_PSIAT[5]*4);
}else{
__ARRAY_SINGLE_PSIAT[0]=(unsigned long)calloc(__ARRAY_SINGLE_PSIAT[5]*4,1);
if (!__ARRAY_SINGLE_PSIAT[0]) error(257);
}
__ARRAY_SINGLE_PSIAT[2]|=1;
}
}

if (__ARRAY_SINGLE_NANO[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_NANO[2]&1){
error(10);
}else{
__ARRAY_SINGLE_NANO[4]= 0 ;
__ARRAY_SINGLE_NANO[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_NANO[4]+1;
__ARRAY_SINGLE_NANO[6]=1;
if (__ARRAY_SINGLE_NANO[2]&4){
__ARRAY_SINGLE_NANO[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_NANO[5]*4);
memset((void*)(__ARRAY_SINGLE_NANO[0]),0,__ARRAY_SINGLE_NANO[5]*4);
}else{
__ARRAY_SINGLE_NANO[0]=(unsigned long)calloc(__ARRAY_SINGLE_NANO[5]*4,1);
if (!__ARRAY_SINGLE_NANO[0]) error(257);
}
__ARRAY_SINGLE_NANO[2]|=1;
}
}

if (__ARRAY_SINGLE_PPREST[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_PPREST[2]&1){
error(10);
}else{
__ARRAY_SINGLE_PPREST[4]= 0 ;
__ARRAY_SINGLE_PPREST[5]=(qbr(*__SINGLE_NPERIODOS))-__ARRAY_SINGLE_PPREST[4]+1;
__ARRAY_SINGLE_PPREST[6]=1;
if (__ARRAY_SINGLE_PPREST[2]&4){
__ARRAY_SINGLE_PPREST[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_PPREST[5]*4);
memset((void*)(__ARRAY_SINGLE_PPREST[0]),0,__ARRAY_SINGLE_PPREST[5]*4);
}else{
__ARRAY_SINGLE_PPREST[0]=(unsigned long)calloc(__ARRAY_SINGLE_PPREST[5]*4,1);
if (!__ARRAY_SINGLE_PPREST[0]) error(257);
}
__ARRAY_SINGLE_PPREST[2]|=1;
}
}
if(!qbevent)break;evnt(18);}while(r);
do{

if (__ARRAY_SINGLE_RESTRANUAL[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_RESTRANUAL[2]&1){
error(10);
}else{
__ARRAY_SINGLE_RESTRANUAL[4]= 0 ;
__ARRAY_SINGLE_RESTRANUAL[5]=(qbr(*__SINGLE_NPERIODOS))-__ARRAY_SINGLE_RESTRANUAL[4]+1;
__ARRAY_SINGLE_RESTRANUAL[6]=1;
if (__ARRAY_SINGLE_RESTRANUAL[2]&4){
__ARRAY_SINGLE_RESTRANUAL[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_RESTRANUAL[5]*4);
memset((void*)(__ARRAY_SINGLE_RESTRANUAL[0]),0,__ARRAY_SINGLE_RESTRANUAL[5]*4);
}else{
__ARRAY_SINGLE_RESTRANUAL[0]=(unsigned long)calloc(__ARRAY_SINGLE_RESTRANUAL[5]*4,1);
if (!__ARRAY_SINGLE_RESTRANUAL[0]) error(257);
}
__ARRAY_SINGLE_RESTRANUAL[2]|=1;
}
}

if (__ARRAY_SINGLE_RESTRPOLO[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_RESTRPOLO[2]&1){
error(10);
}else{
__ARRAY_SINGLE_RESTRPOLO[8]= 0 ;
__ARRAY_SINGLE_RESTRPOLO[9]=(qbr(*__SINGLE_NPOLOS))-__ARRAY_SINGLE_RESTRPOLO[8]+1;
__ARRAY_SINGLE_RESTRPOLO[10]=1;
__ARRAY_SINGLE_RESTRPOLO[4]= 0 ;
__ARRAY_SINGLE_RESTRPOLO[5]=(qbr(*__SINGLE_NPERIODOS))-__ARRAY_SINGLE_RESTRPOLO[4]+1;
__ARRAY_SINGLE_RESTRPOLO[6]=__ARRAY_SINGLE_RESTRPOLO[10]*__ARRAY_SINGLE_RESTRPOLO[9];
if (__ARRAY_SINGLE_RESTRPOLO[2]&4){
__ARRAY_SINGLE_RESTRPOLO[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_RESTRPOLO[5]*__ARRAY_SINGLE_RESTRPOLO[9]*4);
memset((void*)(__ARRAY_SINGLE_RESTRPOLO[0]),0,__ARRAY_SINGLE_RESTRPOLO[5]*__ARRAY_SINGLE_RESTRPOLO[9]*4);
}else{
__ARRAY_SINGLE_RESTRPOLO[0]=(unsigned long)calloc(__ARRAY_SINGLE_RESTRPOLO[5]*__ARRAY_SINGLE_RESTRPOLO[9]*4,1);
if (!__ARRAY_SINGLE_RESTRPOLO[0]) error(257);
}
__ARRAY_SINGLE_RESTRPOLO[2]|=1;
}
}
if(!qbevent)break;evnt(19);}while(r);
do{

if (__ARRAY_SINGLE_PSIMED[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_PSIMED[2]&1){
error(10);
}else{
__ARRAY_SINGLE_PSIMED[4]= 0 ;
__ARRAY_SINGLE_PSIMED[5]=(qbr(*__SINGLE_NPERIODOS))-__ARRAY_SINGLE_PSIMED[4]+1;
__ARRAY_SINGLE_PSIMED[6]=1;
if (__ARRAY_SINGLE_PSIMED[2]&4){
__ARRAY_SINGLE_PSIMED[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_PSIMED[5]*4);
memset((void*)(__ARRAY_SINGLE_PSIMED[0]),0,__ARRAY_SINGLE_PSIMED[5]*4);
}else{
__ARRAY_SINGLE_PSIMED[0]=(unsigned long)calloc(__ARRAY_SINGLE_PSIMED[5]*4,1);
if (!__ARRAY_SINGLE_PSIMED[0]) error(257);
}
__ARRAY_SINGLE_PSIMED[2]|=1;
}
}

if (__ARRAY_SINGLE_CUSTOFAIXA[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_CUSTOFAIXA[2]&1){
error(10);
}else{
__ARRAY_SINGLE_CUSTOFAIXA[4]= 0 ;
__ARRAY_SINGLE_CUSTOFAIXA[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_CUSTOFAIXA[4]+1;
__ARRAY_SINGLE_CUSTOFAIXA[6]=1;
if (__ARRAY_SINGLE_CUSTOFAIXA[2]&4){
__ARRAY_SINGLE_CUSTOFAIXA[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_CUSTOFAIXA[5]*4);
memset((void*)(__ARRAY_SINGLE_CUSTOFAIXA[0]),0,__ARRAY_SINGLE_CUSTOFAIXA[5]*4);
}else{
__ARRAY_SINGLE_CUSTOFAIXA[0]=(unsigned long)calloc(__ARRAY_SINGLE_CUSTOFAIXA[5]*4,1);
if (!__ARRAY_SINGLE_CUSTOFAIXA[0]) error(257);
}
__ARRAY_SINGLE_CUSTOFAIXA[2]|=1;
}
}

if (__ARRAY_SINGLE_AREAM2[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_AREAM2[2]&1){
error(10);
}else{
__ARRAY_SINGLE_AREAM2[4]= 0 ;
__ARRAY_SINGLE_AREAM2[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_AREAM2[4]+1;
__ARRAY_SINGLE_AREAM2[6]=1;
if (__ARRAY_SINGLE_AREAM2[2]&4){
__ARRAY_SINGLE_AREAM2[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_AREAM2[5]*4);
memset((void*)(__ARRAY_SINGLE_AREAM2[0]),0,__ARRAY_SINGLE_AREAM2[5]*4);
}else{
__ARRAY_SINGLE_AREAM2[0]=(unsigned long)calloc(__ARRAY_SINGLE_AREAM2[5]*4,1);
if (!__ARRAY_SINGLE_AREAM2[0]) error(257);
}
__ARRAY_SINGLE_AREAM2[2]|=1;
}
}
if(!qbevent)break;evnt(20);}while(r);
do{

if (__ARRAY_STRING_MEDIDAF[2]&2){
error(10);
}else{
if (__ARRAY_STRING_MEDIDAF[2]&1){
error(10);
}else{
__ARRAY_STRING_MEDIDAF[4]= 0 ;
__ARRAY_STRING_MEDIDAF[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_STRING_MEDIDAF[4]+1;
__ARRAY_STRING_MEDIDAF[6]=1;
__ARRAY_STRING_MEDIDAF[0]=(unsigned long)malloc(__ARRAY_STRING_MEDIDAF[5]*8);
if (!__ARRAY_STRING_MEDIDAF[0]) error(257);
__ARRAY_STRING_MEDIDAF[2]|=1;
tmp_long=__ARRAY_STRING_MEDIDAF[5];
if (__ARRAY_STRING_MEDIDAF[2]&4){
while(tmp_long--) ((uint64*)(__ARRAY_STRING_MEDIDAF[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0);
}else{
while(tmp_long--) ((uint64*)(__ARRAY_STRING_MEDIDAF[0]))[tmp_long]=(uint64)qbs_new(0,0);
}
}
}

if (__ARRAY_SINGLE_HFRES[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_HFRES[2]&1){
error(10);
}else{
__ARRAY_SINGLE_HFRES[4]= 0 ;
__ARRAY_SINGLE_HFRES[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_HFRES[4]+1;
__ARRAY_SINGLE_HFRES[6]=1;
if (__ARRAY_SINGLE_HFRES[2]&4){
__ARRAY_SINGLE_HFRES[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_HFRES[5]*4);
memset((void*)(__ARRAY_SINGLE_HFRES[0]),0,__ARRAY_SINGLE_HFRES[5]*4);
}else{
__ARRAY_SINGLE_HFRES[0]=(unsigned long)calloc(__ARRAY_SINGLE_HFRES[5]*4,1);
if (!__ARRAY_SINGLE_HFRES[0]) error(257);
}
__ARRAY_SINGLE_HFRES[2]|=1;
}
}

if (__ARRAY_SINGLE_HREC[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_HREC[2]&1){
error(10);
}else{
__ARRAY_SINGLE_HREC[4]= 0 ;
__ARRAY_SINGLE_HREC[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_HREC[4]+1;
__ARRAY_SINGLE_HREC[6]=1;
if (__ARRAY_SINGLE_HREC[2]&4){
__ARRAY_SINGLE_HREC[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_HREC[5]*4);
memset((void*)(__ARRAY_SINGLE_HREC[0]),0,__ARRAY_SINGLE_HREC[5]*4);
}else{
__ARRAY_SINGLE_HREC[0]=(unsigned long)calloc(__ARRAY_SINGLE_HREC[5]*4,1);
if (!__ARRAY_SINGLE_HREC[0]) error(257);
}
__ARRAY_SINGLE_HREC[2]|=1;
}
}

if (__ARRAY_STRING_DIAGS[2]&2){
error(10);
}else{
if (__ARRAY_STRING_DIAGS[2]&1){
error(10);
}else{
__ARRAY_STRING_DIAGS[4]= 0 ;
__ARRAY_STRING_DIAGS[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_STRING_DIAGS[4]+1;
__ARRAY_STRING_DIAGS[6]=1;
__ARRAY_STRING_DIAGS[0]=(unsigned long)malloc(__ARRAY_STRING_DIAGS[5]*8);
if (!__ARRAY_STRING_DIAGS[0]) error(257);
__ARRAY_STRING_DIAGS[2]|=1;
tmp_long=__ARRAY_STRING_DIAGS[5];
if (__ARRAY_STRING_DIAGS[2]&4){
while(tmp_long--) ((uint64*)(__ARRAY_STRING_DIAGS[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0);
}else{
while(tmp_long--) ((uint64*)(__ARRAY_STRING_DIAGS[0]))[tmp_long]=(uint64)qbs_new(0,0);
}
}
}
if(!qbevent)break;evnt(21);}while(r);
do{

if (__ARRAY_SINGLE_VSMIN[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_VSMIN[2]&1){
error(10);
}else{
__ARRAY_SINGLE_VSMIN[4]= 0 ;
__ARRAY_SINGLE_VSMIN[5]=(qbr(*__SINGLE_NPP))-__ARRAY_SINGLE_VSMIN[4]+1;
__ARRAY_SINGLE_VSMIN[6]=1;
if (__ARRAY_SINGLE_VSMIN[2]&4){
__ARRAY_SINGLE_VSMIN[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_VSMIN[5]*4);
memset((void*)(__ARRAY_SINGLE_VSMIN[0]),0,__ARRAY_SINGLE_VSMIN[5]*4);
}else{
__ARRAY_SINGLE_VSMIN[0]=(unsigned long)calloc(__ARRAY_SINGLE_VSMIN[5]*4,1);
if (!__ARRAY_SINGLE_VSMIN[0]) error(257);
}
__ARRAY_SINGLE_VSMIN[2]|=1;
}
}

if (__ARRAY_SINGLE_NPSI[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_NPSI[2]&1){
error(10);
}else{
__ARRAY_SINGLE_NPSI[4]= 0 ;
__ARRAY_SINGLE_NPSI[5]=(qbr(*__SINGLE_NPERIODOS))-__ARRAY_SINGLE_NPSI[4]+1;
__ARRAY_SINGLE_NPSI[6]=1;
if (__ARRAY_SINGLE_NPSI[2]&4){
__ARRAY_SINGLE_NPSI[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_NPSI[5]*4);
memset((void*)(__ARRAY_SINGLE_NPSI[0]),0,__ARRAY_SINGLE_NPSI[5]*4);
}else{
__ARRAY_SINGLE_NPSI[0]=(unsigned long)calloc(__ARRAY_SINGLE_NPSI[5]*4,1);
if (!__ARRAY_SINGLE_NPSI[0]) error(257);
}
__ARRAY_SINGLE_NPSI[2]|=1;
}
}

if (__ARRAY_SINGLE_PAR[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_PAR[2]&1){
error(10);
}else{
__ARRAY_SINGLE_PAR[4]= 0 ;
__ARRAY_SINGLE_PAR[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_PAR[4]+1;
__ARRAY_SINGLE_PAR[6]=1;
if (__ARRAY_SINGLE_PAR[2]&4){
__ARRAY_SINGLE_PAR[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_PAR[5]*4);
memset((void*)(__ARRAY_SINGLE_PAR[0]),0,__ARRAY_SINGLE_PAR[5]*4);
}else{
__ARRAY_SINGLE_PAR[0]=(unsigned long)calloc(__ARRAY_SINGLE_PAR[5]*4,1);
if (!__ARRAY_SINGLE_PAR[0]) error(257);
}
__ARRAY_SINGLE_PAR[2]|=1;
}
}

if (__ARRAY_SINGLE_IDS[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_IDS[2]&1){
error(10);
}else{
__ARRAY_SINGLE_IDS[4]= 0 ;
__ARRAY_SINGLE_IDS[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_IDS[4]+1;
__ARRAY_SINGLE_IDS[6]=1;
if (__ARRAY_SINGLE_IDS[2]&4){
__ARRAY_SINGLE_IDS[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_IDS[5]*4);
memset((void*)(__ARRAY_SINGLE_IDS[0]),0,__ARRAY_SINGLE_IDS[5]*4);
}else{
__ARRAY_SINGLE_IDS[0]=(unsigned long)calloc(__ARRAY_SINGLE_IDS[5]*4,1);
if (!__ARRAY_SINGLE_IDS[0]) error(257);
}
__ARRAY_SINGLE_IDS[2]|=1;
}
}
if(!qbevent)break;evnt(22);}while(r);
do{

if (__ARRAY_SINGLE_IRI0[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_IRI0[2]&1){
error(10);
}else{
__ARRAY_SINGLE_IRI0[4]= 0 ;
__ARRAY_SINGLE_IRI0[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_IRI0[4]+1;
__ARRAY_SINGLE_IRI0[6]=1;
if (__ARRAY_SINGLE_IRI0[2]&4){
__ARRAY_SINGLE_IRI0[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_IRI0[5]*4);
memset((void*)(__ARRAY_SINGLE_IRI0[0]),0,__ARRAY_SINGLE_IRI0[5]*4);
}else{
__ARRAY_SINGLE_IRI0[0]=(unsigned long)calloc(__ARRAY_SINGLE_IRI0[5]*4,1);
if (!__ARRAY_SINGLE_IRI0[0]) error(257);
}
__ARRAY_SINGLE_IRI0[2]|=1;
}
}

if (__ARRAY_SINGLE_ALPHA[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_ALPHA[2]&1){
error(10);
}else{
__ARRAY_SINGLE_ALPHA[4]= 0 ;
__ARRAY_SINGLE_ALPHA[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_ALPHA[4]+1;
__ARRAY_SINGLE_ALPHA[6]=1;
if (__ARRAY_SINGLE_ALPHA[2]&4){
__ARRAY_SINGLE_ALPHA[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_ALPHA[5]*4);
memset((void*)(__ARRAY_SINGLE_ALPHA[0]),0,__ARRAY_SINGLE_ALPHA[5]*4);
}else{
__ARRAY_SINGLE_ALPHA[0]=(unsigned long)calloc(__ARRAY_SINGLE_ALPHA[5]*4,1);
if (!__ARRAY_SINGLE_ALPHA[0]) error(257);
}
__ARRAY_SINGLE_ALPHA[2]|=1;
}
}
if(!qbevent)break;evnt(23);}while(r);
do{

if (__ARRAY_SINGLE_EXECF[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_EXECF[2]&1){
error(10);
}else{
__ARRAY_SINGLE_EXECF[4]= 0 ;
__ARRAY_SINGLE_EXECF[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_EXECF[4]+1;
__ARRAY_SINGLE_EXECF[6]=1;
if (__ARRAY_SINGLE_EXECF[2]&4){
__ARRAY_SINGLE_EXECF[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_EXECF[5]*4);
memset((void*)(__ARRAY_SINGLE_EXECF[0]),0,__ARRAY_SINGLE_EXECF[5]*4);
}else{
__ARRAY_SINGLE_EXECF[0]=(unsigned long)calloc(__ARRAY_SINGLE_EXECF[5]*4,1);
if (!__ARRAY_SINGLE_EXECF[0]) error(257);
}
__ARRAY_SINGLE_EXECF[2]|=1;
}
}

if (__ARRAY_SINGLE_NEWRESTP[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_NEWRESTP[2]&1){
error(10);
}else{
__ARRAY_SINGLE_NEWRESTP[4]= 0 ;
__ARRAY_SINGLE_NEWRESTP[5]=(qbr(*__SINGLE_NPOLOS))-__ARRAY_SINGLE_NEWRESTP[4]+1;
__ARRAY_SINGLE_NEWRESTP[6]=1;
if (__ARRAY_SINGLE_NEWRESTP[2]&4){
__ARRAY_SINGLE_NEWRESTP[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_NEWRESTP[5]*4);
memset((void*)(__ARRAY_SINGLE_NEWRESTP[0]),0,__ARRAY_SINGLE_NEWRESTP[5]*4);
}else{
__ARRAY_SINGLE_NEWRESTP[0]=(unsigned long)calloc(__ARRAY_SINGLE_NEWRESTP[5]*4,1);
if (!__ARRAY_SINGLE_NEWRESTP[0]) error(257);
}
__ARRAY_SINGLE_NEWRESTP[2]|=1;
}
}

if (__ARRAY_SINGLE_CUSTOCLP[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_CUSTOCLP[2]&1){
error(10);
}else{
__ARRAY_SINGLE_CUSTOCLP[4]= 0 ;
__ARRAY_SINGLE_CUSTOCLP[5]=(qbr(*__SINGLE_NPOLOS))-__ARRAY_SINGLE_CUSTOCLP[4]+1;
__ARRAY_SINGLE_CUSTOCLP[6]=1;
if (__ARRAY_SINGLE_CUSTOCLP[2]&4){
__ARRAY_SINGLE_CUSTOCLP[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_CUSTOCLP[5]*4);
memset((void*)(__ARRAY_SINGLE_CUSTOCLP[0]),0,__ARRAY_SINGLE_CUSTOCLP[5]*4);
}else{
__ARRAY_SINGLE_CUSTOCLP[0]=(unsigned long)calloc(__ARRAY_SINGLE_CUSTOCLP[5]*4,1);
if (!__ARRAY_SINGLE_CUSTOCLP[0]) error(257);
}
__ARRAY_SINGLE_CUSTOCLP[2]|=1;
}
}

if (__ARRAY_SINGLE_DEFICIT[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_DEFICIT[2]&1){
error(10);
}else{
__ARRAY_SINGLE_DEFICIT[4]= 0 ;
__ARRAY_SINGLE_DEFICIT[5]=(qbr(*__SINGLE_NPERIODOS))-__ARRAY_SINGLE_DEFICIT[4]+1;
__ARRAY_SINGLE_DEFICIT[6]=1;
if (__ARRAY_SINGLE_DEFICIT[2]&4){
__ARRAY_SINGLE_DEFICIT[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_DEFICIT[5]*4);
memset((void*)(__ARRAY_SINGLE_DEFICIT[0]),0,__ARRAY_SINGLE_DEFICIT[5]*4);
}else{
__ARRAY_SINGLE_DEFICIT[0]=(unsigned long)calloc(__ARRAY_SINGLE_DEFICIT[5]*4,1);
if (!__ARRAY_SINGLE_DEFICIT[0]) error(257);
}
__ARRAY_SINGLE_DEFICIT[2]|=1;
}
}
if(!qbevent)break;evnt(24);}while(r);
do{

if (__ARRAY_SINGLE_IPMAXPOLO[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_IPMAXPOLO[2]&1){
error(10);
}else{
__ARRAY_SINGLE_IPMAXPOLO[4]= 0 ;
__ARRAY_SINGLE_IPMAXPOLO[5]=(qbr(*__SINGLE_NPOLOS))-__ARRAY_SINGLE_IPMAXPOLO[4]+1;
__ARRAY_SINGLE_IPMAXPOLO[6]=1;
if (__ARRAY_SINGLE_IPMAXPOLO[2]&4){
__ARRAY_SINGLE_IPMAXPOLO[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_IPMAXPOLO[5]*4);
memset((void*)(__ARRAY_SINGLE_IPMAXPOLO[0]),0,__ARRAY_SINGLE_IPMAXPOLO[5]*4);
}else{
__ARRAY_SINGLE_IPMAXPOLO[0]=(unsigned long)calloc(__ARRAY_SINGLE_IPMAXPOLO[5]*4,1);
if (!__ARRAY_SINGLE_IPMAXPOLO[0]) error(257);
}
__ARRAY_SINGLE_IPMAXPOLO[2]|=1;
}
}

if (__ARRAY_SINGLE_STHPRIPOLO[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_STHPRIPOLO[2]&1){
error(10);
}else{
__ARRAY_SINGLE_STHPRIPOLO[4]= 0 ;
__ARRAY_SINGLE_STHPRIPOLO[5]=(qbr(*__SINGLE_NPOLOS))-__ARRAY_SINGLE_STHPRIPOLO[4]+1;
__ARRAY_SINGLE_STHPRIPOLO[6]=1;
if (__ARRAY_SINGLE_STHPRIPOLO[2]&4){
__ARRAY_SINGLE_STHPRIPOLO[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_STHPRIPOLO[5]*4);
memset((void*)(__ARRAY_SINGLE_STHPRIPOLO[0]),0,__ARRAY_SINGLE_STHPRIPOLO[5]*4);
}else{
__ARRAY_SINGLE_STHPRIPOLO[0]=(unsigned long)calloc(__ARRAY_SINGLE_STHPRIPOLO[5]*4,1);
if (!__ARRAY_SINGLE_STHPRIPOLO[0]) error(257);
}
__ARRAY_SINGLE_STHPRIPOLO[2]|=1;
}
}

if (__ARRAY_SINGLE_COSTPR[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_COSTPR[2]&1){
error(10);
}else{
__ARRAY_SINGLE_COSTPR[4]= 0 ;
__ARRAY_SINGLE_COSTPR[5]=(qbr(*__SINGLE_NPOLOS))-__ARRAY_SINGLE_COSTPR[4]+1;
__ARRAY_SINGLE_COSTPR[6]=1;
if (__ARRAY_SINGLE_COSTPR[2]&4){
__ARRAY_SINGLE_COSTPR[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_COSTPR[5]*4);
memset((void*)(__ARRAY_SINGLE_COSTPR[0]),0,__ARRAY_SINGLE_COSTPR[5]*4);
}else{
__ARRAY_SINGLE_COSTPR[0]=(unsigned long)calloc(__ARRAY_SINGLE_COSTPR[5]*4,1);
if (!__ARRAY_SINGLE_COSTPR[0]) error(257);
}
__ARRAY_SINGLE_COSTPR[2]|=1;
}
}

if (__ARRAY_SINGLE_CUSTOT[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_CUSTOT[2]&1){
error(10);
}else{
__ARRAY_SINGLE_CUSTOT[4]= 0 ;
__ARRAY_SINGLE_CUSTOT[5]=(qbr(*__SINGLE_NPERIODOS))-__ARRAY_SINGLE_CUSTOT[4]+1;
__ARRAY_SINGLE_CUSTOT[6]=1;
if (__ARRAY_SINGLE_CUSTOT[2]&4){
__ARRAY_SINGLE_CUSTOT[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_CUSTOT[5]*4);
memset((void*)(__ARRAY_SINGLE_CUSTOT[0]),0,__ARRAY_SINGLE_CUSTOT[5]*4);
}else{
__ARRAY_SINGLE_CUSTOT[0]=(unsigned long)calloc(__ARRAY_SINGLE_CUSTOT[5]*4,1);
if (!__ARRAY_SINGLE_CUSTOT[0]) error(257);
}
__ARRAY_SINGLE_CUSTOT[2]|=1;
}
}
if(!qbevent)break;evnt(25);}while(r);
do{
sub_open(qbs_new_txt_len("DIRETOR.DAT",11), 3 ,NULL,NULL, 1 ,NULL,0);
if(!qbevent)break;evnt(28);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39191;
*__SINGLE_ANOBASE=func_file_input_float(tmp_fileno,675282976);
if (new_error) goto skip39191;
skip39191:
revert_input_check();
if(!qbevent)break;evnt(29);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39192;
*__SINGLE_NPERIODOS=func_file_input_float(tmp_fileno,675282976);
if (new_error) goto skip39192;
skip39192:
revert_input_check();
if(!qbevent)break;evnt(30);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39193;
sub_file_input_string(tmp_fileno,__STRING_PROGRAMA);
if (new_error) goto skip39193;
skip39193:
revert_input_check();
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(31);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39194;
sub_file_input_string(tmp_fileno,__STRING_DADOS);
if (new_error) goto skip39194;
skip39194:
revert_input_check();
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(32);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39195;
sub_file_input_string(tmp_fileno,__STRING_CALC);
if (new_error) goto skip39195;
skip39195:
revert_input_check();
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(33);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39196;
sub_file_input_string(tmp_fileno,__STRING_DADOSANOBASE);
if (new_error) goto skip39196;
skip39196:
revert_input_check();
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(34);}while(r);
do{
sub_close( 1 ,1);
if(!qbevent)break;evnt(35);}while(r);
do{
qbs_set(__STRING_ARQUIVO,qbs_add(__STRING_DADOSANOBASE,qbs_new_txt_len("RODOVIAS.DAT",12)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(38);}while(r);
do{
sub_open(__STRING_ARQUIVO, 3 ,NULL,NULL, 1 ,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(39);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39197;
*__SINGLE_NRODOV=func_file_input_float(tmp_fileno,675282976);
if (new_error) goto skip39197;
skip39197:
revert_input_check();
if(!qbevent)break;evnt(40);}while(r);
do{

if (__ARRAY_STRING_RODOV[2]&2){
error(10);
}else{
if (__ARRAY_STRING_RODOV[2]&1){
error(10);
}else{
__ARRAY_STRING_RODOV[4]= 0 ;
__ARRAY_STRING_RODOV[5]=(qbr(*__SINGLE_NRODOV))-__ARRAY_STRING_RODOV[4]+1;
__ARRAY_STRING_RODOV[6]=1;
__ARRAY_STRING_RODOV[0]=(unsigned long)malloc(__ARRAY_STRING_RODOV[5]*8);
if (!__ARRAY_STRING_RODOV[0]) error(257);
__ARRAY_STRING_RODOV[2]|=1;
tmp_long=__ARRAY_STRING_RODOV[5];
if (__ARRAY_STRING_RODOV[2]&4){
while(tmp_long--) ((uint64*)(__ARRAY_STRING_RODOV[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0);
}else{
while(tmp_long--) ((uint64*)(__ARRAY_STRING_RODOV[0]))[tmp_long]=(uint64)qbs_new(0,0);
}
}
}

if (__ARRAY_SINGLE_NSTHRODOV[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_NSTHRODOV[2]&1){
error(10);
}else{
__ARRAY_SINGLE_NSTHRODOV[4]= 0 ;
__ARRAY_SINGLE_NSTHRODOV[5]=(qbr(*__SINGLE_NRODOV))-__ARRAY_SINGLE_NSTHRODOV[4]+1;
__ARRAY_SINGLE_NSTHRODOV[6]=1;
if (__ARRAY_SINGLE_NSTHRODOV[2]&4){
__ARRAY_SINGLE_NSTHRODOV[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_NSTHRODOV[5]*4);
memset((void*)(__ARRAY_SINGLE_NSTHRODOV[0]),0,__ARRAY_SINGLE_NSTHRODOV[5]*4);
}else{
__ARRAY_SINGLE_NSTHRODOV[0]=(unsigned long)calloc(__ARRAY_SINGLE_NSTHRODOV[5]*4,1);
if (!__ARRAY_SINGLE_NSTHRODOV[0]) error(257);
}
__ARRAY_SINGLE_NSTHRODOV[2]|=1;
}
}
if(!qbevent)break;evnt(41);}while(r);
S_37:;
*__SINGLE_I= 1 ;
fornext_value39199=*__SINGLE_I;
fornext_finalvalue39199=*__SINGLE_NRODOV;
fornext_step39199= 1 ;
if (fornext_step39199<0) fornext_step_negative39199=1; else fornext_step_negative39199=0;
if (new_error) goto fornext_error39199;
goto fornext_entrylabel39199;
while(1){
fornext_value39199=fornext_step39199+(*__SINGLE_I);
*__SINGLE_I=fornext_value39199;
fornext_entrylabel39199:
if (fornext_step_negative39199){
if (fornext_value39199<fornext_finalvalue39199) break;
}else{
if (fornext_value39199>fornext_finalvalue39199) break;
}
fornext_error39199:
if(qbevent){evnt(42);if(r)goto S_37;}
do{
tmp_fileno= 1 ;
if (new_error) goto skip39200;
sub_file_input_string(tmp_fileno,((qbs*)(((uint64*)(__ARRAY_STRING_RODOV[0]))[array_check((qbr(*__SINGLE_I))-__ARRAY_STRING_RODOV[4],__ARRAY_STRING_RODOV[5])])));
if (new_error) goto skip39200;
skip39200:
revert_input_check();
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(43);}while(r);
}
fornext_exit_39198:;
do{
sub_close( 1 ,1);
if(!qbevent)break;evnt(45);}while(r);
do{
qbs_set(__STRING_ARQUIVO,qbs_add(__STRING_CALC,qbs_new_txt_len("NSTHROD.OUT",11)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(48);}while(r);
do{
sub_open(__STRING_ARQUIVO, 3 ,NULL,NULL, 1 ,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(49);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39201;
*__SINGLE_NSTHMAX=func_file_input_float(tmp_fileno,675282976);
if (new_error) goto skip39201;
skip39201:
revert_input_check();
if(!qbevent)break;evnt(50);}while(r);
S_44:;
*__SINGLE_I= 1 ;
fornext_value39203=*__SINGLE_I;
fornext_finalvalue39203=*__SINGLE_NRODOV;
fornext_step39203= 1 ;
if (fornext_step39203<0) fornext_step_negative39203=1; else fornext_step_negative39203=0;
if (new_error) goto fornext_error39203;
goto fornext_entrylabel39203;
while(1){
fornext_value39203=fornext_step39203+(*__SINGLE_I);
*__SINGLE_I=fornext_value39203;
fornext_entrylabel39203:
if (fornext_step_negative39203){
if (fornext_value39203<fornext_finalvalue39203) break;
}else{
if (fornext_value39203>fornext_finalvalue39203) break;
}
fornext_error39203:
if(qbevent){evnt(51);if(r)goto S_44;}
do{
tmp_fileno= 1 ;
if (new_error) goto skip39204;
tmp_long=array_check((qbr(*__SINGLE_I))-__ARRAY_SINGLE_NSTHRODOV[4],__ARRAY_SINGLE_NSTHRODOV[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_NSTHRODOV[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39204;
skip39204:
revert_input_check();
if(!qbevent)break;evnt(52);}while(r);
}
fornext_exit_39202:;
do{
sub_close( 1 ,1);
if(!qbevent)break;evnt(54);}while(r);
do{
*__SINGLE_NSTH= 0 ;
if(!qbevent)break;evnt(57);}while(r);
S_49:;
*__SINGLE_I= 1 ;
fornext_value39206=*__SINGLE_I;
fornext_finalvalue39206=*__SINGLE_NRODOV;
fornext_step39206= 1 ;
if (fornext_step39206<0) fornext_step_negative39206=1; else fornext_step_negative39206=0;
if (new_error) goto fornext_error39206;
goto fornext_entrylabel39206;
while(1){
fornext_value39206=fornext_step39206+(*__SINGLE_I);
*__SINGLE_I=fornext_value39206;
fornext_entrylabel39206:
if (fornext_step_negative39206){
if (fornext_value39206<fornext_finalvalue39206) break;
}else{
if (fornext_value39206>fornext_finalvalue39206) break;
}
fornext_error39206:
if(qbevent){evnt(58);if(r)goto S_49;}
do{
*__SINGLE_NSTH=*__SINGLE_NSTH+((float*)(__ARRAY_SINGLE_NSTHRODOV[0]))[array_check((qbr(*__SINGLE_I))-__ARRAY_SINGLE_NSTHRODOV[4],__ARRAY_SINGLE_NSTHRODOV[5])];
if(!qbevent)break;evnt(59);}while(r);
}
fornext_exit_39205:;
do{

if (__ARRAY_SINGLE_NFAIXAS[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_NFAIXAS[2]&1){
error(10);
}else{
__ARRAY_SINGLE_NFAIXAS[4]= 0 ;
__ARRAY_SINGLE_NFAIXAS[5]=(qbr(*__SINGLE_NSTH))-__ARRAY_SINGLE_NFAIXAS[4]+1;
__ARRAY_SINGLE_NFAIXAS[6]=1;
if (__ARRAY_SINGLE_NFAIXAS[2]&4){
__ARRAY_SINGLE_NFAIXAS[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_NFAIXAS[5]*4);
memset((void*)(__ARRAY_SINGLE_NFAIXAS[0]),0,__ARRAY_SINGLE_NFAIXAS[5]*4);
}else{
__ARRAY_SINGLE_NFAIXAS[0]=(unsigned long)calloc(__ARRAY_SINGLE_NFAIXAS[5]*4,1);
if (!__ARRAY_SINGLE_NFAIXAS[0]) error(257);
}
__ARRAY_SINGLE_NFAIXAS[2]|=1;
}
}

if (__ARRAY_SINGLE_FX[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_FX[2]&1){
error(10);
}else{
__ARRAY_SINGLE_FX[4]= 0 ;
__ARRAY_SINGLE_FX[5]=(qbr(*__SINGLE_NFAIXASMAX))-__ARRAY_SINGLE_FX[4]+1;
__ARRAY_SINGLE_FX[6]=1;
if (__ARRAY_SINGLE_FX[2]&4){
__ARRAY_SINGLE_FX[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_FX[5]*4);
memset((void*)(__ARRAY_SINGLE_FX[0]),0,__ARRAY_SINGLE_FX[5]*4);
}else{
__ARRAY_SINGLE_FX[0]=(unsigned long)calloc(__ARRAY_SINGLE_FX[5]*4,1);
if (!__ARRAY_SINGLE_FX[0]) error(257);
}
__ARRAY_SINGLE_FX[2]|=1;
}
}

if (__ARRAY_SINGLE_KMI[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_KMI[2]&1){
error(10);
}else{
__ARRAY_SINGLE_KMI[4]= 0 ;
__ARRAY_SINGLE_KMI[5]=(qbr(*__SINGLE_NSTH))-__ARRAY_SINGLE_KMI[4]+1;
__ARRAY_SINGLE_KMI[6]=1;
if (__ARRAY_SINGLE_KMI[2]&4){
__ARRAY_SINGLE_KMI[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_KMI[5]*4);
memset((void*)(__ARRAY_SINGLE_KMI[0]),0,__ARRAY_SINGLE_KMI[5]*4);
}else{
__ARRAY_SINGLE_KMI[0]=(unsigned long)calloc(__ARRAY_SINGLE_KMI[5]*4,1);
if (!__ARRAY_SINGLE_KMI[0]) error(257);
}
__ARRAY_SINGLE_KMI[2]|=1;
}
}

if (__ARRAY_SINGLE_KMF[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_KMF[2]&1){
error(10);
}else{
__ARRAY_SINGLE_KMF[4]= 0 ;
__ARRAY_SINGLE_KMF[5]=(qbr(*__SINGLE_NSTH))-__ARRAY_SINGLE_KMF[4]+1;
__ARRAY_SINGLE_KMF[6]=1;
if (__ARRAY_SINGLE_KMF[2]&4){
__ARRAY_SINGLE_KMF[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_KMF[5]*4);
memset((void*)(__ARRAY_SINGLE_KMF[0]),0,__ARRAY_SINGLE_KMF[5]*4);
}else{
__ARRAY_SINGLE_KMF[0]=(unsigned long)calloc(__ARRAY_SINGLE_KMF[5]*4,1);
if (!__ARRAY_SINGLE_KMF[0]) error(257);
}
__ARRAY_SINGLE_KMF[2]|=1;
}
}
if(!qbevent)break;evnt(61);}while(r);
do{

if (__ARRAY_SINGLE_CODE[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_CODE[2]&1){
error(10);
}else{
__ARRAY_SINGLE_CODE[8]= 0 ;
__ARRAY_SINGLE_CODE[9]=(qbr(*__SINGLE_NRODOV))-__ARRAY_SINGLE_CODE[8]+1;
__ARRAY_SINGLE_CODE[10]=1;
__ARRAY_SINGLE_CODE[4]= 0 ;
__ARRAY_SINGLE_CODE[5]=(qbr(*__SINGLE_NSTHMAX))-__ARRAY_SINGLE_CODE[4]+1;
__ARRAY_SINGLE_CODE[6]=__ARRAY_SINGLE_CODE[10]*__ARRAY_SINGLE_CODE[9];
if (__ARRAY_SINGLE_CODE[2]&4){
__ARRAY_SINGLE_CODE[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_CODE[5]*__ARRAY_SINGLE_CODE[9]*4);
memset((void*)(__ARRAY_SINGLE_CODE[0]),0,__ARRAY_SINGLE_CODE[5]*__ARRAY_SINGLE_CODE[9]*4);
}else{
__ARRAY_SINGLE_CODE[0]=(unsigned long)calloc(__ARRAY_SINGLE_CODE[5]*__ARRAY_SINGLE_CODE[9]*4,1);
if (!__ARRAY_SINGLE_CODE[0]) error(257);
}
__ARRAY_SINGLE_CODE[2]|=1;
}
}
if(!qbevent)break;evnt(64);}while(r);
S_54:;
*__SINGLE_I= 1 ;
fornext_value39208=*__SINGLE_I;
fornext_finalvalue39208=*__SINGLE_NRODOV;
fornext_step39208= 1 ;
if (fornext_step39208<0) fornext_step_negative39208=1; else fornext_step_negative39208=0;
if (new_error) goto fornext_error39208;
goto fornext_entrylabel39208;
while(1){
fornext_value39208=fornext_step39208+(*__SINGLE_I);
*__SINGLE_I=fornext_value39208;
fornext_entrylabel39208:
if (fornext_step_negative39208){
if (fornext_value39208<fornext_finalvalue39208) break;
}else{
if (fornext_value39208>fornext_finalvalue39208) break;
}
fornext_error39208:
if(qbevent){evnt(65);if(r)goto S_54;}
do{
qbs_set(__STRING_ARQUIVO,qbs_add(qbs_add(qbs_add(__STRING_CALC,qbs_new_txt_len("CODE",4)),((qbs*)(((uint64*)(__ARRAY_STRING_RODOV[0]))[array_check((qbr(*__SINGLE_I))-__ARRAY_STRING_RODOV[4],__ARRAY_STRING_RODOV[5])]))),qbs_new_txt_len(".STH",4)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(66);}while(r);
do{
sub_open(__STRING_ARQUIVO, 3 ,NULL,NULL, 1 ,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(67);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39209;
*__SINGLE_NSTHI=func_file_input_float(tmp_fileno,675282976);
if (new_error) goto skip39209;
skip39209:
revert_input_check();
if(!qbevent)break;evnt(68);}while(r);
S_58:;
*__SINGLE_J= 1 ;
fornext_value39211=*__SINGLE_J;
fornext_finalvalue39211=*__SINGLE_NSTHI;
fornext_step39211= 1 ;
if (fornext_step39211<0) fornext_step_negative39211=1; else fornext_step_negative39211=0;
if (new_error) goto fornext_error39211;
goto fornext_entrylabel39211;
while(1){
fornext_value39211=fornext_step39211+(*__SINGLE_J);
*__SINGLE_J=fornext_value39211;
fornext_entrylabel39211:
if (fornext_step_negative39211){
if (fornext_value39211<fornext_finalvalue39211) break;
}else{
if (fornext_value39211>fornext_finalvalue39211) break;
}
fornext_error39211:
if(qbevent){evnt(69);if(r)goto S_58;}
do{
tmp_fileno= 1 ;
if (new_error) goto skip39212;
tmp_long=array_check((qbr(*__SINGLE_I))-__ARRAY_SINGLE_CODE[8],__ARRAY_SINGLE_CODE[9])+array_check((qbr(*__SINGLE_J))-__ARRAY_SINGLE_CODE[4],__ARRAY_SINGLE_CODE[5])*__ARRAY_SINGLE_CODE[6];
if (!new_error) ((float*)(__ARRAY_SINGLE_CODE[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39212;
skip39212:
revert_input_check();
if(!qbevent)break;evnt(70);}while(r);
}
fornext_exit_39210:;
do{
sub_close( 1 ,1);
if(!qbevent)break;evnt(72);}while(r);
}
fornext_exit_39207:;
do{
*__SINGLE_ISTH= 0 ;
if(!qbevent)break;evnt(76);}while(r);
S_64:;
*__SINGLE_I= 1 ;
fornext_value39214=*__SINGLE_I;
fornext_finalvalue39214=*__SINGLE_NRODOV;
fornext_step39214= 1 ;
if (fornext_step39214<0) fornext_step_negative39214=1; else fornext_step_negative39214=0;
if (new_error) goto fornext_error39214;
goto fornext_entrylabel39214;
while(1){
fornext_value39214=fornext_step39214+(*__SINGLE_I);
*__SINGLE_I=fornext_value39214;
fornext_entrylabel39214:
if (fornext_step_negative39214){
if (fornext_value39214<fornext_finalvalue39214) break;
}else{
if (fornext_value39214>fornext_finalvalue39214) break;
}
fornext_error39214:
if(qbevent){evnt(77);if(r)goto S_64;}
do{
qbs_set(__STRING_ARQUIVO,qbs_add(qbs_add(qbs_add(__STRING_CALC,qbs_new_txt_len("CADAS",5)),((qbs*)(((uint64*)(__ARRAY_STRING_RODOV[0]))[array_check((qbr(*__SINGLE_I))-__ARRAY_STRING_RODOV[4],__ARRAY_STRING_RODOV[5])]))),qbs_new_txt_len(".DAT",4)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(78);}while(r);
do{
sub_open(__STRING_ARQUIVO, 3 ,NULL,NULL, 1 ,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(79);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39215;
sub_file_line_input_string(tmp_fileno,__STRING_LINHA);
if (new_error) goto skip39215;
skip39215:
revert_input_check();
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(80);}while(r);
S_68:;
while((-(func_eof( 1 )==*__SINGLE_FALSE))||new_error){
if(qbevent){evnt(81);if(r)goto S_68;}
do{
*__SINGLE_ISTH=*__SINGLE_ISTH+ 1 ;
if(!qbevent)break;evnt(82);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39217;
*__SINGLE_STH=func_file_input_float(tmp_fileno,675282976);
if (new_error) goto skip39217;
sub_file_input_string(tmp_fileno,__STRING_RODOV);
if (new_error) goto skip39217;
sub_file_input_string(tmp_fileno,__STRING_INI);
if (new_error) goto skip39217;
sub_file_input_string(tmp_fileno,__STRING_FIM);
if (new_error) goto skip39217;
tmp_long=array_check((qbr(*__SINGLE_ISTH))-__ARRAY_SINGLE_KMI[4],__ARRAY_SINGLE_KMI[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_KMI[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39217;
tmp_long=array_check((qbr(*__SINGLE_ISTH))-__ARRAY_SINGLE_KMF[4],__ARRAY_SINGLE_KMF[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_KMF[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39217;
sub_file_input_string(tmp_fileno,__STRING_PISTA);
if (new_error) goto skip39217;
skip39217:
revert_input_check();
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(83);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39218;
tmp_long=array_check((qbr(*__SINGLE_ISTH))-__ARRAY_SINGLE_NFAIXAS[4],__ARRAY_SINGLE_NFAIXAS[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_NFAIXAS[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39218;
*__SINGLE_PLUV=func_file_input_float(tmp_fileno,675282976);
if (new_error) goto skip39218;
*__SINGLE_ALTM=func_file_input_float(tmp_fileno,675282976);
if (new_error) goto skip39218;
*__SINGLE_PLATAF=func_file_input_float(tmp_fileno,675282976);
if (new_error) goto skip39218;
*__SINGLE_LARGPISTA=func_file_input_float(tmp_fileno,675282976);
if (new_error) goto skip39218;
*__SINGLE_ACOSTLE=func_file_input_float(tmp_fileno,675282976);
if (new_error) goto skip39218;
*__SINGLE_ACOSTLD=func_file_input_float(tmp_fileno,675282976);
if (new_error) goto skip39218;
skip39218:
revert_input_check();
if(!qbevent)break;evnt(84);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39219;
sub_file_input_string(tmp_fileno,__STRING_GEOVERT);
if (new_error) goto skip39219;
sub_file_input_string(tmp_fileno,__STRING_GEOHORIZ);
if (new_error) goto skip39219;
sub_file_input_string(tmp_fileno,__STRING_SECTIPO);
if (new_error) goto skip39219;
tmp_long=array_check(( 1 )-__ARRAY_SINGLE_FX[4],__ARRAY_SINGLE_FX[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_FX[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39219;
tmp_long=array_check(( 2 )-__ARRAY_SINGLE_FX[4],__ARRAY_SINGLE_FX[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_FX[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39219;
tmp_long=array_check(( 3 )-__ARRAY_SINGLE_FX[4],__ARRAY_SINGLE_FX[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_FX[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39219;
tmp_long=array_check(( 4 )-__ARRAY_SINGLE_FX[4],__ARRAY_SINGLE_FX[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_FX[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39219;
*__SINGLE_DECTRA=func_file_input_float(tmp_fileno,675282976);
qbs_cleanup(qbs_tmp_base,0);
if (new_error) goto skip39219;
*__SINGLE_RESTR=func_file_input_float(tmp_fileno,675282976);
if (new_error) goto skip39219;
*__SINGLE_EXTPONTES=func_file_input_float(tmp_fileno,675282976);
if (new_error) goto skip39219;
sub_file_input_string(tmp_fileno,__STRING_OBS);
if (new_error) goto skip39219;
skip39219:
revert_input_check();
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(85);}while(r);
}
ww_exit_39216:;
do{
sub_close( 1 ,1);
if(!qbevent)break;evnt(87);}while(r);
}
fornext_exit_39213:;
do{
qbs_set(__STRING_ARQUIVO,qbs_add(__STRING_CALC,qbs_new_txt_len("Sintese.dat",11)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(90);}while(r);
do{
sub_open(__STRING_ARQUIVO, 3 ,NULL,NULL, 1 ,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(91);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39220;
sub_file_input_string(tmp_fileno,__STRING_ARQ);
if (new_error) goto skip39220;
skip39220:
revert_input_check();
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(92);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39221;
sub_file_input_string(tmp_fileno,__STRING_ANOREF);
if (new_error) goto skip39221;
skip39221:
revert_input_check();
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(93);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39222;
sub_file_input_string(tmp_fileno,__STRING_REDE);
if (new_error) goto skip39222;
skip39222:
revert_input_check();
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(94);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39223;
sub_file_input_string(tmp_fileno,__STRING_FAIXA);
if (new_error) goto skip39223;
skip39223:
revert_input_check();
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(95);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39224;
*__SINGLE_IGRAF=func_file_input_float(tmp_fileno,675282976);
if (new_error) goto skip39224;
skip39224:
revert_input_check();
if(!qbevent)break;evnt(96);}while(r);
do{
sub_close( 1 ,1);
if(!qbevent)break;evnt(97);}while(r);
do{
qbs_set(__STRING_ARQUIVO,qbs_add(__STRING_CALC,qbs_new_txt_len("Polo.dat",8)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(99);}while(r);
do{
sub_open(__STRING_ARQUIVO, 3 ,NULL,NULL, 1 ,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(100);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39225;
sub_file_input_string(tmp_fileno,__STRING_POLO);
if (new_error) goto skip39225;
skip39225:
revert_input_check();
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(101);}while(r);
do{
sub_close( 1 ,1);
if(!qbevent)break;evnt(102);}while(r);
do{
qbs_set(__STRING_ARQUIVO,qbs_add(__STRING_CALC,qbs_new_txt_len("Trecho.dat",10)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(104);}while(r);
do{
sub_open(__STRING_ARQUIVO, 3 ,NULL,NULL, 1 ,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(105);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39226;
sub_file_input_string(tmp_fileno,__STRING_TRECHO);
if (new_error) goto skip39226;
skip39226:
revert_input_check();
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(106);}while(r);
do{
sub_close( 1 ,1);
if(!qbevent)break;evnt(107);}while(r);
do{

if (__ARRAY_STRING_YEAR[2]&2){
error(10);
}else{
if (__ARRAY_STRING_YEAR[2]&1){
error(10);
}else{
__ARRAY_STRING_YEAR[4]= 0 ;
__ARRAY_STRING_YEAR[5]=(qbr(*__SINGLE_NPERIODOS))-__ARRAY_STRING_YEAR[4]+1;
__ARRAY_STRING_YEAR[6]=1;
__ARRAY_STRING_YEAR[0]=(unsigned long)malloc(__ARRAY_STRING_YEAR[5]*8);
if (!__ARRAY_STRING_YEAR[0]) error(257);
__ARRAY_STRING_YEAR[2]|=1;
tmp_long=__ARRAY_STRING_YEAR[5];
if (__ARRAY_STRING_YEAR[2]&4){
while(tmp_long--) ((uint64*)(__ARRAY_STRING_YEAR[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0);
}else{
while(tmp_long--) ((uint64*)(__ARRAY_STRING_YEAR[0]))[tmp_long]=(uint64)qbs_new(0,0);
}
}
}

if (__ARRAY_SINGLE_IANO[2]&2){
error(10);
}else{
if (__ARRAY_SINGLE_IANO[2]&1){
error(10);
}else{
__ARRAY_SINGLE_IANO[4]= 0 ;
__ARRAY_SINGLE_IANO[5]=(qbr(*__SINGLE_NPERIODOS))-__ARRAY_SINGLE_IANO[4]+1;
__ARRAY_SINGLE_IANO[6]=1;
if (__ARRAY_SINGLE_IANO[2]&4){
__ARRAY_SINGLE_IANO[0]=(unsigned long)cmem_dynamic_malloc(__ARRAY_SINGLE_IANO[5]*4);
memset((void*)(__ARRAY_SINGLE_IANO[0]),0,__ARRAY_SINGLE_IANO[5]*4);
}else{
__ARRAY_SINGLE_IANO[0]=(unsigned long)calloc(__ARRAY_SINGLE_IANO[5]*4,1);
if (!__ARRAY_SINGLE_IANO[0]) error(257);
}
__ARRAY_SINGLE_IANO[2]|=1;
}
}
if(!qbevent)break;evnt(110);}while(r);
do{
qbs_set(__STRING_ARQUIVO,qbs_add(__STRING_CALC,qbs_new_txt_len("Years.dat",9)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(111);}while(r);
do{
sub_open(__STRING_ARQUIVO, 3 ,NULL,NULL, 1 ,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(112);}while(r);
do{
*__SINGLE_I= 0 ;
if(!qbevent)break;evnt(113);}while(r);
S_96:;
while((-(func_eof( 1 )==*__SINGLE_FALSE))||new_error){
if(qbevent){evnt(114);if(r)goto S_96;}
do{
*__SINGLE_I=*__SINGLE_I+ 1 ;
if(!qbevent)break;evnt(115);}while(r);
do{
tmp_fileno= 1 ;
if (new_error) goto skip39228;
sub_file_input_string(tmp_fileno,((qbs*)(((uint64*)(__ARRAY_STRING_YEAR[0]))[array_check((qbr(*__SINGLE_I))-__ARRAY_STRING_YEAR[4],__ARRAY_STRING_YEAR[5])])));
if (new_error) goto skip39228;
skip39228:
revert_input_check();
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(116);}while(r);
do{
tmp_long=array_check((qbr(*__SINGLE_I))-__ARRAY_SINGLE_IANO[4],__ARRAY_SINGLE_IANO[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_IANO[0]))[tmp_long]=*__SINGLE_I;
if(!qbevent)break;evnt(117);}while(r);
}
ww_exit_39227:;
do{
sub_close( 1 ,1);
if(!qbevent)break;evnt(119);}while(r);
do{
tmp_long=array_check(( 0 )-__ARRAY_STRING_YEAR[4],__ARRAY_STRING_YEAR[5]);
if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_YEAR[0]))[tmp_long])),qbs_str((float)(*__SINGLE_ANOBASE)));
if(!qbevent)break;evnt(120);}while(r);
S_103:;
qbs_set(sc_39229,__STRING_FAIXA);
if(qbevent){evnt(122);if(r)goto S_103;}
S_104:;
if ((qbs_equal(sc_39229,qbs_new_txt_len("Todas",5)))||new_error){
if(qbevent){evnt(123);if(r)goto S_104;}
do{
*__SINGLE_IFAIXA= 0 ;
if(!qbevent)break;evnt(124);}while(r);
goto sc_39229_end;
}
S_106:;
if ((qbs_equal(sc_39229,qbs_new_txt_len("1",1)))||new_error){
if(qbevent){evnt(125);if(r)goto S_106;}
do{
*__SINGLE_IFAIXA= 1 ;
if(!qbevent)break;evnt(126);}while(r);
goto sc_39229_end;
}
S_108:;
if ((qbs_equal(sc_39229,qbs_new_txt_len("2",1)))||new_error){
if(qbevent){evnt(127);if(r)goto S_108;}
do{
*__SINGLE_IFAIXA= 2 ;
if(!qbevent)break;evnt(128);}while(r);
goto sc_39229_end;
}
S_110:;
if ((qbs_equal(sc_39229,qbs_new_txt_len("3",1)))||new_error){
if(qbevent){evnt(129);if(r)goto S_110;}
do{
*__SINGLE_IFAIXA= 3 ;
if(!qbevent)break;evnt(130);}while(r);
goto sc_39229_end;
}
S_112:;
if ((qbs_equal(sc_39229,qbs_new_txt_len("4",1)))||new_error){
if(qbevent){evnt(131);if(r)goto S_112;}
do{
*__SINGLE_IFAIXA= 4 ;
if(!qbevent)break;evnt(132);}while(r);
goto sc_39229_end;
}
do{
tqbs=qbs_new(0,0);
qbs_set(tqbs,qbs_new_txt_len("ERRO",4));
if (new_error) goto skip39230;
makefit(tqbs);
qbs_print(tqbs,0);
qbs_free(tqbs);
qbs_print(nothingstring,1);
skip39230:
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(134);}while(r);
sc_39229_end:;
do{
qbs_set(__STRING_ARQSAI,qbs_add(__STRING_CALC,qbs_new_txt_len("VARano.CSV",10)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(137);}while(r);
do{
sub_open(__STRING_ARQSAI, 4 ,NULL,NULL, 10 ,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(138);}while(r);
do{
tab_spc_cr_size=2;
tmp_fileno= 10 ;
if (new_error) goto skip39231;
sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("\042",1),qbs_new_txt_len("Ano",3)),qbs_new_txt_len("\042",1)),qbs_new_txt_len(",",1)),0,0, 0 );
if (new_error) goto skip39231;
sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("\042",1),qbs_new_txt_len("PSI",3)),qbs_new_txt_len("\042",1)),qbs_new_txt_len(",",1)),0,0, 0 );
if (new_error) goto skip39231;
sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("\042",1),qbs_new_txt_len("VR",2)),qbs_new_txt_len("\042",1)),qbs_new_txt_len(",",1)),0,0, 0 );
if (new_error) goto skip39231;
sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("\042",1),qbs_new_txt_len("QI",2)),qbs_new_txt_len("\042",1)),qbs_new_txt_len(",",1)),0,0, 0 );
if (new_error) goto skip39231;
sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("\042",1),qbs_new_txt_len("IDS",3)),qbs_new_txt_len("\042",1)),qbs_new_txt_len(",",1)),0,0, 0 );
if (new_error) goto skip39231;
sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("\042",1),qbs_new_txt_len("TR",2)),qbs_new_txt_len("\042",1)),0,0, 1 );
if (new_error) goto skip39231;
skip39231:
qbs_cleanup(qbs_tmp_base,0);
tab_spc_cr_size=1;
if(!qbevent)break;evnt(139);}while(r);
S_120:;
*__SINGLE_ANO= 0 ;
fornext_value39233=*__SINGLE_ANO;
fornext_finalvalue39233=*__SINGLE_NPERIODOS;
fornext_step39233= 1 ;
if (fornext_step39233<0) fornext_step_negative39233=1; else fornext_step_negative39233=0;
if (new_error) goto fornext_error39233;
goto fornext_entrylabel39233;
while(1){
fornext_value39233=fornext_step39233+(*__SINGLE_ANO);
*__SINGLE_ANO=fornext_value39233;
fornext_entrylabel39233:
if (fornext_step_negative39233){
if (fornext_value39233<fornext_finalvalue39233) break;
}else{
if (fornext_value39233>fornext_finalvalue39233) break;
}
fornext_error39233:
if(qbevent){evnt(141);if(r)goto S_120;}
do{
qbs_set(__STRING_ARQUIVO,qbs_add(qbs_add(qbs_add(__STRING_CALC,__STRING_ARQ),qbs_str((float)(*__SINGLE_ANO))),qbs_new_txt_len(".CSV",4)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(143);}while(r);
do{
sub_open(__STRING_ARQUIVO, 3 ,NULL,NULL, 15 ,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(144);}while(r);
do{
tmp_fileno= 15 ;
if (new_error) goto skip39234;
sub_file_line_input_string(tmp_fileno,__STRING_LINHA);
if (new_error) goto skip39234;
skip39234:
revert_input_check();
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(145);}while(r);
do{
*__SINGLE_ISTH= 0 ;
if(!qbevent)break;evnt(146);}while(r);
do{
*__SINGLE_PSIMED= 0 ;
if(!qbevent)break;evnt(147);}while(r);
do{
*__SINGLE_VRMED= 0 ;
if(!qbevent)break;evnt(148);}while(r);
do{
*__SINGLE_QIMEDIO= 0 ;
if(!qbevent)break;evnt(149);}while(r);
do{
*__SINGLE_IDSMED= 0 ;
if(!qbevent)break;evnt(150);}while(r);
do{
*__SINGLE_TR23MED= 0 ;
if(!qbevent)break;evnt(151);}while(r);
do{
*__SINGLE_ICONT= 0 ;
if(!qbevent)break;evnt(152);}while(r);
do{
*__SINGLE_ICPSI= 0 ;
if(!qbevent)break;evnt(153);}while(r);
do{
*__SINGLE_ICVR= 0 ;
if(!qbevent)break;evnt(154);}while(r);
do{
*__SINGLE_ICQI= 0 ;
if(!qbevent)break;evnt(155);}while(r);
do{
*__SINGLE_ICIDS= 0 ;
if(!qbevent)break;evnt(156);}while(r);
do{
*__SINGLE_ICTR23= 0 ;
if(!qbevent)break;evnt(157);}while(r);
do{
*__SINGLE_EXTTOTAL= 0 ;
if(!qbevent)break;evnt(158);}while(r);
do{
*__SINGLE_EXTPSI= 0 ;
if(!qbevent)break;evnt(159);}while(r);
do{
*__SINGLE_EXTVR= 0 ;
if(!qbevent)break;evnt(160);}while(r);
do{
*__SINGLE_EXTQI= 0 ;
if(!qbevent)break;evnt(161);}while(r);
do{
*__SINGLE_EXTIDS= 0 ;
if(!qbevent)break;evnt(162);}while(r);
do{
*__SINGLE_EXTTR23= 0 ;
if(!qbevent)break;evnt(163);}while(r);
S_142:;
*__SINGLE_IRODOV= 1 ;
fornext_value39236=*__SINGLE_IRODOV;
fornext_finalvalue39236=*__SINGLE_NRODOV;
fornext_step39236= 1 ;
if (fornext_step39236<0) fornext_step_negative39236=1; else fornext_step_negative39236=0;
if (new_error) goto fornext_error39236;
goto fornext_entrylabel39236;
while(1){
fornext_value39236=fornext_step39236+(*__SINGLE_IRODOV);
*__SINGLE_IRODOV=fornext_value39236;
fornext_entrylabel39236:
if (fornext_step_negative39236){
if (fornext_value39236<fornext_finalvalue39236) break;
}else{
if (fornext_value39236>fornext_finalvalue39236) break;
}
fornext_error39236:
if(qbevent){evnt(164);if(r)goto S_142;}
S_143:;
*__SINGLE_ISUB= 1 ;
fornext_value39238=*__SINGLE_ISUB;
fornext_finalvalue39238=((float*)(__ARRAY_SINGLE_NSTHRODOV[0]))[array_check((qbr(*__SINGLE_IRODOV))-__ARRAY_SINGLE_NSTHRODOV[4],__ARRAY_SINGLE_NSTHRODOV[5])];
fornext_step39238= 1 ;
if (fornext_step39238<0) fornext_step_negative39238=1; else fornext_step_negative39238=0;
if (new_error) goto fornext_error39238;
goto fornext_entrylabel39238;
while(1){
fornext_value39238=fornext_step39238+(*__SINGLE_ISUB);
*__SINGLE_ISUB=fornext_value39238;
fornext_entrylabel39238:
if (fornext_step_negative39238){
if (fornext_value39238<fornext_finalvalue39238) break;
}else{
if (fornext_value39238>fornext_finalvalue39238) break;
}
fornext_error39238:
if(qbevent){evnt(165);if(r)goto S_143;}
do{
*__SINGLE_ISTH=*__SINGLE_ISTH+ 1 ;
if(!qbevent)break;evnt(166);}while(r);
do{
tmp_fileno= 15 ;
if (new_error) goto skip39239;
*__SINGLE_STH=func_file_input_float(tmp_fileno,675282976);
if (new_error) goto skip39239;
tmp_long=array_check((qbr(*__SINGLE_ISTH))-__ARRAY_SINGLE_KMI[4],__ARRAY_SINGLE_KMI[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_KMI[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
tmp_long=array_check((qbr(*__SINGLE_ISTH))-__ARRAY_SINGLE_KMF[4],__ARRAY_SINGLE_KMF[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_KMF[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
tmp_long=array_check(( 1 )-__ARRAY_SINGLE_VIDARES[4],__ARRAY_SINGLE_VIDARES[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_VIDARES[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
tmp_long=array_check(( 2 )-__ARRAY_SINGLE_VIDARES[4],__ARRAY_SINGLE_VIDARES[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_VIDARES[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
tmp_long=array_check(( 3 )-__ARRAY_SINGLE_VIDARES[4],__ARRAY_SINGLE_VIDARES[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_VIDARES[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
tmp_long=array_check(( 4 )-__ARRAY_SINGLE_VIDARES[4],__ARRAY_SINGLE_VIDARES[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_VIDARES[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
tmp_long=array_check(( 1 )-__ARRAY_SINGLE_PSIAT[4],__ARRAY_SINGLE_PSIAT[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_PSIAT[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
tmp_long=array_check(( 2 )-__ARRAY_SINGLE_PSIAT[4],__ARRAY_SINGLE_PSIAT[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_PSIAT[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
tmp_long=array_check(( 3 )-__ARRAY_SINGLE_PSIAT[4],__ARRAY_SINGLE_PSIAT[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_PSIAT[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
tmp_long=array_check(( 4 )-__ARRAY_SINGLE_PSIAT[4],__ARRAY_SINGLE_PSIAT[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_PSIAT[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
tmp_long=array_check(( 1 )-__ARRAY_SINGLE_QIMED[4],__ARRAY_SINGLE_QIMED[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_QIMED[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
tmp_long=array_check(( 2 )-__ARRAY_SINGLE_QIMED[4],__ARRAY_SINGLE_QIMED[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_QIMED[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
tmp_long=array_check(( 3 )-__ARRAY_SINGLE_QIMED[4],__ARRAY_SINGLE_QIMED[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_QIMED[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
tmp_long=array_check(( 4 )-__ARRAY_SINGLE_QIMED[4],__ARRAY_SINGLE_QIMED[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_QIMED[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
tmp_long=array_check(( 1 )-__ARRAY_SINGLE_IDS[4],__ARRAY_SINGLE_IDS[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_IDS[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
tmp_long=array_check(( 2 )-__ARRAY_SINGLE_IDS[4],__ARRAY_SINGLE_IDS[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_IDS[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
tmp_long=array_check(( 3 )-__ARRAY_SINGLE_IDS[4],__ARRAY_SINGLE_IDS[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_IDS[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
tmp_long=array_check(( 4 )-__ARRAY_SINGLE_IDS[4],__ARRAY_SINGLE_IDS[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_IDS[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;

tmp_long=array_check(( 1 )-__ARRAY_SINGLE_TR23[4],__ARRAY_SINGLE_TR23[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_TR23[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
tmp_long=array_check(( 2 )-__ARRAY_SINGLE_TR23[4],__ARRAY_SINGLE_TR23[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_TR23[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
tmp_long=array_check(( 3 )-__ARRAY_SINGLE_TR23[4],__ARRAY_SINGLE_TR23[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_TR23[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
tmp_long=array_check(( 4 )-__ARRAY_SINGLE_TR23[4],__ARRAY_SINGLE_TR23[5]);
if (!new_error) ((float*)(__ARRAY_SINGLE_TR23[0]))[tmp_long]=func_file_input_float(tmp_fileno,683671584);
if (new_error) goto skip39239;
skip39239:
revert_input_check();
if(!qbevent)break;evnt(167);}while(r);
do{
*__SINGLE_EXT=func_abs((float)(((float*)(__ARRAY_SINGLE_KMF[0]))[array_check((qbr(*__SINGLE_ISTH))-__ARRAY_SINGLE_KMF[4],__ARRAY_SINGLE_KMF[5])]-((float*)(__ARRAY_SINGLE_KMI[0]))[array_check((qbr(*__SINGLE_ISTH))-__ARRAY_SINGLE_KMI[4],__ARRAY_SINGLE_KMI[5])]));
if(!qbevent)break;evnt(168);}while(r);
S_147:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_REDE,qbs_new_txt_len("Trecho",6))))||new_error){
if(qbevent){evnt(169);if(r)goto S_147;}
S_148:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_TRECHO,((qbs*)(((uint64*)(__ARRAY_STRING_RODOV[0]))[array_check((qbr(*__SINGLE_IRODOV))-__ARRAY_STRING_RODOV[4],__ARRAY_STRING_RODOV[5])])))))||new_error){
if(qbevent){evnt(170);if(r)goto S_148;}
do{
return_point[next_return_point++]=1;
if (next_return_point>=return_points) more_return_points();
goto LABEL_10;
RETURN_1:;
if(!qbevent)break;evnt(170);}while(r);
}
}else{
S_152:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_REDE,qbs_new_txt_len("Toda a rede",11))))||new_error){
if(qbevent){evnt(172);if(r)goto S_152;}
do{
return_point[next_return_point++]=2;
if (next_return_point>=return_points) more_return_points();
goto LABEL_10;
RETURN_2:;
if(!qbevent)break;evnt(173);}while(r);
}else{
do{
qbs_set(__STRING_ACESSO,qbs_new_txt_len("Nao",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(175);}while(r);
do{
qbs_set(__STRING_ARQREDE,qbs_add(__STRING_CALC,qbs_new_txt_len("SubRede.csv",11)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(176);}while(r);
do{
sub_open(__STRING_ARQREDE, 3 ,NULL,NULL, 14 ,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(177);}while(r);
do{
tmp_fileno= 14 ;
if (new_error) goto skip39240;
sub_file_line_input_string(tmp_fileno,__STRING_LINHA);
if (new_error) goto skip39240;
skip39240:
revert_input_check();
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(178);}while(r);
S_159:;
while((~(func_eof( 14 )))||new_error){
if(qbevent){evnt(179);if(r)goto S_159;}
do{
tmp_fileno= 14 ;
if (new_error) goto skip39242;
sub_file_input_string(tmp_fileno,__STRING_TRECHONET);
if (new_error) goto skip39242;
*__SINGLE_KMINET=func_file_input_float(tmp_fileno,675282976);
qbs_cleanup(qbs_tmp_base,0);
if (new_error) goto skip39242;
*__SINGLE_KMFNET=func_file_input_float(tmp_fileno,675282976);
if (new_error) goto skip39242;
skip39242:
revert_input_check();
if(!qbevent)break;evnt(180);}while(r);
S_161:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_TRECHONET,((qbs*)(((uint64*)(__ARRAY_STRING_RODOV[0]))[array_check((qbr(*__SINGLE_IRODOV))-__ARRAY_STRING_RODOV[4],__ARRAY_STRING_RODOV[5])])))))||new_error){
if(qbevent){evnt(181);if(r)goto S_161;}
do{
*__SINGLE_CENTRO=(((float*)(__ARRAY_SINGLE_KMI[0]))[array_check((qbr(*__SINGLE_ISTH))-__ARRAY_SINGLE_KMI[4],__ARRAY_SINGLE_KMI[5])]+((float*)(__ARRAY_SINGLE_KMF[0]))[array_check((qbr(*__SINGLE_ISTH))-__ARRAY_SINGLE_KMF[4],__ARRAY_SINGLE_KMF[5])])/  2 ;
if(!qbevent)break;evnt(182);}while(r);
S_163:;
if ((-(((float*)(__ARRAY_SINGLE_KMF[0]))[array_check((qbr(*__SINGLE_ISTH))-__ARRAY_SINGLE_KMF[4],__ARRAY_SINGLE_KMF[5])]>((float*)(__ARRAY_SINGLE_KMI[0]))[array_check((qbr(*__SINGLE_ISTH))-__ARRAY_SINGLE_KMI[4],__ARRAY_SINGLE_KMI[5])]))||new_error){
if(qbevent){evnt(183);if(r)goto S_163;}
S_164:;
if ((((-(*__SINGLE_KMINET<=*__SINGLE_CENTRO))&(-(*__SINGLE_CENTRO<=*__SINGLE_KMFNET))))||new_error){
if(qbevent){evnt(184);if(r)goto S_164;}
do{
qbs_set(__STRING_ACESSO,qbs_new_txt_len("Sim",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(184);}while(r);
}
}else{
S_168:;
if ((((-(*__SINGLE_KMINET>=*__SINGLE_CENTRO))&(-(*__SINGLE_CENTRO>=*__SINGLE_KMFNET))))||new_error){
if(qbevent){evnt(186);if(r)goto S_168;}
do{
qbs_set(__STRING_ACESSO,qbs_new_txt_len("Sim",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(186);}while(r);
}
}
}
}
ww_exit_39241:;
do{
sub_close( 14 ,1);
if(!qbevent)break;evnt(190);}while(r);
S_175:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_ACESSO,qbs_new_txt_len("Sim",3))))||new_error){
if(qbevent){evnt(191);if(r)goto S_175;}
do{
return_point[next_return_point++]=3;
if (next_return_point>=return_points) more_return_points();
goto LABEL_10;
RETURN_3:;
if(!qbevent)break;evnt(191);}while(r);
}
}
}
}
fornext_exit_39237:;
}
fornext_exit_39235:;
do{
sub_close( 15 ,1);
if(!qbevent)break;evnt(196);}while(r);
S_183:;
if ((-(*__SINGLE_ICPSI> 0 ))||new_error){
if(qbevent){evnt(203);if(r)goto S_183;}
do{
*__SINGLE_PSIMED=*__SINGLE_PSIMED/ *__SINGLE_EXTPSI;
if(!qbevent)break;evnt(203);}while(r);
}
S_186:;
if ((-(*__SINGLE_ICVR> 0 ))||new_error){
if(qbevent){evnt(204);if(r)goto S_186;}
do{
*__SINGLE_VRMED=*__SINGLE_VRMED/ *__SINGLE_EXTVR;
if(!qbevent)break;evnt(204);}while(r);
}
S_189:;
if ((-(*__SINGLE_ICQI> 0 ))||new_error){
if(qbevent){evnt(205);if(r)goto S_189;}
do{
*__SINGLE_QIMEDIO=*__SINGLE_QIMEDIO/ *__SINGLE_EXTQI;
if(!qbevent)break;evnt(205);}while(r);
}
S_192:;
if ((-(*__SINGLE_ICIDS> 0 ))||new_error){
if(qbevent){evnt(206);if(r)goto S_192;}
do{
*__SINGLE_IDSMED=*__SINGLE_IDSMED/ *__SINGLE_EXTIDS;
if(!qbevent)break;evnt(206);}while(r);
}
S_195:;
if ((-(*__SINGLE_ICTR23> 0 ))||new_error){
if(qbevent){evnt(207);if(r)goto S_195;}
do{
*__SINGLE_TR23MED=*__SINGLE_TR23MED/ *__SINGLE_EXTTR23;
if(!qbevent)break;evnt(207);}while(r);
}
do{
tab_spc_cr_size=2;
tmp_fileno= 10 ;
if (new_error) goto skip39243;
sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("\042",1),((qbs*)(((uint64*)(__ARRAY_STRING_YEAR[0]))[array_check((qbr(*__SINGLE_ANO))-__ARRAY_STRING_YEAR[4],__ARRAY_STRING_YEAR[5])]))),qbs_new_txt_len("\042",1)),qbs_new_txt_len(",",1)),0,0, 0 );
if (new_error) goto skip39243;
sub_file_print(tmp_fileno,qbs_add(qbs_ltrim(qbs_str((float)(*__SINGLE_PSIMED))),qbs_new_txt_len(",",1)),0,0, 0 );
if (new_error) goto skip39243;
sub_file_print(tmp_fileno,qbs_add(qbs_ltrim(qbs_str((float)(*__SINGLE_VRMED))),qbs_new_txt_len(",",1)),0,0, 0 );
if (new_error) goto skip39243;
sub_file_print(tmp_fileno,qbs_add(qbs_ltrim(qbs_str((float)(*__SINGLE_QIMEDIO))),qbs_new_txt_len(",",1)),0,0, 0 );
if (new_error) goto skip39243;
sub_file_print(tmp_fileno,qbs_add(qbs_ltrim(qbs_str((float)(*__SINGLE_IDSMED))),qbs_new_txt_len(",",1)),0,0, 0 );
if (new_error) goto skip39243;
sub_file_print(tmp_fileno,qbs_ltrim(qbs_str((float)(*__SINGLE_TR23MED))),0,0, 1 );
if (new_error) goto skip39243;
skip39243:
qbs_cleanup(qbs_tmp_base,0);
tab_spc_cr_size=1;
if(!qbevent)break;evnt(209);}while(r);
}
fornext_exit_39232:;
do{
sub_close( 10 ,1);
if(!qbevent)break;evnt(212);}while(r);
do{
sub__screenprint(qbs_new_txt_len("Fim",3));
if(!qbevent)break;evnt(214);}while(r);
do{
sub_end();
if(!qbevent)break;evnt(216);}while(r);
LABEL_10:;
last_line=10;
S_203:;
if ((-(*__SINGLE_IFAIXA== 0 ))||new_error){
if(qbevent){evnt(219);if(r)goto S_203;}
S_204:;
*__SINGLE_IFX= 1 ;
fornext_value39245=*__SINGLE_IFX;
fornext_finalvalue39245=((float*)(__ARRAY_SINGLE_NFAIXAS[0]))[array_check((qbr(*__SINGLE_ISTH))-__ARRAY_SINGLE_NFAIXAS[4],__ARRAY_SINGLE_NFAIXAS[5])];
fornext_step39245= 1 ;
if (fornext_step39245<0) fornext_step_negative39245=1; else fornext_step_negative39245=0;
if (new_error) goto fornext_error39245;
goto fornext_entrylabel39245;
while(1){
fornext_value39245=fornext_step39245+(*__SINGLE_IFX);
*__SINGLE_IFX=fornext_value39245;
fornext_entrylabel39245:
if (fornext_step_negative39245){
if (fornext_value39245<fornext_finalvalue39245) break;
}else{
if (fornext_value39245>fornext_finalvalue39245) break;
}
fornext_error39245:
if(qbevent){evnt(220);if(r)goto S_204;}
S_205:;
if ((-(((float*)(__ARRAY_SINGLE_PSIAT[0]))[array_check((qbr(*__SINGLE_IFX))-__ARRAY_SINGLE_PSIAT[4],__ARRAY_SINGLE_PSIAT[5])]>= 0 ))||new_error){
if(qbevent){evnt(221);if(r)goto S_205;}
do{
*__SINGLE_PSIMED=*__SINGLE_PSIMED+(((float*)(__ARRAY_SINGLE_PSIAT[0]))[array_check((qbr(*__SINGLE_IFX))-__ARRAY_SINGLE_PSIAT[4],__ARRAY_SINGLE_PSIAT[5])]**__SINGLE_EXT);
if(!qbevent)break;evnt(222);}while(r);
do{
*__SINGLE_ICPSI=*__SINGLE_ICPSI+ 1 ;
if(!qbevent)break;evnt(223);}while(r);
do{
*__SINGLE_EXTPSI=*__SINGLE_EXTPSI+*__SINGLE_EXT;
if(!qbevent)break;evnt(224);}while(r);
}
S_210:;
if ((-(((float*)(__ARRAY_SINGLE_VIDARES[0]))[array_check((qbr(*__SINGLE_IFX))-__ARRAY_SINGLE_VIDARES[4],__ARRAY_SINGLE_VIDARES[5])]>= 0 ))||new_error){
if(qbevent){evnt(226);if(r)goto S_210;}
do{
*__SINGLE_VRMED=*__SINGLE_VRMED+(((float*)(__ARRAY_SINGLE_VIDARES[0]))[array_check((qbr(*__SINGLE_IFX))-__ARRAY_SINGLE_VIDARES[4],__ARRAY_SINGLE_VIDARES[5])]**__SINGLE_EXT);
if(!qbevent)break;evnt(227);}while(r);
do{
*__SINGLE_ICVR=*__SINGLE_ICVR+ 1 ;
if(!qbevent)break;evnt(228);}while(r);
do{
*__SINGLE_EXTVR=*__SINGLE_EXTVR+*__SINGLE_EXT;
if(!qbevent)break;evnt(229);}while(r);
}
S_215:;
if ((-(((float*)(__ARRAY_SINGLE_QIMED[0]))[array_check((qbr(*__SINGLE_IFX))-__ARRAY_SINGLE_QIMED[4],__ARRAY_SINGLE_QIMED[5])]>= 0 ))||new_error){
if(qbevent){evnt(231);if(r)goto S_215;}
do{
*__SINGLE_QIMEDIO=*__SINGLE_QIMEDIO+(((float*)(__ARRAY_SINGLE_QIMED[0]))[array_check((qbr(*__SINGLE_IFX))-__ARRAY_SINGLE_QIMED[4],__ARRAY_SINGLE_QIMED[5])]**__SINGLE_EXT);
if(!qbevent)break;evnt(232);}while(r);
do{
*__SINGLE_ICQI=*__SINGLE_ICQI+ 1 ;
if(!qbevent)break;evnt(233);}while(r);
do{
*__SINGLE_EXTQI=*__SINGLE_EXTQI+*__SINGLE_EXT;
if(!qbevent)break;evnt(234);}while(r);
}
S_220:;
if ((-(((float*)(__ARRAY_SINGLE_IDS[0]))[array_check((qbr(*__SINGLE_IFX))-__ARRAY_SINGLE_IDS[4],__ARRAY_SINGLE_IDS[5])]>= 0 ))||new_error){
if(qbevent){evnt(236);if(r)goto S_220;}
do{
*__SINGLE_IDSMED=*__SINGLE_IDSMED+(((float*)(__ARRAY_SINGLE_IDS[0]))[array_check((qbr(*__SINGLE_IFX))-__ARRAY_SINGLE_IDS[4],__ARRAY_SINGLE_IDS[5])]**__SINGLE_EXT);
if(!qbevent)break;evnt(237);}while(r);
do{
*__SINGLE_ICIDS=*__SINGLE_ICIDS+ 1 ;
if(!qbevent)break;evnt(238);}while(r);
do{
*__SINGLE_EXTIDS=*__SINGLE_EXTIDS+*__SINGLE_EXT;
if(!qbevent)break;evnt(239);}while(r);
}
S_225:;
if ((-(((float*)(__ARRAY_SINGLE_TR23[0]))[array_check((qbr(*__SINGLE_IFX))-__ARRAY_SINGLE_TR23[4],__ARRAY_SINGLE_TR23[5])]> -1 ))||new_error){
if(qbevent){evnt(241);if(r)goto S_225;}
do{
*__SINGLE_TR23MED=*__SINGLE_TR23MED+(((float*)(__ARRAY_SINGLE_TR23[0]))[array_check((qbr(*__SINGLE_IFX))-__ARRAY_SINGLE_TR23[4],__ARRAY_SINGLE_TR23[5])]**__SINGLE_EXT);
if(!qbevent)break;evnt(242);}while(r);
do{
*__SINGLE_ICTR23=*__SINGLE_ICTR23+ 1 ;
if(!qbevent)break;evnt(243);}while(r);
do{
*__SINGLE_EXTTR23=*__SINGLE_EXTTR23+*__SINGLE_EXT;
if(!qbevent)break;evnt(244);}while(r);
}
}
fornext_exit_39244:;
}else{
S_232:;
if ((-(((float*)(__ARRAY_SINGLE_PSIAT[0]))[array_check((qbr(*__SINGLE_IFAIXA))-__ARRAY_SINGLE_PSIAT[4],__ARRAY_SINGLE_PSIAT[5])]>= 0 ))||new_error){
if(qbevent){evnt(248);if(r)goto S_232;}
do{
*__SINGLE_PSIMED=*__SINGLE_PSIMED+(((float*)(__ARRAY_SINGLE_PSIAT[0]))[array_check((qbr(*__SINGLE_IFAIXA))-__ARRAY_SINGLE_PSIAT[4],__ARRAY_SINGLE_PSIAT[5])]**__SINGLE_EXT);
if(!qbevent)break;evnt(249);}while(r);
do{
*__SINGLE_ICPSI=*__SINGLE_ICPSI+ 1 ;
if(!qbevent)break;evnt(250);}while(r);
do{
*__SINGLE_EXTPSI=*__SINGLE_EXTPSI+*__SINGLE_EXT;
if(!qbevent)break;evnt(251);}while(r);
}
S_237:;
if ((-(((float*)(__ARRAY_SINGLE_VIDARES[0]))[array_check((qbr(*__SINGLE_IFAIXA))-__ARRAY_SINGLE_VIDARES[4],__ARRAY_SINGLE_VIDARES[5])]>= 0 ))||new_error){
if(qbevent){evnt(253);if(r)goto S_237;}
do{
*__SINGLE_VRMED=*__SINGLE_VRMED+(((float*)(__ARRAY_SINGLE_VIDARES[0]))[array_check((qbr(*__SINGLE_IFAIXA))-__ARRAY_SINGLE_VIDARES[4],__ARRAY_SINGLE_VIDARES[5])]**__SINGLE_EXT);
if(!qbevent)break;evnt(254);}while(r);
do{
*__SINGLE_ICVR=*__SINGLE_ICVR+ 1 ;
if(!qbevent)break;evnt(255);}while(r);
do{
*__SINGLE_EXTVR=*__SINGLE_EXTVR+*__SINGLE_EXT;
if(!qbevent)break;evnt(256);}while(r);
}
S_242:;
if ((-(((float*)(__ARRAY_SINGLE_QIMED[0]))[array_check((qbr(*__SINGLE_IFAIXA))-__ARRAY_SINGLE_QIMED[4],__ARRAY_SINGLE_QIMED[5])]>= 0 ))||new_error){
if(qbevent){evnt(258);if(r)goto S_242;}
do{
*__SINGLE_QIMEDIO=*__SINGLE_QIMEDIO+(((float*)(__ARRAY_SINGLE_QIMED[0]))[array_check((qbr(*__SINGLE_IFAIXA))-__ARRAY_SINGLE_QIMED[4],__ARRAY_SINGLE_QIMED[5])]**__SINGLE_EXT);
if(!qbevent)break;evnt(259);}while(r);
do{
*__SINGLE_ICQI=*__SINGLE_ICQI+ 1 ;
if(!qbevent)break;evnt(260);}while(r);
do{
*__SINGLE_EXTQI=*__SINGLE_EXTQI+*__SINGLE_EXT;
if(!qbevent)break;evnt(261);}while(r);
}
S_247:;
if ((-(((float*)(__ARRAY_SINGLE_IDS[0]))[array_check((qbr(*__SINGLE_IFAIXA))-__ARRAY_SINGLE_IDS[4],__ARRAY_SINGLE_IDS[5])]>= 0 ))||new_error){
if(qbevent){evnt(263);if(r)goto S_247;}
do{
*__SINGLE_IDSMED=*__SINGLE_IDSMED+(((float*)(__ARRAY_SINGLE_IDS[0]))[array_check((qbr(*__SINGLE_IFAIXA))-__ARRAY_SINGLE_IDS[4],__ARRAY_SINGLE_IDS[5])]**__SINGLE_EXT);
if(!qbevent)break;evnt(264);}while(r);
do{
*__SINGLE_ICIDS=*__SINGLE_ICIDS+ 1 ;
if(!qbevent)break;evnt(265);}while(r);
do{
*__SINGLE_EXTIDS=*__SINGLE_EXTIDS+*__SINGLE_EXT;
if(!qbevent)break;evnt(266);}while(r);
}
S_252:;
if ((-(((float*)(__ARRAY_SINGLE_TR23[0]))[array_check((qbr(*__SINGLE_IFAIXA))-__ARRAY_SINGLE_TR23[4],__ARRAY_SINGLE_TR23[5])]> -1 ))||new_error){
if(qbevent){evnt(268);if(r)goto S_252;}
do{
*__SINGLE_TR23MED=*__SINGLE_TR23MED+(((float*)(__ARRAY_SINGLE_TR23[0]))[array_check((qbr(*__SINGLE_IFAIXA))-__ARRAY_SINGLE_TR23[4],__ARRAY_SINGLE_TR23[5])]**__SINGLE_EXT);
if(!qbevent)break;evnt(269);}while(r);
do{
*__SINGLE_ICTR23=*__SINGLE_ICTR23+ 1 ;
if(!qbevent)break;evnt(270);}while(r);
do{
*__SINGLE_EXTTR23=*__SINGLE_EXTTR23+*__SINGLE_EXT;
if(!qbevent)break;evnt(271);}while(r);
}
}
do{
#include "ret0.txt"
if(!qbevent)break;evnt(274);}while(r);
sub_end();
return NULL;
}
