Searched refs:point2x (Results 1 – 7 of 7) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | proces.f | 58 call gendat (y, ac, point2x, 77 call initStats(point2x, iBC, point2iper, point2ilwork) 83 call initTurb( point2x ) 88 call initNABI( point2x, shpb ) 101 call initSponge( y,point2x) 143 if(point2x(i,1).lt.1.0e-5 .and. mod(iBC(i),1024).eq.ibcmatch) then 185 if(point2x(nn,1) .gt. EVrampXmax) then !downstream of the ramp 187 elseif(point2x(nn,1) .gt. EVrampXmin) then !and x(:,1) <= EVrampXmax 191 y(nn,6) = c0 + (point2x(nn,1) - x1)*( 192 & c1 + (point2x(nn,1) - x1)*( [all …]
|
| H A D | readnblk.f | 13 real*8, allocatable :: point2x(:,:) variable 249 allocate( point2x(numnp,nsd) ) 255 point2x = xread 273 where (point2x(:,1) .ge. xmin) 277 point2x(:,1)=point2x(:,1)+ 278 & alpha*(point2x(:,1)-xmin)**2
|
| H A D | gendat.f | 111 call genBC (iBC, BC, point2x, 219 call eqn_plane(point2x, iBC)
|
| /phasta/phSolver/AMG/ |
| H A D | ramg_tools.f | 1048 & point2x(i,1),point2x(i,2),point2x(i,3)
|
| /phasta/AcuStat/src/ |
| H A D | readnblk.f | 15 real*8, allocatable :: point2x(:,:) variable
|
| /phasta/M2NFixBnd/src/ |
| H A D | readnblk.f | 15 real*8, allocatable :: point2x(:,:) variable
|
| /phasta/M2N/src/ |
| H A D | readnblk.f | 15 real*8, allocatable :: point2x(:,:) variable
|