Ignore:
Timestamp:
Oct 30, 2017, 12:27:47 AM (7 years ago)
Author:
bclmd
Message:

correction for lapack

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.GENERIC/libf/aeronostd/photochemistry_asis.F90

    r1796 r1813  
    237237   call dgesv(nesp,1,mat,nesp,indx,cnew,nesp,code)
    238238#else
    239 #   write(*,*) "photochemistry_asis error, missing LAPACK routine dgesv"
    240 #   stop
     239   write(*,*) "photochemistry_asis error, missing LAPACK routine dgesv"
     240   stop
    241241#endif
    242242
Note: See TracChangeset for help on using the changeset viewer.