Home
last modified time | relevance | path

Searched refs:xrval (Results 1 – 25 of 31) sorted by relevance

12

/dports/astro/oskar/OSKAR-2.8.0/extern/cfitsio/
H A Dwcssub.c176 double *xrval, /* O - X reference value */ in ffgics() argument
209 if (ffgkyd(fptr, "CRVAL1", xrval, NULL, &tstat)) in ffgics()
210 *xrval = 0.; in ffgics()
400 temp = *xrval; in ffgics()
401 *xrval = *yrval; in ffgics()
412 double *xrval, /* O - X reference value */ in ffgicsa() argument
460 if (ffgkyd(fptr, keyname, xrval, NULL, &tstat)) in ffgicsa()
461 *xrval = 0.; in ffgicsa()
678 temp = *xrval; in ffgicsa()
679 *xrval = *yrval; in ffgicsa()
[all …]
/dports/astro/cfitsio/cfitsio-3.49/
H A Dwcssub.c176 double *xrval, /* O - X reference value */ in ffgics() argument
209 if (ffgkyd(fptr, "CRVAL1", xrval, NULL, &tstat)) in ffgics()
210 *xrval = 0.; in ffgics()
400 temp = *xrval; in ffgics()
401 *xrval = *yrval; in ffgics()
412 double *xrval, /* O - X reference value */ in ffgicsa() argument
460 if (ffgkyd(fptr, keyname, xrval, NULL, &tstat)) in ffgicsa()
461 *xrval = 0.; in ffgicsa()
678 temp = *xrval; in ffgicsa()
679 *xrval = *yrval; in ffgicsa()
[all …]
H A Dtestf77.f59 double precision xrval,yrval,xrpix,yrpix,xinc,yinc,rot variable
2236 xrval = 45.83D+00
2245 call ftpkyd(iunit, 'CRVAL1', xrval, 10, 'comment', status)
2258 xrval = 0.D+00
2266 call ftgics(iunit, xrval, yrval, xrpix,
2274 call ftwldp(xpix,ypix,xrval,yrval,xrpix,yrpix,xinc,yinc,
2277 write(*,'(1x,A,2f8.3)')' CRVAL1, CRVAL2 =', xrval,yrval
2286 call ftxypx(xpos,ypos,xrval,yrval,xrpix,yrpix,xinc,yinc,
H A Dtestprog.c49 double xrval,yrval,xrpix,yrpix,xinc,yinc,rot,xpos,ypos,xpix,ypix; in main() local
2293 xrval = 45.83; in main()
2302 ffpkyd(fptr, "CRVAL1", xrval, 10, "comment", &status); in main()
2313 xrval = 0.; in main()
2321 ffgics(fptr, &xrval, &yrval, &xrpix, in main()
2328 ffwldp(xpix,ypix,xrval,yrval,xrpix,yrpix,xinc,yinc,rot,ctype, in main()
2331 printf(" CRVAL1, CRVAL2 = %16.12f, %16.12f\n", xrval,yrval); in main()
2338 ffxypx(xpos,ypos,xrval,yrval,xrpix,yrpix,xinc,yinc,rot,ctype, in main()
/dports/science/healpix/Healpix_3.50/src/healpy/cfitsio/
H A Dwcssub.c176 double *xrval, /* O - X reference value */ in ffgics() argument
209 if (ffgkyd(fptr, "CRVAL1", xrval, NULL, &tstat)) in ffgics()
210 *xrval = 0.; in ffgics()
400 temp = *xrval; in ffgics()
401 *xrval = *yrval; in ffgics()
412 double *xrval, /* O - X reference value */ in ffgicsa() argument
460 if (ffgkyd(fptr, keyname, xrval, NULL, &tstat)) in ffgicsa()
461 *xrval = 0.; in ffgicsa()
678 temp = *xrval; in ffgicsa()
679 *xrval = *yrval; in ffgicsa()
[all …]
H A Dtestf77.f59 double precision xrval,yrval,xrpix,yrpix,xinc,yinc,rot
2236 xrval = 45.83D+00
2245 call ftpkyd(iunit, 'CRVAL1', xrval, 10, 'comment', status)
2258 xrval = 0.D+00
2266 call ftgics(iunit, xrval, yrval, xrpix,
2274 call ftwldp(xpix,ypix,xrval,yrval,xrpix,yrpix,xinc,yinc,
2277 write(*,'(1x,A,2f8.3)')' CRVAL1, CRVAL2 =', xrval,yrval
2286 call ftxypx(xpos,ypos,xrval,yrval,xrpix,yrpix,xinc,yinc,
H A Dtestprog.c49 double xrval,yrval,xrpix,yrpix,xinc,yinc,rot,xpos,ypos,xpix,ypix; in main() local
2293 xrval = 45.83; in main()
2302 ffpkyd(fptr, "CRVAL1", xrval, 10, "comment", &status); in main()
2313 xrval = 0.; in main()
2321 ffgics(fptr, &xrval, &yrval, &xrpix, in main()
2328 ffwldp(xpix,ypix,xrval,yrval,xrpix,yrpix,xinc,yinc,rot,ctype, in main()
2331 printf(" CRVAL1, CRVAL2 = %16.12f, %16.12f\n", xrval,yrval); in main()
2338 ffxypx(xpos,ypos,xrval,yrval,xrpix,yrpix,xinc,yinc,rot,ctype, in main()
/dports/astro/py-astropy/astropy-5.0/cextern/cfitsio/lib/
H A Dwcssub.c176 double *xrval, /* O - X reference value */ in ffgics() argument
209 if (ffgkyd(fptr, "CRVAL1", xrval, NULL, &tstat)) in ffgics()
210 *xrval = 0.; in ffgics()
400 temp = *xrval; in ffgics()
401 *xrval = *yrval; in ffgics()
412 double *xrval, /* O - X reference value */ in ffgicsa() argument
460 if (ffgkyd(fptr, keyname, xrval, NULL, &tstat)) in ffgicsa()
461 *xrval = 0.; in ffgicsa()
678 temp = *xrval; in ffgicsa()
679 *xrval = *yrval; in ffgicsa()
[all …]
/dports/science/bagel/bagel-1.2.2/src/integral/comprys/
H A D_complex_eriroot_9.cc20334 double xrval[10]; in complex_eriroot9() local
20392 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot9()
20412 sumxr += xrval[k] * fac3; in complex_eriroot9()
20470 double xrval[8]; in complex_eriroot9() local
20512 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot9()
20532 sumxr += xrval[k] * fac3; in complex_eriroot9()
H A D_complex_eriroot_13.cc35284 double xrval[10]; in complex_eriroot13() local
35342 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot13()
35362 sumxr += xrval[k] * fac3; in complex_eriroot13()
35420 double xrval[8]; in complex_eriroot13() local
35462 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot13()
35482 sumxr += xrval[k] * fac3; in complex_eriroot13()
H A D_complex_eriroot_3.cc4628 double xrval[10]; in complex_eriroot3() local
4686 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot3()
4706 sumxr += xrval[k] * fac3; in complex_eriroot3()
4764 double xrval[8]; in complex_eriroot3() local
4806 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot3()
4826 sumxr += xrval[k] * fac3; in complex_eriroot3()
H A D_complex_eriroot_7.cc14230 double xrval[10]; in complex_eriroot7() local
14288 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot7()
14308 sumxr += xrval[k] * fac3; in complex_eriroot7()
14366 double xrval[8]; in complex_eriroot7() local
14408 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot7()
14428 sumxr += xrval[k] * fac3; in complex_eriroot7()
H A D_complex_eriroot_2.cc2832 double xrval[10]; in complex_eriroot2() local
2890 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot2()
2910 sumxr += xrval[k] * fac3; in complex_eriroot2()
2968 double xrval[8]; in complex_eriroot2() local
3010 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot2()
3030 sumxr += xrval[k] * fac3; in complex_eriroot2()
H A D_complex_eriroot_4.cc6696 double xrval[10]; in complex_eriroot4() local
6754 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot4()
6774 sumxr += xrval[k] * fac3; in complex_eriroot4()
6832 double xrval[8]; in complex_eriroot4() local
6874 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot4()
6894 sumxr += xrval[k] * fac3; in complex_eriroot4()
H A D_complex_eriroot_5.cc9042 double xrval[10]; in complex_eriroot5() local
9100 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot5()
9120 sumxr += xrval[k] * fac3; in complex_eriroot5()
9178 double xrval[8]; in complex_eriroot5() local
9220 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot5()
9240 sumxr += xrval[k] * fac3; in complex_eriroot5()
H A D_complex_eriroot_11.cc27854 double xrval[10]; in complex_eriroot11() local
27912 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot11()
27932 sumxr += xrval[k] * fac3; in complex_eriroot11()
27990 double xrval[8]; in complex_eriroot11() local
28032 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot11()
28052 sumxr += xrval[k] * fac3; in complex_eriroot11()
H A D_complex_eriroot_6.cc11658 double xrval[10]; in complex_eriroot6() local
11716 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot6()
11736 sumxr += xrval[k] * fac3; in complex_eriroot6()
11794 double xrval[8]; in complex_eriroot6() local
11836 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot6()
11856 sumxr += xrval[k] * fac3; in complex_eriroot6()
H A D_complex_eriroot_8.cc17350 double xrval[10]; in complex_eriroot8() local
17408 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot8()
17428 sumxr += xrval[k] * fac3; in complex_eriroot8()
17486 double xrval[8]; in complex_eriroot8() local
17528 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot8()
17548 sumxr += xrval[k] * fac3; in complex_eriroot8()
H A D_complex_eriroot_1.cc1268 double xrval[10]; in complex_eriroot1() local
1326 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot1()
1346 sumxr += xrval[k] * fac3; in complex_eriroot1()
1404 double xrval[8]; in complex_eriroot1() local
1446 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot1()
1466 sumxr += xrval[k] * fac3; in complex_eriroot1()
H A D_complex_eriroot_12.cc31476 double xrval[10]; in complex_eriroot12() local
31534 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot12()
31554 sumxr += xrval[k] * fac3; in complex_eriroot12()
31612 double xrval[8]; in complex_eriroot12() local
31654 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot12()
31674 sumxr += xrval[k] * fac3; in complex_eriroot12()
H A D_complex_eriroot_10.cc23954 double xrval[10]; in complex_eriroot10() local
24012 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot10()
24032 sumxr += xrval[k] * fac3; in complex_eriroot10()
24090 double xrval[8]; in complex_eriroot10() local
24132 xrval[k-1] = tr*dr - fr + xr[boxof+0]*0.5; in complex_eriroot10()
24152 sumxr += xrval[k] * fac3; in complex_eriroot10()
/dports/astro/p5-Astro-FITS-CFITSIO/Astro-FITS-CFITSIO-1.15/testprog/
H A Dtestprog.pl54 my ($xrval,$yrval,$xrpix,$yrpix,$xinc,$yinc,$rot,$ctype,$xpix,$ypix,$xpos,$ypos);
1640 $xrval=45.83;
1647 ffpkyd($fptr,'CRVAL1',$xrval,10,'comment',$status);
1657 $xrval = 0;
1665 ffgics($fptr,$xrval,$yrval,$xrpix,$yrpix,$xinc,$yinc,$rot,$ctype,$status);
1671 ffwldp($xpix,$ypix,$xrval,$yrval,$xrpix,$yrpix,$xinc,$yinc,$rot,$ctype,$xpos,$ypos,$status);
1673 printf " CRVAL1, CRVAL2 = %16.12f, %16.12f\n", $xrval,$yrval;
1680 ffxypx($xpos,$ypos,$xrval,$yrval,$xrpix,$yrpix,$xinc,$yinc,$rot,$ctype,$xpix,$ypix,$status);
H A Dtestprog_OO.pl54 my ($xrval,$yrval,$xrpix,$yrpix,$xinc,$yinc,$rot,$ctype,$xpix,$ypix,$xpos,$ypos);
1650 $xrval=45.83;
1657 $fptr->write_key_dbl('CRVAL1',$xrval,10,'comment',$status);
1667 $xrval = 0;
1675 $fptr->read_img_coord($xrval,$yrval,$xrpix,$yrpix,$xinc,$yinc,$rot,$ctype,$status);
1681 fits_pix_to_world($xpix,$ypix,$xrval,$yrval,$xrpix,$yrpix,$xinc,$yinc,$rot,$ctype,$xpos,$ypos,$stat…
1683 printf " CRVAL1, CRVAL2 = %16.12f, %16.12f\n", $xrval,$yrval;
1690 fits_world_to_pix($xpos,$ypos,$xrval,$yrval,$xrpix,$yrpix,$xinc,$yinc,$rot,$ctype,$xpix,$ypix,$stat…
H A Dtestprog_longnames.pl54 my ($xrval,$yrval,$xrpix,$yrpix,$xinc,$yinc,$rot,$ctype,$xpix,$ypix,$xpos,$ypos);
1650 $xrval=45.83;
1657 fits_write_key_dbl($fptr,'CRVAL1',$xrval,10,'comment',$status);
1667 $xrval = 0;
1675 fits_read_img_coord($fptr,$xrval,$yrval,$xrpix,$yrpix,$xinc,$yinc,$rot,$ctype,$status);
1681 fits_pix_to_world($xpix,$ypix,$xrval,$yrval,$xrpix,$yrpix,$xinc,$yinc,$rot,$ctype,$xpos,$ypos,$stat…
1683 printf " CRVAL1, CRVAL2 = %16.12f, %16.12f\n", $xrval,$yrval;
1690 fits_world_to_pix($xpos,$ypos,$xrval,$yrval,$xrpix,$yrpix,$xinc,$yinc,$rot,$ctype,$xpix,$ypix,$stat…
H A Dtestprog_pdl.pl70 my ($xrval,$yrval,$xrpix,$yrpix,$xinc,$yinc,$rot,$ctype,$xpix,$ypix,$xpos,$ypos);
1679 $xrval=45.83;
1686 $fptr->write_key_dbl('CRVAL1',$xrval,10,'comment',$status);
1696 $xrval = 0;
1704 $fptr->read_img_coord($xrval,$yrval,$xrpix,$yrpix,$xinc,$yinc,$rot,$ctype,$status);
1710 fits_pix_to_world($xpix,$ypix,$xrval,$yrval,$xrpix,$yrpix,$xinc,$yinc,$rot,$ctype,$xpos,$ypos,$stat…
1712 printf " CRVAL1, CRVAL2 = %16.12f, %16.12f\n", $xrval,$yrval;
1719 fits_world_to_pix($xpos,$ypos,$xrval,$yrval,$xrpix,$yrpix,$xinc,$yinc,$rot,$ctype,$xpix,$ypix,$stat…

12