86 double& snodm, double& cnodm, double& sinim, double& cosim, double& sinomm,
110 double cosim, double emsq, double argpo, double s1, double s2,
424 		double& snodm, double& cnodm, double& sinim, double& cosim, double& sinomm,  in dscom()  argument
470 		cosim = cos(inclp);  in dscom()
515 			a2 = cosim * a7 + sinim * a8;  in dscom()
516 			a4 = cosim * a9 + sinim * a10;  in dscom()
517 			a5 = -sinim * a7 + cosim * a8;  in dscom()
518 			a6 = -sinim * a9 + cosim * a10;  in dscom()
706 		double cosim, double emsq, double argpo, double s1, double s2,  in dsinit()  argument
771 		sgs = sghs - cosim * shs;  in dsinit()
786 			domdt = domdt - cosim / sinim * shll;  in dsinit()
815 				cosisq = cosim * cosim;  in dsinit()
858 				f220 = 0.75 * (1.0 + 2.0 * cosim + cosisq);  in dsinit()
860 				f321 = 1.875 * sinim  *  (1.0 - 2.0 * cosim - 3.0 * cosisq);  in dsinit()
861 				f322 = -1.875 * sinim  *  (1.0 + 2.0 * cosim - 3.0 * cosisq);  in dsinit()
864 				f522 = 9.84375 * sinim * (sini2 * (1.0 - 2.0 * cosim - 5.0 * cosisq) +  in dsinit()
865 					0.33333333 * (-2.0 + 4.0 * cosim + 6.0 * cosisq));  in dsinit()
866 				f523 = sinim * (4.92187512 * sini2 * (-2.0 - 4.0 * cosim +  in dsinit()
867 					10.0 * cosisq) + 6.56250012 * (1.0 + 2.0 * cosim - 3.0 * cosisq));  in dsinit()
868 				f542 = 29.53125 * sinim * (2.0 - 8.0 * cosim + cosisq *  in dsinit()
869 					(-12.0 + 8.0 * cosim + 10.0 * cosisq));  in dsinit()
870 				f543 = 29.53125 * sinim * (-2.0 - 8.0 * cosim + cosisq *  in dsinit()
871 					(12.0 + 8.0 * cosim - 10.0 * cosisq));  in dsinit()
905 				f220 = 0.75 * (1.0 + cosim) * (1.0 + cosim);  in dsinit()
906 				f311 = 0.9375 * sinim * sinim * (1.0 + 3.0 * cosim) - 0.75 * (1.0 + cosim);  in dsinit()
907 				f330 = 1.0 + cosim;  in dsinit()
1371 			cnodm, snodm, cosim, sinim, cosomm, sinomm, cc1sq,  in sgp4init()  local
1577 					satrec.no_unkozai, snodm, cnodm, sinim, cosim, sinomm, cosomm,  in sgp4init()
1613 					cosim, emsq, satrec.argpo, s1, s2, s3, s4, s5, sinim, ss1, ss2, ss3, ss4,  in sgp4init()
1752 		double am, axnl, aynl, betal, cosim, cnod,  in sgp4()  local
1881 		cosim = cos(inclm);  in sgp4()
1890 		cosip = cosim;  in sgp4()