Home
last modified time | relevance | path

Searched refs:ycor (Results 1 – 25 of 199) sorted by relevance

12345678

/dports/cad/feappv/feappv-4.1i/unix/
H A Dpltftx.f41 real*8 ycor,yphbot,yphtop local
72 ycor = 0.75d0
75 ycor = yfr(ifrm)
79 yph = real(ycor/1.28d0)
85 yphbot = ycor - 1.35d0*dy - 5.d0/7.d0*i/xdv
86 yphtop = ycor - 1.35d0*dy - 5.d0/7.d0*(i-1)/xdv
104 yphbot = ycor - 1.35d0*dy - 0.0075d0
111 call tplot(xhead,ycor,blnk,17,1)
117 call tplot(xhead,ycor,yy,17,1)
121 call dplot( xleft , ycor - 1.35d0*dy , 3)
[all …]
/dports/cad/feappv/feappv-4.1i/windows/
H A Dpltftx.f41 real*8 ycor,yphbot,yphtop local
76 ycor = 0.75d0
79 ycor = yfr(ifrm)
83 yph = real(ycor/1.28d0)
89 yphbot = ycor - 1.35d0*dy - 5.d0/7.d0*i/xdv
90 yphtop = ycor - 1.35d0*dy - 5.d0/7.d0*(i-1)/xdv
108 yphbot = ycor - 1.35d0*dy - 0.0075d0
116 call tplot(xhead,ycor,blnk,17,1)
126 call tplot(xhead,ycor,yy,17,1)
131 call dplot( xleft , ycor - 1.35d0*dy , 3)
[all …]
/dports/cad/feappv/feappv-4.1i/plot/
H A Dpltctx.f35 real*8 xdv,ycor,xhead,ycoi local
50 ycor = 0.75d0
51 if(ifrm.ne.0) ycor = yfr(ifrm)
53 call dplot(1.00d0,ycor,3)
65 yph = real(ycor/1.28d0)
70 call tplot(xhead,ycor,yy,17,1)
75 call dplot(1.02d0,ycor - (ivi)/xdv,3)
81 ycoi = ycor - (ivi)/xdv
/dports/math/py-pystan/pystan-2.19.0.0/pystan/stan/lib/stan_math/lib/sundials_4.1.0/src/cvodes/
H A Dcvodes_nls.c24 static int cvNlsResidual(N_Vector ycor, N_Vector res, void* cvode_mem);
25 static int cvNlsFPFunction(N_Vector ycor, N_Vector res, void* cvode_mem);
27 static int cvNlsLSetup(N_Vector ycor, N_Vector res, booleantype jbad,
29 static int cvNlsLSolve(N_Vector ycor, N_Vector delta, void* cvode_mem);
30 static int cvNlsConvTest(SUNNonlinearSolver NLS, N_Vector ycor, N_Vector del,
161 static int cvNlsLSetup(N_Vector ycor, N_Vector res, booleantype jbad, in cvNlsLSetup() argument
200 static int cvNlsLSolve(N_Vector ycor, N_Vector delta, void* cvode_mem) in cvNlsLSolve() argument
264 static int cvNlsResidual(N_Vector ycor, N_Vector res, void* cvode_mem) in cvNlsResidual() argument
277 N_VLinearSum(ONE, cv_mem->cv_zn[0], ONE, ycor, cv_mem->cv_y); in cvNlsResidual()
287 N_VLinearSum(cv_mem->cv_rl1, cv_mem->cv_zn[1], ONE, ycor, res); in cvNlsResidual()
[all …]
H A Dcvodes_nls_stg1.c24 static int cvNlsResidualSensStg1(N_Vector ycor, N_Vector res,
26 static int cvNlsFPFunctionSensStg1(N_Vector ycor, N_Vector res,
29 static int cvNlsLSetupSensStg1(N_Vector ycor, N_Vector res,
32 static int cvNlsLSolveSensStg1(N_Vector ycor, N_Vector delta,
35 N_Vector ycor, N_Vector del,
192 static int cvNlsLSetupSensStg1(N_Vector ycor, N_Vector res, in cvNlsLSetupSensStg1() argument
234 static int cvNlsLSolveSensStg1(N_Vector ycor, N_Vector delta, void* cvode_mem) in cvNlsLSolveSensStg1() argument
261 N_Vector ycor, N_Vector delta, in cvNlsConvTestSensStg1() argument
321 N_VLinearSum(ONE, cv_mem->cv_znS[0][is], ONE, ycor, cv_mem->cv_yS[is]); in cvNlsResidualSensStg1()
333 N_VLinearSum(cv_mem->cv_rl1, cv_mem->cv_znS[1][is], ONE, ycor, res); in cvNlsResidualSensStg1()
[all …]
/dports/science/cantera/cantera-2.5.1-611-gc4d6ecc15/ext/sundials/src/cvode/
H A Dcvode_nls.c34 static int cvNlsResidual(N_Vector ycor, N_Vector res, void* cvode_mem);
35 static int cvNlsFPFunction(N_Vector ycor, N_Vector res, void* cvode_mem);
39 static int cvNlsConvTest(SUNNonlinearSolver NLS, N_Vector ycor, N_Vector del,
46 const N_Vector ycor,
265 cv_mem->cv_acnrm = (m==0) ? del : N_VWrmsNorm(ycor, ewt); in cvNlsConvTest()
281 static int cvNlsResidual(N_Vector ycor, N_Vector res, void* cvode_mem) in cvNlsResidual() argument
293 N_VLinearSum(ONE, cv_mem->cv_zn[0], ONE, ycor, cv_mem->cv_y); in cvNlsResidual()
306 ycor, cv_mem->cv_ftemp, res); in cvNlsResidual()
311 N_VLinearSum(cv_mem->cv_rl1, cv_mem->cv_zn[1], ONE, ycor, res); in cvNlsResidual()
319 static int cvNlsFPFunction(N_Vector ycor, N_Vector res, void* cvode_mem) in cvNlsFPFunction() argument
[all …]
/dports/math/sundials/sundials-5.7.0/src/cvode/
H A Dcvode_nls.c34 static int cvNlsResidual(N_Vector ycor, N_Vector res, void* cvode_mem);
35 static int cvNlsFPFunction(N_Vector ycor, N_Vector res, void* cvode_mem);
39 static int cvNlsConvTest(SUNNonlinearSolver NLS, N_Vector ycor, N_Vector del,
46 const N_Vector ycor,
299 cv_mem->cv_acnrm = (m==0) ? del : N_VWrmsNorm(ycor, ewt); in cvNlsConvTest()
315 static int cvNlsResidual(N_Vector ycor, N_Vector res, void* cvode_mem) in cvNlsResidual() argument
327 N_VLinearSum(ONE, cv_mem->cv_zn[0], ONE, ycor, cv_mem->cv_y); in cvNlsResidual()
340 ycor, cv_mem->cv_ftemp, res); in cvNlsResidual()
345 N_VLinearSum(cv_mem->cv_rl1, cv_mem->cv_zn[1], ONE, ycor, res); in cvNlsResidual()
353 static int cvNlsFPFunction(N_Vector ycor, N_Vector res, void* cvode_mem) in cvNlsFPFunction() argument
[all …]
/dports/math/py-pystan/pystan-2.19.0.0/pystan/stan/lib/stan_math/lib/sundials_4.1.0/src/idas/
H A Didas_nls.c30 static int idaNlsResidual(N_Vector ycor, N_Vector res, void* ida_mem);
31 static int idaNlsLSetup(N_Vector ycor, N_Vector res, booleantype jbad,
33 static int idaNlsLSolve(N_Vector ycor, N_Vector delta, void* ida_mem);
34 static int idaNlsConvTest(SUNNonlinearSolver NLS, N_Vector ycor, N_Vector del,
169 static int idaNlsLSetup(N_Vector ycor, N_Vector res, booleantype jbad, in idaNlsLSetup() argument
203 static int idaNlsLSolve(N_Vector ycor, N_Vector delta, void* ida_mem) in idaNlsLSolve() argument
224 static int idaNlsResidual(N_Vector ycor, N_Vector res, void* ida_mem) in idaNlsResidual() argument
236 N_VLinearSum(ONE, IDA_mem->ida_yypredict, ONE, ycor, IDA_mem->ida_yy); in idaNlsResidual()
237 N_VLinearSum(ONE, IDA_mem->ida_yppredict, IDA_mem->ida_cj, ycor, IDA_mem->ida_yp); in idaNlsResidual()
256 static int idaNlsConvTest(SUNNonlinearSolver NLS, N_Vector ycor, N_Vector del, in idaNlsConvTest() argument
/dports/science/cantera/cantera-2.5.1-611-gc4d6ecc15/ext/sundials/examples/sunnonlinsol/newton/
H A Dtest_sunnonlinsol_newton.c71 N_Vector ycor; member
109 Imem->ycor = N_VClone(Imem->y0); in main()
110 if (check_retval((void *)Imem->ycor, "N_VClone", 0)) return(1); in main()
124 NV_Ith_S(Imem->ycor,0) = ZERO; in main()
125 NV_Ith_S(Imem->ycor,1) = ZERO; in main()
126 NV_Ith_S(Imem->ycor,2) = ZERO; in main()
168 retval = SUNNonlinSolSolve(NLS, Imem->y0, Imem->ycor, Imem->w, TOL, SUNTRUE, in main()
173 N_VLinearSum(ONE, Imem->y0, ONE, Imem->ycor, Imem->ycur); in main()
196 N_VDestroy(Imem->ycor); in main()
282 int Res(N_Vector ycor, N_Vector f, void *mem) in Res() argument
[all …]
H A Dtest_fsunnonlinsol_newton_mod.f9039 type(N_Vector), pointer :: ycor component
75 Imem%ycor => FN_VClone(Imem%y0)
83 call FN_VConst(ZERO, Imem%ycor)
131 retval = FSUNNonlinSolSolve(NLS, Imem%y0, Imem%ycor, Imem%w, TOL, 1, &
139 call FN_VLinearSum(ONE, Imem%y0, ONE, Imem%ycor, Imem%ycur)
165 call FN_VDestroy(Imem%ycor)
254 integer(C_INT) function Res(ycor, f, mem) &
261 type(N_Vector) :: ycor, f local
271 call FN_VLinearSum(ONE, Imem%y0, ONE, ycor, Imem%ycur)
/dports/math/sundials/sundials-5.7.0/examples/sunnonlinsol/newton/
H A Dtest_sunnonlinsol_newton.c71 N_Vector ycor; member
109 Imem->ycor = N_VClone(Imem->y0); in main()
110 if (check_retval((void *)Imem->ycor, "N_VClone", 0)) return(1); in main()
124 NV_Ith_S(Imem->ycor,0) = ZERO; in main()
125 NV_Ith_S(Imem->ycor,1) = ZERO; in main()
126 NV_Ith_S(Imem->ycor,2) = ZERO; in main()
168 retval = SUNNonlinSolSolve(NLS, Imem->y0, Imem->ycor, Imem->w, TOL, SUNTRUE, in main()
173 N_VLinearSum(ONE, Imem->y0, ONE, Imem->ycor, Imem->ycur); in main()
196 N_VDestroy(Imem->ycor); in main()
282 int Res(N_Vector ycor, N_Vector f, void *mem) in Res() argument
[all …]
H A Dtest_fsunnonlinsol_newton_mod.f9039 type(N_Vector), pointer :: ycor component
75 Imem%ycor => FN_VClone(Imem%y0)
83 call FN_VConst(ZERO, Imem%ycor)
131 retval = FSUNNonlinSolSolve(NLS, Imem%y0, Imem%ycor, Imem%w, TOL, 1, &
139 call FN_VLinearSum(ONE, Imem%y0, ONE, Imem%ycor, Imem%ycur)
165 call FN_VDestroy(Imem%ycor)
254 integer(C_INT) function Res(ycor, f, mem) &
261 type(N_Vector) :: ycor, f local
271 call FN_VLinearSum(ONE, Imem%y0, ONE, ycor, Imem%ycur)
/dports/science/cantera/cantera-2.5.1-611-gc4d6ecc15/ext/sundials/src/cvodes/
H A Dcvodes_nls.c25 static int cvNlsResidual(N_Vector ycor, N_Vector res, void* cvode_mem);
26 static int cvNlsFPFunction(N_Vector ycor, N_Vector res, void* cvode_mem);
30 static int cvNlsConvTest(SUNNonlinearSolver NLS, N_Vector ycor, N_Vector del,
220 static int cvNlsConvTest(SUNNonlinearSolver NLS, N_Vector ycor, N_Vector delta, in cvNlsConvTest() argument
249 cv_mem->cv_acnrm = (m==0) ? del : N_VWrmsNorm(ycor, cv_mem->cv_ewt); in cvNlsConvTest()
265 static int cvNlsResidual(N_Vector ycor, N_Vector res, void* cvode_mem) in cvNlsResidual() argument
278 N_VLinearSum(ONE, cv_mem->cv_zn[0], ONE, ycor, cv_mem->cv_y); in cvNlsResidual()
288 N_VLinearSum(cv_mem->cv_rl1, cv_mem->cv_zn[1], ONE, ycor, res); in cvNlsResidual()
295 static int cvNlsFPFunction(N_Vector ycor, N_Vector res, void* cvode_mem) in cvNlsFPFunction() argument
307 N_VLinearSum(ONE, cv_mem->cv_zn[0], ONE, ycor, cv_mem->cv_y); in cvNlsFPFunction()
H A Dcvodes_nls_stg1.c24 static int cvNlsResidualSensStg1(N_Vector ycor, N_Vector res,
26 static int cvNlsFPFunctionSensStg1(N_Vector ycor, N_Vector res,
33 N_Vector ycor, N_Vector del,
260 N_Vector ycor, N_Vector delta, in cvNlsConvTestSensStg1() argument
304 static int cvNlsResidualSensStg1(N_Vector ycor, N_Vector res, void* cvode_mem) in cvNlsResidualSensStg1() argument
320 N_VLinearSum(ONE, cv_mem->cv_znS[0][is], ONE, ycor, cv_mem->cv_yS[is]); in cvNlsResidualSensStg1()
332 N_VLinearSum(cv_mem->cv_rl1, cv_mem->cv_znS[1][is], ONE, ycor, res); in cvNlsResidualSensStg1()
339 static int cvNlsFPFunctionSensStg1(N_Vector ycor, N_Vector res, void* cvode_mem) in cvNlsFPFunctionSensStg1() argument
355 N_VLinearSum(ONE, cv_mem->cv_znS[0][is], ONE, ycor, cv_mem->cv_yS[is]); in cvNlsFPFunctionSensStg1()
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwpw/nwpwlib/D3dB/
H A Dhcurve.c32 extern int ycor(Rect_Type *, int);
64 if (2*r->lo->x == r->x) { return ycor(r->sp,r->g-i); in xcor()
80 int ycor(Rect_Type *r, int i) { in ycor() function
86 return r->lo->y + ycor(r->lu, r->lu->g + r->lo->g -r->lo->h -i-1); in ycor()
92 return r->ro->y - 1 - ycor(r->ro, r->g -r->lo->h -i-1); in ycor()
94 return r->lo->y - 1 - ycor(r->lo, i + r->lo->h - r->g); in ycor()
98 if (i < r->lo->h) {return ycor(r->lo, i);} else { in ycor()
100 return r->lo->y + ycor(r->lu, r->lu->g + r->lo->h -i-1); in ycor()
103 return r->ro->y + ycor(r->ru, i - r->lu->g - r->lo->h); in ycor()
108 return ycor(r->lo, i + r->lo->g - r->g); in ycor()
[all …]
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwpw/nwpwlib/D3dB/
H A Dhcurve.c32 extern int ycor(Rect_Type *, int);
64 if (2*r->lo->x == r->x) { return ycor(r->sp,r->g-i); in xcor()
80 int ycor(Rect_Type *r, int i) { in ycor() function
86 return r->lo->y + ycor(r->lu, r->lu->g + r->lo->g -r->lo->h -i-1); in ycor()
92 return r->ro->y - 1 - ycor(r->ro, r->g -r->lo->h -i-1); in ycor()
94 return r->lo->y - 1 - ycor(r->lo, i + r->lo->h - r->g); in ycor()
98 if (i < r->lo->h) {return ycor(r->lo, i);} else { in ycor()
100 return r->lo->y + ycor(r->lu, r->lu->g + r->lo->h -i-1); in ycor()
103 return r->ro->y + ycor(r->ru, i - r->lu->g - r->lo->h); in ycor()
108 return ycor(r->lo, i + r->lo->g - r->g); in ycor()
[all …]
/dports/math/stanmath/math-4.2.0/lib/sundials_5.7.0/src/cvodes/
H A Dcvodes_nls.c25 static int cvNlsResidual(N_Vector ycor, N_Vector res, void* cvode_mem);
26 static int cvNlsFPFunction(N_Vector ycor, N_Vector res, void* cvode_mem);
30 static int cvNlsConvTest(SUNNonlinearSolver NLS, N_Vector ycor, N_Vector del,
255 static int cvNlsConvTest(SUNNonlinearSolver NLS, N_Vector ycor, N_Vector delta, in cvNlsConvTest() argument
284 cv_mem->cv_acnrm = (m==0) ? del : N_VWrmsNorm(ycor, cv_mem->cv_ewt); in cvNlsConvTest()
300 static int cvNlsResidual(N_Vector ycor, N_Vector res, void* cvode_mem) in cvNlsResidual() argument
313 N_VLinearSum(ONE, cv_mem->cv_zn[0], ONE, ycor, cv_mem->cv_y); in cvNlsResidual()
323 N_VLinearSum(cv_mem->cv_rl1, cv_mem->cv_zn[1], ONE, ycor, res); in cvNlsResidual()
330 static int cvNlsFPFunction(N_Vector ycor, N_Vector res, void* cvode_mem) in cvNlsFPFunction() argument
342 N_VLinearSum(ONE, cv_mem->cv_zn[0], ONE, ycor, cv_mem->cv_y); in cvNlsFPFunction()
H A Dcvodes_nls_stg1.c24 static int cvNlsResidualSensStg1(N_Vector ycor, N_Vector res,
26 static int cvNlsFPFunctionSensStg1(N_Vector ycor, N_Vector res,
33 N_Vector ycor, N_Vector del,
260 N_Vector ycor, N_Vector delta, in cvNlsConvTestSensStg1() argument
304 static int cvNlsResidualSensStg1(N_Vector ycor, N_Vector res, void* cvode_mem) in cvNlsResidualSensStg1() argument
320 N_VLinearSum(ONE, cv_mem->cv_znS[0][is], ONE, ycor, cv_mem->cv_yS[is]); in cvNlsResidualSensStg1()
332 N_VLinearSum(cv_mem->cv_rl1, cv_mem->cv_znS[1][is], ONE, ycor, res); in cvNlsResidualSensStg1()
339 static int cvNlsFPFunctionSensStg1(N_Vector ycor, N_Vector res, void* cvode_mem) in cvNlsFPFunctionSensStg1() argument
355 N_VLinearSum(ONE, cv_mem->cv_znS[0][is], ONE, ycor, cv_mem->cv_yS[is]); in cvNlsFPFunctionSensStg1()
/dports/math/sundials/sundials-5.7.0/src/cvodes/
H A Dcvodes_nls.c25 static int cvNlsResidual(N_Vector ycor, N_Vector res, void* cvode_mem);
26 static int cvNlsFPFunction(N_Vector ycor, N_Vector res, void* cvode_mem);
30 static int cvNlsConvTest(SUNNonlinearSolver NLS, N_Vector ycor, N_Vector del,
255 static int cvNlsConvTest(SUNNonlinearSolver NLS, N_Vector ycor, N_Vector delta, in cvNlsConvTest() argument
284 cv_mem->cv_acnrm = (m==0) ? del : N_VWrmsNorm(ycor, cv_mem->cv_ewt); in cvNlsConvTest()
300 static int cvNlsResidual(N_Vector ycor, N_Vector res, void* cvode_mem) in cvNlsResidual() argument
313 N_VLinearSum(ONE, cv_mem->cv_zn[0], ONE, ycor, cv_mem->cv_y); in cvNlsResidual()
323 N_VLinearSum(cv_mem->cv_rl1, cv_mem->cv_zn[1], ONE, ycor, res); in cvNlsResidual()
330 static int cvNlsFPFunction(N_Vector ycor, N_Vector res, void* cvode_mem) in cvNlsFPFunction() argument
342 N_VLinearSum(ONE, cv_mem->cv_zn[0], ONE, ycor, cv_mem->cv_y); in cvNlsFPFunction()
H A Dcvodes_nls_stg1.c24 static int cvNlsResidualSensStg1(N_Vector ycor, N_Vector res,
26 static int cvNlsFPFunctionSensStg1(N_Vector ycor, N_Vector res,
33 N_Vector ycor, N_Vector del,
260 N_Vector ycor, N_Vector delta, in cvNlsConvTestSensStg1() argument
304 static int cvNlsResidualSensStg1(N_Vector ycor, N_Vector res, void* cvode_mem) in cvNlsResidualSensStg1() argument
320 N_VLinearSum(ONE, cv_mem->cv_znS[0][is], ONE, ycor, cv_mem->cv_yS[is]); in cvNlsResidualSensStg1()
332 N_VLinearSum(cv_mem->cv_rl1, cv_mem->cv_znS[1][is], ONE, ycor, res); in cvNlsResidualSensStg1()
339 static int cvNlsFPFunctionSensStg1(N_Vector ycor, N_Vector res, void* cvode_mem) in cvNlsFPFunctionSensStg1() argument
355 N_VLinearSum(ONE, cv_mem->cv_znS[0][is], ONE, ycor, cv_mem->cv_yS[is]); in cvNlsFPFunctionSensStg1()
/dports/science/cantera/cantera-2.5.1-611-gc4d6ecc15/ext/sundials/examples/sunnonlinsol/fixedpoint/
H A Dtest_sunnonlinsol_fixedpoint.c104 N_Vector ycor; member
151 Imem->ycor = N_VClone(Imem->y0); in main()
152 if (check_retval((void *)Imem->ycor, "N_VClone", 0)) return(1); in main()
169 N_VConst(ZERO, Imem->ycor); in main()
195 retval = SUNNonlinSolSolve(NLS, Imem->y0, Imem->ycor, Imem->w, tol, SUNTRUE, in main()
200 N_VLinearSum(ONE, Imem->y0, ONE, Imem->ycor, Imem->ycur); in main()
213 N_VDestroy(Imem->ycor); in main()
256 int FPFunction(N_Vector ycor, N_Vector gvec, void *mem) in FPFunction() argument
270 N_VLinearSum(ONE, Imem->y0, ONE, ycor, Imem->ycur); in FPFunction()
/dports/math/sundials/sundials-5.7.0/examples/sunnonlinsol/fixedpoint/
H A Dtest_sunnonlinsol_fixedpoint.c104 N_Vector ycor; member
151 Imem->ycor = N_VClone(Imem->y0); in main()
152 if (check_retval((void *)Imem->ycor, "N_VClone", 0)) return(1); in main()
169 N_VConst(ZERO, Imem->ycor); in main()
195 retval = SUNNonlinSolSolve(NLS, Imem->y0, Imem->ycor, Imem->w, tol, SUNTRUE, in main()
200 N_VLinearSum(ONE, Imem->y0, ONE, Imem->ycor, Imem->ycur); in main()
213 N_VDestroy(Imem->ycor); in main()
256 int FPFunction(N_Vector ycor, N_Vector gvec, void *mem) in FPFunction() argument
270 N_VLinearSum(ONE, Imem->y0, ONE, ycor, Imem->ycur); in FPFunction()
/dports/lang/mit-scheme/mit-scheme-9.2/src/6001/
H A Dpic-ops.scm36 (define ycor cdr) unknown
199 (ly (min (ycor ll) (ycor lr) (ycor ul) (ycor ur))) ;extreme
201 (uy (max (ycor ll) (ycor lr) (ycor ul) (ycor ur))) ;values
214 (close-enough? (ycor ur) uy)) ; 0 degrees
222 (close-enough? (ycor ur) uy)) ; 90 degrees anti-clockwise
238 (close-enough? (ycor ur) ly)) ; 90 degrees clockwise
253 (close-enough? (ycor ur) ly)) ; 180 degrees
270 (- (ycor rot-bot-lef) dn))) ; coordinates"
/dports/databases/py-gdbm/Python-3.8.12/Lib/turtledemo/
H A Dcolormixer.py30 self._color[self.x] = self.ycor()
35 screen.bgcolor(red.ycor(), green.ycor(), blue.ycor())
/dports/lang/python-legacy/Python-2.7.18/Demo/turtle/
H A Dtdemo_colormixer.py30 self._color[self.x] = self.ycor()
35 screen.bgcolor(red.ycor(), green.ycor(), blue.ycor())

12345678