Home
last modified time | relevance | path

Searched refs:_IDNTptr (Results 1 – 25 of 41) sorted by relevance

12

/dports/math/giacxcas/giac-1.6.0/src/
H A Dintgab.cc238 gen xval=x._IDNTptr->eval(1,x,contextptr); in residue()
247 xval=x._IDNTptr->eval(1,x,contextptr); in residue()
261 gen da=subst(d,*x._IDNTptr,a,false,contextptr); in residue()
263 gen na=subst(n,*x._IDNTptr,a,false,contextptr); in residue()
551 gen test=limit(g,*x._IDNTptr,vi,0,contextptr); in intgab_sincos()
788 gl=limit(g,*x._IDNTptr,plus_inf,1,contextptr); in intgab_r()
922 if (depend(v[i],*x._IDNTptr)) in intgab()
1075 gen A=limit(g,*x._IDNTptr,a,1,contextptr); in intgab()
1089 gen B=limit(g,*x._IDNTptr,b,-1,contextptr); in intgab()
1474 tmp1=tmp1-limit(tmp1,*gx._IDNTptr,0,1,contextptr); in in_sumab_int()
[all …]
H A Dpartfrac.cc38 x=*v[1]._IDNTptr; in main()
41 x=*(l.compptr->front()._IDNTptr); in main()
H A Dintegrate.cc41 x=*v[1]._IDNTptr; in main()
44 x=*(l.compptr->front()._IDNTptr); in main()
H A Dintg.cc3395 if (x._IDNTptr->quoted){ in _integrate()
3396 quoted=*x._IDNTptr->quoted; in _integrate()
3397 *x._IDNTptr->quoted=1; in _integrate()
3506 if (x._IDNTptr->quoted) in _integrate()
5381 if (it->_IDNTptr->quoted){ in _sum()
5383 *it->_IDNTptr->quoted=1; in _sum()
5385 *it->_IDNTptr->quoted=savequote; in _sum()
5769 t_id=*tmpv[1]._IDNTptr; in odesolve()
6133 res=limit(f,*x._IDNTptr,b,-1,contextptr)-limit(f,*x._IDNTptr,a,1,contextptr); in preval()
6136 res=limit(f,*x._IDNTptr,b,1,contextptr)-limit(f,*x._IDNTptr,a,-1,contextptr) ; in preval()
[all …]
H A Didentificateur.cc835 gen evaled(tmp._IDNTptr->eval(level,tmp,context0)); in global_evalf()
920 if (tmp._IDNTptr->in_eval(1,tmp,evaled,contextptr))
978 if (tmp._IDNTptr->in_eval(1,tmp,evaled,contextptr))
1123 …rrent_folder_name.type==_IDNT && current_folder_name._IDNTptr->value && current_folder_name._IDNTp… in in_eval()
1124 evaled=find_in_folder(*current_folder_name._IDNTptr->value->_VECTptr,orig); in in_eval()
H A Dusual.cc3451 b._IDNTptr->eval(1,b,contextptr); in sto()
3454 b._IDNTptr->eval(1,b,contextptr); in sto()
3510 if (b._IDNTptr->quoted) in sto()
3560 if (b._IDNTptr->localvalue && !b._IDNTptr->localvalue->empty() && (b.subtype!=_GLOBAL__EVAL)) in sto()
3561 b._IDNTptr->localvalue->back()=aa; in sto()
3586 if (b._IDNTptr->value) in sto()
3587 delete b._IDNTptr->value; in sto()
3588 if (b._IDNTptr->ref_count) in sto()
3589 b._IDNTptr->value = new gen(aa); in sto()
4231 if (!var._IDNTptr->localvalue) in increment()
[all …]
H A Drpn.cc805 if (id.type==_IDNT && id._IDNTptr->value){ in _VARS()
811 gen & tmp=*current_folder_name._IDNTptr->value; in _VARS()
872 const char * ch=args._IDNTptr->id_name; in purgenoassume()
983 *current_folder_name._IDNTptr->value=res; in _purge()
991 if (args._IDNTptr->value){ in _purge()
996 gen res=*args._IDNTptr->value; in _purge()
1001 delete args._IDNTptr->value; in _purge()
1002 args._IDNTptr->value=0; in _purge()
2165 const char * ch=v[i]._IDNTptr->id_name; in evalfunc()
3620 const char * s=l[i]._IDNTptr->id_name; in has_Un()
[all …]
H A Dseries.cc1613 eff += (limit(f,*k._IDNTptr,upper,-1,contextptr)+limit(f,*k._IDNTptr,lower,1,contextptr))/2; in series__SPOL1()
1618 … gen add= limit(fdiff,*k._IDNTptr,upper,-1,contextptr)-limit(fdiff,*k._IDNTptr,lower,1,contextptr); in series__SPOL1()
3125 return quotedlimit(args,*vx_var._IDNTptr,0,0,contextptr); in _limit()
3132 return quotedlimit(G,*vx_var._IDNTptr,0,0,contextptr); in _limit()
3138 return quotedlimit(G,*e._IDNTptr,0,0,contextptr); in _limit()
3155 return quotedlimit(G,*e._IDNTptr,arg3,0,contextptr); in _limit()
3175 return quotedlimit(G,*e._IDNTptr,v[2],convert_to_direction(v[3]),contextptr); in _limit()
3299 if ( !ordre && (*e._IDNTptr==x) ) in in_series()
3367 sparse_poly1 res=series__SPOL1(newe,*h._IDNTptr,zero,ordre,direction,contextptr); in series()
3381 return series(e,*x._IDNTptr,l,ordre,direction,contextptr); in series()
[all …]
H A Dalg_ext.cc896 gen g,g2=p._IDNTptr->eval(1,g,contextptr); in common_EXT()
1361 tmp=limit(g,*x._IDNTptr,a,0,contextptr); in sturmab()
1488 gen tmp=limit(expr,*var._IDNTptr,*it,direction,contextptr); in recompute_minmax()
1492 tmp=limit(expr,*var._IDNTptr,*it,direction,contextptr); in recompute_minmax()
1639 var._IDNTptr->in_eval(1,var,savevar,contextptr); in fminmax()
1663 vecteur ws=find_singularities(expr,*var._IDNTptr,0,contextptr); in fminmax()
1692 gen g2=g._IDNTptr->eval(1,g,contextptr); in find_range()
1775 if (v[i].type==_IDNT && v[i]._IDNTptr->eval(1,v[i],contextptr).type!=_IDNT){ in insturmsign1()
H A Dsignalprocessing.cc1156 const identificateur &f=*args[1]._SYMBptr->feuille._VECTptr->front()._IDNTptr; in _addtable()
1158 const identificateur &t=*args[3]._IDNTptr,&s=*args[4]._IDNTptr; in _addtable()
1169 const identificateur &x1=*fvars[i]._IDNTptr,&x2=*Fvars[i]._IDNTptr; in _addtable()
1201 f=*g._SYMBptr->feuille._VECTptr->front()._IDNTptr; in is_func()
1236 f=*df._IDNTptr; in is_partialdiff()
1707 x=*args.back()._SYMBptr->feuille._VECTptr->front()._IDNTptr; in is_integral()
1714 x=*args[1]._IDNTptr; in is_integral()
2175 var=*args[1]._IDNTptr; in _fourier()
2180 if ((tvar=*args[2]._IDNTptr)==var) in _fourier()
2209 var=*args[1]._IDNTptr; in _ifourier()
[all …]
H A Dprog.cc554 …_IDNTptr->id_name,"i")==0 || strcmp(g._IDNTptr->id_name,"None")==0 || strcmp(g._IDNTptr->id_name,"… in is_constant_idnt()
2451 …!=1 && (!variable._IDNTptr->localvalue || variable._IDNTptr->localvalue->empty() || (*variable._ID… in _for()
2959 if (tmp._IDNTptr->localvalue){ in leave()
2960 jt=tmp._IDNTptr->localvalue->begin(),jtend=tmp._IDNTptr->localvalue->end(); in leave()
2972 tmp._IDNTptr->localvalue->erase(jtend,tmp._IDNTptr->localvalue->end()); in leave()
6173 as=a._IDNTptr->name(); in maple2mupad()
6177 bs=b._IDNTptr->name(); in maple2mupad()
9106 if (gv._IDNTptr->value) in _tilocal()
9107 gv=*gv._IDNTptr->value; in _tilocal()
12999 …if (g.type==_IDNT && g._IDNTptr->value && g._IDNTptr->value->type==_VECT && g._IDNTptr->value->sub… in _SetFold()
[all …]
H A Dsymbolic.cc583 (s += g._IDNTptr->print(contextptr)); in add_print()
697 if (feuilleback.type==_IDNT && feuilleback._IDNTptr->eval(1,feuilleback,contextptr).type==_VECT){ in eval_sto()
712 const char * ch = feuilleback._IDNTptr->id_name; in eval_sto()
1486 … if (feuille.type==_IDNT && sommet==at_neg && !strcmp(feuille._IDNTptr->id_name,string_infinity)){ in eval()
1597 if (feuille.type==_IDNT && !strcmp(feuille._IDNTptr->id_name,string_infinity)) in evalf()
1633 …if ((sommet==at_neg) && (feuille.type==_IDNT) && !strcmp(feuille._IDNTptr->id_name,string_infinity… in evalf()
H A Ddesolve.cc71 t=t._IDNTptr->eval(1,tmp_t,contextptr); in gen_t()
1126 const char * ch=fidi._IDNTptr->id_name; in desolve_f()
1247 vecteur newsol=solve(res-x,*t._IDNTptr,3,contextptr); in desolve_f()
1255 newsol=solve(res-x,*t._IDNTptr,3,contextptr); in desolve_f()
1298 vecteur newsol=solve(implicitsol,*y._IDNTptr,3,contextptr); in desolve_f()
1308 newsol=solve(implicitsol,*y._IDNTptr,3,contextptr); in desolve_f()
1325 sol=mergevecteur(sol,solve(pr-x,*y._IDNTptr,3,contextptr)); in desolve_f()
1340 vecteur sol1=solve(pr-x,*y._IDNTptr,3,contextptr); in desolve_f()
1369 vecteur v=protect_solve(x-pr,*t._IDNTptr,1,contextptr); in desolve_f()
1401 sol=mergevecteur(sol,solve(F,*y._IDNTptr,3,contextptr)); in desolve_f()
[all …]
H A Dderive.cc60 return *g._IDNTptr==i; in depend()
444 if (*othervar._IDNTptr==i){ // _FUNCnd derivative in derive_SYMB()
464 if (*othervar._IDNTptr==i){ // n+1 derivative in derive_SYMB()
535 if (*e._IDNTptr==i) in derive()
587 return derive(e,*vars._IDNTptr,contextptr); in derive()
H A Dglobal.cc2492 if (v[1]._IDNTptr->value) in update_data()
2493 delete v[1]._IDNTptr->value; in update_data()
2494 v[1]._IDNTptr->value = new gen(v[0]); in update_data()
2501 if ((g.type==_IDNT) && (g._IDNTptr->value) ){ in update_data()
2502 delete g._IDNTptr->value; in update_data()
2503 g._IDNTptr->value=0; in update_data()
4824 writefunc(g._IDNTptr->id_name,1,strlen(g._IDNTptr->id_name),f); in archive_save()
5174 if (id.type==_IDNT && id._IDNTptr->value) in giac_current_status()
5175 res.push_back(symb_sto(*id._IDNTptr->value,id)); in giac_current_status()
5880 sym_string_tab::const_iterator i = syms().find(it->_IDNTptr->id_name),iend=syms().end(); in set_lexer_symbols()
[all …]
H A Dplot.cc938 if (tmp._IDNTptr->quoted){ in quote_eval()
940 *tmp._IDNTptr->quoted=1; in quote_eval()
2828 char ch=g._IDNTptr->id_name[0]; in eval_with_xy_quoted()
5301 identificateur tt=*v[1]._IDNTptr; in projection()
5315 tt=*v[1]._IDNTptr; in projection()
10533 ss += v0._IDNTptr->id_name; in add_names()
10534 if (strlen(v1._IDNTptr->id_name)==2 && v1._IDNTptr->id_name[0]=='G') in add_names()
10535 ss += v1._IDNTptr->id_name[1]; in add_names()
10537 ss += v1._IDNTptr->id_name; in add_names()
10548 if (v0.type==_IDNT && strlen(v0._IDNTptr->id_name)==2 && v0._IDNTptr->id_name[0]=='G') in add_name()
[all …]
H A Dgen.cc2031 identificateur * gptr=g._IDNTptr; in in_eval_idnt()
2575 evaled=global_evalf(*_IDNTptr,level-1); in in_evalf()
2700 if (!strcmp(g0._IDNTptr->id_name,"pi")) in evalf2double_nock()
3740 if ( (_IDNTptr->value) && (is_zero(_IDNTptr->value->im(contextptr),contextptr)) ) in re()
3855 if ( (_IDNTptr->value) && (is_zero(_IDNTptr->value->im(contextptr),contextptr)) ) in im()
8485 …return a._IDNTptr->id_name==b._IDNTptr->id_name || strcmp(a._IDNTptr->id_name,b._IDNTptr->id_name)… in operator_equal()
8555 …return a.type==_IDNT && (a._IDNTptr->id_name==i.id_name || !strcmp(a._IDNTptr->id_name,i.id_name))… in operator ==()
8559 … return i.type==_IDNT && (id_name==i._IDNTptr->id_name || !strcmp(id_name,i._IDNTptr->id_name)); in operator ==()
9587 return strcmp(_IDNTptr->id_name,other._IDNTptr->id_name)<0; in islesscomplexthan()
9631 … if (strlen(a._IDNTptr->id_name)>=3 && a._IDNTptr->id_name[0]=='c' && a._IDNTptr->id_name[1]=='_') in monomial_degree()
[all …]
H A Dgraphtheory.cc1885 identifier_assign(*coords_dest._IDNTptr,coords,contextptr); in _draw_graph()
3329 identifier_assign(*arg._IDNTptr,gen(dd),contextptr); in _is_regular()
3590 identifier_assign(*dest._IDNTptr,triangles,contextptr); in _number_of_triangles()
3690 identifier_assign(*F._IDNTptr,res,contextptr); in _is_planar()
4025 identifier_assign(*V._IDNTptr,P,contextptr); in _is_eulerian()
5561 identifier_assign(*gv[3]._IDNTptr,G.to_gen(),contextptr); in _st_ordering()
5632 identifier_assign(*P._IDNTptr, in _is_bipartite()
5718 identifier_assign(*colors_dest._IDNTptr,cols,contextptr); in _is_vertex_colorable()
5971 identifier_assign(*isom._IDNTptr,mapping,contextptr); in _is_isomorphic()
6113 identifier_assign(*dest._IDNTptr,G.get_node_labels(hc),contextptr); in _is_hamiltonian()
[all …]
H A Dsolve.cc222 gen g2=g._IDNTptr->eval(eval_level(contextptr),g,contextptr); in find_excluded()
244 gen g,g2=id._IDNTptr->eval(1,g,contextptr); in check()
688 in_solve(tfact,*t._IDNTptr,vt,isolate_mode,contextptr); in in_solve()
705 in_solve(tfact,*t._IDNTptr,vt,isolate_mode,contextptr); in in_solve()
1578 if (*e._IDNTptr==x){ in solve()
2458 gen curx=x._IDNTptr->eval(1,x,contextptr); in solve()
2462 res=solve(*it,*x._IDNTptr,isolate_mode,contextptr); in solve()
2486 res=solve(e,*x._IDNTptr,isolate_mode,contextptr); in solve()
3139 const char * ch = g._IDNTptr->id_name; in is_idnt_function38()
3269 res=solve(eq0,*variable._IDNTptr,0,contextptr); in solve_zero_extremum()
[all …]
H A Dmaple.cc223 return g._IDNTptr->eval(1,g,contextptr); in _about()
2511 if (!is_hypergeometric(e,*n._IDNTptr,v,P,Q,R,contextptr)){ in rsolve()
2697 if (!is_hypergeometric(l,*n._IDNTptr,v,P,Q,R,contextptr)){ in _seqsolve()
3284 const char * ch =g._IDNTptr->id_name; in is_int_or_double()
3363 const char * ch=g._IDNTptr->id_name; in cpp_vartype()
3397 const char * ch=fvi._IDNTptr->id_name; in cprintvars()
3643 heads=rtype+name._IDNTptr->id_name+"("; in cprint()
3659 heads=name._IDNTptr->id_name; in cprint()
H A Dlpsolve.cc798 if (*variable_identifiers[i]._IDNTptr==idnt) in get_variable_index()
1543 else if ((g.type==_IDNT && (i=prob.get_variable_index(*g._IDNTptr))>=0) || in assign_variable_types()
1585 int vi=prob.get_variable_index(*lh._IDNTptr); in parse_options_and_bounds()
H A Dinput_parser.yy219 …extra(scanner))==38 && $1.type==_IDNT && strlen($1._IDNTptr->id_name)==2 && check_vect_38($1._IDNT…
220 …de(giac_yyget_extra(scanner))==38 && $3.type==_IDNT && check_vect_38($3._IDNTptr->id_name))) $$=sy…
H A Dsym2poly.cc135 if (strcmp(e._IDNTptr->id_name,string_undef)) in lvar()
2366 vinit[i]._IDNTptr->in_eval(0,vinit[i],vassume[i],contextptr); in r2sym()
2748 …if (complex_mode(contextptr)==false && var.type==_IDNT && var._IDNTptr->eval(1,var,contextptr)==va… in in_normalize_sqrt()
2844 return strcmp(a._IDNTptr->id_name,b._IDNTptr->id_name)<0; in sort_func()
3048 const char * idname=g._IDNTptr->id_name; in is_program()
3664 return factor(e,*f._IDNTptr,with_sqrt,contextptr); in factor()
3806 return partfrac(e,*f._IDNTptr,with_sqrt,contextptr); in partfrac()
H A Dinput_parser.cc5076 …).type==_IDNT && strlen((yyvsp[(1) - (6)])._IDNTptr->id_name)==2 && check_vect_38((yyvsp[(1) - (6)…
5083 …8 && (yyvsp[(3) - (6)]).type==_IDNT && check_vect_38((yyvsp[(3) - (6)])._IDNTptr->id_name))) (yyva…
H A Doptimization.cc2219 identificateur x(*s[0]._IDNTptr); in _minimax()
2690 gen rat(yv[0]+thiele(1,xv,yv,*var._IDNTptr,invdiff,contextptr)); in _thiele()
2942 gen tp=triginterp(data,a,b,*x._IDNTptr,contextptr); in _triginterp()
3051 identificateur X=x.type==_IDNT?*x._IDNTptr:identificateur(" X"); in kernel_density()
3711 if (n==1 && !depend(L,*t._IDNTptr)) { in _euler_lagrange()
3716 if (!depend(L,*u[i]._IDNTptr)) { in _euler_lagrange()
3725 … if (depend(eq,*d2u[i]._IDNTptr) && (sol=_solve(makesequence(eq,d2u[i]),contextptr)).type==_VECT) in _euler_lagrange()

12