Store data that can be precomputed on a set ot zeta points depends on hmap_axisNB, but could be used for different point sets in zeta
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| real(kind=wp), | public | :: | zeta | ||||
| logical, | public | :: | do_2nd_der | ||||
| real(kind=wp), | public, | DIMENSION(3) | :: | X0 |
Position,Tangent,Normal,Bi-Normal and N',B' and T',B'',N'' |
||
| real(kind=wp), | public, | DIMENSION(3) | :: | T |
Position,Tangent,Normal,Bi-Normal and N',B' and T',B'',N'' |
||
| real(kind=wp), | public, | DIMENSION(3) | :: | N |
Position,Tangent,Normal,Bi-Normal and N',B' and T',B'',N'' |
||
| real(kind=wp), | public, | DIMENSION(3) | :: | B |
Position,Tangent,Normal,Bi-Normal and N',B' and T',B'',N'' |
||
| real(kind=wp), | public, | DIMENSION(3) | :: | Np |
Position,Tangent,Normal,Bi-Normal and N',B' and T',B'',N'' |
||
| real(kind=wp), | public, | DIMENSION(3) | :: | Bp |
Position,Tangent,Normal,Bi-Normal and N',B' and T',B'',N'' |
||
| real(kind=wp), | public, | DIMENSION(3) | :: | Tp |
Position,Tangent,Normal,Bi-Normal and N',B' and T',B'',N'' |
||
| real(kind=wp), | public, | DIMENSION(3) | :: | Npp |
Position,Tangent,Normal,Bi-Normal and N',B' and T',B'',N'' |
||
| real(kind=wp), | public, | DIMENSION(3) | :: | Bpp |
Position,Tangent,Normal,Bi-Normal and N',B' and T',B'',N'' |
||
| real(kind=wp), | public, | DIMENSION(3) | :: | NxB |
cross products |
||
| real(kind=wp), | public, | DIMENSION(3) | :: | NpxB |
cross products |
||
| real(kind=wp), | public, | DIMENSION(3) | :: | NxBp |
cross products |
||
| real(kind=wp), | public | :: | BB |
dot-products of above vectors, size(nzeta_eval) |
|||
| real(kind=wp), | public | :: | NN |
dot-products of above vectors, size(nzeta_eval) |
|||
| real(kind=wp), | public | :: | NB |
dot-products of above vectors, size(nzeta_eval) |
|||
| real(kind=wp), | public | :: | BpN |
dot-products of above vectors, size(nzeta_eval) |
|||
| real(kind=wp), | public | :: | BpB |
dot-products of above vectors, size(nzeta_eval) |
|||
| real(kind=wp), | public | :: | NpN |
dot-products of above vectors, size(nzeta_eval) |
|||
| real(kind=wp), | public | :: | NpB |
dot-products of above vectors, size(nzeta_eval) |
initialize the aux variable
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(t_hmap_axisNB), | intent(in) | :: | sf |
self (hmap) |
||
| real(kind=wp), | intent(in) | :: | zeta | |||
| logical, | intent(in) | :: | do_2nd_der |
compute second derivative and store second derivative terms |
auxiliary variable
TYPE,EXTENDS(c_hmap_auxvar) :: t_hmap_axisNB_auxvar REAL(wp),DIMENSION(3) :: X0,T,N,B,Np,Bp,Tp,Npp,Bpp !! Position,Tangent,Normal,Bi-Normal and N',B' and T',B'',N'' REAL(wp),DIMENSION(3) :: NxB,NpxB,NxBp !! cross products REAL(wp) :: BB,NN,NB,BpN,BpB,NpN,NpB !!dot-products of above vectors, size(nzeta_eval) END TYPE t_hmap_axisNB_auxvar