@@ -1292,121 +1292,3 @@ void ElectroMagnAM::initAntennas( Patch *patch )
12921292
12931293}
12941294
1295- // ! Evaluating EM fields modes correctly on axis
1296- void ElectroMagnAM::on_axis_J ( bool diag_flag )
1297- {
1298-
1299- if ( isYmin ) {
1300-
1301- cField2D *Jl ;
1302- cField2D *Jr ;
1303- cField2D *Jt ;
1304-
1305- for ( unsigned int imode=0 ; imode<nmodes ; imode++ ) {
1306-
1307- // static cast of the total currents and densities
1308- Jl = Jl_[imode];
1309- Jr = Jr_[imode];
1310- Jt = Jt_[imode];
1311-
1312- // Set Jr below axis to zero for all modes
1313- for ( unsigned int i=0 ; i<nl_p; i++ ) {
1314- for ( unsigned int j=0 ; j<oversize[1 ]+1 ; j++ ) {
1315- ( *Jr )( i, j ) = 0 . ;
1316- }
1317- }
1318- // Set Jt below and on axis to zero for all modes except mode 1
1319- if ( imode != 1 ) {
1320- for ( unsigned int i=0 ; i<nl_p; i++ ) {
1321- for ( unsigned int j=0 ; j<oversize[1 ]+1 ; j++ ) {
1322- ( *Jt )( i, j ) = 0 . ;
1323- }
1324- }
1325- } else {
1326- // Set Jt below axis to zero for all modes
1327- for ( unsigned int i=0 ; i<nl_p; i++ ) {
1328- for ( unsigned int j=0 ; j<oversize[1 ]; j++ ) {
1329- ( *Jt )( i, j ) = 0 . ;
1330- }
1331- // Set Jt on axis for mode 1 for continuity equation
1332- ( *Jt )( i, oversize[1 ] ) = - 1 ./3 .* ( 4 .* Icpx * ( *Jr )( i, oversize[1 ]+1 ) + ( *Jt )( i, oversize[1 ]+1 ) );
1333- }
1334- }
1335- if ( imode != 0 ) {
1336- // Set Jx below and on axis to zero for all modes except mode 0
1337- for ( unsigned int i=0 ; i<nl_d; i++ ) {
1338- for ( unsigned int j=0 ; j<oversize[1 ]+1 ; j++ ) {
1339- ( *Jl )( i, j ) = 0 . ;
1340- }
1341- }
1342- } else {
1343- // Set Jx below axis to zero for all modes
1344- for ( unsigned int i=0 ; i<nl_d; i++ ) {
1345- for ( unsigned int j=0 ; j<oversize[1 ]; j++ ) {
1346- ( *Jl )( i, j ) = 0 . ;
1347- }
1348- }
1349-
1350- }
1351-
1352- }
1353- // if(diag_flag){
1354- // for ( unsigned int imode=0 ; imode<nmodes ; imode++ ) {
1355- // cField2D* rho = rho_AM_[imode];
1356- // if (imode == 0){
1357- // for (unsigned int ism=0; ism < n_species; ism++){
1358- // Jt = Jt_s[ism];
1359- // Jr = Jr_s[ism];
1360- // if ( ( Jt != NULL ) )
1361- // for (unsigned int i=0; i<nl_p; i++)
1362- // (*Jt)(i,oversize[1]) = 0. ;
1363- // if ( ( Jr != NULL ) )
1364- // for (unsigned int i=0; i<nl_p; i++)
1365- // (*Jr)(i,oversize[1]) = -(*Jr)(i,oversize[1]) ;
1366-
1367- // }
1368- // }
1369- // else if (imode == 1){
1370- // for (unsigned int i=0; i<nl_p; i++)
1371- // (*rho)(i,oversize[1])= 0.;
1372- // //Loop on all modes and species for J_s
1373- // for (unsigned int ism=n_species; ism < 2*n_species; ism++){
1374- // Jl = Jl_s[ism];
1375- // Jt = Jt_s[ism];
1376- // Jr = Jr_s[ism];
1377- // //if ( ( Jt != NULL ) && (Jr != NULL ) ) {
1378- // // for (unsigned int i=0; i<nl_p; i++)
1379- // // (*Jt)(i,oversize[1]) = - 1./3.* (4.* Icpx * (*Jr)(i,oversize[1]+1) + (*Jt)(i,oversize[1]+1));
1380- // // for (unsigned int i=0; i<nl_p; i++)
1381- // // (*Jr)(i,oversize[1])= 2.*Icpx* (*Jt)(i,oversize[1])-(*Jr)(i,oversize[1]+1) ;
1382- // //}
1383- // if ( Jl != NULL )
1384- // for (unsigned int i=0; i<nl_d; i++)
1385- // (*Jl)(i,oversize[1])= 0. ;
1386- // }
1387- // }
1388- // else { // imode > 1
1389- // //Loop on all modes and species for J_s
1390- // for (unsigned int ism=2*n_species; ism < n_species*nmodes ; ism++){
1391- // Jt = Jt_s[ism];
1392- // if ( Jt != NULL )
1393- // for (unsigned int i=0; i<nl_p; i++)
1394- // (*Jt)(i,oversize[1]) = 0.;
1395-
1396- // Jr = Jr_s[ism];
1397- // if ( Jr != NULL )
1398- // for (unsigned int i=0; i<nl_p; i++)
1399- // (*Jr)(i,oversize[1]) = -(*Jr)(i,oversize[1]+1) ;
1400-
1401- // Jl = Jl_s[ism];
1402- // if ( Jl != NULL )
1403- // for (unsigned int i=0; i<nl_d; i++)
1404- // (*Jl)(i,oversize[1])= 0. ;
1405- // }
1406- // }
1407- // }
1408- // }
1409- }
1410- return ;
1411- }
1412-
0 commit comments