[petsc-dev] Fortran-auto-interfaces

Jose E. Roman jroman at dsic.upv.es
Tue Jan 10 14:07:08 CST 2023


After I add the definition of tTao, if I regenerate the fortran stubs I get this in petsctao.h90:

      subroutine TaoGetLMVMMatrix(a,b,z)
       import tMat,tTao
       ...

instead of 
      subroutine TaoGetLMVMMatrix(a,b,z)
       import tMat




> El 10 ene 2023, a las 20:40, Blaise Bourdin <bourdin at mcmaster.ca> escribió:
> 
> Hi Jose,
> 
> I have created the type tTAO and PETSC_NULL_TAO what I need to figure out is how to get bfort to import tTAO in each auto interface, for instance
> 
> Blaise
> 
> 
> 
>> On Jan 10, 2023, at 12:23 PM, Jose E. Roman <jroman at dsic.upv.es> wrote:
>> 
>> The files under ftn-auto-interfaces are generated with bfort when you run configure. You can also  force its generation with 'make allfortranstubs'.
>> 
>> In the case of Tao I think the problem is that the definition of tTao is missing. You should have something like this in src/tao/f90-mod/petsctao.h:
>> 
>>      type tTao
>>        PetscFortranAddr:: v PETSC_FORTRAN_TYPE_INITIALIZE
>>      end type tTao
>> 
>> 
>> Jose
>> 
>> 
>>> El 10 ene 2023, a las 17:22, Blaise Bourdin <bourdin at mcmaster.ca> escribió:
>>> 
>>> Hi,
>>> 
>>> I am trying to bring TAO fortran interfaces up to par with SNES. How is tao/f90-mod/ftn-auto-interfaces/petsctao.h90 generated? I would need to import tTAO and replace the call to the “Tao” macro with TAO.
>>> 
>>> Regards,
>>> Blaise
>>> 
>>>>>> Canada Research Chair in Mathematical and Computational Aspects of Solid Mechanics (Tier 1)
>>> Professor, Department of Mathematics & Statistics
>>> Hamilton Hall room 409A, McMaster University
>>> 1280 Main Street West, Hamilton, Ontario L8S 4K1, Canada 
>>> https://www.math.mcmaster.ca/bourdin | +1 (905) 525 9140 ext. 27243
>>> 
>> 
> 
>> Canada Research Chair in Mathematical and Computational Aspects of Solid Mechanics (Tier 1)
> Professor, Department of Mathematics & Statistics
> Hamilton Hall room 409A, McMaster University
> 1280 Main Street West, Hamilton, Ontario L8S 4K1, Canada 
> https://www.math.mcmaster.ca/bourdin | +1 (905) 525 9140 ext. 27243
> 



More information about the petsc-dev mailing list