Home
last modified time | relevance | path

Searched refs:RAYON0 (Results 1 – 6 of 6) sorted by relevance

/dports/graphics/xd3d/xd3d-8.3.1/src/d3d/
H A Drayons.f160 SUBROUTINE RAYTMS(X,Y,Z,ICOR,RAYON0,BIG,NUMNP,NBCORN) argument
161 DIMENSION X(*),Y(*),Z(*),ICOR(*),RAYON0(*)
213 RAYON0(I) = .5*( Z(ICENT)-Z(I)
216 RAYON0(I) = 1000.
219 RAYON0(I) = 0.
227 RR = RR+RAYON0(IP1)
231 RR = RR+RAYON0(IP2)
235 RR = RR+RAYON0(IP3)
238 RAYON0(ICENT) = RR/REAL(II)
240 RAYON0(ICENT) = 1000.
H A Dcom_coor.f18 & ,RAYON0(NPMAX),RAYON2(NPMAX) local
H A Dcom_coor_generic.f17 & ,RAYON0(NPMAX),RAYON2(NPMAX) local
H A Dmyiso.f141 CALL VALBID(NF4,NUMNP,RAYON0,NFAC,VALF,VALXB,VMIN,VMAX,1
151 CALL VALBID(NF4,NUMNP,RAYON0,NFAC,VALF,VALX,VMIN,VMAX,1
H A Dexagere.f155 CALL RAYTMS(X,Y,Z,ICOR,RAYON0,BIG,NUMNP,NBCORN)
H A Dlecture.f309 & CALL RAYTMS(X,Y,Z,ICOR,RAYON0,BIG,NUMNP,NBCORN)