mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-09-01 13:43:40 +02:00
update doc 1
This commit is contained in:
parent
ea73b5de7d
commit
65202688cc
@ -136,9 +136,9 @@ subroutine trust_region_step_w_expected_e(n,H,W,e_val,v_grad,prev_criterion,rho,
|
||||
|
||||
include 'pi.h'
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Compute the step and the expected criterion/energy after the step
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
implicit none
|
||||
|
||||
@ -208,9 +208,9 @@ subroutine trust_region_is_step_cancelled(nb_iter,prev_criterion, criterion, cri
|
||||
|
||||
include 'pi.h'
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Compute if the step should be cancelled
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
implicit none
|
||||
|
||||
|
@ -25,9 +25,9 @@ subroutine apply_mo_rotation(R,prev_mos)
|
||||
|
||||
include 'pi.h'
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Compute the new MOs knowing the rotation matrix
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
implicit none
|
||||
|
||||
|
@ -61,10 +61,10 @@ subroutine rotation_matrix(A,LDA,R,LDR,n,info,enforce_step_cancellation)
|
||||
|
||||
implicit none
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Rotation matrix to rotate the molecular orbitals.
|
||||
! If the rotation is too large the transformation is not unitary and must be cancelled.
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
include 'pi.h'
|
||||
|
||||
|
@ -32,9 +32,9 @@ Internal:
|
||||
#+BEGIN_SRC f90 :comments org :tangle sub_to_full_rotation_matrix.irp.f
|
||||
subroutine sub_to_full_rotation_matrix(m,tmp_list,tmp_R,R)
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Compute the full rotation matrix from a smaller one
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
implicit none
|
||||
|
||||
|
@ -33,9 +33,9 @@ subroutine trust_region_expected_e(n,v_grad,H,x,prev_energy,e_model)
|
||||
|
||||
include 'pi.h'
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Compute the expected criterion/energy after the application of the step x
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
implicit none
|
||||
|
||||
|
@ -153,9 +153,9 @@ subroutine trust_region_optimal_lambda(n,e_val,tmp_wtg,delta,lambda)
|
||||
|
||||
include 'pi.h'
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Research the optimal lambda to constrain the step size in the trust region
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
implicit none
|
||||
|
||||
@ -508,9 +508,9 @@ function d1_norm_trust_region_omp(n,e_val,tmp_wtg,lambda,delta)
|
||||
use omp_lib
|
||||
include 'pi.h'
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Compute the first derivative with respect to lambda of (||x(lambda)||^2 - Delta^2)^2
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
implicit none
|
||||
|
||||
@ -645,9 +645,9 @@ function d2_norm_trust_region_omp(n,e_val,tmp_wtg,lambda,delta)
|
||||
use omp_lib
|
||||
include 'pi.h'
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Compute the second derivative with respect to lambda of (||x(lambda)||^2 - Delta^2)^2
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
implicit none
|
||||
|
||||
@ -794,9 +794,9 @@ function f_norm_trust_region_omp(n,e_val,tmp_wtg,lambda)
|
||||
|
||||
include 'pi.h'
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Compute ||x(lambda)||^2
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
implicit none
|
||||
|
||||
@ -906,9 +906,9 @@ function d1_norm_trust_region(n,e_val,w,v_grad,lambda,delta)
|
||||
|
||||
include 'pi.h'
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Compute the first derivative with respect to lambda of (||x(lambda)||^2 - Delta^2)^2
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
implicit none
|
||||
|
||||
@ -1004,9 +1004,9 @@ function d2_norm_trust_region(n,e_val,w,v_grad,lambda,delta)
|
||||
|
||||
include 'pi.h'
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Compute the second derivative with respect to lambda of (||x(lambda)||^2 - Delta^2)^2
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
implicit none
|
||||
|
||||
@ -1107,9 +1107,9 @@ function f_norm_trust_region(n,e_val,tmp_wtg,lambda)
|
||||
|
||||
include 'pi.h'
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Compute ||x(lambda)||^2
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
implicit none
|
||||
|
||||
@ -1190,9 +1190,9 @@ function d1_norm_inverse_trust_region_omp(n,e_val,tmp_wtg,lambda,delta)
|
||||
use omp_lib
|
||||
include 'pi.h'
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Compute the first derivative of (1/||x||^2 - 1/Delta^2)^2
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
implicit none
|
||||
|
||||
@ -1347,9 +1347,9 @@ function d2_norm_inverse_trust_region_omp(n,e_val,tmp_wtg,lambda,delta)
|
||||
use omp_lib
|
||||
include 'pi.h'
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Compute the second derivative of (1/||x||^2 - 1/Delta^2)^2
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
implicit none
|
||||
|
||||
@ -1506,9 +1506,9 @@ function d1_norm_inverse_trust_region(n,e_val,w,v_grad,lambda,delta)
|
||||
|
||||
include 'pi.h'
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Compute the first derivative of (1/||x||^2 - 1/Delta^2)^2
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
implicit none
|
||||
|
||||
@ -1601,9 +1601,9 @@ function d2_norm_inverse_trust_region(n,e_val,w,v_grad,lambda,delta)
|
||||
|
||||
include 'pi.h'
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Compute the second derivative of (1/||x||^2 - 1/Delta^2)^2
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
implicit none
|
||||
|
||||
|
@ -47,9 +47,9 @@ subroutine trust_region_rho(prev_energy, energy,e_model,rho)
|
||||
|
||||
include 'pi.h'
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Compute rho, the agreement between the predicted criterion/energy and the real one
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
implicit none
|
||||
|
||||
|
@ -375,9 +375,9 @@ subroutine trust_region_step(n,nb_iter,v_grad,rho,e_val,w,x,delta)
|
||||
|
||||
include 'pi.h'
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Compuet the step in the trust region
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
implicit none
|
||||
|
||||
|
@ -36,10 +36,10 @@ subroutine vec_to_mat_index(i,p,q)
|
||||
|
||||
include 'pi.h'
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Compute the indexes (p,q) of the element in the lower diagonal matrix knowing
|
||||
! its index i a vector
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
implicit none
|
||||
|
||||
|
@ -8,9 +8,9 @@ Can be done in OMP (for the first part and with omp critical for the second)
|
||||
#+BEGIN_SRC f90 :comments org :tangle vec_to_mat_v2.irp.f
|
||||
subroutine vec_to_mat_v2(n,m,v_x,m_x)
|
||||
|
||||
!BEGIN_DOC
|
||||
BEGIN_DOC
|
||||
! Vector to antisymmetric matrix
|
||||
!END_DOC
|
||||
END_DOC
|
||||
|
||||
implicit none
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user