Symbol | Description | Uses |
nx | 75 |
File | Line number | Procedure | Code |
./pkg/compon_communic/mitcoupler_register.F | 25 | MITCOUPLER_REGISTER |
integer j,numtiles,nx,ny,i0,j0 |
./pkg/compon_communic/mitcoupler_register.F | 59 | MITCOUPLER_REGISTER |
nx=ibuf(2) |
./pkg/compon_communic/mitcoupler_register.F | 68 | MITCOUPLER_REGISTER |
if (nx.lt.1) then |
./pkg/compon_communic/mitcoupler_register.F | 69 | MITCOUPLER_REGISTER |
write(LogUnit,*) 'MITCOUPLER_register: nx = ',nx |
./pkg/compon_communic/mitcoupler_register.F | 84 | MITCOUPLER_REGISTER |
if (i0+nx-1.gt.nnx) then |
./pkg/compon_communic/mitcoupler_register.F | 94 | MITCOUPLER_REGISTER |
component_tile_nx(1,n,compind)=nx |